Changeset 2562 for LMDZ5/trunk/libf


Ignore:
Timestamp:
Jun 10, 2016, 2:15:33 PM (8 years ago)
Author:
fhourdin
Message:

Modification niveaux de sortie

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r2561 r2562  
    754754
    755755  TYPE(ctrl_out), SAVE, DIMENSION(4) :: o_l_mixmin      = (/             &
    756       ctrl_out((/ 10, 4, 10, 10, 10, 10, 11, 11, 11 /),'l_mixmin_ter',       &
     756      ctrl_out((/ 10, 10, 10, 10, 10, 10, 11, 11, 11 /),'l_mixmin_ter',       &
    757757      "PBL mixing length "//clnsurf(1),"m", (/ ('', i=1, 9) /)), &
    758       ctrl_out((/ 10, 4, 10, 10, 10, 10, 11, 11, 11 /),'l_mixmin_lic',       &
     758      ctrl_out((/ 10, 10, 10, 10, 10, 10, 11, 11, 11 /),'l_mixmin_lic',       &
    759759      "PBL mixing length "//clnsurf(2),"m", (/ ('', i=1, 9) /)), &
    760       ctrl_out((/ 10, 4, 10, 10, 10, 10, 11, 11, 11 /),'l_mixmin_oce',       &
     760      ctrl_out((/ 10, 10, 10, 10, 10, 10, 11, 11, 11 /),'l_mixmin_oce',       &
    761761      "PBL mixing length "//clnsurf(3),"m", (/ ('', i=1, 9) /)), &
    762       ctrl_out((/ 10, 4, 10, 10, 10, 10, 11, 11, 11 /),'l_mixmin_sic',       &
     762      ctrl_out((/ 10, 10, 10, 10, 10, 10, 11, 11, 11 /),'l_mixmin_sic',       &
    763763      "PBL mixing length "//clnsurf(4),"m", (/ ('', i=1, 9) /)) /)
    764764
    765765  TYPE(ctrl_out), SAVE, DIMENSION(4) :: o_l_mix      = (/             &
    766       ctrl_out((/ 10, 4, 10, 10, 10, 10, 11, 11, 11 /),'l_mix_ter',       &
     766      ctrl_out((/ 10, 10, 10, 10, 10, 10, 11, 11, 11 /),'l_mix_ter',       &
    767767      "min PBL mixing length "//clnsurf(1),"m", (/ ('', i=1, 9) /)), &
    768       ctrl_out((/ 10, 4, 10, 10, 10, 10, 11, 11, 11 /),'l_mix_lic',       &
     768      ctrl_out((/ 10, 10, 10, 10, 10, 10, 11, 11, 11 /),'l_mix_lic',       &
    769769      "min PBL mixing length "//clnsurf(2),"m", (/ ('', i=1, 9) /)), &
    770       ctrl_out((/ 10, 4, 10, 10, 10, 10, 11, 11, 11 /),'l_mix_oce',       &
     770      ctrl_out((/ 10, 10, 10, 10, 10, 10, 11, 11, 11 /),'l_mix_oce',       &
    771771      "min PBL mixing length "//clnsurf(3),"m", (/ ('', i=1, 9) /)), &
    772       ctrl_out((/ 10, 4, 10, 10, 10, 10, 11, 11, 11 /),'l_mix_sic',       &
     772      ctrl_out((/ 10, 10, 10, 10, 10, 10, 11, 11, 11 /),'l_mix_sic',       &
    773773      "min PBL mixing length "//clnsurf(4),"m", (/ ('', i=1, 9) /)) /)
    774774
Note: See TracChangeset for help on using the changeset viewer.