surfrd_get_globmask Subroutine

public subroutine surfrd_get_globmask(filename, mask, ni, nj)

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	filename
integer,			pointer	::	mask(:)
integer,	intent(out)			::	ni
integer,	intent(out)			::	nj