REAL*4 BIG_VALUE, N_M_MIN PARAMETER (BIG_VALUE = 1.0E10) PARAMETER (N_M_MIN = 3.0)