C+
C NAME:
C	GinBar	
C PURPOSE:
C	Duummy routine for Windows and Linux
C	for functions containing calls to GRPACK functions
C PROCEDURE:
C	Needed by: MapReadSrf
C MODIFICATION HISTORY:
C	JAN-2001, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
C-
	subroutine GinBar(ID,I,X1,X2,X3,CmdSrf)
	    integer	ID
	    integer	I
	    real	X1
	    real	X2
	    real	X3
	    character	CmdSrf*(*)

	JD = ID
	
	return
	end