00001 /* min0 gives the minimum value of integers 00002 00003 Ver1.0 Apr.12,1988. */ 00004 00005 #include "arith.h" 00006 00007 int min0(va_alist) 00008 va_dcl 00009 { 00010 va_list ap; 00011 int i,n; 00012 int min,x; 00013 00014 va_start(ap); 00015 00016 n=va_arg(ap, int); 00017 min=va_arg(ap, int); 00018 00019 for(i=0; i<n-1; i++){ 00020 x=va_arg(ap, int); 00021 if(x<min) 00022 min=x; 00023 } 00024 00025 return(min); 00026 00027 va_end(ap); 00028 } 00029 00030 00031 00032 00033 00034 00035 00036