Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

книги / Надежность и живучесть систем связи

..pdf
Скачиваний:
4
Добавлен:
12.11.2023
Размер:
10.52 Mб
Скачать

£0)tKAN KT(250«l51»HCRpf450»i! Ip7 pR|HT 50»HPU2 (Ut J) it »HCI 1«

OIHENSION M P U Z < 3 0 0 , 5 ) ,

 

1КС1 1

 

1ИРТ * 1Л0 1«VPUZ С3 в 0 | « Н & в C301 *

108

CO

TO

25?

1 М Р (< 0 » |П , H S 8 l ( 3 0 e ) ,ИТ(40в) I

)1PTП ) =HKUZ+ Ц

2yUZR(400'lv*MAU ( 2 . 4 0 0 ) ,

 

00

109 I l = I2,MKUZ2

2YU2R1 <400V. YUZR2I 400) ,HPl(4 00), 109

flS© ( 11) =MS8 (l U ♦ l

3YUZR3 ( 4 0 0 ) \ U ) Z R 4 U 0 0 ) ,

110

I f (J-KPUZI 102• 1 101 П 0

3YUZR5(400)

1*1

 

EQUIVALENCE <YUZR2( 1)

 

J=1

 

EQUIVALENCE(YUZR1(1I i H T d l l

 

К T (I * J ) sflPUZ ( L , 1)

RE *0

1 1 , K P T . MKUZ,K PUZ,KKT*N>

 

00

112 11 = 1,HNAL

:1 K P R A L , IZ .L 0 , K SB I XS01 ,KHP ,L P,

 

MA11(1,11)=0

5KNPR.NLP

112

H T ( l l ) t 0

PRINT

2 , K P T , MV<UZ,K PUZ,KKT,N,

 

1

AsffKUZ 1

1KPRAL.I7. i L 0 ,K S B iK S B l , KMP,LP,

113

K =M S B ( I A) " 1

2KMPR ,NLP

114

K=K*1

 

NM1=N-1

 

115

J l = l

 

MNAL= 1KUZ4KMP

116

J t s J l M

MKuZl=MKUZM

 

I F <HPT (K )-KT ( I i J 1) >110. 117,118

RKUZ2s MkUZ*2

117

IF (K«riSB(l AM>*1> 114t !2 9 i 129

KUZR=MKUZ+K H P R

118

I f

( J l - J > 1 1 6 , U 9 . 1 l 9

REAO

5 ,

U M P U Z U *J ) » J * l . K P U Z b

119

J * J * 1

 

1 1 = 1 * L P )

 

 

K T (!,J )= H PT (K >

PRINT

6 , ( INPUZ ( I . J ) i J = 1 iKPUZ)

 

MT(I A)=K

11=1.LP)

 

 

IF ( KTU i JlwRKUZ) 120 . 1201 123

REA»

7 « ( Y P U Z ( I ) i l i l i l p l

120

If(J- K P R A L ) 1 2 Ы 2 Ц 122

P«I NT

1 0 . ( Y p U 2 ( I ) * I - 1 , L P )

121

IA = K T tl ,J >

DO

92

l = 11MNAl>

 

I f

( MSВ П A* 11 -MS В (! AII 113,129, И?

122

K T ( ! , J | = 0

TUZR( l ) = 0 , 0

 

J =J - 1

 

READ

3 1 , ( H P ( I , П . 1 = 1 ,K«P)

 

CO

TO

127

PRINT

2 , ( M P ( j . l ) *1 = 1 *KMP »

123

H C R P (I, l ) = J

REA®

l * ( h S B l ( l ) * I = l . K S e i )

 

KCI 1 =J - 1

PRINT

2 . OI SB 1<I> .1 = 1.К5В1>

 

DO

124

I 1 =2 • ЦС11

REAO

3 1 , I MPT f I >•1 = 1 , KPT)

 

IND=KT( 1 , 1 1 )

PRINT

2 , (M PT (1 ) , 1 = 1 , KPT)

124

NA 11 ( 1 11 NO) = 1

ЯЕдО

1 . ( h S B I I l , l = l* KSe )

 

I f ( I "K K T J1 1 2 5 . 1 1 2 4 , 1 1 2 4

PRINT

2 , ( n S e ( I ) . 1 = 1 , KS6)

1124

PRINT

S l . H P U Z a . 1) ? MPUZ CL , 2 1

00

91

I=1.KMP

 

CO

TO

500

IND=MKUZ♦1

1125

I M M

 

M P 1 < IN D )= H P C ! .H

 

KC I1=J - 2

L= L0

 

 

 

l n i = I - i

L= L+1

 

 

 

00

125

1 1 = 1, КСП

00

1 П

1 1 = 1 . KKT

125

K T ( l , 1 1 ) =KT( Id 1»1 1 )

00

111

J 1 = 1 .N

 

J = J - 2

 

КТ ( 1 1 » Л ) = 0

 

CO

TO

1129

J =2

 

 

 

126

1A = KT( I , J >

J = J + 1

 

 

127

IN0T =H T n A ) - M S 8 ( l A + l ) * i

I E ( n P U Z ( L . J ) ) 1 0 3 , l 1 0 . 1 0 3

 

IF | INDT) 1 2 6 , 1 2 9 , 1 2 9

I2 = HPU Z(L ,;J)*1

128

К=МТ11 A)* 1

l=MSB (1 2 )

 

CO

TO

115

I I s K P T

 

129 I f ( J - 1 ) 1 3 0 , 1 3 1 , 1 3 0

 

130

K T < r , J ) = 0

11 = 11-1

 

MPT( 1 1 * 1 >-M PT( 11 >

 

J = J - 1

 

IF ( I 1 - 1 ) 9 0 1 , 9 0 1 * 10Г4-

1129

l E ( J - l ) 12 6 , 1 1 3 0 , 1 2 6

IN0 = MP.UZ(L,2)

1130

UsHKUZl

I l s N S B K IN O J - l

 

INOT=HT(lA)-MSB.(K sei*l

KCI 1=NSB 1 ( INO+1) - 1

 

IF 11 NOT >12 В i 1 3 Ы 3 1

NC I 1 = I 1

 

131

K T H , J ) = 0

11 =11+1

 

500

1 = 1-1

 

IN0T = NP fI 1 1 1>-HPUZlL «J )

I Аж I

 

J F 1INDT) 1 0 6 , l « e , 106

 

I f (1 )1 1 3 1 ,1 1 3 1 ,1 1 3 2

IF (I 1 - K d 1 >1 0 3 1 1 0 7 , 1 0 7

1131

PRINT

2 , HPUZlL,1) ,NP(JZ(L»2),l

201

163
164

1П2

СО ТО

259

 

1=0

 

 

'.133

1=1+1'

 

 

 

J S 0

 

 

1 Н

J=J +2

 

 

 

IF (J " 2 ) 136,13 5,136

 

135 INO=K T ( I» J » n

 

 

!ND1*KTII,J)

 

 

Il=M Sei{lND)- l

 

 

CO TO

138

i j j

136

IHDTs H T l l » J - l ) - K T (l

137

I F «KNOT)135 .1371137

 

IND=KT(I.J)

 

 

IN01*KT1I »J*l>

 

 

i ishseK iNDj.t

 

138

11 = 11 + 1

 

1138

IF СПРС11» 1 I - I H 0 1 1 1 1 3 e , t 3 9 . f t a n

I F ( I 1 - K C H ) 1 3 8 , 1 139,

1 , 3 9 1 , 3 8

1139

PRINT

53 11 NO, I NOl

 

 

CO TO

259

 

13912=HCRP1I , l ) + i

14012=12-1

 

К Т ( 1 1 1 2 + 1 1 = K T ( I • I 2 )

I F ( I 2 + J ) 9 0 2 , 9 0 2 , 140

902

HG R P ( I I 1 ) = NCRP ( I , j > ♦ i

 

КТ 11 ,J)=MKUZ + l l

 

IF (ч1 + 3 - м С Я Р ( Ы П 1 3 4 , 1 3 4 , 1 4 ,

141I F 1I - U I 133 ,142 ,142

142J =0

143 DO 144. I = l,HNAL MA 1 1 12 ,1 )= 0

144ЦТ 11 )=0 J =J +1

- IF (HA 1 1 ( 1, Л -1 М4Л , 1 4 5 , 1 4 6

145I NDT=MS0( J+1) - MSB ( J ) - I Z I F ( I N D T ) 1 4 6 , 1 4 6 , 1 4 7

146I F ( J - MKUZ ) 143, 186, 186

147K=0 J2 = 0

148K S K+ 1 J l = l

1 4 9

I ^ ”( KT*K»J l ) - J » 1 5 0 , 9 5 6 , 1 5 0

150

I F ( J 1 + 2 - h C R p ( К , 1 ) ) 1 4 9 , 1 5 1 , 1 5 1

151

IF <K- 1 Al i 4

8 , 1 5 2 » 152

152 I F ( M A l l ( 2

, J ) - I Z > 1 5 3 , 1 5 3 , 9 5 9

153

00

154 J 1 = 1 1HKUZ

154

ПА 1 1 ( 2 , J 1)=0

 

00

155 J 1 = 1 , J 2

155

KT( J 1 , NM1) =0

 

CO

TO 146

 

956J l s J l M

I H0=KT1K, J 1)

IF (HA 1-1 ( 2 , I N01 1 9 5 7 , 9 5 7 , 9 5 8

957M A l l l 2 i J ) = M A l l ( 2 , J l + l

950H A l l ( 2 , I N O ) = M A l l { 2 i I N O » + l J2 = J2 + 1

_ KT( 0 2 , NH 1 ) =K CO TO 151

959 12=0

1561*0

10=99999

1571*1+1

 

I F {K T f T i N M l I } 1 5 0 . I 6 0 i 150

158

IF (MCRp ( Г, 1) -1 с) 1 5/9. 16 0 . 16®

159

IC =MCRP (I . I I*

 

K =KT CT . MM1)

160I F ( I - J 2 > 1 5 7 , i 6 t . 161

1611 = 1

1621 = 1 * 1

IF ( KT I К • I >’»J ) 162 i i 6 3 i 162: 12=12+1

ЦТ CI 2 ) = K7 <K. I + l>

' 1= 0 1=1+1 '

I M0=KT11, NM1)

I F ( I N O ) 1 6 8 , 1 6 8 , 9 6 4

964

1 1=1

165

11=11+1

 

I N D T = K T ( I N D , I l ) - H T ( I 2 r

 

I F ( I N D T ) 1 6 7 , 9 6 5 , 1 6 7

965

IF( KT ( I NO. I l - | ) - J » l 6 7 , 166, 161

166

КТ( I , N M1 »=0

 

CO TO 168

167

I N 0 T = I 1 +2 - H C R p ( TNQ >1 I

168

I F ( I NOT » 165, 1 6 8 , 160

1 F ( I - J 2 1 1 6 4 , 1 6 9 , 169

169

I F ( I 2 - I Z ) 156, 17 0 , i7{,

170

1=0

 

J A= 0

171

1=1+1

 

IF (KT f I , N H 1 I ) 1 7 2 , 1 7 * , 172

172К =K T (I , N И 1 ) JA = JA+ l

 

KC1l s MCRP( K, 1 1

 

DO

173

1 1 = 1 , К С П

173

KT( К , I 1)=0

 

N C R P I K , J ) = 0

1 7 4

I F ( 1 - J 2 ) 1 7 l , 1 7 5 , 1 7 5

175

1=0

 

 

176

1=1+1

 

 

I F ( M C R P l I , 1 1 ) 1 7 7 , j $ 0 , 1 7 7

177

I F ( 1 - 1 A) 176, 1 7 8 , 1 7 8

178

DO

179

I 1 = 1 , 1A

179

KT( J 1 , NMl )=0

 

| A=I A- J A

 

CO

TO

146

180

K = I - l

 

181

K=K+1

 

 

IF ( HCRP(K, 1) ) 1 8 3 , i 8 2 i 18 3.

182I F 1 K - I A ) 1 8 1 , 1 7 8 , 178

183K C I 1 sMCRP1К i l )

DO 184 1 1 = 1 , KCI 1

K T ( I , I 1 1 = K T ( K , I U 184 K T ( K , I 11=0

n C p p | ! , i | = t l G R P ( K , i I

H.CRP (K, 1 ) =0

 

CO TO

177

186

CONTINUE

 

00 499

t = l , HNAL

 

•ПА11 ( 1 , 1 1 = 0

 

H T ( I ) = 0

499

MA1 1 1 2 , 1 ) = 0

 

1 = 0

 

 

IC=100

 

501.

I * I + l

 

202

 

f r (H B R P (! i i) - !C » 5 i 2 » 3 . f 3,5 *S

5 4 в

 

 

 

Q2

ICsMCRP <I * П

.

JKD*KT fl , J )

 

 

I F ( H A 1 1 I I , I M D 5 - I ) 5 4 l , 544, 541

ie3 J F ( I - I A > 5 0 1 , 5 0 4 , 5 0 4

541

I F ( J * H C R P U , 15 ) 5 4 0 , 5 4 2 , 5 4 2

C 4

KCI sMGRP ( К 1. 1)

542 ! F < H C R P ( I , 1 ) . I C ) 5 4 J , 5 4 4 , 5 4 4

 

DO 503 1 = 2 , KCI

543

I CsflCRP ( 1 , 1 )

 

IND=KT(K,I) .

544

K=I

 

 

 

r OZR<I NO) =YOZ«( I ND) *YpUZ( L)

I F ( I - l A ) 5 3 9 , 5 4 5 , 5 4 5

,05

H A U U , I N D ) = 1

5 4 5 KCI =h CRp ( K, l )

 

I F ( I A - 1 ) 5 5 7 , 5 5 7 , 5 0 6

 

DO

546

I=Zi KCl

•06

1=0

 

IND=KT(K >I)

 

INDT*MS0 (MKUZ2)-MSB«M»<UZ J ) * |

 

YUZRIINO)=ruZR<INQ)*

 

IF | INPT)507•510*507

 

 

 

 

 

>07

INDTSMSB(HKUZ2)"MSB(MKUZ1)"2

 

 

 

 

 

>08

IF (I NOT)5 0 8 , 5 0 9 , 5 0 6

 

I F ( M T ( 4 ) - H T I 8 ) ) 5 4 7 • 5 4 0 , 5 4 7

1 = 6

547

12=1

 

 

 

CO TO 510

 

CO

TO

518

>09

1 = 3

548

I F ( ' n T ( 7 ) - l ) 5 5 1 > 549 i 5 5 l

>10

I F i K P U Z « 4 ) 5 l 3 i 5 ! 3 , 3 | l .

549

I F ( I 2 - 1 ) 5 5 9 i 531 1550

H I

IF ( MPtJ Z ( L , 5L>. > 5 1 3 , 5 1 3 , 5 1 2

550

12=1

 

 

512

MT(I + U = 1

551

CO

TO

538

 

CO TO 5 1 6

1=0

 

 

513 I F( MPUZ( L , 4 ) ) 5 1 4 , 5 1 4 > 5 1 5

552

1*1*1

 

 

514

tlT ( I *3 ) г 1

 

 

 

J= 1

 

 

 

CO TO 516

553

J=J *1

 

 

515

MT ( I *2) = 1

 

I M0 =KT( I , J )

516 I F ( M T ( 1 ) - M T ( 9 ) » 5 1 7 * 5 3 4 > 5 1 7

 

IF «ПАИ 11, 1 « 0 ) -1 ) 5 5 4 ) 5 5 5 i 554

517

12=0

554

YUZB(INO)=YUZR(IND)*

518

I С * 100

10. 05*YPl)Z<L)

 

1=0

 

 

 

 

,13 3 5 5 з , 556 , 5 5 6

519

1 = 1*1

 

 

 

 

 

I F | MT( 1 ) - 1 ) 5 2 0 , 5 2 3 , 5 2 0

5У6 I F ( I » I A) 5 5 2 , 5 5 7 , 5s7

520 I F < n T ( 2 ) - l ) 5 2 l , 5231521

557

CONTINUE

521 I F ( M T ( 4 ) - 1 ) 5 2 2 * 5 2 3 > 5 2 2

 

PRINT

2 , flPUZ (L , l ) , MPUZ (L , 2 ) ,ГА

522

18=2

259

I F f L - Lp )

I 8 7 , i 2 5 ? n 2 5 9

 

CO TO 524

187

J=2

 

 

 

523

l B=ri CRP(I , 1)

188 J = J * 1

 

 

524

INO=KT( I , I В >

 

I F ( MP U Z I L , J ) ) 1 8 9 , 1 9 2 , 1 8 9

 

| F ( M A 1 H 1 . I N 0 > - 1 > 5 2 5 , 5 2 7 , 5 2 5

1B9 I 2=nPy Z ( L , J ) * 1

5 2 5 I F ( M C R P U , D - I C 1 5 2 6 , 5 2 7 , 5 2 7

 

I * h S B I l 2 ) - l

526

I CsftCRP ( 1 , 1 )

 

KCi 1 = KPT*1

527

K= I

 

00

190

1 1 = 1 , КС1 1

IF(I - I Д)5 19,528,520

190 t l P T ( l l l = H P T t I l * i )

528

1=1

 

00

191

11=I2, NKUZ2

5 2 9 1 * 1 * 1

191

MSB(I 1 >- MSB( 1 1 »- 1

 

INO=KTlK,n

192

I F ( J - K P U Z H 0 8 , 1 9 2 , 1 9 2

 

! F ( M A 1 1 < 1 . I « D > - 1 > 5 3 0 , 5 3 1 , 5 3 0

IMDT*MPUZ(t, l ) - N P u Z l L * l , l )

530

YUZRl !NC)=YUZR(!ND>*

 

I F( I NOT) 1 9 3 , 1 0 1 , 1 9 3

10,2‘YPOZ(L)

193

NCI1=HSB(MKUZ1)

 

МАЦ ( 1 I I NO ) = 1

 

KCI 1*HSB CMKUZ2)

531

! F ( t - H C R P l K , l > ) 529 » 532 >532.

 

00

194

 

I l = N C I l , K C ! i

532

I F ( 1 2 * 1 ) 5 3 3 , 5 5 1 » 5з З

194

цР т ( 1 1 ) «0

533

12=1

 

J =NC 11

 

 

 

CO TO 318

 

I NO=h PUZ( U* l | l )

$34 I F ( 4 T < 2 ) - M T < 6 > > 3 3 5 , 5 3 6 , 5 3 3

 

J 1 =MSB 1 ( I NO)

•935

12=1

195

MP TUI * HP « J 1 , 1)

CO TO 518

 

!ND T « J 1 I-MSB1 ( I ND*I ) + I

536 I F l H T C 3 ) - l » S 3 7 i 5 5 i » 5 3 7

v

I F c i N D T ) 1 9 6 , 1 9 7 , 1 9 7

537

12=0

196

J l = J l M

 

538

1=0

 

J = J * 1

 

 

 

I С * 100

 

CO

TO

195

5 3 9

1*1*1

197

M5B 1MKUZ2) =J*1

 

J=1

 

CO TO

1 0 1

203

1И , В Д ,.' " .? ..™ и 1 |Ч ,1 .Ы И » м

 

PRINT 3 , < V U Z R l ( l ) , l » l i H N A U

9995

00 9995 JaliNNAl.

 

YUZR2 U)*YUZR(U*YUZRiai

 

PRINT 3 3 1 »l iTUZRU J , YUZR | СI ) i

 

1YUZR2M) i Ul . f l KUZj

 

 

PRINT 3 3 1 1 И Р Ц П I YUZR(D I

 

l YUZ Rl I l l i T UZ R2 ( I ) , I * HKUZ J t

 

2KUZR)

 

 

IN0*NKUZ*NLP

 

 

PRINT 33 1(HP 1 <11»YUZR ( I ) I

 

lYUZRUIJ iYUZR2 (I) ,I«IN0,MNAU

 

READ 14,(YUZR4(t)l UhMNAU

 

00 9994 1-1 I MNAL

 

9994

YUZR5(l)«YUZR4(!WYuZR3tl>

 

PRINT 3 3 » M , YUZR3 ( I J , YUZR4 11) »

 

1YUZR5( 1 1 114 1 »MKUZ) .

.

 

PRINT 3 3 » ( HP l ( I ) , YUZR3( I ) »

 

1YUZR4U) , YUZR5II) , 1 -HKUZ 1 »

 

2KUZR)

 

 

PRINT 3 3 | ( M P K I ) , YOZR3( I ».

999

1YUZR4U) 1YUZR5H ) , I3IN0, HNAL)

CONTINUE

 

1FORMAT(2613)

2FORMAT( I X , 2 4 15)

3FORMAT ИХ t 12F 10 1 6 |

5 F0 RHAT( 5 ( 2 I 4 , 3 I 2 i 2 X) )

i F0 RHAT( 5 I 1 X, 2 I 5 | 3 I 3 , 4 X1 I 7 FORMAT 116 FS, 3 >

10FORMAT( I X, I 6 F 7 , 3)

11FORMAT(2014)

14

FORMAT I Ц Г в , A)

 

 

31

FORMAT <4012)

 

 

 

33

F 0 R H A T ( 4 ( l X | I 3 | F e , 3 | 2 F 9 , 3 ) )

50

FORMAT( 2Х, »B

HP

НЕТ», 413)

51

F O R MA T ( 2X , , B

KT

мало

с т р о к »,

 

1'ДЛЯ ПАРЫ ' , 2 1 6 )

 

 

5 3 i 2 ? б >АТ, 2Х| ' НБ

НААДЕНО

Р Е Б Р О ' ,

 

STOP

 

 

 

E N D

11.6. Программа расчета надежности (живучести) многополюсной системы связи в целом

Программа предназначена для расчета вероятности одновре­ менного нарушения связности заданного числа многополюсных се­ тей.

Объем программы составляет 411 перфокарт.

Исходные данные:

а) переменные KPVT, KNJ, KVKT, LP, ККР, KVKP, MNALr KGКТ, KMT, М\

б) массивы КР, MGRD, MGR1, V.

Результаты:

1. Номера двухполюсных сетей, составляющих оцениваемуюмногополюсную сеть.

2.Массивы VS, VS1, VS2.

3.Суммарное число путей многополюсной сети.

4.Число и номера двухполюсных сетей, нарушение связности которых привело к нарушению связности заданного числа двух­ полюсных сетей (оцениваемой многополюсной сети).

Для нормальной работы программы требуется около 70 кбайг оперативной памяти: 35 кбайт для объектного модуля программы; 17 кбайт для исходных данных; 16 кбайт для промежуточных и окончательных результатов.

 

0 1HE.NSIoN H C f l p ( 2 0 t 2 * b

 

JF(HT( 11 ) ) 1 1 9 * , 1 2 1 * , t ! 9 0

*MC R D ( 3 0 ) . « C R p l ( 1 0 0 ) «

Ц 9 0 ! F ( H T ( I l ) - L l ) l l 9 i , 1 2 l 2 M 1 9 l

1214 I F ( L 1 M ) 2 2 1 4 . 2 2 1 5 ,2 2 1 4

 

 

 

 

3 V S l < 3 0 , 3 0 ) , V p < 2 0 0 ) » M J ( 2 , 2 0 ) ,

