clean_field Subroutine

private subroutine clean_field(ef, lp1, i1, j1, j2, k1, k2, nc)

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=dp),	intent(inout)			::	ef(:,:,:,:)
real(kind=dp),	intent(in)			::	lp1
integer,	intent(in)			::	i1
integer,	intent(in)			::	j1
integer,	intent(in)			::	j2
integer,	intent(in)			::	k1
integer,	intent(in)			::	k2
integer,	intent(in)			::	nc

Contents

None