@@ -3783,6 +3783,7 @@ end subroutine init_disturb_params
37833783!- -----------------------------------------------------------------------------------------!
37843784subroutine init_physiology_params ()
37853785 use detailed_coms , only : idetailed ! ! intent(in)
3786+ use ed_misc_coms, only : ffilout
37863787 use physiology_coms, only : iphysiol & ! intent(in)
37873788 , klowco2in & ! intent(in)
37883789 , c34smin_lint_co2 & ! intent(out)
@@ -4084,6 +4085,8 @@ subroutine init_physiology_params()
40844085 photo_prefix = ' photo_state_'
40854086 !- --------------------------------------------------------------------------------------!
40864087
4088+ photo_prefix = trim (ffilout)// ' _' // trim (photo_prefix)
4089+
40874090 return
40884091end subroutine init_physiology_params
40894092! ==========================================================================================!
@@ -4846,6 +4849,7 @@ subroutine init_rk4_params()
48464849 , tiny_sfcwater_mass ! ! intent(in)
48474850 use canopy_air_coms, only : leaf_drywhc & ! intent(in)
48484851 , leaf_maxwhc ! ! intent(in)
4852+ use ed_misc_coms,only : ffilout
48494853 use met_driver_coms, only : prss_min & ! intent(in)
48504854 , prss_max ! ! intent(in)
48514855 use consts_coms , only : wdnsi8 ! ! intent(in)
@@ -4964,6 +4968,8 @@ subroutine init_rk4_params()
49644968 budget_pref = ' budget_state_' ! File with the thermodynamic boundaries.
49654969 !- --------------------------------------------------------------------------------------!
49664970
4971+ detail_pref = trim (ffilout)// ' _' // trim (detail_pref)
4972+ budget_pref = trim (ffilout)// ' _' // trim (budget_pref)
49674973
49684974 !- --------------------------------------------------------------------------------------!
49694975 ! Assigning some default values for the bounds at the sanity check. Units are !
@@ -5012,6 +5018,7 @@ subroutine init_rk4_params()
50125018
50135019 !- --------------------------------------------------------------------------------------!
50145020 ! These variables are assigned in ed_params.f90. Heat area should be 2.0 for all !
5021+
50155022 ! PFTs (two sides of the leaves exchange heat), and the evaporation area should be 1.0 !
50165023 ! for all PFTs (only one side of the leaf is usually covered by water). The transpir- !
50175024 ! ation area should be 1.0 for hypostomatous leaves, and 2.0 for symmetrical (pines) !
0 commit comments