Changeset 119 for trunk/libf/phytitan/init_phys_lmdz.F90

Timestamp:

May 17, 2011, 10:56:57 AM (14 years ago)

Author:

slebonnois

Message:

Sebastien Lebonnois: apres validation des versions Venus et Titan,
correction d'un certain nombre de bugs.

File:

• trunk/libf/phytitan/init_phys_lmdz.F90 (modified) (1 diff)

trunk/libf/phytitan/init_phys_lmdz.F90

@@ -15 +15 @@
 
     CALL init_grid_phy_lmdz(iim,jjp1,llm)
-    CALL init_dimphy(klon,nbp_lev)
+    CALL init_dimphy(klon_glo,nbp_lev)
  
 END SUBROUTINE init_phys_lmdz