5 void PROC_PROC(long int *f, int *i)
9 void proc_proc_(long int *f, int *i)
11 void proc_proc__(long int *f, int *i)
15 void proc_proc_(long int *f, int *i)
17 #if defined(WIN) && !defined(WINIFL)
18 void _stdcall PROC_PROC(long int *f, int *i)
21 void proc_proc(long int *f, int *i)
23 #if defined(AIX) || defined(WINPGI)
24 void proc_proc(long int *f, int *i)
30 static long int NaNQm;
46 void PROC_CONV(char *buf, int *i, int n)
49 void proc_conv__(char *buf, int *i, int n)
52 void proc_conv_(char *buf, int *i, int n)
54 #if defined(AIX) || defined(WINPGI)
55 void proc_conv(char *buf, int *i, int n)
58 void _stdcall PROC_CONV(char *buf, int *i, int n)
69 void PROC_CONV_R(char *buf, int *i, int n)
72 void proc_conv_r__(char *buf, int *i, int n)
75 void proc_conv_r_(char *buf, int *i, int n)
77 #if defined(AIX) || defined(WINPGI)
78 void proc_conv_r(char *buf, int *i, int n)
81 void _stdcall PROC_CONV_R(char *buf, int *i, int n)
86 /* sprintf(buf,"%d",*i); */
94 void DSVRGP(int *n, double *tab1, double *tab2, int *itab)
97 void dsvrgp__(int *n, double *tab1, double *tab2, int *itab)
100 void dsvrgp_(int *n, double *tab1, double *tab2, int *itab)
102 #if defined(AIX) || defined(WINPGI)
103 void dsvrgp(int *n, double *tab1, double *tab2, int *itab)
106 void _stdcall DSVRGP(int *n, double *tab1, double *tab2, int *itab)
122 for(i=k+1; i<*n; i++)