fire_intensity Subroutine

public subroutine fire_intensity(currentSite)

---

returns the updated currentPatch%FI value for each patch.

Arguments

Type	Intent	Optional	Attributes		Name
type(ed_site_type),	intent(inout),		target	::	currentSite