SUBROUTINE GF_IFIV  ( iret )
C************************************************************************
C* GF_IFIV								*
C*									*
C* This subroutine initializes the interface values arrays for a new	*
C* report.								*
C*									*
C* GF_IFIV  ( IRET )							*
C*									*
C* Output parameters:							*
C*	IRET		INTEGER		Return code 			*
C*					  0 = normal return 		*
C*									*
C**									*
C* Log:									*
C* C. Caruso Magee/NCEP 05/06                                		*
C************************************************************************
	INCLUDE		'GEMPRM.PRM'
	INCLUDE		'gfcmn.cmn'
C-----------------------------------------------------------------------
	iret = 0
C
	DO ii = 1, NRIMN
	    rivals ( ii ) = RMISSD
	END DO
        rivals ( irndat ) = 0
C*
	RETURN
	END