In today's episode of "What where the Fortran dudes in the 1980s thinking?": consider the following code, which can be found in various forms in the two SLATEC quadrature routines dgaus8 and dqnc79: K=I1MACH(14)ANIB=D1MACH(5)*K/0.30102000D0NBITS=ANIB Note that the "mach" routines (more …