source: LMDZ4/branches/LMDZ4_V3_patches/libf/dyn3d/mod_const_para.F90 @ 5403

Last change on this file since 5403 was 844, checked in by (none), 17 years ago

This commit was manufactured by cvs2svn to create branch
'LMDZ4_V3_patches'.

  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 227 bytes
Line 
1MODULE mod_const_mpi
2
3  INTEGER :: COMM_LMDZ
4  INTEGER :: MPI_REAL_LMDZ
5 
6
7CONTAINS
8
9  SUBROUTINE Init_const_mpi
10  IMPLICIT NONE
11 
12    COMM_LMDZ=0
13    MPI_REAL_LMDZ=0
14  END SUBROUTINE Init_const_mpi
15
16END MODULE mod_const_mpi
Note: See TracBrowser for help on using the repository browser.