Changeset 1233 for trunk/LMDZ.MARS/libf/phymars/orbite.F

Timestamp:

May 1, 2014, 12:06:13 AM (11 years ago)

Author:

aslmd

Message:

LMDZ.MARS. Filling geom arrays is now out of phys_var_state_init. Done through a merged function ini_fillgeom within the comgeomfi_h module. Cosmetic changes. New interface with the mesoscale model: lesser amount of dirty MESOSCALE includes.

File:

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

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

@@ -37 +37 @@
 c ----------
 
-      REAL pday,pdist_sol,pdecli,pls,i
+      REAL pdist_sol,pdecli,pls,i
 
 c-----------------------------------------------------------------------