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


euslisp
Author(s): Toshihiro Matsui
autogenerated on Thu Jun 6 2019 18:05:53