C+
C NAME:
C	phys
C PURPOSE:
C	Defines parameter constant for several physical quantities
C PROCEDURE:
C-
	double precision PHYS__THOMSON		! Thomson cross section=(Re^2)
	parameter	(PHYS__THOMSON=7.940791d0)! 10^-26 cm^2/sterad
	double precision PHYS__RE
	parameter	(PHYS__RE=2.81794092d0)	! Classical radius 10^-13 cm
	double precision PHYS__C
	parameter	(PHYS__C=2.99792458d0)	! Speed of light 10^10 cm/s
	double precision PHYS__G
	parameter	(PHYS__G= 6.67259d0)	! Gravitational const 10^-8 cm^3 gr^-1 s^-2