crop_img Subroutine

private subroutine crop_img(tab, scal)

Crop the surface contained in tab to the dimensions specified in the job file and update the object scal

Arguments

Type	Intent	Optional	Attributes		Name
real(kind=R8),	intent(inout),		allocatable, dimension(:,:)	::	tab	array containing the surface
type(SCALE_SURF),	intent(inout)			::	scal	SCALE_SURF object