Changeset 791 for LMDZ4/trunk/libf/dyn3dpar/gcm.F

Timestamp:

Jun 22, 2007, 2:15:55 PM (17 years ago)

Author:

lsce

Message:

ACo : mise a jour pour inca

File:

• LMDZ4/trunk/libf/dyn3dpar/gcm.F (modified) (2 diffs)

LMDZ4/trunk/libf/dyn3dpar/gcm.F

@@ -11 +11 @@
       USE mod_const_mpi, ONLY: init_const_mpi
       USE parallel
+      USE mod_phys_lmdz_para, ONLY : klon_mpi_para_nb
+      USE mod_grid_phy_lmdz
       USE dimphy
       USE mod_interface_dyn_phys
@@ -235 +237 @@
 #ifdef INCA
       call init_const_lmdz(nbtrac,anneeref,dayref,iphysiq,day_step,nday)
-      call init_inca_para(iim,jjm+1,klon2,phy_size,klon_para_nb)
+      call init_inca_para(iim,jjm+1,klon_glo,mpi_size,klon_mpi_para_nb)
 #endif