handle_err Subroutine

subroutine handle_err(status, nam3, nam1, nam2)

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	status
character(len=*),	intent(in)			::	nam3
character(len=*),	intent(in)			::	nam1
character(len=*),	intent(in)			::	nam2