Ignore:
Timestamp:
2022-03-14T13:45:35+01:00 (2 years ago)
Author:
sebastiaan.luyssaert
Message:

Fix for ticket #816

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/ORCHIDEE_2_2/ORCHIDEE/src_sechiba/sechiba.f90

    r7326 r7525  
    10521052    ENDDO 
    10531053    CALL xios_orchidee_send_field("TVeg",histvar/dt_sechiba) 
    1054     CALL xios_orchidee_send_field("ACond",tq_cdrag) 
    10551054 
    10561055 
    … …  
    11931192       ENDDO 
    11941193       CALL histwrite_p(hist_id, 'ECanop', kjit, histvar, kjpindex, index) 
    1195        CALL histwrite_p(hist_id, 'ACond', kjit, tq_cdrag, kjpindex, index) 
    11961194       CALL histwrite_p(hist_id, 'SnowFrac', kjit, vbeta1, kjpindex, index) 
    11971195       ! 
    … …  
    12811279          ENDDO 
    12821280          CALL histwrite_p(hist2_id, 'ECanop', kjit, histvar, kjpindex, index) 
    1283           CALL histwrite_p(hist2_id, 'ACond', kjit, tq_cdrag, kjpindex, index) 
    12841281          CALL histwrite_p(hist2_id, 'SnowFrac', kjit, vbeta1, kjpindex, index) 
    12851282          CALL histwrite_p(hist2_id, 'GPP', kjit, gpp, kjpindex*nvm, indexveg) 
Note: See TracChangeset for help on using the changeset viewer.