Ignore:
Timestamp:
Apr 20, 2022, 11:01:09 AM (2 years ago)
Author:
acozic
Message:

modify lmdz code in order to transfer to inca model all infomations necessary for the coupling with dynamico

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phy_common/physics_distribution_mod.F90

    r3435 r4127  
    2929
    3030    CALL init_grid_phy_lmdz(grid_type,nvertex, nbp_lon,nbp_lat,nbp_lev)
    31     CALL init_phys_lmdz_para(nbp,nbp_lon, nbp_lat, communicator)
     31    CALL init_phys_lmdz_para(nbp,nbp_lon, nbp_lat,nbp_lev, grid_type,nvertex, communicator)
    3232!$OMP PARALLEL
    3333    CALL init_dimphy(klon_omp,nbp_lev)
     34
     35#ifdef INCA
     36       CALL Init_inca_dim(klon_omp,nbp_lev)
     37#endif
    3438
    3539! Initialization of Reprobus
Note: See TracChangeset for help on using the changeset viewer.