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

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

Location:
dynamico_lmdz/aquaplanet/LMDZ5/libf/dynlonlat_phylonlat
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • dynamico_lmdz/aquaplanet/LMDZ5/libf/dynlonlat_phylonlat/calfis_loc.F

    r3809 r3817  
    3232c   .........
    3333      USE dimphy
    34       USE mod_phys_lmdz_para, mpi_root_xx=>mpi_root
     34      USE mod_phys_lmdz_mpi_data, mpi_root_xx=>mpi_master
    3535      USE mod_interface_dyn_phys
    3636      USE IOPHY

  • dynamico_lmdz/aquaplanet/LMDZ5/libf/dynlonlat_phylonlat/calfis_p.F

    r3809 r3817  
    2929! If using physics
    3030      USE dimphy
    31       USE mod_phys_lmdz_para, mpi_root_xx=>mpi_root
     31      USE mod_phys_lmdz_mpi_data, mpi_root_xx=>mpi_master
    3232      USE mod_interface_dyn_phys
    3333      USE IOPHY

  • dynamico_lmdz/aquaplanet/LMDZ5/libf/dynlonlat_phylonlat/phylmd/iniphysiq.F90

    r3816 r3817  
    2424  USE infotrac, ONLY: nqtot,nqo,nbtr,tname,ttext,type_trac,&
    2525                      niadv,conv_flg,pbl_flg,solsym
    26   USE phytrac_mod, ONLY: ini_phytrac_mod
    2726  USE control_mod, ONLY: dayref,anneeref,day_step,iphysiq,nday,&
    2827                         config_inca,raz_date,offline
    … …  
    163162
    164163  ! Initialize tracer names, numbers, etc. for physics
    165   CALL ini_phytrac_phy(nqtot,nqo,nbtr,tname,ttext,type_trac,&
    166                        niadv,conv_flg,pbl_flg,solsym)
     164  CALL init_infotrac_phy(nqtot,nqo,nbtr,tname,ttext,type_trac,&
     165                         niadv,conv_flg,pbl_flg,solsym)
    167166
    168167  ! transfer some flags/infos from dynamics to physics
Note: See TracChangeset for help on using the changeset viewer.