numarg_ X
1: /* Fortran iargc or get number of args in command line PLWard 3/20/80 */ 2: int numarg_() 3: { 4: extern int xargc; 5: return ( xargc - 1 ); 6: }