SUBROUTINE UG_IFIV  ( iret )
C************************************************************************
C* UG_IFIV								*
C*									*
C* This subroutine initializes the interface values arrays for a new	*
C* report.								*
C*									*
C* UG_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/05	*
C************************************************************************
	INCLUDE		'GEMPRM.PRM'
	INCLUDE		'ugcmn.cmn'
C-----------------------------------------------------------------------
	iret = 0
C
	DO ii = 1, NRIMN
	    rivals ( ii ) = RMISSD
        END DO
C
C*      Initialize the multi-level counters to 0.0
C
        rivals ( irnwnd ) = 0.0
        rivals ( irnrsh ) = 0.0
        rivals ( irndch ) = 0.0
        rivals ( irnpcp ) = 0.0
C
        DO i = 1, NCIMN
            civals ( i ) = ' '
        END DO
C*
	RETURN
	END