C+
C NAME:
C	ThomsonLOSS10Far
C PURPOSE:
C	Determines the intensity along a line of sight of electron Thomson 
C	scattering in S10 units
C CALLING SEQUENCE:
	function ThomsonLOSS10Far(SLower,SUpper,ScSun,Elo,APM, P)
C CALLS:
C	ThomsonS10, ThomsonLOSFar
C PROCEDURE:
C	See href=ThomsonLOSS10=
C MODIFICATION HISTORY:
C	1996, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
C-
	    real	SLower
	    real	SUpper
	    real	ScSun
	    real	Elo
	    real	APM
	    real	P

	ThomsonLOSS10Far = 1E-16*ThomsonS10(ScSun,APM)*
     &			ThomsonLOSFar(SLower,SUpper,ScSun,Elo, P)

	return
	end