diff --git a/phys/module_fr_fire_phys.F b/phys/module_fr_fire_phys.F index d02300fdc9..3f8708031e 100644 --- a/phys/module_fr_fire_phys.F +++ b/phys/module_fr_fire_phys.F @@ -709,7 +709,7 @@ subroutine read_namelist_fire(init_fuel_moisture) fmc_gc_initial_value(1)=fmc_1h fmc_gc_initial_value(2)=fmc_10h fmc_gc_initial_value(3)=fmc_100h - fmc_gc_initial_value(3)=fmc_1000h + fmc_gc_initial_value(4)=fmc_1000h fmc_gc_initial_value(5)=fmc_live ! ! end initialization from scalars tied to a particular model with 5 fuel moisture classes