character*3 function YesNo ( var )
C
C*******************************************************************************
C
C       Copyright (C) 1993, California Institute of Technology.  U.S.
C       Government Sponsorhip under NASA Contract NAS7-918 is
C       acknowledged.
C
C*******************************************************************************
C
C	input var = T		output  = 'YES'
C	      var = .false.    		= ' NO'
C
C	Used to "pretty-print" interpretive output of logical parameters.

	logical var
	if (var) then
	   YesNo = 'Yes'
	else
	   YesNo = ' No'
	end if 
	return
	end