(Продолжение ш т ш М /
к
/ ОСГ 2S64S U9 -86)
FLUX-BO)
RETURN
ENDIF
IF (ALT.LE.A(J).AND.B<I).EQ 0) THEN
FLUX=B<I)
RETURN
ENDIF
IF (B(2).LE.B(I)) B(2)-B(l). I I
IF (B(3).LF. B(2)) B(3>-B(2).l.l
DO 10 J—1.3
C=l
DO 20 1-1.3
D=A(J)-A(I)
IF (I.EQ.J) D=ALT-A(J>
IF (D ПО 0 ) THEN
FLUX=B(I)
RETURN
ENDIF
20O C . (ALT-A(l))/D
10S-S+C.B(J)’
FLUX-S
IF (FLUX LEO) FLUX-0
RETURN
F.ND
ПРИЛОЖЕНИЕJ
Справочное
Порядок расчетаусредненных значений плотностей потокоя
эдиктроноа на высотах менее 1000 км
1. Выбирают с требуемой точностью миссии географических координат, соот-
•умствующих точкам пространства, через которые проходит дмихушнигя по эалан-
ной орбите объекг
2. Для круговых орбит с высотами 350, 500 и 800 км плотности потоков элск-
троиов с энергией больше Е (где £=40. IOO. 300.600. 900. 1200, 2000 кэВ) опреде
ляют для каждой точки орбиты мстюс|жлствсжто по табл 5
3 Для крутовых орбит с промежуточным значением высоты или для эллипти
ческих орбит плотность потоков злектронов определяют с помошью программы,
приведенной в приложении А.
4 Полученные значения плотностей потоков электронов усредняютсумми
руют и делят на число точек
Таким образом получают значения плотностей потоков мсктронои, усреднен
ные за один ниток орбиты, и одни сумки и т л •
(H V f N? 5 1996 г.)
6’
163