Changeset 7516 for branches/ORCHIDEE_2_2
- Timestamp:
- 2022-03-11T12:01:03+01:00 (3 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/slowproc.f90
r7515 r7516 3429 3429 ENDDO 3430 3430 3431 IF ( sgn .LT. min_sechiba) THEN3431 IF ( (sgn .LT. min_sechiba) .OR. (atext(ib) .LT. min_sechiba) ) THEN 3432 3432 ! Set default values if grid cells were only covered by glaciers or ocean 3433 ! or if now information on the source grid was found .3433 ! or if now information on the source grid was found (atext(ib)=-1). 3434 3434 nbexp = nbexp + 1 3435 3435 njsc(ib) = usda_default ! 6 = Loam
Note: See TracChangeset
for help on using the changeset viewer.