C+
C NAME:
C	nrSqueezeY
C CALLING SEQUENCE:
	subroutine nrSqueezeY(YN1,YN2,YM1,YM2,NX,NY,ZN,bFlag)
C CALLS:
C	SplineGridY
C PROCEDURE:
C	Obsolete. Use href=SplineGridY=
C-
	    real	ZN(NX,NY)
	    logical	bFlag

	iFlag = 0
	if (bFlag) iFlag = 1
	
	call SplineGridY(iFlag,YN1,YN2,YM1,YM2,NX,NY,ZN,NY,ZN)

	return
	end