Changeset 2784 for trunk/LMDZ.GENERIC
- Timestamp:
- Aug 3, 2022, 2:23:39 PM (2 years ago)
- Location:
- trunk/LMDZ.GENERIC
- Files:
-
- 1 deleted
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.GENERIC/README
r2655 r2784 1724 1724 4) Change "strictboundH2H2cia" to the generic "strictboundcia" for H2,He,CH4. 1725 1725 It can be added for others CIA (N2,H,CO2...) if you want. 1726 1727 == 03/08/2022 == EM 1728 Some cleanup: 1729 - remove top level obsolete "patch_large_domains" directory 1730 - remove unused "watercaptag" field in the physics. -
trunk/LMDZ.GENERIC/libf/phystd/dyn1d/rcm1d.F
r2714 r2784 7 7 use infotrac, only: nqtot, tname 8 8 use tracer_h, only: noms, is_condensable 9 use surfdat_h, only: albedodat, phisfi, dryness, watercaptag,9 use surfdat_h, only: albedodat, phisfi, dryness, 10 10 & zmea, zstd, zsig, zgam, zthe, 11 11 & emissiv, emisice, iceradius, -
trunk/LMDZ.GENERIC/libf/phystd/initracer.F90
r2731 r2784 1 1 SUBROUTINE initracer(ngrid,nq,nametrac) 2 2 3 use surfdat_h, ONLY: dryness , watercaptag3 use surfdat_h, ONLY: dryness 4 4 USE tracer_h 5 5 USE callkeys_mod, only: water … … 502 502 !! this is defined in surfdat_h.F90 503 503 IF (.not.ALLOCATED(dryness)) ALLOCATE(dryness(ngrid)) 504 IF (.not.ALLOCATED(watercaptag)) ALLOCATE(watercaptag(ngrid))505 504 506 505 do ig=1,ngrid 507 if (ngrid.ne.1) watercaptag(ig)=.false.508 506 dryness(ig) = 1. 509 507 enddo -
trunk/LMDZ.GENERIC/libf/phystd/physiq_mod.F90
r2736 r2784 24 24 use aerosol_mod, only: iaero_co2, iaero_h2o 25 25 use surfdat_h, only: phisfi, zmea, zstd, zsig, zgam, zthe, & 26 dryness , watercaptag26 dryness 27 27 use comdiurn_h, only: coslat, sinlat, coslon, sinlon 28 28 use comsaison_h, only: mu0, fract, dist_star, declin, right_ascen -
trunk/LMDZ.GENERIC/libf/phystd/surfdat_h.F90
r1482 r2784 19 19 real,allocatable,dimension(:) :: dryness !"Dryness coefficient" for grnd water ice sublimation 20 20 ! AS: previously in tracer.h. it is more logical here. 21 22 logical,allocatable,dimension(:) :: watercaptag !! was in watercap.h 23 !$OMP THREADPRIVATE(dryness,watercaptag) 21 !$OMP THREADPRIVATE(dryness) 24 22 25 23 end module surfdat_h
Note: See TracChangeset
for help on using the changeset viewer.