Ignore:
Timestamp:
2011-06-27T10:54:10+02:00 (14 years ago)
Author:
didier.solyga
Message:

Move some labels associated to externalized parameters in sechiba to pft_parameters.f90

Location:
branches/ORCHIDEE_EXT/ORCHIDEE/src_sechiba
Files:
3 edited

Legend:

Unmodified
Added
Removed

  • branches/ORCHIDEE_EXT/ORCHIDEE/src_sechiba/diffuco.f90

    r257 r282  
    455455    ENDIF 
    456456 
    457     ! 
    458     ! Ajouts Nathalie - le 28 Mars 2006 - sur conseils Fred Hourdin 
    459     ! 
    460     !Config Key  = RVEG_PFT 
    461     !Config Desc = Artificial parameter to increase or decrease canopy resistance. 
    462     !Config Def  = 1. 
    463     !Config Help = This parameter is set by PFT. 
    464  
    465 !!$    CALL getin_p('RVEG_PFT', rveg_pft) 
    466  
    467457    WRITE(numout,*) 'DANS DIFFUCO_INIT , RVEG_PFT=',rveg_pft 
    468458 

  • branches/ORCHIDEE_EXT/ORCHIDEE/src_sechiba/hydrol.f90

    r257 r282  
    18951895 
    18961896    IF ( firstcall ) THEN 
    1897 !!$       !Config  Key  = PERCENT_THROUGHFALL_PFT 
    1898 !!$       !Config  Desc = Percent by PFT of precip that is not intercepted by the canopy 
    1899 !!$       !Config  Def  = 30. 30. 30. 30. 30. 30. 30. 30. 30. 30. 30. 30. 30. 
    1900 !!$       !Config  Help = During one rainfall event, PERCENT_THROUGHFALL_PFT% of the incident rainfall 
    1901 !!$       !Config         will get directly to the ground without being intercepted, for each PFT. 
    1902 !!$        
    1903 !!$!       throughfall_by_pft = (/ 30., 30., 30., 30., 30., 30., 30., 30., 30., 30., 30., 30., 30. /) 
    1904 !!$       CALL getin_p('PERCENT_THROUGHFALL_PFT',throughfall_by_pft) 
     1897 
    19051898       throughfall_by_pft = throughfall_by_pft / 100. 
    19061899 

  • branches/ORCHIDEE_EXT/ORCHIDEE/src_sechiba/hydrolc.f90

    r257 r282  
    14611461 
    14621462    IF ( firstcall ) THEN 
    1463 !!$       !Config  Key  = PERCENT_THROUGHFALL_PFT 
    1464 !!$       !Config  Desc = Percent by PFT of precip that is not intercepted by the canopy 
    1465 !!$       !Config  Def  = 30. 30. 30. 30. 30. 30. 30. 30. 30. 30. 30. 30. 30. 
    1466 !!$       !Config  Help = During one rainfall event, PERCENT_THROUGHFALL_PFT% of the incident rainfall 
    1467 !!$       !Config         will get directly to the ground without being intercepted, for each PFT. 
    1468 !!$        
    1469 !!$!       throughfall_by_pft = (/ 30., 30., 30., 30., 30., 30., 30., 30., 30., 30., 30., 30., 30. /) 
    1470 !!$       CALL getin_p('PERCENT_THROUGHFALL_PFT',throughfall_by_pft) 
     1463 
    14711464       throughfall_by_pft = throughfall_by_pft / 100. 
    14721465 
Note: See TracChangeset for help on using the changeset viewer.