Changeset 4143 for LMDZ6/trunk/libf/phylmdiso/surf_land_bucket_mod.F90
- Timestamp:
- May 9, 2022, 12:35:40 PM (2 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmdiso/surf_land_bucket_mod.F90
r4033 r4143 35 35 USE indice_sol_mod 36 36 #ifdef ISO 37 use infotrac_phy, ONLY: nt raciso,niso37 use infotrac_phy, ONLY: ntiso,niso 38 38 USE isotopes_mod, ONLY: iso_eau, iso_HDO, iso_O18, iso_O17, & 39 39 ridicule_qsol … … 69 69 REAL, DIMENSION(klon), INTENT(IN) :: swnet, lwnet 70 70 #ifdef ISO 71 REAL, DIMENSION(nt raciso,klon), INTENT(IN):: xtprecip_rain, xtprecip_snow72 REAL, DIMENSION(nt raciso,klon), INTENT(IN):: xtspechum71 REAL, DIMENSION(ntiso,klon), INTENT(IN) :: xtprecip_rain, xtprecip_snow 72 REAL, DIMENSION(ntiso,klon), INTENT(IN) :: xtspechum 73 73 #endif 74 74 … … 91 91 REAL, DIMENSION(klon), INTENT(OUT) :: dflux_s, dflux_l 92 92 #ifdef ISO 93 REAL, DIMENSION(nt raciso,klon), INTENT(OUT):: xtevap94 REAL, DIMENSION(klon), INTENT(OUT):: h195 REAL, DIMENSION(niso,klon), INTENT(OUT):: xtrunoff_diag96 REAL, DIMENSION(klon), INTENT(OUT):: runoff_diag97 REAL, DIMENSION(niso,klon), INTENT(IN):: Rland_ice93 REAL, DIMENSION(ntiso,klon), INTENT(OUT) :: xtevap 94 REAL, DIMENSION(klon), INTENT(OUT) :: h1 95 REAL, DIMENSION(niso,klon), INTENT(OUT) :: xtrunoff_diag 96 REAL, DIMENSION(klon), INTENT(OUT) :: runoff_diag 97 REAL, DIMENSION(niso,klon), INTENT(IN) :: Rland_ice 98 98 #endif 99 99
Note: See TracChangeset
for help on using the changeset viewer.