C+ C NAME: C ThomsonElectronS10Far C PURPOSE: C Determines the intensity scattered from single coronal electron C by Thomson scattering in S10 units in the limit of small angular diameter C of the Sun. C CALLING SEQUENCE: function ThomsonElectronS10Far(ElSun,SinChi,APM, P) C INPUTS: C ElSun real distance Sun-Electron (solar radii) C SinChi real sine of angle Sun-Electron-Observer C APM real apparent magnitude of the Sun C OUTPUTS: C ThomsonElectronS10Far C real scattered intensity (10^-26 S10) C P real polarization C CALLS: C ThomsonS10, ThomsonElectronFar C PROCEDURE: C See href=ThomsonElectronS10= C Limit: Solar diameter -> 0; Electron-Sun distance -> Infinity C MODIFICATION HISTORY: C JUL-1996, Paul Hick (UCSD/CASS; ppick@ucsd.edu) C- real ElSun real SinChi real APM real P ThomsonElectronS10Far = ThomsonS10(ElSun,APM)*ThomsonElectronFar(SinChi,P) return end