Ignore:
Timestamp:
2011-07-29T14:04:49+02:00 (13 years ago)
Author:
didier.solyga
Message:

Add labels for the externalized pft parameters. Update obsolete aspects of F77. Replace the last 0.0 by zero in stomate

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/ORCHIDEE_EXT/ORCHIDEE/src_stomate/stomate_soilcarbon.f90

    r257 r350  
    8080    REAL(r_std), DIMENSION(npts,ncarb,ncarb)                           :: flux 
    8181    ! for messages 
    82     CHARACTER*7, DIMENSION(ncarb)                                     :: carbon_str 
     82    CHARACTER(LEN=7), DIMENSION(ncarb)                                     :: carbon_str 
    8383    ! Indices 
    8484    INTEGER(i_std)                                                    :: k,kk,m 
Note: See TracChangeset for help on using the changeset viewer.