PARAMETER	( MXLENF = 30 )
C*					Maximum length of a field
C*					(i.e. group) that can be read
C*					using NX_GFLD
C************************************************************************
C*  / POSBLK /								*
C*									*
C*  This common area contains strings used to hold ids, lats, lons, and *
C*  elevations read in from the NEXRAD station table.                   *
C************************************************************************
	COMMON	/ POSBLK /	jstn, jstnid, elev, ylat, ylon
C*
        INTEGER         jstn
        CHARACTER*8     jstnid(200)
        REAL            ylat(200),   ylon(200),   elev(200)
C************************************************************************
C*  / LOGMSG /								*
C*									*
C*  This common area contains a string used to hold messages that are	*
C*  to be written to the decoder log.					*
C************************************************************************
	CHARACTER	logmsg*200
C*
	COMMON	/ LOGMSG /	logmsg
C*					String to hold a message to be
C*					written to decoder log 
C*
C************************************************************************
C*  / INTF /								*
C*									*
C*  This common area contains the interface arrays.			*
C************************************************************************
	PARAMETER	( MXNPBW = 19 )
C*					Maximum number of Part B
C*					wind levels
C*
	PARAMETER	(     MBM1 = ( MXNPBW - 1 ),
     +			    MBM1T4 = ( MBM1 * 4 )     )
C*
	PARAMETER 	( NRSIMN = 8 )
C*					Number of real single-level
C*					interface mnemonics
C*
	PARAMETER 	( NRIMN = ( MXNPBW * 4 ) + NRSIMN + 1 )
C*					Number of real interface
C*					mnemonics
C*
	COMMON	/ RINTFP /
     +	   iryear  , irmnth  , irdays  , irhour  , irminu  ,
     +	   irslat  , irslon  , irselv  ,
     +	   irnpbw  , irhgtm ( MXNPBW ) , irdrct ( MXNPBW ) ,
     +		     irsknt ( MXNPBW ) , irrmse ( MXNPBW )
C*					Pointers to relative locations of
C*					real interface mnemonics within
C*					rimnem ( ).  These pointers will be
C*					set by NX_IFSP and then used as
C*					indices into the real interface
C*					values array rivals ( )
C*
	REAL		rivals ( NRIMN )
C*
	COMMON	/ RINTFV /	rivals
C*					Real interface values 
C*
	PARAMETER 	( NCIMN = 1 )
C*					Number of character interface
C*					mnemonics
C*
	COMMON	/ CINTFP /
     +	   icrpid
C*					Pointers to relative locations of
C*					character interface mnemonics within
C*					cimnem ( ).  These pointers will be
C*					set by NX_IFSP and then used as
C*					indices into the character
C*					interface values array civals ( ) 
C*
	CHARACTER	civals ( NCIMN )*8
C*
	COMMON	/ CINTFV /	civals
C*					Character interface values