c Note: SNWMID and SNWALB parameters modified to obtain improved albedo and radswg (L.Takacs 2/17/00)
c ---------------------------------------------------------------------------------------------------
      DATA SNWMID /100.,100.,100.,10.,100.,10.,10.,10.,1.e-16,10./