Ignore:
Timestamp:
Oct 28, 2024, 2:33:29 PM (4 days ago)
Author:
abarral
Message:

As discussed internally, remove generic ONLY: ... for new _mod_h modules

Location:
LMDZ6/trunk/libf/phylmd/StratAer
Files:
4 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/StratAer/calcaerosolstrato_rrtm.f90

    r5282 r5285  
    1414
    1515  USE dimensions_mod, ONLY: iim, jjm, llm, ndm
    16 USE paramet_mod_h, ONLY: iip1, iip2, iip3, jjp1, llmp1, llmp2, llmm1, kftd, ip1jm, ip1jmp1, &
    17           ip1jmi1, ijp1llm, ijmllm, mvar, jcfil, jcfllm
     16USE paramet_mod_h
    1817IMPLICIT NONE
    1918

  • LMDZ6/trunk/libf/phylmd/StratAer/coagulate.f90

    r5274 r5285  
    2323  !     -----------------------------------------------------------------------
    2424
    25   USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO                   &
    26           , RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA                  &
    27           , R_ecc, R_peri, R_incl                                      &
    28           , RA, RG, R1SA                                         &
    29           , RSIGMA                                                     &
    30           , R, RMD, RMV, RD, RV, RCPD                    &
    31           , RMO3, RMCO2, RMC, RMCH4, RMN2O, RMCFC11, RMCFC12        &
    32           , RCPV, RCVD, RCVV, RKAPPA, RETV, eps_w                    &
    33           , RCW, RCS                                                 &
    34           , RLVTT, RLSTT, RLMLT, RTT, RATM                           &
    35           , RESTT, RALPW, RBETW, RGAMW, RALPS, RBETS, RGAMS            &
    36           , RALPD, RBETD, RGAMD
     25  USE yomcst_mod_h
    3726  USE dimphy, ONLY : klon,klev
    3827  USE aerophys

  • LMDZ6/trunk/libf/phylmd/StratAer/nucleation_tstep_mod.f90

    r5274 r5285  
    88SUBROUTINE nucleation_rate(rhoa,t_seri,pplay,rh,a_xm,b_xm,c_xm,nucl_rate,ntot_n,x_n)
    99
    10   USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO                   &
    11           , RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA                  &
    12           , R_ecc, R_peri, R_incl                                      &
    13           , RA, RG, R1SA                                         &
    14           , RSIGMA                                                     &
    15           , R, RMD, RMV, RD, RV, RCPD                    &
    16           , RMO3, RMCO2, RMC, RMCH4, RMN2O, RMCFC11, RMCFC12        &
    17           , RCPV, RCVD, RCVV, RKAPPA, RETV, eps_w                    &
    18           , RCW, RCS                                                 &
    19           , RLVTT, RLSTT, RLMLT, RTT, RATM                           &
    20           , RESTT, RALPW, RBETW, RGAMW, RALPS, RBETS, RGAMS            &
    21           , RALPD, RBETD, RGAMD
     10  USE yomcst_mod_h
    2211  USE aerophys
    2312  USE infotrac_phy
    … …  
    342331  !
    343332
    344   USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO                   &
    345           , RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA                  &
    346           , R_ecc, R_peri, R_incl                                      &
    347           , RA, RG, R1SA                                         &
    348           , RSIGMA                                                     &
    349           , R, RMD, RMV, RD, RV, RCPD                    &
    350           , RMO3, RMCO2, RMC, RMCH4, RMN2O, RMCFC11, RMCFC12        &
    351           , RCPV, RCVD, RCVV, RKAPPA, RETV, eps_w                    &
    352           , RCW, RCS                                                 &
    353           , RLVTT, RLSTT, RLMLT, RTT, RATM                           &
    354           , RESTT, RALPW, RBETW, RGAMW, RALPS, RBETS, RGAMS            &
    355           , RALPD, RBETD, RGAMD
     333  USE yomcst_mod_h
    356334  USE aerophys
    357335

  • LMDZ6/trunk/libf/phylmd/StratAer/strataer_emiss_mod.f90

    r5274 r5285  
    214214  SUBROUTINE strataer_ponde_init()
    215215
    216     USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO                   &
    217           , RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA                  &
    218           , R_ecc, R_peri, R_incl                                      &
    219           , RA, RG, R1SA                                         &
    220           , RSIGMA                                                     &
    221           , R, RMD, RMV, RD, RV, RCPD                    &
    222           , RMO3, RMCO2, RMC, RMCH4, RMN2O, RMCFC11, RMCFC12        &
    223           , RCPV, RCVD, RCVV, RKAPPA, RETV, eps_w                    &
    224           , RCW, RCS                                                 &
    225           , RLVTT, RLSTT, RLMLT, RTT, RATM                           &
    226           , RESTT, RALPW, RBETW, RGAMW, RALPS, RBETS, RGAMS            &
    227           , RALPD, RBETD, RGAMD
     216    USE yomcst_mod_h
    228217USE regular_lonlat_mod, ONLY: lon_reg, lat_reg
    229218    USE dimphy, ONLY: klon
Note: See TracChangeset for help on using the changeset viewer.