execute_luc_event Subroutine

public subroutine execute_luc_event(from_state, to_state, frac_change_grid, g, POPLUC)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=5),	intent(in)			::	from_state
character(len=5),	intent(in)			::	to_state
real(kind=dp),	intent(inout)			::	frac_change_grid
integer(kind=i4b),	intent(in)			::	g
type(POPLUC_TYPE),	intent(inout)			::	POPLUC