Ignore:
Timestamp:
Oct 25, 2024, 3:41:23 PM (9 hours ago)
Author:
abarral
Message:

Replace yomcst.h by existing module

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ6/trunk/libf/phylmd/lsc_scav.f90

    r5268 r5274  
    1212  USE infotrac_phy,ONLY : nbtr
    1313  USE iophy
    14   IMPLICIT NONE
     14  USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO                   &
     15          , RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA                  &
     16          , R_ecc, R_peri, R_incl                                      &
     17          , RA, RG, R1SA                                         &
     18          , RSIGMA                                                     &
     19          , R, RMD, RMV, RD, RV, RCPD                    &
     20          , RMO3, RMCO2, RMC, RMCH4, RMN2O, RMCFC11, RMCFC12        &
     21          , RCPV, RCVD, RCVV, RKAPPA, RETV, eps_w                    &
     22          , RCW, RCS                                                 &
     23          , RLVTT, RLSTT, RLMLT, RTT, RATM                           &
     24          , RESTT, RALPW, RBETW, RGAMW, RALPS, RBETS, RGAMS            &
     25          , RALPD, RBETD, RGAMD
     26IMPLICIT NONE
    1527!=====================================================================
    1628! Objet : depot humide (lessivage et evaporation) de traceurs
    … …  
    2133
    2234  include "chem.h"
    23   include "YOMCST.h"
     35
    2436  include "YOECUMF.h"
    2537
Note: See TracChangeset for help on using the changeset viewer.