◆ stbig

real(sp), parameter la_constants::stbig = real(radix(0._sp), sp)**floor( (maxexponent(0._sp) - digits(0._sp) + 1) * 0.5_sp)

Definition at line 78 of file la_constants.f90.

78 real(sp), parameter :: stbig = real(radix(0._sp), sp)**floor( &

79 (maxexponent(0._sp) - digits(0._sp) + 1) * 0.5_sp)