implicit_update Subroutine

private subroutine implicit_update(equation, statedata, poly_proj, material, dt, timestep_list, weight, mesh)

and the code from here should move into its hlp module.

Arguments

Type	Intent	Optional	Attributes		Name
type(atl_Equations_type),	intent(in)			::	equation
type(atl_statedata_type),	intent(inout)			::	statedata
type(ply_poly_project_type),	intent(inout)			::	poly_proj
type(atl_material_type),	intent(in)			::	material
real(kind=rk),	intent(in)			::	dt
type(atl_timestep_type),	intent(inout)			::	timestep_list
real(kind=rk),	intent(in)			::	weight
type(atl_cube_elem_type),	intent(in)			::	mesh