◆ stsml

real(sp), parameter la_constants::stsml = real(radix(0._sp), sp)**ceiling( (minexponent(0._sp) - 1) * 0.5_sp)

Definition at line 76 of file la_constants.f90.

76 real(sp), parameter :: stsml = real(radix(0._sp), sp)**ceiling( &

77 (minexponent(0._sp) - 1) * 0.5_sp)