source: ICOSA_LMDZ/src/phylmdiso/icolmdz_initialize.f90

Last change on this file was 6038, checked in by Sebastien Nguyen, 6 days ago

added modified version of icolmdz_initialize.f90 in src/phylmdiso to compile with older version of DYNAMICO including MPI initialization. The current version of DYNAMICO does not initialize MPI : it is done in ICOSA_LMDZ/src/phylmd/icolmdz_initialize.f90

  • Property svn:executable set to *
File size: 324 bytes
Line 
1MODULE icolmdz_initialize
2
3CONTAINS
4
5  SUBROUTINE initialize
6!!  SN 19/01/2026 hack to use ICOSA_LMDZ/phylmdiso with older DYNAMICO
7!!  to be removed soon
8!!  USE icolmdz_mpipara, ONLY : set_mpi_wrapper => set_wrapper
9  IMPLICIT NONE
10
11!!    CALL set_mpi_wrapper
12
13  END SUBROUTINE initialize
14
15END MODULE icolmdz_initialize
Note: See TracBrowser for help on using the repository browser.