293     #define SPDP double  macro
296     #define SPDP float  macro
312  void pa(SPDP e[4], SPDP t, SPDP t2);
313  void po(SPDP e1[4], long j, long k, long l);
314  void p3(SPDP *x, SPDP *y, SPDP *z, SPDP t, SPDP t1, SPDP t2);
315  void pout(char title[22], float ops, int type, SPDP checknum,
316 		  SPDP time, int calibrate, int section);
319  static SPDP loop_time[9];
320  static SPDP loop_mops[9];
321  static SPDP loop_mflops[9];
322  static SPDP TimeUsed;
323  static SPDP mwips;
325  static SPDP Check;
326  static SPDP results[9];
383     printf("%11.2f Seconds %10.0f   Passes (x 100)\n", TimeUsed, (SPDP)(xtra));
403    if (TimeUsed > 0) xtra = (long)((SPDP)(duration * xtra) / TimeUsed);
577 	SPDP x,y,z;  in whetstones()
579 	SPDP e1[4],timea,timeb, dtime();  in whetstones()
581 	SPDP t =  0.49999975;  in whetstones()
582 	SPDP t0 = t;  in whetstones()
583 	SPDP t1 = 0.50000025;  in whetstones()
584 	SPDP t2 = 2.0;  in whetstones()
619 	timeb = (dtime()-timea)/(SPDP)(n1mult);  in whetstones()
660 			2,(SPDP)(j),timeb,calibrate,3);  in whetstones()
764     void pa(SPDP e[4], SPDP t, SPDP t2)  in pa()
778     void po(SPDP e1[4], long j, long k, long l)  in po()
786     void p3(SPDP *x, SPDP *y, SPDP *z, SPDP t, SPDP t1, SPDP t2)  in p3()
797     void pout(char title[18], float ops, int type, SPDP checknum,  in pout()
798 	      SPDP time, int calibrate, int section)  in pout()
800 	SPDP mops,mflops;  in pout()
887 SPDP dtime()  in dtime()
889  SPDP q;  in dtime()
900  q = ((SPDP)(tt.ticks + (tt.minutes * 60L * 50L))) / (SPDP)HZ;  in dtime()
922 SPDP dtime()  in dtime()
924  SPDP q;  in dtime()
928  q = (SPDP)(rusage.ru_utime.tv_sec);  in dtime()
929  q = q + (SPDP)(rusage.ru_utime.tv_usec) * 1.0e-06;  in dtime()
951 SPDP dtime()  in dtime()
953  SPDP q;  in dtime()
957  q = (SPDP)(tms.tms_utime) / (SPDP)HZ;  in dtime()
984 SPDP dtime()  in dtime()
986  SPDP q;  in dtime()
990  q = (SPDP)(tms.proc_user_time) / (SPDP)HZ;  in dtime()
1007 SPDP dtime()  in dtime()
1009  SPDP q;  in dtime()
1013  q = 60.0 * (SPDP)(tnow.ti_min);  in dtime()
1014  q = q + (SPDP)(tnow.ti_sec);  in dtime()
1015  q = q + (SPDP)(tnow.ti_hund)/(SPDP)HZ;  in dtime()
1033 SPDP dtime()  in dtime()
1035  SPDP q;  in dtime()
1038  q = (SPDP)tnow / (SPDP)HZ;  in dtime()
1051 SPDP dtime()  in dtime()
1053  SPDP q;  in dtime()
1055  q = (SPDP)clock() / (SPDP)HZ;  in dtime()
1068 SPDP dtime()  in dtime()
1070  SPDP q;  in dtime()
1086 SPDP dtime()  in dtime()
1088  SPDP q;  in dtime()
1105 SPDP dtime()  in dtime()
1107  SPDP q;  in dtime()
1110  q = (SPDP)clock() / (SPDP)CLOCKS_PER_SEC;  in dtime()
1125 SPDP dtime()  in dtime()
1127  SPDP q;  in dtime()
1130  q = (SPDP)tnow.tv_sec + (SPDP)tnow.tv_usec * 1.0e-6;  in dtime()
1145 SPDP dtime()  in dtime()
1147  SPDP q;  in dtime()
1151  q = (SPDP)(rusage.tms_utime) * 1.0e-06;  in dtime()
1170 static SPDP     mgrClock;
1186 SPDP dtime( )  in dtime()
1214 SPDP dtime()  in dtime()
1216  SPDP q;  in dtime()
1218  q = (SPDP) (TimeNowHigh()) / (SPDP) CLK_TCK_HIGH;  in dtime()
1239 SPDP dtime()  in dtime()
1241  SPDP q;  in dtime()
1245  q = (SPDP)(rusage.ru_utime.tv_sec);  in dtime()
1246  q = q + (SPDP)(rusage.ru_utime.tv_nsec) * 1.0e-09;  in dtime()
1260 SPDP dtime(void)  in dtime()
1262  SPDP q;  in dtime()
1264  q = (SPDP)GetTickCount() * 1.0e-03;  in dtime()
1282 SPDP dtime()  in dtime()
1284  SPDP q;  in dtime()
1286  q = (SPDP)tms.tms_utime / (SPDP)CLK_TCK;  in dtime()