Changeset 943 for tags


Ignore:
Timestamp:
2012-07-17T15:13:30+02:00 (12 years ago)
Author:
didier.solyga
Message:

Bug fix : forget to inverse endif and enddo in my last commit.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • tags/ORCHIDEE_1_9_6/ORCHIDEE/src_stomate/stomate_lpj.f90

    r942 r943  
    11171117             turnover_daily(i,j,icarbres) = turnover_daily(i,j,icarbres)*frac_turnover_daily 
    11181118             harvest_above(i)  = harvest_above(i) + veget_max(i,j) * above_old *(un - frac_turnover_daily) 
    1119           ENDDO 
    1120        ENDIF 
     1119          END IF 
     1120       ENDDO 
    11211121    ENDDO 
    11221122 
Note: See TracChangeset for help on using the changeset viewer.