2215

11=0

1215

 

2214

CO

TO

 

4 P H J ( 2 0 ) , WT( 1 0 0 0 ) ( VS2 I 1 0 0 )

I1=MGR0(U *1)

 

 

> f t E A O ( b l l ) K P U T »KMJ«KVKT, lP,

1215

11 = П М

 

lKKP,KVKPiMMAL*KCKT»Kf1T,H

 

I г I ♦ 1

 

 

 

NRITE( 3, 2) KPUT, KN0( KVKT, 1, P,

 

I N0 » HCRP 1 ( 1 1)

 

 

1KKP,KVKP|MNAL*KGKT|KMT.M

 

00

1216 J=l,IND

 

 

READ I I ,

1 M I KP U »0) »J*1 IKVKP)

• : i 2 i 6

K T f 1 • J 1 =K P ( 1 1 . J )

 

 

l t = l , K K P )

 

HCRP d

, l ) * M C R P l (I 1

)

 

NRI TE( 3 , 2 ) ( (KP ( I (0) | J a| | KVK>>,

IF (I 1-MGRD (L 1) ) 12 15,12 17,1 217’

 

1 1 = 1 . KKP)

1217

KPUT*I

 

 

 

R E A O ( l i l ) ( H C R D ( l ) , I = l , l P )

 

1 A* !

 

 

 

WRITE 0 . 2 ) (HCRD ( I ) ( I = 1 , L P )

 

WRI ТЕ ( 3 , 2 ) K° UT, I A2

 

 

REAO( l . l ) ( MCR P i ( I ) 11 * 1 1KKP)

 

00

199

1 = 1 , KNJ

 

 

NR I ТЕ ( 3 12 ) (MCRP1 ( I ) 11 * l | KKP)

 

N J ( 1 1 1 ) =0

 

 

RE A D U . 3 ) tVP ( I I • ( a l . H N A U

 

NJ ( 2 , M =0

 

 

WRITE( 3 , 4 1 ( V P ( D » 1 * 1 I MNAL )

199

PHJ(I ) = 1 • 0

 

 

00

1107

1 * 1 , KMT

P E j ( I )= 1 .0

 

1197

H T ( I ) = 0

0 * 1 , IP

 

0=1

 

 

 

 

00

1190

 

MJ ( 1 , 1 ) = 2

 

 

V S ( O) = 0 , 0

 

KCI =HCRP( 1 , 1 )

 

 

V S 2 ( J > 3 0 . 0

 

00

200

1 = 2 , КС»

 

 

00

1100

I= l *UP

 

IN0l«KT(i,JI

 

•1190 V S l ( I . J ) * O , 0

200

PEJ ( D=PEO ( 1) *VP ( I HD l >

 

KPS! =0

 

201

1C=0

 

 

 

IA2=0

I s l . KCKT

 

U =0

 

 

 

DO

1202

 

IN 0=NJ(1,J)

 

1201

DO

1201

0 * 1 , KNO

202

I F ( J . 1 )2 0 2 ,2 0 3 ,2 0 2

 

HCRP11 I0)*0

I2=HC RP(IND,J-l ) * l

 

 

00 1202 J-l.KVKT

 

CO

TO

204

 

1202

КТ(1 i J )*0

203

12=2 •

 

 

1200

1*0

 

 

294

DO

205 1 = 1 , 2

 

 

ОМ I N= 100 10

 

DO

205 I I M . HN A L

 

1203

(."L* 1

 

205

HA 11(I,1 1)=0

 

 

OHs 0, 0

 

 

KCI1*MCRP( IND•J )

 

 

11*0

 

 

00

206

I 1 * 1 2 ,Kcl 1

 

1196

11=11*1

 

206

IMOI*KTCINO,M)

 

 

I F ( H T ( I 1 ) ) 1 1 9 4 , 1 1 р 5 , 1194

H A llM i!N 0 1 ) = t

 

119 4

1F ( ЦТ <I l l - L l 1 196V1228 , Ц 9 6

 

1*0

 

 

 

1195

I F ( K P S ! ) 1 2 0 5 , 1 2 0 5 , 1204

207

MAX* 1

 

 

1204

L 1=0

 

1*1*1

 

 

1205

I F ( L - l )

1 2 0 7 , l 2 0 6 i 1207

208

IF(J.1)208,209,20a

 

1206

11=0

 

I1 = M C R P (I,J - 1 )

 

 

CO

TO 1193

 

CO

TO

210

 

1207 I l s H C R D ( l - l )

209

M = 1

 

 

1193

1F (KRS J " l ) 1 2 0 8 , 1 2 0 0 , 1 2 0 9

210

I 2 = MCRP( I , J )

 

1200

1*0

 

 

211

I l = M * l

.

1209 11*1 1 * 1

 

 

1WD1=KT(1, 1 1)

 

1 = I* l

 

311

IF (M AM (1»IND1)- 1) 2 1 2 , 3 1 1 , 2 1 2 ’

 

IHO*MCRP l-( 1 1 )-

10*1

 

 

 

DO

1210

0=1, 1ND

 

CO

TO 213

 

I 2 1 0 - K T U I J ) = K P ( U I J )

212

12 * 12*1

 

 

M C R p ( I , i ) = M C R P l U i >

 

I F ( I2%KVKT*1 )2 2 1 3 ,2 2 1 3 * 2 2 1 2

 

IF ( М-ИС110 (L J ) 1209* 1 2 1 1 , 1 2 1 1

2212

WRIТБ( 3 152)

 

1211

IF (K P S I)1217,1217,1212

2213

CO

TO

9999

 

1212 IF (L 1 -L p )1 2 l3 i1226*1226

K T ( 1 , . m = K T ( l . I l )

 

1213 L t = U * l

 

 

H C R P I 1 , J * 1 ) = I 2

 

 

I F f H - U

Ц 9 2 , 1 2 1 2 , 1 1 9 2

213

I F ( I l " M C R P ( ! , 3 ) ) 2 l l i 2 l 4 t 2 l 4

1 1 9 2

11*0

 

214

IN0T*HAX*I2*MC R P (I 1J)

. 1191

I l = ! i * l

 

 

IF (I NDT)2 1 5 , 2 1 8 (2 1 8

206

m

НАХ=12«НСРР M I Л

 

CO TO 222

216

!ND T « MC R P I 1 I J * 1 > * H CRP| I | J > * 1

 

IF |1NDj)222 • 2 19 *222

2 19

I C = I C M

 

I N D 1 * K T ( I *12)

 

I F | n » l H 2 i l N O U « l > 2 2 0 , 2 2 1 . 2 2 0

220ПА 1 112 11 NO 1 ) s 1 CO TO 222

221ICB IC- 1

MC RP I I . 3 * 1 1 =MCR P ( | . J * 1) ♦ 1

ггг

223

K > | N 0 « j

 

IF(IJ-l»2l6.2l7i2i6

21*

J = J*1

2 1 7

? 3 4 ° 2 4 8

224

l F ( I C » 1 3 1 W i l l 1 . 2 ? 4

1 = 0

! 2 5

I ■ 1 ♦ 1

 

I F ( M C R P ( I , J * d > 2 3 1 , 2 3 1 , 1 2 5 1

151INOTaHCRPIl,J*l»p4CRPfI,J)*l

I F ( I N n T , 2 2 6 , 2 3 1 , 2 2 6

126H = M C R P ( I , J j

127I I s ! 1*1

I N D 1 =K T ( 1 , 1 l )

I F ( M A I 1 1 2 , I N D I 1 * 1 ) 2 2 8 , 2 2 9 , 2 2 8

! 28

I F ( M - O C R P I I , J * 1 ) > 2 2 7 , 2 3 1 , 2 3 1

! 29

1 2 = 1 2 * 1

 

K T | I 2 , K V K T » = I

 

N C I l B M C R P d , J ) * 1

 

K C I t s M C R P d , J * 1 >

 

DO

230

I1"NC11,KCl1

!30 K T | l,U)»0

 

M C R P d ,J*1>=0

J l

I F ( I . K ) 2 2 5 . 1 3 1 1 . 1 3 1 1

’ l l

H I

N * 1

 

6 1 M l N a H I N * l

 

1*0

 

62

1*1*1

 

 

I F ( HC R p ( I , J * 1 » 1 2 7 7 . 2 7 7 , 2 6 3

63 I N D T * M C R P ( I ‘ , J * 1 ) W H G R P ( 1 , J 1 • м I N

 

I F d N O T ) 2 7 7 , 2 6 4 . 2 7 7

64

D O

2 6 5

1 I S I . M NA»-

65

MA1 1 d d

1) * 0

 

N C i 1 * H C R P ( I , Л • 1

 

K C I 1 = * C R P ( I , J * D

 

0 0 2 6 0

I l = N c I 1 . K C J 1

 

I N D 1 * K T ( I . I 1 )

66

MA11 I 1 i I ND1) = 1

 

1 1

x 0

 

67 11*1 1 * 1

 

 

IC 1 = 0

 

 

J F d 1 * 1 1 2 6 9 , 2 6 8 . 2 6 9

6 8

I F < I t « K ) 2 6 7 , 2 7 7 * 2 7 7

69

I p ( MCRP( I ] , 3 * 1 I 1 2 7 0 . 2 6 8 , 2 7 0

70

INOTS K CRPd 1,3*d - M C R P (I1.J)-

 

IF(INDTl268,27l.27l

71{ЭжиСЯРП ti-1)

72I 3 = I » 1

IM01»KTII1.13»

I F(MAI 1 ( 1 . I W D 1 1 - 1 1 2 7 6 , 2 7 3 . 2 76 1 C1 * ! C1 * 1

I F ( I C1 « HI NI 2 7 6 I 2 7 * I 276

274 NCI 1*MG4Pd 1, J J ♦ 1 КС I 1* MCRP( 111J* U

0 0 275 I 3 = N c l t i K C U

275K T ( J 1, 1 3 1 * 0 flGRP IT 1 , 0 * 1) *0

12x12*1

 

KT( 12 . KVKT) =! 1

 

 

CO TO 268

 

276

IF (J3-rtCRp( I iiJ M » 1272.26* 2**

277

I F ( ? - K I 2 6 2 , 2 7 8 . 2 7 a

'

2781F ( ц IM-MA * *26 I . 2 7 9 1 2 7 9

279N J < 2 » J M ) = l2

IF ( 1 2 ) 2 4 0 , 2 4 0 . 2 32

232 K=K- I2

I 1*0

1321 11x11*1

I F ( K T d l . K V K T I - K ) 1 3 2 2 , 1 3 2 2 , 2 3 9 '

1322 1 =NJ 11 , J »

2331*1-1

IF (H C R P(I,J*1«123 4,233,2 34

234J2*KT(i 1 .KVKT *

' I З щ С Р Р ( J2 , J 1

J 1 . M C R P 1 I , J )

235J 1 * J 1 * 1

IF (J 1-fiCRP ( I ,3*1) > 236,236 ,2 37

23613*13*1

K T |J 2 ,1 3 ) = K T ( I,J 1>

CO TO 235

237n C p P ( J 2 , J * l ) = I 3 NCI I s HCRP d , J ) * 1

KCI 1*NCRP d , J*11

00 238 J 1 =Nc 1 b K C I l

238kT(I .311*0

HCRP d . 3 * 1 1 =0

239I F ( I 1-12» 132 1 . 2 4 0 , 2 4 0

240J=J *1

 

IF ( J- KN3J 1 4 0 2 . 1 4 0 1 , 9 9 9 9

1401

HR 1 ТЕ I 3, 1 6 1 3 , NJ t 1, 1>

 

HR I Т Е 1 3 , 2 1 K H C R P ( H . J I ) >

 

l l l s l i K P U T l , 3 l = l , K M J >

1402

P EJ( J >= 1,0

 

1F(IC»K1241,245.241

241N3(1,31*1

NCI 1=MCRP« 1 , 3 - 1 1 * 1

KCI 1 *HCRP( 1 , J 1

DO 242 I l =Nc 1 1 , KCM

I N 0 1 * K T d . I 1»

242PEJU1*PE3( 3 ) *VP 11 NO 11

243INQT*N J (1 • J - 1) «.NO ( j , J »-N J 12 , J)* IF(INDT-1>244«248,244

244M3(1,3>»N3(1 ,31*1 GO TO 201

2451*0

P E J (J )= 1 ,0

2461*1*1

4PR* 1 , 0

1 1xMCRP(I * J —1 »

1461 11 * 11*1 lNDl*KTd . I I I PR*PR*VP( I NO 11

| F ( I 1-MCRP ( t ,31 1 1+6 1 , 1462» 14-621 1 4 6 2 P E J (J )S P E 3 (J )* (1 ,0 * P R I

207

I F < ! - | C > 2 4 6 , 2 * 7 . 2 * 7

247PEJ [ J ) = I ,0 -P EJ|J>

248pH J ( J - 1) = 1, Я

J No • =N J ( 1, J - j ]

I F ( 0 ^ 2 ) 2 4 9 , 2 5 0 , 7 4 9

249I 2 = MCRP(1 NOl, J - 2 ) ♦ 1

! 3 = M2RP{!W0I , ) * t)

, 2 5 0

CO

TO 251

 

12=2

 

 

l.SsHCRP <1NDl, 1)

251

00

252 I 1 - 1 2 , 1

3

 

IN(32S4T i I NO 1,7

1J

252PHJ ( J - 1 I * PHJ <J « 1 >* VPI I ND2 )

IF (I J- 1 M 5 2 0 ,1 5 2 1 ,1 5 2 0

1523

1 0 = 1

 

CO TO 1522

2999

PHJ ^ - 1|^*PHJ( J 'l » *

11* 1 • 0"PEJ ( J , >f 11 t 0 4 p EJ l J * t ) ) )

1522 P E J ( J - i > = P E 0 | J - l U P H 0 ( O - l U l P E J ( J » l ) * p H J | 3 » l )

NJ ( 1 , J )=0 NJ(2 , J j c 0

P EJ1J )* 1. ?

i N O i s N J t i . J ) , !

OO

254

I * 11 INOj

k Cl l * ! j CRp U, 0 1

00

253

I l 3N c l 1 ,KCT 1

253К Т 1 Ы 1 ) = 0

254MCRPd , J ) = 0

I P ( J - 2 ) 2 5 5 , 2 5 6 , 2 5 5

255J = J - 1

CO TO 243

256I F ( N J ( 1 , 1 ) «KPUT>2 5 7 12 5 8 1258

257J= 1

CO TO 244

258IF (K P S l) 1218,1218,1219

1218 VS (L ) =PEJ 11J CO TO 1228

1219 VS 1 f L . Li > * P EJ (11

WP I T E ( 3 , 2 5 ) L , L 1 , P S I

OMeOH*P5I

151A* 1

1220

1=1-1

 

 

1 NO=MCRPJI, 1)

 

00

1221

J=1,1N0

1221 K T ( I , J ) = 0

 

t l CRpll , 1 ) = 0

 

IF ( к Р 5 1" 11 1 1 8 8 , 1 1 8 в , Ц 8 7

1187

I F ( L 1 - 1 ) 1 1 8 6 , 1 1 8 5 , 1 1 8 6

UB6

L3enC R D (Ll)-nC R 0(Ll-l)-l

 

NCI 1 = 1A-L3

 

SO

TO 1184

1185

NCI 1 = IA-HCRO( 1) ♦ 1

118 4

00

1183 I * N c l 1 , 1 A

 

(W0=«CRP(1,1}

 

hGRP( I , 1 ) = 8

 

00

1183 J = 1 , I N 0

1 183

К Т П , J)s{?

 

 

 

 

IF(l. 1 - 1 1 2 1 8 3 , 2 1 8 4 , 2 1 1 3

2 1 8 3 I As IA-U 3 - 1

 

 

 

 

I * IA

 

 

11

 

 

 

CO

TO

1212

 

 

2 1 8 4

I As I А- НСЯО(

 

 

 

I = ГA

 

 

 

 

 

 

CO

TO

1212

 

 

 

1168

! P « L - l M 2 2 3

l l 2 „

l l 2 a ,

1223

CO

TO

1224

 

 

 

I I S M U P O ( С- 1 j

 

 

1224

INDTS | * MCR0( L) + 1 1

1

1225

I F ( I N O T ) 1 2 2 5 , 1 2 2 5 , 1220

1 = 1 - 1

 

 

 

 

 

I Аг I

 

 

 

 

 

 

CO

TO

1212

 

 

 

1226

WRITE 13, 24)1 . , OH

 

 

 

WRI TE( 3 , 4 ) ( V S 2 ( 1)

, I =1 l L P ,

 

00 2 2 2 6 1 = 1 , L P

 

 

2226

V$2 ( 1 1 = 0 , 0

 

 

 

1227

I F ( OMOMl N) 1 2 2 7 ,

1 2 2 8 , 1 2 2 8

0M1NS0M

 

 

 

 

 

1.2eU

 

 

 

 

 

1278

1Г «L- LpJ

1229 , 1 2 3 1 , i 2 3,

1229

NCI 1 = I A2* 1

 

 

l

 

00

1230

I = N c I 1 , XA

 

2229

00 2 2 2 9 J = 1 . « N J

 

 

MCRP( T , JJ =0

 

 

 

001230 J = 1 , «VK T

1230 KT( ! 1 J ) = 0

1= I A 2

CO

TO 1203

1231 I F f K P S l 1 1 2 3 2 , 1 2 3 2 , 1 2 3 3

1232 KPSI=1

 

CO

TO 1200

1233 WR J T E « J , 2 7 M . 2 , 0 M I n

wPI Т Е ( 3 , 4 1

( V S <1> i J = l , Lp)

wp 1 ТЕ <3 , 4 )

l ( vs 1 ( I , .)) , I = 1 ,LP),

1 J * 1 , L P )

 

00

2 2 3 3 1 = 1 , LP

V5< U = V S 1

( L 2 , I )

 

......:i

 

00

2 2 3 4

1=1,

2235

OO 2 2 3 5

0= 1 , KNJ

MCRPU , J ) = 0

 

00

2 2 3 4

0=1, KVKT

2 2 3 4 . KT ( ! , J ) =0

 

11 = 0

 

1182

1*0

 

 

11=11*1

11 Вl

I F C H T U i n 1 1 8 2 , 1 1 8 1 , U B 2

MT 11 1 ) =L2

 

fi*H-3

 

 

IF t M) 9 999 1 9 9 9 9 , 1 100

1180

I 2 c 0

 

1179

12c I 2+ 1

 

IF (ИТ 1 12) * 1) 1 1 7 8 , 1 П7 - , И 7 8

1178 l N D « t t r i l 2 ) « l

 

J=HCRO(1ND)

 

CO

TO

1 1 7 6

1177

J * i

 

 

Ц76 !■!♦» *

J * J * i

'

,

IMO*HCRP1(0)

00 1175 Л = 1 11 NO

11 7 5 К Т ( 1 * « Я ) я « Р и » Л >

HCRP<Ii1)*HCRP1(J>

IN0»MT(12)

J F ( J « 4 G R D ( ! N D M 1 1 7 * 1 1 1 7 4 i Ш 4

1174 I F ( ! 2 - ! l ) 1179.1177 11 173

Ц 7 3 KPSI-7

1A2 ■ I

GO TO 12£R

1 FORHAT(4012)

2 FORHATllX.24151

3F0RMAT(2eF4,2>

4FORMAT!IX.12F10•6)

ЙFORKATI26I3)

16F O R H A T U X . ».)=».12,»HU(1,1) = ».

и з , » необходимо Увеличить

2» K V H C R P » I

25 FORHAT(IX» '.I2,' Ll*».l2.

1» PS! * » i F 10,6 J

26 FORMAT( I X , * 1 » # • 12 , f OMECA=' , 1 F 1 0 . 6 )

27 FORMATdX, »L 2*#*i2. » OMEGA ». 1»M1HP»,F10,6)

52 F0RHAT(2X.*B КТ МдАО СТОЛБЦОВ'!

9999 CONTINUE

STOP

З а к л ю ч е н и е

Проблемы повышения надежности и живучести системы связи чрезвычайно важны в настоящее время вследствие большого ущер­ ба, который может быть нанесен управляемым системам из-за не­ своевременного доведения (или вообще недоведения) соответст­ вующей информации от управляющих органов до управляемых объектов. Решение основных задач данных проблем с достаточной достоверностью стало возможным благодаря разработке методов, которые в значительной степени обобщены и развиты в книге.

Точная оценка надежности и живучести целесообразна при проектировании системы связи для обоснования выбираемого ее варианта. Оценку этих свойств для практических целей достаточ­ но проводить приближенно. Однако даже при приближенных оцен­ ках необходим учет не только топологических, но и функциональ­ ных особенностей системы связи, так как любая система связи — это совокупность сети узлов, линий и системы управления этой се­ тью. Именно система управления специальными управляющими воздействиями (ограничениями) превращает систему связи в еди­ ный взаимоувязанный организационно-технический комплекс.

Игнорирование особенностей системы связи при оценке надеж­ ности и живучести может привести к значительному завышению результатов.

Синтез системы связи с учетом требований по надежности и живучести — это в большинстве случаев разработка предложе­ ний по модернизации и наращиванию существующей системы. Сложность и большая размерность систем связи приводит к необ­ ходимости решения задач их синтеза на ЭВМ с применением агре­ гативного принципа моделирования сложных систем.

В практике научно-исследовательских и проектных организа­ ций широко применяется итерационно-эвристический метод син­ теза. Сущность метода заключается в разработке на начальном этапе проектирования группой опытных специалистов -с участием заказчика нескольких исходных вариантов системы связи. Довод­ ка каждого варианта до окончательного выполняется итерацион­ ным мотодом по специальным методикам и алгоритмам на ЭВМ. Любая операция содержит четыре этапа: расчет показателей жи­ вучести (надежности); синтез управляющих алгоритмов (опреде­ ление функциональной избыточности); определение необходимой живучести линий и узлов, числа и мест включения резервных ли­ ний (структурной избыточности); расчет числа каналов в линиях и производительности узлов коммутации.

210