Changeset 5285 for LMDZ6/trunk/libf/phylmdiso/phyaqua_mod.F90
- Timestamp:
- Oct 28, 2024, 2:33:29 PM (4 days ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmdiso/phyaqua_mod.F90
r5282 r5285 48 48 USE dimsoil_mod_h, ONLY: nsoilmx 49 49 50 USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO & 51 , RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA & 52 , R_ecc, R_peri, R_incl & 53 , RA, RG, R1SA & 54 , RSIGMA & 55 , R, RMD, RMV, RD, RV, RCPD & 56 , RMO3, RMCO2, RMC, RMCH4, RMN2O, RMCFC11, RMCFC12 & 57 , RCPV, RCVD, RCVV, RKAPPA, RETV, eps_w & 58 , RCW, RCS & 59 , RLVTT, RLSTT, RLMLT, RTT, RATM & 60 , RESTT, RALPW, RBETW, RGAMW, RALPS, RBETS, RGAMS & 61 , RALPD, RBETD, RGAMD 50 USE yomcst_mod_h 62 51 IMPLICIT NONE 63 52 … … 429 418 ! ==================================================================== 430 419 SUBROUTINE zenang_an(cycle_diurne, gmtime, rlat, rlon, rmu0, fract) 431 USE yomcst_mod_h, ONLY: RPI, RCLUM, RHPLA, RKBOL, RNAVO & 432 , RDAY, REA, REPSM, RSIYEA, RSIDAY, ROMEGA & 433 , R_ecc, R_peri, R_incl & 434 , RA, RG, R1SA & 435 , RSIGMA & 436 , R, RMD, RMV, RD, RV, RCPD & 437 , RMO3, RMCO2, RMC, RMCH4, RMN2O, RMCFC11, RMCFC12 & 438 , RCPV, RCVD, RCVV, RKAPPA, RETV, eps_w & 439 , RCW, RCS & 440 , RLVTT, RLSTT, RLMLT, RTT, RATM & 441 , RESTT, RALPW, RBETW, RGAMW, RALPS, RBETS, RGAMS & 442 , RALPD, RBETD, RGAMD 420 USE yomcst_mod_h 443 421 USE dimphy 444 422 IMPLICIT NONE
Note: See TracChangeset
for help on using the changeset viewer.