Ignore:
Timestamp:
Apr 17, 2015, 10:30:37 PM (10 years ago)
Author:
millour
Message:

Further cleanup and removal of references to iniprint.h.
Also added bench testcase 48x36x19.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed
  • dynamico_lmdz/aquaplanet/LMDZ5/libf/dyn3dpar/gcm.F

    r3816 r3817  
    1111
    1212
    13       USE mod_const_mpi, ONLY: init_const_mpi
     13      USE mod_const_mpi, ONLY: init_const_mpi, COMM_LMDZ
    1414      USE parallel_lmdz
    1515      USE infotrac
     
    163163
    164164#ifdef CPP_PHYS
    165         CALL Init_Phys_lmdz(iim,jjp1,llm,mpi_size,distrib_phys)
     165        CALL Init_Phys_lmdz(iim,jjp1,llm,mpi_size,distrib_phys,COMM_LMDZ)
    166166!#endif
    167167!      CALL set_bands
Note: See TracChangeset for help on using the changeset viewer.