C     PARAMETERS FOR HEAT DIFFUSION INTO DEEP OCEAN
      PARAMETER (LMO=N_LEVOCEAN,LMO1=LMO-1)
C