SUBROUTINE BF_2FXY  ( jfxy, mf, mx, my, iret )
C************************************************************************
C* BF_2FXY								*
C*									* 
C* This subroutine expands the decimal descriptor JFXY into the		*
C* original BUFR values for F, X, Y.					*
C*									*
C* BF_2FXY  ( JFXY, MF, MX, MY, IRET )					*
C*									*
C* Input parameters:							*
C*	JFXY		INTEGER		Integer descriptor		*
C*									*
C* Output parameters:							*
C*	MF		INTEGER		BUFR F value			*
C*	MX		INTEGER		BUFR X value			*
C*	MY		INTEGER		BUFR Y value			*
C*	IRET		INTEGER		Return code			*
C*				 	 0 = normal return 		*
C**									*
C* Log:									*
C* K. Brill/NMC		05/94						*
C************************************************************************
	iret = 0
C*
        mf = jfxy / 16384
        km = jfxy - mf * 16384
        mx = km / 256
        my = km - mx * 256
C*
	RETURN
	END