D1mach D1mach_sub Dlamch Dlamch_sub I1mach I1mach_sub R1mach R1mach_sub Slamch Slamch_sub

R1mach_sub() Sub R1mach_sub ( Ret As  Single, I As  Long  ) Machine parameters (single precision floating-point arithmetic) (Subroutine version) Purpose Determines the machine parameters on single precision floating-point arithmetic. Parameters [out] Ret The value specified by I. (0 will be returned if I is invalid.) [in] I Specifies the value to be returned. = 1: B^(L-1), the smallest positive magnitude. = 2: B^U*(1 - B^(-T)), the largest magnitude. = 3: B^(-T), the smallest relative spacing. = 4: B^(1-T), the largest relative spacing. = 5: Log10(B) Note Assume floating-point numbers are represented in the t-digit, base-B form   sign (B^e)*((x(1)/B) + ... + (x(t)/B^t)) where 0 <= x(i) < B for i = 1, ..., t, 0 < x(1), and L <= e <= U. The values of B, t, L and U are provided in I1mach(). Reference SLATEC