Changeset 1779 for trunk/LMDZ.MARS/libf/phymars/simpleclouds.F

Timestamp:

Aug 27, 2017, 11:07:00 AM (7 years ago)

Author:

aslmd

Message:

LMDZ.MARS (purely comments) marked the absolute firstcalls not supposed to change with runtime (e.g. not domain-related). this is most of them. those firstcall can stay local and do not need to be linked with the caller's general firstcall.

File:

• trunk/LMDZ.MARS/libf/phymars/simpleclouds.F (modified) (1 diff)

trunk/LMDZ.MARS/libf/phymars/simpleclouds.F

@@ -62 +62 @@
 c     Local variables:
 
-      LOGICAL,SAVE :: firstcall = .true.
-            
       REAL rhocloud(ngrid,nlay)  ! Cloud density (kg.m-3)