diff --git a/components/clm/src/ED/fire/SFMainMod.F90 b/components/clm/src/ED/fire/SFMainMod.F90 index f05c1a641e..40e909c5f2 100755 --- a/components/clm/src/ED/fire/SFMainMod.F90 +++ b/components/clm/src/ED/fire/SFMainMod.F90 @@ -73,10 +73,10 @@ subroutine fire_model( currentSite, bc_in) enddo if(write_SF==1)then - write(fates_log(),*) 'use_ed_spit_fire',use_ed_spit_fire + write(fates_log(),*) 'use_ed_spitfire',use_ed_spitfire endif - if(use_ed_spit_fire)then + if(use_ed_spitfire)then call fire_danger_index(currentSite, bc_in) call wind_effect(currentSite, bc_in) call charecteristics_of_fuel(currentSite) diff --git a/components/clm/src/ED/main/EDInitMod.F90 b/components/clm/src/ED/main/EDInitMod.F90 index 4f949ba76e..91bd94b224 100755 --- a/components/clm/src/ED/main/EDInitMod.F90 +++ b/components/clm/src/ED/main/EDInitMod.F90 @@ -8,7 +8,7 @@ module EDInitMod use FatesGlobals , only : endrun => fates_endrun use EDTypesMod , only : nclmax use FatesGlobals , only : fates_log - use clm_varctl , only : use_ed_spit_fire + use clm_varctl , only : use_ed_spitfire use clm_time_manager , only : is_restart use pftconMod , only : pftcon use EDEcophysConType , only : EDecophyscon