Changeset 7511 for branches/ORCHIDEE_2_2/ORCHIDEE

Timestamp:

2022-03-07T17:00:43+01:00 (3 years ago)

Author:

josefine.ghattas

Message:

Added output variable interp_diag_woodharvest to validate interpolation of woodharvest.

Location:

branches/ORCHIDEE_2_2/ORCHIDEE

Files:

• src_sechiba/slowproc.f90 (modified) (1 diff)
• src_xml/field_def_orchidee.xml (modified) (1 diff)
• src_xml/file_def_orchidee.xml (modified) (1 diff)

branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/slowproc.f90

@@ -3949 +3949 @@
        IF (printlev_loc >= 5) WRITE(numout,*)'  slowproc_wodharvest after interpweight_2Dcont'
        
-       IF (printlev_loc >= 3) WRITE(numout,*) '  slowproc_woodharvest ended'
     END IF
+
+    ! Write diagnostics
+    CALL xios_orchidee_send_field("interp_diag_woodharvest",woodharvest)
+
+    IF (printlev_loc >= 3) WRITE(numout,*) '  slowproc_woodharvest ended'
   END SUBROUTINE slowproc_woodharvest
 

branches/ORCHIDEE_2_2/ORCHIDEE/src_xml/field_def_orchidee.xml

@@ -373 +373 @@
     <field id="interp_diag_lai" grid_ref="grid_from_lai" name="interp_diag_lai" long_name="lai read from file" operation="once" freq_offset="0ts"/>
     <field id="interp_diag_reftemp" name="interp_diag_reftemp" long_name="reftemp read from file" operation="once" freq_offset="0ts"/>
+    <field id="interp_diag_woodharvest" name="interp_diag_woodharvest" long_name="woodharvest read from file" operation="once" freq_offset="0ts"/>
 
     <field id="znetco2" name="znetco2" long_name="Sum CO2 flux over PFTs (variable in interface to LMDZ)" unit="kgC m-2 s-1" />

branches/ORCHIDEE_2_2/ORCHIDEE/src_xml/file_def_orchidee.xml

@@ -745 +745 @@
 <!--      <field field_ref="interp_diag_lai" grid_ref="grid_from_lai" level="1"/> -->
       <field field_ref="interp_diag_reftemp" level="1"/>
+      <field field_ref="interp_diag_woodharvest" level="1"/>
 
    </field_group>