Ignore:
Timestamp:
Nov 8, 2012, 9:03:30 PM (12 years ago)
Author:
aslmd
Message:
  • Repare le probleme "un jour sans fin" des versions precedentes pour le modele generique. Pas d'impact sur modele terrestre.

NB: changements egalement faits sur dyn3dmem en prevision de son utilisation

  • Fix the bug "Groundhog Day" which was a problem for previous versions using generic physics. No impact whatsoever on terrestrial model.

NB: changes also done on dyn3dmem which is planned to be used soon

Author : AS equipe planeto

Location:
LMDZ5/trunk/libf/dyn3dpar
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/dyn3dpar/calfis_p.F

    r1654 r1676  
    684684     .             debut_split,    !! firstcall
    685685     .             lafin_split,    !! lastcall
    686      .             float(day_ini), !! pday <-- day_ini (dans temps.h)
     686     .             jD_cur,         !! pday. see leapfrog_p
    687687     .             jH_cur_split,   !! ptime "fraction of day"
    688688     .             zdt_split,      !! ptimestep

  • LMDZ5/trunk/libf/dyn3dpar/leapfrog_p.F

    r1671 r1676  
    710710           jD_cur = jD_ref + day_ini - day_ref
    711711     $        + itau/day_step
     712
     713           IF (planet_type .eq."generic") THEN
     714              ! AS: we make jD_cur to be pday
     715              jD_cur = int(day_ini + itau/day_step)
     716           ENDIF
     717
    712718           jH_cur = jH_ref + start_time +                                &
    713719     &              mod(itau,day_step)/float(day_step)
Note: See TracChangeset for help on using the changeset viewer.