skalibs

Mirror/fork of https://skarnet.org/software/skalibs/
git clone https://ccx.te2000.cz/git/skalibs
Log | Files | Refs | README | LICENSE

tain_earliestv.c (200B)

      1 /* ISC license. */
      2 
      3 #include <skalibs/tai.h>
      4 
      5 void tain_earliestv (tain *t, tain const *const *v, unsigned int n)
      6 {
      7   for (unsigned int i = 0 ; i < n ; i++)
      8     if (tain_less(v[i], t)) *t = *v[i] ;
      9 }