Changeset 1808 for LMDZ5/trunk


Ignore:
Timestamp:
Jul 22, 2013, 10:53:08 AM (11 years ago)
Author:
Ehouarn Millour
Message:

Correction des arguments du premier appel de phys_output_write pour éviter une division par zéro.
UG
................
Correction of phys_output_mod's first call arguments to avoid a division by zero
UG

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/libf/phylmd/phys_output_mod.F90

    r1807 r1808  
    341341    !On déclare les sorties avec un premier appel à phys_output_write:
    342342
    343       CALL phys_output_write(0, pdtphys, paprs, pphis,               &
     343      CALL phys_output_write(1, pdtphys, paprs, pphis,               &
    344344     &                  pplay, lmax_th, aerosol_couple,                 &
    345345     &                  ok_ade, ok_aie, ivap, new_aod, ok_sync,         &
Note: See TracChangeset for help on using the changeset viewer.