Changeset 3979 for trunk/LMDZ.COMMON/libf/evolution/pem.F90
- Timestamp:
- Nov 28, 2025, 5:34:32 PM (2 days ago)
- File:
-
- 1 edited
-
trunk/LMDZ.COMMON/libf/evolution/pem.F90 (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.COMMON/libf/evolution/pem.F90
r3977 r3979 743 743 !------------------------ 744 744 ! II_d.1 Update Tsurf 745 call update_tsurf_nearest_baresoil(ngrid,nslope,iim,jjm _value,tsurf_avg,co2_ice,is_co2ice_ini,co2ice_disappeared)745 call update_tsurf_nearest_baresoil(ngrid,nslope,iim,jjm - 1,latitude,tsurf_avg,co2_ice,is_co2ice_ini,co2ice_disappeared) 746 746 747 747 if (soil_pem) then
Note: See TracChangeset
for help on using the changeset viewer.
