Changeset 8636
- Timestamp:
- 2024-07-22T17:23:51+02:00 (5 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/slowproc.f90
r8579 r8636 3493 3493 IF (printlev_loc>=4) WRITE (numout,*) 'slowproc_soilt: After get_soilcorr_usda' 3494 3494 3495 clayfraction(:) = 0.0 3496 sandfraction(:) = 0.0 3497 siltfraction(:) = 0.0 3495 3498 DO ib =1, nbpt 3496 clayfraction(ib) = 0.03497 3499 DO ilf = 1,nscm 3498 3500 soilclass(ib,ilf)=textrefrac(ib,ilf)
Note: See TracChangeset
for help on using the changeset viewer.