Changeset 6370 for branches


Ignore:
Timestamp:
2019-11-29T15:59:21+01:00 (4 years ago)
Author:
josefine.ghattas
Message:

Cut line too long for gfortran

File:
1 edited

Legend:

Unmodified
Added
Removed

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

    r6319 r6370  
    15061506                fields_in(ik,i) = zcarbha(ik)/1.e3/one_day 
    15071507             CASE("fCO2_nbp") 
    1508                 fields_in(ik,i) = znetco2(ik)/1.e3/one_day + zcarblu(ik)/1.e3/one_day + zcarbwh(ik)/1.e3/one_day + zcarbha(ik)/1.e3/one_day 
     1508                fields_in(ik,i) = znetco2(ik)/1.e3/one_day + zcarblu(ik)/1.e3/one_day + & 
     1509                       zcarbwh(ik)/1.e3/one_day + zcarbha(ik)/1.e3/one_day 
    15091510             CASE DEFAULT 
    15101511                CALL ipslerr_p (3,'intersurf_main_gathered', & 
Note: See TracChangeset for help on using the changeset viewer.