Changeset 6370
- Timestamp:
- 2019-11-29T15:59:21+01:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/intersurf.f90
r6319 r6370 1506 1506 fields_in(ik,i) = zcarbha(ik)/1.e3/one_day 1507 1507 CASE("fCO2_nbp") 1508 fields_in(ik,i) = znetco2(ik)/1.e3/one_day + zcarblu(ik)/1.e3/one_day + zcarbwh(ik)/1.e3/one_day + zcarbha(ik)/1.e3/one_day 1508 fields_in(ik,i) = znetco2(ik)/1.e3/one_day + zcarblu(ik)/1.e3/one_day + & 1509 zcarbwh(ik)/1.e3/one_day + zcarbha(ik)/1.e3/one_day 1509 1510 CASE DEFAULT 1510 1511 CALL ipslerr_p (3,'intersurf_main_gathered', &
Note: See TracChangeset
for help on using the changeset viewer.