src/libstddjb/tain_earliestv.c


1
2
3
4
5
6
7
8
9

/* ISC license. */

#include <skalibs/tai.h>

void tain_earliestv (tain *t, tain const *const *v, unsigned int n)
{
  for (unsigned int i = 0 ; i < n ; i++)
    if (tain_less(v[i], t)) *t = *v[i] ;
}