sleep_ X
1: /* Fortran sleep 3/20/80 */ 2: sleep_(secs) 3: int *secs; 4: { 5: sleep((unsigned) *secs); 6: }