- Timestamp:
- May 29, 2024, 11:12:58 PM (7 months ago)
- Location:
- trunk/LMDZ.MARS
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/changelog.txt
r3346 r3348 4656 4656 == 23/05/2024 == JBC 4657 4657 Correction of a variable name in the xml definition file causing an XIOS error because of a change in r3337. 4658 4659 == 29/05/2024 == JN 4660 Following commit r3337, threshold for vdifc subtimestep is no longer hardcoded 4661 and explicitly commented. -
trunk/LMDZ.MARS/libf/phymars/vdifc_mod.F
r3337 r3348 1487 1487 c et en adaptant avec un critere "dtmax" du chauffage a accomoder 1488 1488 c dtmax est regle empiriquement (pour l'instant) a 0.5 K 1489 use surfdat_h, only: frost_albedo_threshold 1489 1490 1490 1491 integer,intent(in) :: naersize … … 1499 1500 1500 1501 do i=1,naersize 1501 if ((qsurf(i).lt.0.005).and. 1502 c If not on permanent ice or thin frost layer : 1503 c do not use a subtimestep (ntsub=1) 1504 if ((qsurf(i).lt.frost_albedo_threshold).and. 1502 1505 & (.not.watercaptag(i))) then 1503 1506 ntsub(i) = 1
Note: See TracChangeset
for help on using the changeset viewer.