Changeset 2825


Ignore:
Timestamp:
Mar 15, 2017, 4:32:31 PM (8 years ago)
Author:
musat
Message:

Delete paire_ter LMDZ variable and aireTER output

Location:
LMDZ5/trunk
Files:
10 edited

Legend:

Unmodified
Added
Removed

  • LMDZ5/trunk/DefLists/field_def_lmdz.xml

    r2824 r2825  
    1212        <field id="contfracATM"     long_name="% sfce ter+lic"  unit="-"    />
    1313        <field id="contfracOR"      long_name="% sfce terre OR" unit="-" />
    14         <field id="aireTER"         long_name="Grid area CONT"  unit="-" />
    1514        <field id="flat"    long_name="Latent heat flux"        unit="W/m2" />
    1615        <field id="slp"     long_name="Sea Level Pressure"      unit="Pa" />

  • LMDZ5/trunk/DefLists/file_def_histLES_lmdz.xml

    r2824 r2825  
    1616                <field field_ref="contfracATM" level="10" operation="once" />
    1717                <field field_ref="contfracOR" level="10" />
    18                 <field field_ref="aireTER" level="10" />
    1918                <field field_ref="flat" level="5" />
    2019                <field field_ref="slp" level="10" />

  • LMDZ5/trunk/DefLists/file_def_histday_lmdz.xml

    r2824 r2825  
    1616                <field field_ref="contfracATM" level="1" operation="once" />
    1717                <field field_ref="contfracOR" level="1" />
    18                 <field field_ref="aireTER" level="10" />
    1918                <field field_ref="flat" level="1" />
    2019                <field field_ref="slp" level="1" />

  • LMDZ5/trunk/DefLists/file_def_histhf_lmdz.xml

    r2824 r2825  
    1616                <field field_ref="contfracATM" level="10" operation="once" />
    1717                <field field_ref="contfracOR" level="10" />
    18                 <field field_ref="aireTER" level="10" />
    1918                <field field_ref="flat" level="10" />
    2019                <field field_ref="slp" level="10" />

  • LMDZ5/trunk/DefLists/file_def_histins_lmdz.xml

    r2824 r2825  
    1616                <field field_ref="contfracATM" level="1" operation="once" />
    1717                <field field_ref="contfracOR" level="1" />
    18                 <field field_ref="aireTER" level="1" />
    1918                <field field_ref="flat" level="10" />
    2019                <field field_ref="slp" level="1" />

  • LMDZ5/trunk/DefLists/file_def_histmth_lmdz.xml

    r2824 r2825  
    3636                <field field_ref="contfracATM"  level="10"  operation="once"/>
    3737                <field field_ref="contfracOR"   level="10" />
    38                 <field field_ref="aireTER"      level="10" />
    3938                <field field_ref="flat"         level="5" />
    4039                <field field_ref="slp"          level="1" />

  • LMDZ5/trunk/DefLists/file_def_histstn_lmdz.xml

    r2824 r2825  
    1616                <field field_ref="contfracATM" level="10" operation="once" />
    1717                <field field_ref="contfracOR" level="10" />
    18                 <field field_ref="aireTER" level="10" />
    1918                <field field_ref="flat" level="10" />
    2019                <field field_ref="slp" level="10" />

  • LMDZ5/trunk/libf/phylmd/calcul_divers.h

    r2351 r2825  
    55      IF(itap.EQ.1) THEN
    66         itapm1=0
    7 !        surface terre
    8          DO i=1, klon
    9             IF(pctsrf(i,is_ter).GT.0.) THEN
    10                paire_ter(i)=cell_area(i)*pctsrf(i,is_ter)
    11             ENDIF
    12          ENDDO
    137      ENDIF
    148

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

    r2824 r2825  
    196196#endif
    197197
    198     USE phys_state_var_mod, ONLY: pctsrf, paire_ter, rain_fall, snow_fall, &
     198    USE phys_state_var_mod, ONLY: pctsrf, rain_fall, snow_fall, &
    199199         qsol, z0m, z0h, fevap, agesno, &
    200200         nday_rain, rain_con, snow_con, &
    … …  
    512512       CALL histwrite_phy(o_contfracATM, zx_tmp_fi2d)
    513513       CALL histwrite_phy(o_contfracOR, pctsrf(:,is_ter))
    514        CALL histwrite_phy(o_aireTER, paire_ter)
    515514!
    516515#ifdef CPP_XIOS

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

    r2730 r2825  
    275275      REAL,ALLOCATABLE,SAVE :: total_rain(:), nday_rain(:) 
    276276!$OMP THREADPRIVATE(total_rain,nday_rain)
    277       REAL,ALLOCATABLE,SAVE :: paire_ter(:)
    278 !$OMP THREADPRIVATE(paire_ter)
    279277! albsol1: albedo du sol total pour SW visible
    280278! albsol2: albedo du sol total pour SW proche IR
    … …  
    536534      ALLOCATE(pfrac_1nucl(klon,klev))
    537535      ALLOCATE(total_rain(klon), nday_rain(klon))
    538       ALLOCATE(paire_ter(klon))
    539536      ALLOCATE(albsol1(klon), albsol2(klon))
    540537!albedo SB >>>
    … …  
    675672      deallocate(pfrac_1nucl)
    676673      deallocate(total_rain, nday_rain)
    677       deallocate(paire_ter)
    678674      deallocate(albsol1, albsol2)
    679675!albedo SB >>>
Note: See TracChangeset for help on using the changeset viewer.