Changeset 3511 for LMDZ6/trunk/libf


Ignore:
Timestamp:
May 20, 2019, 11:25:15 AM (6 years ago)
Author:
idelkadi
Message:

Implementation de la version cospv2 dans LMDZ (suite)

Location:
LMDZ6/trunk/libf/phylmd
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/cospv2/lmdz_cosp_interface.F90

    r3491 r3511  
    1616!  subroutine phys_cosp2( itap,dtime,freq_cosp, &
    1717  subroutine lmdz_cosp_interface(itap, dtime, freq_cosp, ok_mensuelCOSP, ok_journeCOSP,   &
    18                                 ok_hfCOSP, ecrit_mth, ecrit_day, ecrit_hf, ok_all_xml,   &
    19                                 missing_val, Nptslmdz, Nlevlmdz, lon, lat, presnivs,     &
    20                                 overlaplmdz, sunlit, ref_liq, ref_ice, fracTerLic,       &
    21                                 u_wind, v_wind, phis, phi, ph, p, skt, t, sh, rh,        &
    22                                 tca, cca, mr_lsliq, mr_lsice, fl_lsrainI, fl_lssnowI,    &
    23                                 fl_ccrainI, fl_ccsnowI, mr_ozone, dtau_s, dem_s)
     18                        ok_hfCOSP, ecrit_mth, ecrit_day, ecrit_hf, ok_all_xml,   &
     19                        missing_val, Nptslmdz, Nlevlmdz, lon, lat, presnivs,     &
     20                        overlaplmdz, sunlit, ref_liq, ref_ice, fracTerLic,       &
     21                        u_wind, v_wind, phis, phi, ph, p, skt, t, sh, rh,        &
     22                        tca, cca, mr_lsliq, mr_lsice, fl_lsrainI, fl_lssnowI,    &
     23                        fl_ccrainI, fl_ccsnowI, mr_ozone, dtau_s, dem_s)
    2424
    2525!--------------  Inputs  ---------------
    … …  
    7474
    7575!!! Modules faisant partie du code source de COSPv2
    76   use cosp_kinds,                         only: wp                         
     76  use cosp_kinds,                 only: wp                         
    7777  use MOD_COSP_CONFIG,                    only: N_HYDRO,RTTOV_MAX_CHANNELS, &
    7878                                                niv_sorties, vgrid_z_in

  • LMDZ6/trunk/libf/phylmd/physiq_mod.F90

    r3496 r3511  
    11131113    ! Declarations pour Simulateur COSP
    11141114    !============================================================
    1115     real :: mr_ozone(klon,klev)
     1115    real :: mr_ozone(klon,klev), phicosp(klon,klev)
    11161116
    11171117    !IM stations CFMIP
Note: See TracChangeset for help on using the changeset viewer.