Ignore:
Timestamp:
Apr 2, 2026, 3:46:30 PM (9 days ago)
Author:
emillour
Message:

Generic PCM:
Clean up module thermcell_mod.F90 : make module variables private and remove
unused module variables.
While at it, put all thermcell_*.F90 routines in modules.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.GENERIC/libf/phygeneric/thermcell_env.F90

    r4146 r4168  
    1 !
    2 !
     1MODULE thermcell_env_mod
     2
     3IMPLICIT NONE
     4
     5CONTAINS
    36!
    47SUBROUTINE thermcell_env(ngrid,nlay,nq,pq,pt,pu,pv,pplay,pplev,               &
    … …  
    153156     
    154157     
    155 RETURN
    156 END
     158END SUBROUTINE thermcell_env
     159
     160END MODULE thermcell_env_mod
Note: See TracChangeset for help on using the changeset viewer.