C+
C NAME:
C	TinyR4
C PURPOSE:
C	Provides a generic very small number
C CATEGORY:
C	gen/for/lib
C CALLING SEQUENCE:
	function TinyR4()
C INPUTS:
C	(none)
C OUTPUTS:
C	X	real	very small number
C CALLS:
C	(none)
C SEE ALSO:
C	BadR4, BadR8, BadI4, pInfR4
C INCLUDE:
	include		'math.h'
C PROCEDURE:
C	The TinyR4 number is pulled out of the include file.
C MODIFICATION HISTORY:
C	SEP-1999, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
C-
	TinyR4 = MATH__TINY

	return
	end