Ignore:
Timestamp:
May 6, 2015, 12:14:12 PM (10 years ago)
Author:
ymipsl
Message:

Reorganize geometry and grid modules. Prepare physics for unstructutured grid support. Simplify initialization of physics from dynamic.
Compiled only with dynd3dmem, but not tested for moment.

YM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/mod_phys_lmdz_para.F90

    r3817 r3825  
    1616CONTAINS
    1717
    18   SUBROUTINE Init_phys_lmdz_para(iim,jjp1,nb_proc,distrib,communicator)
     18  SUBROUTINE Init_phys_lmdz_para(nbp, nbp_lon, nbp_lat, communicator)
    1919  IMPLICIT NONE
    20     INTEGER,INTENT(in) :: iim
    21     INTEGER,INTENT(in) :: jjp1
    22     INTEGER,INTENT(in) :: nb_proc
    23     INTEGER,INTENT(in) :: distrib(0:nb_proc-1)
    24     INTEGER,INTENT(in) :: communicator
     20    INTEGER,INTENT(IN) :: nbp
     21    INTEGER,INTENT(IN) :: nbp_lon
     22    INTEGER,INTENT(IN) :: nbp_lat
     23    INTEGER,INTENT(IN) :: communicator
    2524
    26     CALL Init_phys_lmdz_mpi_data(iim,jjp1,nb_proc,distrib,communicator)
     25    CALL Init_phys_lmdz_mpi_data(nbp, nbp_lon, nbp_lat, communicator)
    2726!$OMP PARALLEL
    2827    CALL Init_phys_lmdz_omp_data(klon_mpi)
Note: See TracChangeset for help on using the changeset viewer.