Google
 
Trailing-Edge - PDP-10 Archives - decuslib10-09 - 43,50466/ecap.ovl
There are no other files named ecap.ovl in the archive.
h@PM YI

C

iHY?E?Qxp<PEPJGQz?QL
[Mc@?E #%/4B    L    H    E    C    D    A    M    N    S    T         	    *    R    X    X    X    X    X    (/,' WMU ELECTRONIC CIRCUIT ANALYSIS PROGRAM (VERSION 3) '////)(' READY')(72A1)(' *** MODEL DOES NOT EXIST ***'/)(1X,'HELP IS AVALIABLE IN THE FOLLOWING AREAS'/,'  SYSTEM CONTROL		1'/,'  SOLUTION CONTROL	2'/,'  MODEL MODIFICATION     3'/,'  INPUT AND OUTPUT	4'/,'  DC ANALYSIS		5'/,'  AC ANALYSIS		6'/,'  TRANSIENT ANALYSIS	7'//,'  ENTER AS MANY NUMBERS AS YOU LIKE SEPERATED BY COMMAS'/,' 0 FOR RETURN'/)(10I)('HELP1')('HELP2')('HELP3')('HELP4')('HELP5')('HELP6')('HELP7')('HELP8')('HELP9')('HELP10')(1X,15A5)(75A1)(' WHEN PROMPTED BY A "READY", YOU HAVE THE ','FOLLOWING CHOICE',/,' OF COMMANDS:',//,' DC		START DC ANALYSIS',/,' AC		START AC ANALYSIS',/,' TR		START TRANSIENT ANALYSIS',/,' LIST		LIST CURRENT MODEL ON TERMINAL',/,' REMOVE NN	REMOVE SOLUTION CONTROL LINE "NN"',/,' SAVE		STORE CURENT MODEL',/,' NEW		INPUT A NEW MODEL',/,' EXIT		CLOSE OUTPUT FILES AND EXIT FROM ECAP',/,' HELP		TYPE THIS TEXT',/,/,' IN ADDITION, YOU MAY ALSO ENTER A NEW LINE OR RETYPE A',' LINE PREVIOUSLY',/,' ENTERED.',/,' THIS VERSION DIFFERS ','FROM THE IBM VERSIONS MAINLY IN THAT THE TYPE',/,' OF ANAL','YSIS(DC,AC,OR TR) IS A "COMMAND" GIVEN AFTER INPUTING',' THE MODEL,',/,' INSTEAD OF BEING PART OF THE MODEL.',/)(I5)('1')(5A1)(15A5)(' READY(TYPE HELP IF NEEDED)')	    B    {@N    TTY  *    T=8)R    A    /    (0P&	4:    `X{(     LPT  SYSTEM ERROR   + -<9nOd
:h; l+,@d
k2H^+16bt0b+1+)45484\44
4\4^44a444474D:t8&% <],a7$?+:4D+; <\,a7$?+:4D+;@dr"& $ Fk Dt7F;+J & Fr.8 Fs";/&.s/8 s <l, 
(
"
( ( Jj HV (.V <o,
:V; j+D,.$8&@:t; k+;7D>+Y $ Dr"> $ <q, 
;.
?(
"
( ( Ji HV ;.?(.V <t,
:V; i+S,.$8&N6Dr+[ <u,,+ <x,,+ @fW*d^ <{,, <~, _DqZDh h <,
:h; q+c, ZDt t7HW+p6bW0b+p+k4q4s4u4w4y4{4}444+ <,,+ <,,+ <	,,+ <

,,+X<,,+W<,,+<,,+s<,,+h<,,+$<,,*dg <I,?@ <[,:' 
:<V,:h; o+:t;+p+6` <', 
(
"
( ( Jn Hh (.h <*,
:h; n+-,.$8&)?$Dr@d	 </,
 ZDV V 
k3H{+A 
k3h+@ 
k2(+@  H
k*d: ZDq q 
k3H+E 
k2Hz+G*dA <1,:i q 
k3F{+J 
k2F+O"&%.q $ q.  
j H
k.$8&L;<T,6`r+U+<2,,+ 50d+Z $ D
k3D+f <Q,a7$?+:4D+; <P,.X@dr"& $ Fw Dt7F;+x & Fr.8 Fr";/&.r/8 r <8, 
(
"
( ( Jv HV (.V <;,
:V; v+s,.$8&o:t; w+i7D>+ $ Dr"> $ <=, 
;.
?(
"
( ( Ju HV ;.?(.V <@,
:V; u+,.$8&}6Dr+
K<A,,O:' <M,=4@d
k3D+ <L,a7$?+:4D+; $ DW@f5 FW  Fe  F! D
k2h+ 
k3(z+*d+3 t0$+( t/&& $%"(.t.  
k H
k/$8&"   F
k*d& <D, <H,
 <I,	 _DUZDt t <M,
:t; U+,, <K,a7$?+:4D+; $ D
n2D+<+$.D+D<4D+; <I,

xx~x~`|x|x|x|`
kX,$WX-
kX,$-
kxXtV$?PuV$
k

(6I)(75A1){@~`X     LISFUL    gR~)( \[ p @S@d?1@+3"&$ $$ DY Y 
k2D^+i>Y8&e,<V,:i Y&$.$ DN:
A; F;+T ^ZD
k3F^*d}8<U,+	6`?+I3D;.T( N F
ATI> D? >1$+"> $ FV DY">.& $ (. HO 
 ? 

? 

0I3,(I+ 
? JO 

 ? L? J ?.$8&:Y; V+ > ? I.$ D? ]_DUZDY"> $ DS S ?3DY+(:S8&%++:Y; U+# <c,:i Y DT+T Y ;.?( <d, <h,
I;.?( N H
k3F^+8*d4 $,D? I3D
 ^_DXZDY Y <o,
:Y;"X+E,Y$D(/>. Y @ H?.$8&O+!$ D?+T!$} D? [,~x

\P%Z
kP%Z
kxP%Z
kXZ$(' LANG MAINLINE- ECA ENTERED. KTO = ',I3)(A2,2I,6I1)(//25H ILLEGAL INPUT STATEMENT.//)(//9H NODE NO.I4,13H  IS MISSING.//)(//11H BRANCH NO.I4,13H  IS MISSING.//){p	    0c=t
PAC   XDC   `     TR   ECAP K
 \ p @v7@+ <J, <M,
7@v+K $ Dx x 
k3F

+0$$+(+' &.x/&$/& $$ 
g H
k/$8& "(/x"&.x. x  H
k.$8&%:x+:
k3D+F $ D

ZD
k3H

+1 
k3H1:

k J 
k*d+@d Fs D
k3F

+< 
k3F< ZD
k3H$+0*d8+A:*4*4F4.4.7<H,$R6bu 
 _DrZDy y <T,
:y;6r+a,@dh4n4n444&4$4$4)4F4F4FDs:
:q; r+q" $6@6+ <Z, <],
:8&|,$$D47$5+7`~+6<H,?K4$+D5+6`~+7`H,#6b
~(u$$$X   B    V    +    E    Y    H    (    9    6    N    3    Q    0    T    -    C    W    F    *    I    8    L    5    O    2    R    /    A    U    ,    D    =    X    G    )    7    M    4    P         1    K
  \e7`+~ <g,, u D n F t H F 
m J 

s L x N r P h R v T F P L R R k T p V t X r Z X k H X v X' i X' u D( w X( s X) f X% J% N& e N& T= X> L> w X? R? V@ q X@ FA PA o TB g TB m TC l TC z TD ZD HE y VE q VF j VF x VG p VG j VH f VH RI z VI DJ w DJ i DK s DK y D) L* u V* t V+ J+ h V, D, X- X- P. N. R/ n V/ P0 N0 J1 F1 i X2 o V2 L3 P3 

t L4 T4 R5 Z5 R6 H6 R7 p H7 

k L8 J8 H9 V9 H: N: X; P; D< R< l T= LV 

gLVFWXtTWFXLX4fNFYBTYAFZELZEF[TD[=N\R\4nND]BP]AN^EJ^ xTDS=H@dLDL DM@DM!& FN!& FN!&@ FO!& FO!&  FP!&@ FP!&` FQ!&	 FQ!&	 FR DR DS DS DT DT DU DU z D
@ \s7@+y < m, < p,
6b+|+z4|4(4 :
k3Ft+| 
k3F|+,$7D3$

+ $

2$%:$	 D3$

CDf@$K3$}+# $K2$
k3F(+( 
k3F(+( 
k3FB+ a@f
k3H=+:*d/ $
CD f7$6+ c4D :
k3D(+(+67$6+c4DC4$2$a4a4v4v 
k3D?+T+4 
k2D&+4$:D!1&"FI+^ $ D
k3FA+n 
k3FC+n"&. D

CDf.$4D+$c4D^7$2D c4D^ !OfI+^:
k3D'+ 

=
k3D'+ 

+ d $
CDf@d2$
k3F'+  
k3F'+ + < 
k3F'+  & F
k3F'+ 7"&.
k3F'+ 7 
k3F(+ 0 
k3F(+ +7&6+ c4F ( $3D
k3D)+:+<7$c4D(6$2DE4 K4 V:!1d+ H $ D
CD+D j < q, < t,
Js,~XR-ECA-03 ENTERED. ITRANS=I2,8H  INVAL=I2)(34H LANG SUBR-ECA-03 EXIT.    ITRANS=I4)K
` \!7@+! <", <",
6b+!+!4!4!84!Q4!Q4!Q4!Q4!Q4!Q4!R6b
F D
k3D(+!"$.+	7$
=
k3F'+! 
k3F(+!% &K2f
:!0 
k2FA+!% 
k3F2+!, 
k3F=+!.+!0  D
AW!!;+!94!;4!F6b!A4!C 
7$"4D!e6b!U4!W4!Y4!c 
J!,~X-04 ENTERED. ITRANS=I2)(34H LANG SUBR-ECA-04 EXIT.    ITRANS=I4)	    K
 \"#7@+"( <#

, <#,
6b+"++"*4"+4"Q 
k2D?+"3:| &1F+"< $ D
k2D@+";:|Of|1d+"< $ D
k3F"$+"< 
k3F"<+"C,$7D
k3F(+"Q 
k3F'+"P 
k3F(+"Q 
k3F)+"[ 
k3F.+"^+"f7DE+"Q+|@f@+"Q7D@ $.D
J"#,~X-05 ENTERED. ITRANS=I2,8H  INVAL=I2)(34H LANG SUBR-ECA-05 EXIT.    ITRANS=I4)qoQOK
  \#7@+#$ <$7, <$:,
6b+#*+#%4#*4#*4#,4#F4#^4#u4$

4$$4#*/$0D!4#:4#D4#s7$
7$$/4D#}7/$4$14$4$1 
J#,~X$(26H LANG SUBR-ECA-06 ENTERED.)(34H LANG SUBR-ECA-06 EXIT.    ITRANS=I4) y~h~`(0K
@$\$M7@+$U<&0,, $ D
 
k2J+$] $A( 
 
k3J+$^*d$W+$s2$2d$A+&":!+&%"$.$A4D&"5d&  $3d$A+$+&# 
k2F*+$x 
k2F++$x $ De $OZD$D $D( 
 
k2J(+$~ $D( 
 
k3J)+%*d$x+$"D
.$D4$%	4D%,+&& $3d$D+%,+%

=
k3D'+%%+%:
k2D(+%

:&% $QZD$A $A( 
 
k2JU+% $A( 
 
k3JU+%#*d% 
k2FV+% 
k2F]+% & F$A+%# 
k2FW+%" 
k2F4+%" & F$A+%# $ D

:&%5<&-,+	7$&&4D%, $3D$D+&"$.$D D$A6b$A0b+%8+%/4%X4%Y4%[4%84%[4%v4%v4%z4%{4%}4%~4&4%x4&4&4&4%V@d$E 
k3D(+%=:$E <&-,+	7$

.$ D$B $A/$&$

;.$D$D7$6+&&4D%JA$.D$Bn$B"&.$DAF$Nd<&.,;<.@{+%97$$E+&&5d%U7$6+&&5d%Sj$PD{5D|+%[$P5D|jD}+%[@d$E+%[$5D&%7$W+&&5d&% $ DW+&% $3DW+%t $ DW+&% $3DW+%t $ DW+&% $ DW+&%+$ $O
k3F'+& 
k3F(+& 
k2FB+%' &+F<+&:6+&6b60b+&+&4&4&4&:!1d+& $ D
J$M,~p$N$NXINCORMORE MORE CHARANUMBEMODIFCHARATOO ME0 ORILLEGINITINODE L OR TOO MCHARANUMBEFREQURECTLTHAN THAN CTER R OF Y NOTCTER ANY D I0 NAL CHAL CONUMBEC NOTANY DCTER R NOTENCY Y FOR5 TIM5 TIMIS NOA TIM ALLOIS NOATA SOT ALARACTND. OR EXC ALLOATA GNOT D IN MOR TIMED DE-DEPE-DEPT "B,E-DEPWED IT "B,UBGROLOWEDER INF SWIEEDS WED IROUPSEFINEODEL ME STATA GENDENENDENT,M,SENDENN TRAN,R,GUPS   IN A NUMBTCH I20   N DC D IN EP IMROUP T VOLT CUR,E ORT SOUNSIEN,E,I,C OR ER   MPROPSYSTEPROPETAGE RENT  I"  RCE OT ANAL,C" DC   ERLY M CONRLY DSOURCSOURCMITTELYSISDEFINTROL EFINEES   ES   D    ED   D         ^    (34H LANG SUBR-ECA-07 ENTERED. ITRANS=I2)(72A1)(' ***ERROR # ',I2,3X,9A5)(//,' INVALID SYSTEM CONTROL CARD - - IGNORED',//)(1H 72A1)(//13H ERROR NO.  1,/,34H ALL AC, DC, OR TRANSIENT JOBS ARE41H ABANDONED BECAUSE OF LANGUAGE OR MACHINE/40H FAILURE. CONTROL IS RETURNED TO MONITOR//)('-%%%% ',I3,2X,'ERROR(S) WERE DETECTED, EXECUTION IMPOSSIBLE'//)(34H LANG SUBR-ECA-07 EXIT.    ITRANS=I4){@+    <    (    %    8=    )    &    #    K
` \(^7@+(i <)G, <)J,
6b+(o+(k4(o4(o4(o4)@4(o4(r4)4)= $ D
:(2; (5+(z,V<)S,"
:(2; (4+) <)W,
 <)Y, <)\,
C(c]D(4ZD(2 $$(2.
:(2;$(4+),+)
l2D+) 
l2D+)4 $ D+)6 
l2D.+)# 
l2D/+)4@d $ D
k3D(+):)6:)E,;<.@+) 
l2D%+), 
l2D+)4 (e D' (b D' (a F( (d HB FJ DK+)6 
l2D?+)4 
l2D%+)4 (c D' (b D' (d F( (a HB FJ DK+)6 <)_,, <)b, (__D(2ZD(2 (2 <)e,
:(2; (2+)8,+)@ <)D,?@ <)f, <)i,
@d+)C <)k, <)n,
J(^,~p(`(X
kX(:((3((3X
kX(S$(38H LANG ZEROING SUBR-ECA-08 ENTERED.    )(39H LANG ZEROING SUBR-ECA-08 EXIT.    NTR=I4)p1:{x|p0X`K
f\)}7@+* <*8,,@d
 )~@f Fs@f FD F#*d*

 )@fb@he H~ H F~ F Hb H0 HI F0*d* )~@fw FW F6@f FR F1 F/ Fp FP F! Fb FB F{ F*d*"& $ F)q D)s@f> F@ FC FE )~ &(.&.)s@hE &(.&.)s Hh*d*!:)s; )q+* *@f{*d*)@d D D D  D! D  D} & F4 F=@f~ )~ Fs F=!& F> D5 DW D6 D!7@+*7 <*;, <*>,
J)},~XX(45H LANG MODEL ZEROING SUBR-ECA-08A ENTERED.    )(46H LANG MODEL ZEROING SUBR-ECA-08A EXIT.    NTR=I4)~`xP     K
$\*M7@+*T<*l,,@de$DDD? *O@f;*d*Z"&> $ F*A D*B(@f
@f? FI*d*d $ DT7@+*j <*o, <*r,
J*M,~X(41H LANG EXTRAC SUBR-ECA-09 ENTERED.   ICOL=I4)(41H LANG EXTRAC SUBR-ECA-09 EXIT.      ICOL=I4,8H   TNUM=1PG15.8)	    ~`!K
  \+7@++

 <+E, <+H,
@d*x D*tZD*x D*t D*v D*w@d*u@f*v++:
 
k3JA++  
k3F+++*d+"$.D*u4$+5d+!7$*w++55d+u,$ D*t++ $ D*x++"$.*u4D+%5d+'7$*w++54D+)++0 $ D*t++ $3d*u++4++/7$*t++54D++:*x"(.*u,;{+D*u*u++ $ D*w++"&.*u $$*v. D*v++7D*x++85d+8 $ D
J+,~p+*vX]    [    (' INPUT? (TYPE HELP IF NEEDED)--',$)(' OUTPUT? (TYPE HELP IF NEEDED)--',$)(50A1)(2O)(I)(' FILE DOES NOT EXIST'/)('-THIS ANSWER DEFINES WHERE THE PROGRAM IS TO FIND THE INPUT DATA.  IT'/' USUALLY CONSISTS OF A DEVICE, POSSIBLY A FILENAME WITH OR WITHOUT AN'/' EXTENSION, AND A PROJECT-PROGRAMMER NUMBER.'//' POSSIBLE DEVICES ARE:'//6X,'DEVICES',3X,'DESCRIPTION'/6X,7('-'),3X,11('-')/6X,'TTY:',6X,'TERMINAL'/6X,'DSK:',6X,'DISK (FILENAME AND EXTENSION, PROJECT-PROGRAMMER NUMBER'/22X,'MAY BE USED)'/6X,'CDR:',6X,'CARD READER  (THIS DEVICE IS NOT APPLICABLE ON TERMINAL'/30X,'JOBS)'/6X,'DTA#:',5X,'DECTAPE UNIT (USER''S DECTAPE SHOULD ALREADY BE MOUNTED)'/6X,'MTA#:',5X,'MAGTAPE UNIT (USER''S MAGTAPE SHOULD ALREADY BE MOUNTED'/30X,'AND POSITIONED)'///' DEFAULTS:'//' (1)  IF NO INPUT DEVICE IS SPECIFIED BUT A FILENAME IS GIVEN, THE'/6X,'DEFAULT DEVICE WILL BE DSK:'//' (2)  IF A DEVICE WHICH REQUIRES A FILENAME AND EXTENSION IS SPECIFIED,'/6X,'BUT NO FILENAME IS GIVEN, THE DEFAULT NAME WILL BE INPUT.DAT'//' (3)  IF NO RESPONSE IS GIVEN, I.E. A CARRIAGE RETURN <CR> IS ENTERED,'/6X,'THE DEFAULT DEVICE IS TTY: ON JOBS RUN FROM TERMINALS; AND'/28X,'CDR: ON BATCH JOBS'//' (4)  IF DSK: IS SPECIFIED AS THE INPUT DEVICE AND NO PROJECT-PROGRAMMER'/6X,'NUMBER IS GIVEN, THE USER''S PROJECT-PROGRAMMER NUMBER WILL BE'/6X,'ASSUMED.'///)(' EXAMPLES:    DATA.DAT'/14X,'TEST.DAT',A1,'420,420',A1/14X,'MTA0:'/14X,'DTA2:FILE1'//' NOTE:  THE FOLLOWING RESPONSES ARE VALID AFTER THE FIRST "INPUT?"'//' (1)  SAME COMMAND.  IF THE DATA FILE TO BE USED IS THE SAME AS THE'/6X,'PRECEEDING ONE, THE USER MAY SIMPLY ENTER "SAME"'//' (2)  FINISH COMMAND.  THE USER MUST ENTER "FINISH" TO EXIT FROM THE'/6X,'PROGRAM.  THIS ENSURES THAT OUTPUT ASSIGNED TO LPT: WILL BE'/6X,'PRINTED.  FAILURE TO USE THE "FINISH" COMMAND MAY RESULT IN'/6X,'LOSING THE ENTIRE OUTPUT FILE.'//' (3)  A ^Z (CONTROL Z) WILL RESULT IN THE SAME ACTION AS THE "FINISH"'/6X,'COMMAND.'///)('-THE ANSWER DEFINES WHERE THE OUTPUT FROM THE PROGRAM IS TO BE PLACED.'/' IT USUALLY CONSISTS OF A DEVICE AND POSSIBLY A FILENAME WITH OR WITH-'/' OUT AN EXTENSION.'//' POSSIBLE DEVICES ARE:'//6X,'DEVICE',3X,'DESCRIPTION'/6X,6('-'),3X,11('-')/6X,'TTY:',5X,'TERMINAL'/6X,'DSK:',5X,'DISK (FILENAME AND EXTENSION MAY BE USED)'/6X,'LPT:',5X,'LINEPRINTER  (MULTIPLE COPIES MAY BE REQUESTED BY USE OF'/29X,'THE "/COPIES" COMMAND)'/6X,'DTA#:',4X,'DECTAPE UNIT (USER''S DECTAPE SHOULD ALREADY BE MOUNTED;'/29X,'FILENAME AND EXTENSION MAY BE USED.)'/6X,'MTA#:',4X,'MAGTAPE UNIT (USER''S MAGTAPE SHOULD ALREADY BE MOUNTED'/29X,'AND POSITIONED)'///' DEFAULTS:'//' (1)  IF NO OUTPUT DEVICE IS SPECIFIED BUT A FILENAME IS GIVEN, THE'/6X,'DEFAULT DEVICE WILL BE DSK:'//' (2)  IF A DEVICE WHICH REQUIRES A FILENAME AND EXTENSION IS SPECIFIED,'/6X,'BUT NO FILENAME IS GIVEN, THE DEFAULT NAME WILL BE OUTPT.DAT'//' (3)  IF NO RESPONSE IS GIVEN, I.E. A CARRIAGE RETURN <CR> IS ENTERED,'/6X,'THE DEFAULT DEVICE IS TTY: ON JOBS RUN FROM TERMINALS; AND'/28X,'LPT: ON BATCH JOBS'//' (4)  IF LPT: IS LISTED AS THE OUTPUT DEVICE, THE NUMBER OF COPIES WILL'/6X,'DEFAULT TO 1.'///' EXAMPLES:    LPT:/2'/14X,'RPT.DAT'/14X,'DTA0:NAME.DAT'///)DTA0 S    INPUTB    .    DSK  OUTAAE    A.AAAH    K    N    OUTPTT    C    TTY  F    I    L    O    /    A    0U    DTA9 .DAT [    :    XCDR  `M    P         LPT  DSK  DSK  TTYDAT.TMPS> \.A p @+X6D+`+.\ 
 +`2D.K+.y +a2D.K+.y +a2D.H+.y +b2D.K+.y +b2D.B+.y +c2D.G+.y +c3D.S+0? +`2D.B+/ +a2D.M+/ +a2D.R+/ +b2D.F+/ +b2D.S+/ +c2D.S+/ +c3D.S+0E +`2D.J+/ +a2D.L+/ +a2D.H+/ +b2D.I+/ +b2D.K+/ +c2D.H+/ +c3D.N+0o +`2D.G+/ +a2D.F+/ +a2D.L+/ +b2D.S+/ +b2D.S+/ +c2D.S+/ +c2D.S+/ $.+X6b0b+/+/40d40m@d, <1
,:'Y$2D+W+/#Q$A+X0D+/#O<1,=4@d+W@d+:+R0d+/G +`2F.D+/. & F+ +`3F.P+/3 +`3F.P+/< +`3F.M+/F+/* $.+R D+X"&.+R $ +^ H+`/$8&/6 .R +R.& .S H+`*d/8 $.D+R+/* $.+R D,"&.+R $ +[ H+`/$8&/?"& +R .S H+`.$8&/B $.D+R+/* +R D+Q+/*7D,+/S <1,.$ D,",/&., , F+\ D, , <1,
:,; +\+/M, <1,	 <1,
6D++/] $.+X D+"+.+X + D, , +`2D.S+/[>,8&/W $ D, , .D F+` <1!, $.+X D+}"&/+X.+} +} F+Z D, , <1%,
:,; +Z+/b,7D+X+/m <1&, .Q_D+ZZD, , <1*,
:,; +Z+/i,7D+Q+/x <1+,.$ D+{"+Q/&.+{ +{ F+| D, , <1/,
:,; +|+/s, <10,	 <14,
L.S2D+Y+03D+O+/|.EF+Y+0".Q D+Y $A+X0D+0 .T D+Y <1,<! +Y3D.E+03D.T+03d.O3$.A+0
+05+Y2D.J+0Tz$A+X4D0I+0T .F D+O .G D+O $ D+W +\ D+{ <1,<! <1,<8 +]1D+0 $.D+O+0 +O D+~ +O D+~@d
:+P;2+z+0,"&X$.D+}C+}O+`2D.S+0$>+}8&0!I+}O+.2F.C+0*++2F.H+0*:+`2F.H+0*]$:D1:,,"
P+W0D+0AL<0{,:'!+W0D+0D<0y,=4<0q,?@'$3D,+0aA+X5D0T <1=,+0T $2d
I<0r,:'[$.+X6b0b+0m+0k4.g4.j4.g4.jO<1J,,+0g.A,~x+\p+Y+\`+~.E.D

+R$+Q$+yP,+O$+`P,+Y$+`P,+R$+`P,
=$+|$+X38[ 8j3@+1RZ5D1O+1Z .@!$6@l$GdZQ ." @XB*`DQB,^Z+,> ZB8j[,1d,1q,^ a`+1N Z[ 8j2@+6q .+1Y 8f0 0`75@1k6`2`8l+5RD" B8f(B|.8[,8J 6r,8L A"("7 78n[8n,8J,8K 6r*"8f,~,>,>,> 8j[8Z82B8i,6sZ@4@2	SX H9.Z@+1Z@4@2	SXZ@!H9.0@+2!Z@4@2	SXZ@0@+212?91x:8i,8J,8K@+1x,>Z P8k3P8j+5gZ@,2l5P2,^[,3 8kZ82B8i,6s[8A"? H9.`@e [[@Z3B+2,1d[@+2	 8j @eb+2 B@ 8jZ4B27@+2,3vZ@5P26@7@'+21 8j7@@,24 2@Z@5P2[H.H 0@@Z'3r+21 P8h/]'.6 @". P8h <6u,7@8g+2( 8h.8=+2]'".8hS'X8h*0OZ'/8h"Z'30  P8h,2h7@8g+21,6
&6x	` <6{,,^,^,^,~7B@,~,8J_Z'. @8h#B8h <6u,6@8g+2O 8hP@ @@/ ,8L"8hQ".B'7@@,~,>,>,> @,1d @7B8e+5p_
Z@Q$w,3t,3r5"2H[.Q@(B5"2JZ.X@(B5B2L*d2K1*d2F9*3o,3r4B6}Q$w+2F,2S7@8g+24,6,~
&6~+5QZ'_'/Z8= @8h B8h <6u,7B8g+2c0B,~_'"B8hZ8=.B8h <6u,7B8g+2^1B+2Z,~S'X8hZ.8h* Z'*8h/8h+2hZ'_'#Q./"l" @8h,8=Z8=.@' 8j6@.@Z5B2i <7,,~6@,3 8k!  5"2u[4D2t `DPD!`DYDB@."*b2o 8k,>" 5"2|Z4D2{Q@@B@.F[5D2y."*b2w 8k,^ `BPB!`BYB6@8=,6B 8k ZB8h[B8h <7,7@8g,~,6
&7,5x,6		` 8k 4@6Z@8h_# @8hQ.@' <7,6@8g+3,~7B'+3 8a.8b1 +3,2S7@8g+3+3 8a 8b @8h B8h <6u,7@8g+3( 8a 8b @8h B8h <7,6@8g+36Z'4B3$2b8h+3$ <7,,>8h,>8h,2S,^8h,^8h7@8g+3 <7,6@8g+36 "8] B8k,6+3(
&7,5x,5Q 8b,8J"8bSX8hX ,8L 8h/8a 8`. B8k,3[7@8=+31,6= 8k6@,6D 8k @SPX@XB@*`BQ@,~,6
&7,6		`,> .&[ 8j3@+3YZ5D3:.&*f39,> .&,>,>@h[,1dZ8_2B8i,7[8_."9.Q"$@ 8j(f3G2@+3H.(Z5D3E1h(+3JZ
Q
.&*f3@[,^,^5F3O x .&,6+3V
&7Z B8k,5x
&7 x  ,6
&7[,5},5Q,^XF*x *+1[Z,^+1_6@,3^!  8k6@8dG@,~,>,>,>  8`. F7B8c+5q_
Z8hQ$w,3t,3r5"3g[.Q@(B5"3jZ.X@(B5B3l*d3k1*d3e9*3o,3r4B7Q$w+3e,^,^,^,~4J3o,3s*H3q  ,~:8i,8J,8K 7,~ @,1d,>,>,> 8d[
,3t4J3o,3r4B3o"Q
,3r[Z 8j3D+4Z5B3~,6
&7 ,5}
&7	`Z/B4F45$4	[.Q@(D5$4

Z.X@(D4D494_#Q.
.4(3z[,3s Q+4,>,4,^+8: 7@b8Z* 9m 7	`  X@8=,> <7 , <7#,6@8g+5fS8g(BGB8?GB8@GB8JGB8LGB8N6@8B+4"!"}V B8D <7&,!" B8: (  @8Y B8Y "6gXB(,8? ",8J,8K 7)*"8\_8[#B8l /2B8[,5T 8[,8J 6r,8L@,1k 8` B8j 8f @8hO@8h <6u,7@8g+46,6+45
&7)  .@8h+41 <7,6@7B8e+4E,8J_#B8h.."2"8h+4? /8h"."A"|. B8h <6u,6@8g+7- 8hP8e 8` @ @'/ ,8L,^,~S:M}V!"Lu B8B@@8D@@8C!"}V B8D,5,4,~O%}V7@w,~,>Pw,53,4c+ 4K,5G+4Q*|4N+4E,1d,1q+4Pem}V7@w,~,>Pw,53,4c+ 4S3B8k,5i,5G+4Z B8k,2l*|4U <6{,+4EeVu}V,>,53,^,4c+ 4\,5G+7/Z5A B8k,6
&71,5x	`"74+4d4s4s4s4l4l
4l

4l4l554l4l54l4l5	,6,~
&74,^ ,6
&78 x  ,6+5Q 1 pa`,~,56@/"B`dp+4uD   8\_,8J,8K 793F+5."*b4{.$@4$4z,6
&7: ,6	`Z+5< #p  4@4r4B4s,5,>6@/(H`fp+5,^+4x,5X%p@4B4x/"`fpB+5*x,>,>!$A`!&A@,~,>,> Q<A`,5'0B+5 @8B,5' @8D0B+5,5'R@8D@@8C0B-+5&	b
+ ,>,5/a@[xS@8C,5/a@ZxX@8C,^x1B.+5& 8C B8F "8E B8C,>!&},5' @8G1B*f5#,^,^+4E!$A@@0"00b=1/"0"0b-,~0b0" 1,~/"B+5(@0"0b,~(@. h+50,>,>,>Z~7B8j,4 8j[Z.2(2(+5= B8j  D8k,^,^,^,~Z5B57Z&4F5FZ1& & 7<	d77@!$[D$Z&2(2h,5m 8j+5: 8j3@+6Z5B5H,~?6+5K,6+5Q
&7= x # ,6
&7@ x  ,6@`
&7B,~,6
&7B,5}	`,6,~
&7E+5Q,6
&7H 8B,6	`,6
&7KZ8D,6
&7 8B,6 "
" 8D,6 "
"R8D6@,66@8C,6	`,6
&7NZ8D,6
&7 8S+5\,6
&7P	`,6
&7S,5x	`,6
&7W,5x	`,6
&7Z,8N	`,6
&7^ x  ,6	` P8k,6
&7b,5x	`
&7eU,5u  +6@)@aB+5,5+5u,6L07f 8k6@+6,6L07g 8k & QBx6@,5}[x. 6@8l+6S
",~,6L07h 8k @)@. ,65B6,~& QBx6@,6+5
&7i 8g+5 "-
" 8Ca`+6[8C,6  
"Z8C,6  .+6[8F,6  
"Z8F,6,>!&}7B8G+6  
",6*f6,^  .+6
&7l,~7 8<+6
&7m:x,~
&7n,~Y>=}V,>7@w+67!"Ks B8D,>8B,5,^*8B B8S3B7o+66,>8g <7#,[8g[B8m,^8g6@8g+5f(BGB8OGB8PGB8RGB8UGB8WGB8O+@8O+5V "8R	b ,5m[Z$" B8h <7p,6@8g+36 8hQ8h B8=,>(ZB(+8OO@8=+4E 8=8B6<+@8R <7t, 8=ZB8h[B8h "7w,@@8=+4E,6I,6L07y,5x,6L07{,6U,6L07|@@8l,~,6I,6L07|+6>,6I,6L07~,5x,6L07 8kU,5u+6@7`8=+6O@8l,6L08,~7 8l+6OZx
&+6 xQ"A`4@6?`8U,8U@8T+6P?`8U,8U@8T,~,>,>@	`/8m&8  $4@6Z,6b,6f & j0 4@6],6b,6f & t ,6b  ,6f & ,6b+5<0`+5}6@8l+8 "
"+5   $+6 8j@@ ! B@."*b6i 7@@8Z*"9m 8 B8: 8Y 8Y @ B(	`+ +Z+1ax8m`8],8J+8KOVLX6t6t8g8h8hCSC	Cannot shrink coreh6z6t8g.$	+2MNCS	Not enough core to load symbolsX76t8g8h8hCDL	Cannot deleteX76t8g8h8hACF	Absolute core request failed forCGC	Cannot get core from OTS,8J+8KARL	Ambiguous request in for , using link number .$	+3lwx9-LNC	link number  not in core 8Zh`76t8g8m`7"6t8g8gP7%6t8g8B8D8C`8ZSTS	OTS reserved space too small,^@@'+2Qx9-,>,1d,1q,^+4_NSA	No start address for.pIAT	Illegal argument type on call to  from |9.ULN	Unknown link name p USC	Undefined subroutine  called from PC = 
ILN	Illegal link number IVN	Inconsistent version numbersDOE	Device open error for FLE	File lookup error FLE	File enter error CNA	I/O channel not availableAOC	Attempt to overlay caller fromARC	Attempt to remove caller fromIEO	Input error for overlay fileIMP	Impossible error condition at PC = NRT	No relocation tables for, status ( link number name , FUNCT. return status 
?OVL
%OVL
[OVLiSHX7o6t8g8h8h`7s6t8g8m( X7v6t8g8h8hRLN	Reading in after ]
DLN	DeletingRLL	Relocating at [OVLOEL	output error for overlay log filemn@*,6S*+5+4?6++45 1MZ+,B4"8=,~
8A+5V@8C+5Y,~ZB8i,~ 7.@@,~+5k

@+5s
8R,^(`8C+5b+4E 
@`,~,6
&8

@,5s+5Q	`Z(X^. >[.~(3~+9r	~+9~Z. \x <x*<x .-><	ez+9y!"	b+  "9{	b+Z. h+ggM?Th
&:	b+9n,
?NO CORE AVAILABLE - CAN NOT PROCEED
!*:#**,^,~*x,>h<:#*<:&+pZ@:@@:@@:+:Z`|+:@@@ @@0@x@@@`edX91,>?B,>Zp @:\`: <:,,^,~SMI 1,>?B,: :] B:+:=MI 1,>?B,: :^ B:+:=I5R1,>?B,: :` B:*\:H7ApX":` B:/& pd"~l" B:*\:H/& pd"~l"$ B:*\:H/& pd"~l"

 B:*\:HSp*\:H/&Xp B:"@@:# :a B:*\:H/& pd"~l" B:RF: <:,+:EV4i91,>?B+:US,i@1,>?B+:U_,i@1,>?B+:UK>21,>?B+:UK>401,>?B+:U[<I71,>?B
&:b w @)@. 
"5B:W
&:h,~`.

.4SEQIN^:\SEQOUT^:]RANDOM^:_SEQINOUT:"
%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS: 
a.3@1,>?BO@;&+:mgR~@1,>?B@@;&,>,>@6 w+:y";'0B+:u!"A`X#p5@:r/#p!"X#p+:y\p+:ya.9'1,>?B,>,>O@;&+:y,>
6+ _4`;"`Q@,> <;(,,^,> <;+,
,^*b:+;

,> <;,,,^7@;&+;,> <;/,
,^+;	,> <;1,
,^Z5";

,> <;2,
,^,7@;&,

,> <;4,,^,,> <;7,,^,> <;:,
,^(@qd1@,,

1@#+;0@*+;+;ype G to Continue, X to Exit, T To trace.'/2H *,$)(A1)(1H 14A5/)(1H A5,1X,O6)PAUSESTOP .pX;#p X;$p ;%p ;&p X;X~;"p xKc@ p p+;GKcK  ,;G @,~KcJ  ,;G @,~KcI  ,;G @,~KcH4B;X5@;K5";T+D90
;JU ,~4";Y,> $ D;W5`;QaB+;QL@;W+;Q$+";T(BdB$+";T5b;O ,^,~,;I6 ;W+;S"`/ +;S  ,~aB#`0@3@;Y,~  ,~IFGp =p+;_IFI7@p+;u4@;v L;s 

;q*,;s6,p+;z#`!& (f+";o!  "+;iF+0;m(LeL+;k@+0;k5L;g!

;q*,,~7 &+;k5&;naL&+;n;q!  ",~6 p,~+D90
;aU U",~+;fIae *)|h(F;~,~g:9d@4$<`fmD+< A<,~$`fmD+<"K<	,~",~`!$hX$h@@h*% "< BhL " BhM+xeX2GiSHYC aSiSHINXGYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
 M?L@INXINXINXINXINXI2I2 I20I2@GiSHI4:1,>?BZ.@6kp2j8M+<1 !pQ A` <*\$}

4L<)/,L8$<&.
8L F(,~H?FRSDVC - ILLEGAL DEVICE NUMBER IN CALL TO DEVCHG

&<+ <<1,

44<44<`KbN=1,>?BO@<a p4B<<,=4@<<9<@9<?KbN=1,>?B@@<a!$Lu 	`@Ap``a`+<^a`+<` D<7A (`<E/"#B<6@@<7 !pX@<3,> <<3,<g,^7@<`+<KOAp+<_ #pQ"A` $1@+<P0`=d<M! H: @<5@@<6a|+<V[pd0@ +<[[pd0@ +<[+<Y_w6@<a_w#`1 +<[SpXp @<6
<6+<]@<4+<^+<_
&<a+<_   Ap ,~ ERROR ON OPEN!
HH<eH<fG.t21,>?B@@Ap! A`.!p @<c <d @<e@@<e@@<f & "<c<1D+<r-<}=b<m<c<0D+<{O " <d @<e<c<-<}=b<t7@<eOAp !p<, <e, <f,~<&<v<c1D+<z   Ap+<v1D+<z1$+<w1d+=0$ 0d-+<w $D<e+<}"= ,=-0@+= p4B=Lad+=`b+= $0d"+=&$$&(&}Z.G= .&$.$ 7F+=  ,~ A$&$(DG$1$((D(D

 	`5@= .2bM+= L.&7D!$Lu+=2"=!+= &p,=% 	`,~
&=! <=$,

.p M}ILLEGAL DEVICE NUMBER!
"=,,=- 'Q&A` =,@1x,~180.8X=`=(,~.H  a|+=00"0b/ ,~0B1B,~0B/ ,~aJMm1,>?B,>{+=P@,>%,>w+=PZ"6Ep " B` "b=Y $7cp $1B $d=Y,=R,>D+=Q6cp0b "b=Z$> ({."XB`&$@6@.$.$
a|+=I[pdp0B +=M+=K_w#`1"+=M6cp 0d $QD`,>+ ,? ,~
&=Z+=O
&=]+=O@b -p .Q,A` 
=_4P=X1P+=`/0P=n=U,~`

``
CANNOT INIT DISK!

FILE NOT FOUND!
HH . 
=_+=UYC GaSa3 S;YC&<G<aS<a3&<E$;w|x=f P=a B`1T!"L	b@XB`O@> ? >@,?
+?!,2,>l@!.~,?`+?""1T""QB=,?	f+ 1$9>+>z 8=f@`=f ?*(= ?	n@`N+? 6`
 ?1T ? B` " B`\"

	b@ B`\"	b!"Z(Brb?	b

 B>	b
+  B`!"2	b`b`b+>?!"2	b `2B`+>?!$2	d!$Lu+>B ?	b ? ?	d!$Lu B> D>,~@@> ? *(>
 B> D> BX B` DXZ>(D}	d ` D> DX "2D`b? d  "b?!,?@>+?! >
 BX@@> ?$	b$+>T!">

X"X*"X!"`"?$ $?d?$`B`+>Zl !"GBX"? 0B+>i,>~+>f ? >
@,?
+>f!,2,>lB,?"X

> >,? +>f JX,? +>z
&?% "b? a`+>e+>Na`+>e,? >+ +>e 	x H>u	h	&(2 
P=a ?+.> &..0P`bp+>pd

@ >,?+>u`L+>n >+>z (!*Lu@

,?
,~:x,~ " B?O@>O@>g "?$?+?
	d5D>~ ?(D D>+>z,> e`p+?7 >+?	l!>+?7 >+?	l!>:+@>,^+>z
&?+,~ "
&?-,~ "
&?3,~,?
&?;
& ,?	b (?;+?
&??,~@;`>+>+?QUEUE on GALAXY system. (?+?`` `P$` h`@>

XHXa`,~!"GB`+>e@>6$>
% Cannot do DISPOSE:RENAME. DISPOSE:DELETE assumed.
0NO FREE CHANNELS!

% CANNOT OPEN QUEUE DEVICE!
% PLEASE NOTIFY OPERATOR!

% CANNOT ENTER QUEUE REQUEST IN QUE UFD!
% PLEASE NOTIFY OPERATOR!
?QMRCNC Can't CONTINUE -- try REENTER
KbN@1,>?B,

,~?BY\?DQ<X\?D*+Y
zh?K-"8:mF?E-"8:hP?E-"8:m(?E>h@U>H:>&uC0n>6E>f0(0Q*|)`Q*D Q**Q*+Q*:,Q*;T+Q*;y-Q*<z/Q*H 0Q*IQ*\YQ*i@(Q*Q*yQ*	Q*	pQ*	tQ*VQ*

V&Q*

WQ*

pQ*

vQ*Z.Q*|,Q*|.Q*}V,Q*	T)Q*	T&Q*)6Q*)7*Q*8 (Q*>6'Q*L+Q*\|'Q*]7Q*i9/H[Mc@]INX@Ke`@@ HB( (
q Nq [Md 0 @[Md 5q [Md@e @[Md@q [Md`
k @[Md`Kq@[Me`
HgR~)(hINX@Ke`@@ HB( ()``,pQ@gR~)(aHK
rINX@Ke`@@ HB( (>B0aQ@K
HK
 }INX@Ke`@@ HB( (\{_0iQ@K
 {HK
@INX@Ke`@@ HB( (munP uQ@K
@uHK
`INX@Ke`@@ HB( (X!"Q@K
`!HK
INX@Ke`@@ HB( (# "$$H#Q@K
"%HK
 'INX@Ke`@@ HB( (2H# 4$@Q@K
 # HK
@1INX@Ke`@@ HB( (H$QJ&7Q@K
@$RHK
`<INX@Ke`@@ HB( (fp(e

X)oQ@K
`(fHK
FINX@Ke`@@ HB( (p* *?Q@K
*HK
QINX@Ke`@@ HB( ('x*P**sQ@K
*QHK
 [INX@Ke`@@ HB( (.8+1+NQ@K
 +	HS>fe`(CBd$(e`@@ B3(9h.Xk1MQ@S>.XQM?}H_[H<gg_[H<e`@H % {B( 9nP8Q@O%}G4LQ@S:M}G4GQ@Y>=}G6Q@em}G4SQ@eVu}G4\Q?6+



Q@?6+8:Q?6+8=Q@?6+5KQ?6-p8<HM?T,ggM?J1e`@H H9B&(`:QC2GQC2|G

QM&q`QM&tC@

QM?\G9QMVt=QS8pQS>f=
Q[R~@Q]2I`	Q]2y`
Q_B-c@Q_W!`QedX'Q@e]9nQeR`QiJ

9'QoR`HM?|DggM?J1e`@H H9B&( H:hQ@EV4i9:JQ@I5R:3Q@K>2:PQ@K>40:RQ@S,i@:LQ@SMI :,Q@[<I7:TQ@_,i@:NQ@_MI :0Q@edX9:'HM?

rRggM?J1e`@H H9B&(-;<Q@a.3@:iQ@a.9':vQ@gR~@:kHKcbggM?J1e`@H H9B&(7@;]Q@Kc@;<Q@KcH;GQ@KcI;DQ@KcJ;AQ@KcK;>HIFInggM?J1e`@H H9B&(;P;{Q@IFI;_Q@IFG;]HIaeyggM?J1e`@H H9B&(?0;Q@Iae;{Hg:9d@ggM?J1e`@H H9B&(?p<	Q@g:9d@;HM?{:ggM?J1e`@H H9B&(A< Q@S:&m<	HI4:ggM?J1e`@H H9B&(D<3Q@I4:<!HKbN=$ggM?J1e`@H H9B&(F0<cQ@KbN=<=Q@KbN=<8HG.t2/ggM?J1e`@H H9B&(L8=Q@G.t2<gHOR&cG9ggM?J1e`@H H9B&(P@=%Q@OR&cG=HCNcGDggM?J1e`@H H9B&(TP=-Q@CNcG=%HigSGNggM?J1e`@H H9B&(UP=3Q@igSG=-HaJMmYggM?J1e`@H H9B&(V8=aQ@aJMm=4HcV.Y9ggM?J1e`@H H9B&(\??Q@I>5>DQM':>{Q@ORMiB>%Q]D:>~Q@_B&:b>wQaRD+>Qi#(B>QqW-q?Q@	~2>Q	J>Q	J+>Q	JI;>
Q	J\z>Q	J^>Q	Jm>	Q	J]>
Q	Jh6>Q	Jhp>	Q	Jy>Q	J

>Q	J

[>Q	J:=>Q	J<>Q	Ji9>HM?
:ggM?J1e`@H H9B&(wx?BQ@KbN@?@HG
:ggM?J1e`@H H9B&(x ?EQ@GE?BX8Q*|)`Q*D Q**Q*+Q*:,Q*;T+Q*;y-Q*<z/Q*H 0Q*IQ*\YQ*i@(Q*Q*yQ*	Q*	pQ*	tQ*VQ*

V&Q*

WQ*

pQ*

vQ*Z.Q*|,Q*|.Q*}V,Q*	T)Q*	T&Q*)6Q*)7*Q*8 (Q*>6'Q*L+Q*\|'Q*]7Q*i9/x<p,(J#bHZkN`$b`kVlTLxdT90k^jGpX
0cknQeNr5npk(DpIN9Xnm@th2M{/G(h`h:@]J\veX3Bh$B)0OP,1PS>TLx<P]XABi&;jx=,:N

<+8Xxa8zLx0#ZH+BH7NH:#jPORH@z./Q&p.?(aG0SZX.^xRyROA VL4JxYovh,5nL%.x[iZ;X.Ld]mfHLd).P5HGkFu
HN &i[yN0#Ldx ^h%
hsRUDaW:(B0^A2H@>Hg

b8
A2xCRb)_0|
FJh&X0h joNo^i>jP8Z	#_pfL87`i>0PBpp'TDep=6
CcNpv|h5p1kJs8n#kZxLxH[x

Ze0.h"kjiS8p7hug|0P)|0X*JH=HmVa){r8~Z`iZ.GhLiZ W
4xx<`-Q@?6+8:q [Md 0 @[Md 5q [Md@e @[Md@q [Md`
k @[Md`Kq@[Me`9nQ@SMI :,Q@OR&cG=Q@K
*Q@K
*QQ@S>.XQ@KcK;>Q@KcJ;AQ@gR~)(aQ@KbN@?@Q@edX9:'Q@aJMm=4Q@	~2>Q@K
Q@a.3@:iQM':>{Q@K
`(fQ@igSG=-Q@[Mc@
Q@K
 +	Q@K
"%Q@K
@$RQ@_MI :0PK
$PK
D	PK
tQ@K
 {Q@K
@uQ@K
`!Q@K
 # Q@Kc@;<Q@Iae;{Q@IFG;]Q@g:9d@;Q@I4:<!Q@KbN=<8Q@I5R:3Q@KcH;GQM?}Q@G.t2<gQ@O%}G4LQ@S:M}G4GQ@Y>=}G6Q@em}G4SQ@eVu}G4\Q?6+



Q?6+8=Q@?6+5KQ?6-p8<QC2GQaRD+>QC2|GQ@B&:b>wQI|G

Q@CNcG=%QM&q`Q@KbN=<=QM&tC@

QM?\G9QMVt=Q@IFI;_QS8pQ@S:&m<	QS>f=
Q@KcI;DQ[R~@Q@gR~@:kQ]2I`	Q@a.9':vQ]2y`
Q@_,i@:NQ_B-c@Q@[<I7:TQ_W!`Q@S,i@:LQedX'Q@K>40:RQeR`Q@K>2:PQiJ

9'Q@GE?BQoR`Q@EV4i9:JQi#(B>Q	J>Q	J+>Q	JI;>
Q	J\z>Q	J^>Q	Jm>	Q	J]>
Q	Jh6>Q	Jhp>	Q	Jy>Q	J

>Q	J

[>Q	J<>Q	Ji9>I

MMhJGQ!{pMkpohphc(' DC MAINLINE-ECA20 ENTERED. IRTN=',I3)(///39H WORST CASE SOLUTIONS FOR NODE VOLTAGES///,5H NODE,5X,5HWCMIN,14X,7HNOMINAL,12X,5HWCMAX/)(' DC MAINLINE-ECA20 EXIT. IRTN=',I3)`hK
$ \[-7`+[3 <\, <\,
6b40b+[6+[44[64[J4[}@d	"+$4!4HH244H	4/"HGP.$8&[87@+[@" $  HHR.$8&[> <\

Q.$8&[R $2$5+[k [._D[ZD["& $ F[ D[  F[0D+[\7`+[b  D["[ $ F[ D[ &$[ [(.[.[.@f[:[; [+[^:[; [+[X:[; [+[V" $ (

 

,h5 L

j.$8&[h$dD	$D	+[oD	<D	<D	<<\7`	+[K 	@fb+[K $ D47`+\

 <\, <\,
J[-,~X4X
X[)$4(6H ECA22)K
$@ \\"7@+\' <\p,," $ F\ D\" $ *$
 \(.@l Hu@n Hu.$8&\*:\; \+\)" $ w H\  
W J\5H\56@\+\E+\J6@\+\8 \  H\+\E *$
\  \ (. 

H2 .

 Hu

 Hu *$
\ \ (."

H2 .

 Hu

 Hu *$
\  \(."

H2 .

 Hu

 Hu *$
\ \(. 

H2 .

 Hu

 Hu.$8&\17`+\n" $  H\  
s J\ 
HR J\ 
 w J\4j\^ \  W H\4h\X *$
\ \(."

\ .

 Hu

 Hu \  w H\4h\^ *$
\ \(. 

\ .

 Hu

 Hu \   W H\4h\m \  w H\4h\g *$
\ \(."

\ .

 Hu

 Hu \  W H\4h\m *$
\ \(. 

\ .

 Hu

JHu.$8&\M\",~X(6H ECA23)K
$` \\x7@+\~ <],," $ ( 

H2

	

GP .

 
j.$8&\7`+]" $ s H	 
 J\s(
 

HR

 	 .

(
j

(
j.$8&]" $ (@l +@n ,.$8&]

" $ w H\t 
W J\s4h] \t( 

(

,0
j

 +

 +7`\s+] \s( 

(



0
j

 +

J+.$8&]\x,~X(6H ECA24)(//23H NODAL IMPEDANCE MATRIX/)(//25H NODAL CONDUCTANCE MATRIX/)(4H ROW,2X,4HCOLS//)(I3,I4,1H-I2,1X,4(1PG15.8))(//26H EQUIVALENT CURRENT VECTOR//9H NODE NO.5X7HCURRENT//)(I6,4X,1PG15.8)K
% \]87@+]= <]a,,6b	0b+]@+]>4]B4]@ <]d,,+]C <]g,, <]j,," $@h]! (.]! H]  (.h]!3h+]K  H]! <]m, <]p,
"*/
]!.
]  ]  J]" H]! *$
]! (. <]s,
:]!; ]"+]P, 2h]!+]F.$8&]F $2D	+]` <]t,," $ <]w, ( <]z,
.$8&]\]8,~X$]+$]!0HuX(6H ECA25)(//43H SOLUTION NOT OBTAINED TO DESIRED TOLERANCE//)(6H NODES,15X,19H CURRENT UNBALANCES/)(1X,I3,1H-,I3,4(1X,1PG15.8))(//)(1X,A7,6X,6(5X,A7,4X))(4X,I2,8X,6(3X,1PE13.6))(1X,130A1)(1X,A7,6X,4(4X,A7,3X))(4X,I2,8X,4(3X,1PE11.4))(I,6E15.7)CURRENT   NODE OR   ELEMENT   g-    TTY  POWER     VOLTAGE   LOSSES      NODE    XBRANCH    K
%  \^,7@+^< <`P,, ^1@fPX*d^<@d^ D^ ^2 D^

^/PY^6PZ^7P[P\^3P]^0P^P_P`^4PaPb^.Pc

^5

PdPePf6`	+^T7`+^T:^ & FPf" $ ($^. 

(

0

,h@ P PK.$8&^O" $ (@l ]@n ^ w H^4h^[ ( 

^(



0



 ] W H^4h^` ( 

^(

,0



 ]

 ].$8&^U6`	+^k7`+^k:^ & FPf" $ ($^. 

(

0],h@ P PK.$8&^f" $ ( 

	 .

 ]

 ].$8&^l6`	+^y7`+^y:^ & FPf" $ ($^. 

(

0],h@ P PK.$8&^t" $ ( 

H2 .L ]

 
j.$8&^z7@+_	" $  H^ s H^(7@ ]+_ ^( 

^(

 HR 2P0] 
j 
j.$8&_6`	+_7`+_:^ & FPf" $ ($^. 

(

0
j,h@ P PK.$8&_7`+_:^ & FPf" $ ( *$
^.


 
jL ],h5 L(PK.$8&_" $ ("

GP .

 
j

 
j.$8&_" $ (@l P@n P.$8&_"" $ w H^ W H^4h_, ^( 

(



0
j

 P

 P7`^+_0 ^( 

(

,0
j

 P

 P.$8&_&@d^" $ (

 P7S,^`*,h+`H^.$8&<3+AD^K6`	+[7`+[:^ & FPf" $ ($^. 

(

0
j,h@P^PK.$8&bE+[@d^ $.^ D^ $.d^3d^
"&.^/^ ^ F^ D^ ^( <`d,
:^;^+`U,+^N 
 <`e,, <`h, <`k,
"^($ F]|,D^
:^|+c, <`n, <`q,
"^($ F^,D^
:^+k, <`t,"^(/& $ F^ D^
:^+t,+,D^0F+|  F^
"
^ ( J^ H^ ($^. <`},
:^;F^+`,.$8&a~6`e+`=,s2$^+`N+9 ^ D]}1d+`
"]} $(F^ D^,
:^+`, <a, <a,
"]} $(F^ D^

,
:^+`, <a,"]}$&/& $ F^ D^
:^+`%,+,D^0F+`-  F^
"
]} ( J] H^ ^.^$(. <a,
:^; ]+`3,.$8&`/ $2$^+`< D^"$.D^+`
7`e+`3+D^C,0F+`C  F^
"
^ ( J]} H^ ($^. <a,
:^;]}+`H,.$8&`D+`^,,~XX

X^#$(PKX

X^)$( PKX
^+$( PK(6H ECA26) 0K
%@ \a,  Da 7@+a3 <b%,,"a  $@hQ
.$8&a4"a  $ Fa& Da*@da!@fa!"a  $ Fa& Da" Q
1F+aM"a  $ Da  a  Q
/$4DaL5db *$
a  a"(.

 Hu7 ,a!7 ((4haL a" Da' a  Ha$( 
a"(
.


(Hu

a!:a 8&a>:a"; a&+a; a:Q
3Da'+a_"a  $ D	 
	$* a'(. Hua% 	$$ 

a'(

.

 a(.@Hu0Hu 	$. 

a(

.

0Hu:	8&aR a* a' FPX a FPq$& a(.

a,

 Hu"a  $ D	 	$( a(.Huha!Hu:	8&af"a  $ Fa# Da*3Da+a} &$a a*(.Hua &$a a*(.@hHu@jHu"a  $ D	 	$$ a*(. 

a(

.

,0HuLa

 Hu

 Hu:	8&av:a*; a#+am:a*; a&+a8"a  $ Fa) Da* $.a /a* D	 PX3FPq+b 	 PX Fa' Pq Fa"a  $ *$
a' (. Hua% 

(

 0$a'. 4$a.PHu@Hu .$a 

(

.

0Hu.$8&b	:a*; a)+b"a  $ Fa( Da*(@h

@j

"a  $ a*( 

(

 0$.@HuP0+ 

 

.$8&b:a*;a(+ba,,~X(6H ECA27)(1X,I2,2X,3(4X,1PG15.8))`K
%` \b27@+b9 <cD,,"$.	4$b>5dc- <cG, 	 	( <cJ,
 $ D	:	2d+bN"$.	&$

.$ Db*"&.	&&

 .& F	 <cC,;<"

{&

(

/& Fb3 <cA,;< {&. H	4hb?+bX" $ ! HH2  H	 / HGP.$8&bO7@+bW" $  HHR.$8&bU@d	+c="$.	&$	 .$ D	/$ Db3 <c@,;< @b* <c>,;< @b)"$.	&$	.$ D	"& $ Fb, Db.  Fb)0D+bg7@+c+  Db)"b) $6bb.0b+bl+bj4bp4bp4bl4bn 13hR+c*+bp P3hp+c* *$
	 b.(.b..."
 [&
b) (. 
 [&
b*.
 Jb(/*4Jc
5jc6bb.0b+b}+b{4b}4c4c4c b HH2 B HH+c* s Hb* 
 H2
#
 ! JHR 
 H
D
 ! JHs+c* 1 H	 R H	'+c* P HGP p HGq+c*6bb.0b+c+c

4c4c4c4c ! HH2 HH+c* s Hb* 
 H2

 ! JHR 
 H

 ! JHs+c*  H	 H	'+c* / HGP HGq+c*6bb.0b+c+c4c4c 4c&4c( B HH2 b HH+c* s Hb* 
 H2
D
 ! JHR 
 H
#
 ! JHs+c* R H	 1 H	'+c* p HGP P HGq.$8&bh:b.; b,+bc+c= $ D	 	(

,h+H}"$HHH213hR+c5 	' H	 P3hp+c8 Gq HGP.$8&c27@+c=" $ Hs HHR.$8&c; b2,~pb4	pb4b3pb4b3pb4	X

j0 

(6H ECA28)(///55H PARTIAL DERIVATIVES AND SENSITIVITIES OF NODE VOLTAGES///,28H WITH RESPECT TO RESISTANCES//,7H BRANCH,3X,4HNODE,7X,8HPARTIALS,12X,13HSENSITIVITIES/)(/22H WITH RESPECT TO BETAS//,5H BETA,5X,4HNODE,7X,8HPARTIALS,12X,13HSENSITIVITIES/)(/32H WITH RESPECT TO VOLTAGE SOURCES//,7H BRANCH,3X,4HNODE,7X,8HPARTIALS,12X,13HSENSITIVITIES/)(/32H WITH RESPECT TO CURRENT SOURCES//,7H BRANCH,3X,4HNODE,7X,8HPARTIALS,12X,13HSENSITIVITIES/)(1X,I3,7X,I2,2X,2(5X,1PG15.8))(/1X,I2,2X,16HPARTIAL W.R.T.  ,A1,I3,2X,23HHAS CHANGED SIGN AT MIN/)(/1X,I2,2X,16HPARTIAL W.R.T.  ,A1,I3,2X,23HHAS CHANGED SIGN AT MAX/)E    T    I    T=8)R    `K
& \d7`+d! <f,,"& $ FcV DcX & FcO  FcP0D+d(7@+f  DcP"cP $ FcU DcW6bcX0b+d.+d,4d44d44d.4d1 cW#12FR+d4+f cW#/P3Fp+f"&.	/	 	 (@l 
j@n 
k.$8&d66bcX0b+d=+d:4d=4dQ4dY4df cW cW( 

H2

H2 .L ],h5 LcR DcT $ DcY+di7@+e $ DcQ cQ s2DcW+dO cQ  FcT cW( cW 
 H2
HR 

 .L],h5 LcR & FcY+di:cQ3d+dE+e cW  FcT s FcN( cN" H2 *H],h+ HcR & FcY+di7@+db $ DcQ cQ s2DcW+da cQ  FcT"HR FcR & FcY+di:cQ3d+d[ cW DcT"H2 FcR & FcY+di cW DcT!$ DcR $ DcY cT7@w+dt cT w DcX"&.	/	 	 ( ,$

cX.

 cR 2P0Hu 
j 
j.$8&dn cT7@W+d cT W DcX"&.	/	 	 ( ,$

cX.

"cR 2P0Hu 
j 
j.$8&dy6bcY0b+e+e4dC4dO4e4da6`	+e^6`+e $2D5+e+7`cO+e@dcO6bcX0b+e

+e	4e

4e4e4e <f,,+e <f,,+e <f,,+e <f,,6bcX0b+e+e4e4e4e4e  cW d! FcR+e" cW s FcQ d! HcR+e" cW d DcR+e" cW /d DcR" $ (#

cR .L 
j,h5 LcW <f, ( <f!,
.$8&e#"$.54$f4DeL6bcX0b+e1+e.4e14e54e:4e< cW!(}B!&b FcR+e> cW s FcQ"
D
!#!HcR+e> cW 1R FcR+e> cW Pp FcR cRcR$
j+eI (

 
jL 
j cR 2P 



Q .

,h5 L

Q.$8&eA $2D5+f" $ (7, 
j+e]5leQ ( HcO+eR ( HcO"(.&(	  Hd <f,;< @cP"(.&(	.( HcM$( 
cX(
.
cX.
cW.
 cP$cO.H([.$8&eM+f"$.	&$	 .$ DcQ"&.	&&	.& FcV$& cX(.cX.cW. <f

,;<"
 [&
 (./$ Dd <f,;< 
 [&
.*.
 JcO6bcO0b+er+ep4er4f4eu 	(7`
j+f+ew 	(6 
j+f6bcX0b+e{+ex4e{4e|4e~4e d DcV+f d DcV+f d DcV+f d DcV $2$	+f <f$, <f',
+f <f*, <f-,
:cW;cU+d*:cX;cV+d# d,~pddpdcQpddX
Xc}
Xd$cW$0 
j(cWX
$	$cV$cWXcW(6H ECA29)(///37H STANDARD DEVIATIONS OF NODE VOLTAGES//)(5H NODE,4X,9HSTD. DEV.,10X,14HNOM.-STD. DEV.,5X,7HNOMINAL,4X,14HNOM.+STD. DEV./)(1X,I2,1X,4(1X,1PG15.8))K
&  \fC7`+fH <f\,, <f_,, <fb,," $ (

Q HfC <f[,h @f1 ("

f1 .

 

,h5 Lf0 ( 

f1 .

 

,h5 Lf/ <fe, ( <fh,
.$8&fLfC,~x	fCXf00 

(f/(31H DCMOD1-ECA30  ENTERED.  NUMMO=I2,8H ITRANS=I2)(28H DCMOD1-ECA30  EXIT. ITRANS=,I2)K
4 \fx7@+f} <gV, <gY,
6b60b+g+f~4g4gJ4gM@d	"! $ Ffm Dfn D	 	 0 Ffk#I Ffl6bfl0b+g
+g4g
4g4g24g: 	7$I+g4DgA 	6@b+g fk 	!(~ HB!( Hb fk 	!(e H! ! FH2+gA 	6@b+g fk 	  HB ~ Hb fk 	 e F! FH2+gA 	7DI+gA5dg& 	6@b+g# fk 	 ~ HD  H# fk 	 e F FHR+gA fk s Dfm 	6@b+g. fk fm 	 
 ~
! JD 
 
! J# fk fm 	  e! H  FHR+gA 	6@b+g7 fk 	 ~ HR  H1 fk 	 e F F	+gA 	6@b+g> fk 	 ~ Hp  HP fk 	 e F/ FGP $3d6+gR 	7@b+gE 	 D	:fn; fm+g6`	+gH@d!+gR $ D6+gR $ D6 	 e~ F	 	 	Fe 3fe@d! 	 D	+g7@+gU <g[, <g^,
Jfx,~X$!$flX(23H DCMOD2-ECA31  ENTERED.)(//1X,A4,2H =,E16.8)(20H DCMOD2-ECA31  EXIT.)E    GM   BETA I    R    G    K
4\gh7@+go<h/////3D+h	 	#I Dg`6bg`0b+gz+gw4gz4g|4h4h 	7`I+g~+g 	7$I+h5dh gk Dg`+h gk Dg`+h gi Dg`+h gj Dg`+h gi Dg`+h gj Dg` <h, 	 <h,
7@+h<h,,gh,~XX(Bdb+h.h&"+h.h&"TB#p@,~4Bh%+P90

h&#p+h  ,~>attempt to take SQRT of negative argg:9e4(h/`jmH+h3 
Ah4,~(`jmH+h3"
Kh4,~",~`g:9e@4,h9`nmL+h> A

h>

,~,`nmL+h="K

h?

,~"

,~`g:9d(40hD`rmP+hH AhI,~0`rmP+hH"KhI,~",~`I

GQxhP[/HK
$INX@K	e`@@ HB(>(z[/5p\q [MeGQ @[MeDQ@K
$[/HK
$@INX@K	e`@@ HB(>(C \$D@\rQ@K
$@\$HK
$`#INX@K	e`@@ HB(>(N(\zO(] Q@K
$`\{HK
%-INX@K	e`@@ HB(>(T]9W]|Q@K
%]:HK
% 8INX@K	e`@@ HB(>(_@^8gaQ@K
% ^9HK
%@BINX@K	e`@@ HB(>(

`a/

pb(Q@K
%@a/HK
%`MINX@K	e`@@ HB(>(

%b5

&XcMQ@K
%`b6HK
&WINX@K	e`@@ HB(>(

9Pd

C`f/Q@K
&dHK
& bINX@K	e`@@ HB(>(

epfD

hHfkQ@K
& fEHK
4lINX@K	e`@@ HB(>(

m0fy

og_Q@K
4fyHK
4 wINX@K	e`@@ HB(>(

{xgl

}@hQ@K
4xglHgGC@ggM?J1e`@H H9B&(

ggM?J1e`@HH9B&(`@HH9B&(XmJ%NHoFoVCW 4nmN$BH~Q&p!{j8(oZoj+i[*w`.
VHoNo^on{8'G0-

JH{b8oBoR"q [Md 0 @[Md 5q [Md@e @[Md@q [Md`
k @[Md`Kq@[MeGQ @[MeDq S>J`
$[/Q_W!`QS>f=
Q@K
$@\$Q@K
$`\{Q@K
%]:Q@K
%@a/Q@K
% ^9Q@g:9e@h5Q@K
&dQ@K
& fEQM&q`Q@K
%`b6Q@K
4fyQ@K
4 glQ@g:9d(h@Q@g:9eh+QKc@;<Q@gGC@hQGE?BQM?\G9C

rrm@GQ%v{! rc8hmb

d
(' AC MAINLINE-ECA40 ENTERED. IRTN=',I3)(' AC MAINLINE-ECA40 EXIT. IRTN=',I3)K
D \[7@+[# <[@, <[C,
 $3d4+[1 <[=,[S <[=,\% $3D4+[8 <[=,]1 $3D4+[8 <[=,^, <[?,_0 <[=,`& <[>,_0 <[=,a	 <[=,bF <[=,cE7`6+[9 <[=,j/ <[=,kj6b
k0b+[8+[64[%4[(4[( $ D47@+[< <[E, <[H,
J[,~x[x[X(14H ECA41 ENTERED)(11H ECA41 EXIT)K
D  \[R7@+[V <\,," $#6/(4H[\5h[] ! H @hA H!+[_@h  HA+[_ ! HA@h  H!.$8&[W!$~ D
i7@}+[q"} $ b H
k ~ H
w  H.$8&[d" $ A H	E.$8&[i"} $ }. H
j 
b J b 
 J ~ 
~J.$8&[l"X$7@{+[x{H[J<\,l4@{<\,l1@7@+[}H[J<\,l4/@<\,l1@/.$8&[r7@+\A<\	,,0[R,~x[Jx[Jx[Jx[JX',I3) 0K
D@ \\! $ D47@+\) <],,7@}+]@d\

"  $ F\ D\"  $ *$
 \(.@l G2@n G2.$8&\-:\; \+\, }( D\" $ 60H+\<:\

 D UX$( 
\

(
.
 

A .

(G2.$8&\6  2D\

+]"\ $ F\ D\@d\" $ 60H+\J:\ \  ~2H+\G \ H\+\J \  2H+\J \ H\.$8&\B &$\ \(. \!*
 b  *G2\"d\"\ $ ( ,$

\.



0G2

 Uq ( .$ 

\(

.



0G2

 V#.$8&\S"\ $ F\ D\ ($\(.7@G2+\o \(UqD\\"\ $ *$
 \(.7@ G2+\n *$
 \(. 

(

,0V#L\

 G2

 G2.$8&\e:\; \+\^:\; \+\@@d\

" $ 60H+\y:\

$( 
\

(
.


(G2,m+ LA.$8&\s  2D\

+]@d\"  $ F\ D\

"  $ \

3H+] *$
 \

(.7@ G2+]:\ .$ 

\

(

.

0G2,m6 P b 
\

 
(UX J ~ 
UX J .$8&\:\

; \+\~"$. $ 2$\+] <],, $ D47@+] <], <] ,
J\!,~XX4(14H ECA43 ENTERED)(10H ERROR AC2/20H EXECUTION INHIBITED)(' ECA43 EXIT. IRTN=',I3)K
D` \]. $ D47@+]5 <^,," $ F]$ D]#" $ *$
 ]#(.@l G2@n G2 *$
 ]#(.

 N6.$8&]8:]#; ]$+]7" $ D]% ]% w H]% 
W J]"4H]G6@]"+]]+]H6@]"+]I+^ ]% D]" ]%#6/$4D]R5d]W ($]" ]"(. ]%   ~ *N6N6+^ ($]" ]"(. ]%  ! *G2G2+^ ($]" ]"(. ]%" A
i *N6N6+^ ]%#6/$4D]p5d]~ ]%  ~ D]" *$
]% ]%(. 

]" .

 N6

 N6 *$
]" ]%(."

]" .

 N6

 N6 *$
]% ]"(."

]" .

 N6

 N6+]L ($]% ]%(. ]% 

 ! .

G2

G2 *$
]" ]%(."

 ! .

G2

G2 *$
]% ]"(."

 ! .

G2

G2+]R ]% A
i D]" *$
]% ]%(."

]" .

 N6

 N6 *$
]" ]%(. 

]" .

 N6

 N6 *$
]% ]"(. 

]" .

 N6

 N6+]W:]%8&]B+^ <^,, $ D47@+^ <^, <^ ,
J].,~XX4(14H ECA44 ENTERED)(11H ECA44 EXIT)K
E \^*7@+^/ <_,,@d^#  D^$7@^$+^~"^$ $ D^""$.^#4D^85d_ ^"  H^& s H^%+^: ^" ~ H^&  H^% ^& w H^# 
W J^! 
^% 

(w L^% 

(W L^"4H^C7@^%+^K"$.^#4$^O4D^T+_7@^!+^}7@^%+^H"$.^#4$^Z4D^`+_7@^"+^}"$.^#4$^f4D^k+_7@^"+^C"$.^#4$^q4D^w+_ ($^% ^#(. ^"   *G2G2+^K ($^% ^#(. ^"" b
i *N6N6+^K ($^% ^!(. ^""  *G2G2+^H ($^% ^!(. ^"  b
i *N6N6+^H ($^" ^!(. ^"   *G2G2+^} ($^" ^!(. ^"" b
i *N6N6+^} ($^" ^#(. ^""  *G2G2+^C ($^" ^#(. ^"  b
i*N6N6+^C:^"8&^3$3d^#+$D^#}(D^$+^07@+4 <T	,,3^*,~X4HNODE,3X4HNODE,10X24H NODAL ADMITTANCE MATRIX//)(//6X5HNODES,10X26H EQUIVALENT CURRENT VECTOR//)(1X4HREAL,1XI2,1XI2,1H-,I2,4(E14.7))(1X4HIMAG,9X4(E14.7)//)(1X4HREAL,1XI2,1H-,I2,4(E14.7))(1X4HIMAG,6X4(E14.7)//)(11H ECA45 EXIT)K
E  \_. p @_

7@+_4 <_u,,7@+_q6b_

0b+8+6484; <x,, <{,," $ D@d $. D

0b+_D+_C4_D4_Y <_~, <`,
"(/.
(. <`,
:+I, <`,"(/.
(. <`,
:+S,+k <`	,, <`

, <`,
"(/`.
:+`, <`,"(/.
:+g, 2d+=6b

0b+p+n4p4Xq:8&<7@+s<`,,.,~X(14H ECA46 ENTERED)(11H ECA46 EXIT)K
E@ \`$7@+`) <`p,," $ ( 

A


i" ~{ 

!





/ .

 
& ("

A


i  ~ 

!

{



 .

 Q.$8&`*7`+`E" $ s H` 
 J
j(
 



  .

(
&

(
& 

j(
 



 { .

(Q

(Q.$8&`;7`}+`S }( D`"` $  H` 
~ J
j(
 

b


i

 { .

(
&

(
& 

j(
"

b


i

  .

(Q

(Q.$8&`H" $ (@l n@n n (

 <.$8&`T" $ w H` 
W J`4h`c `( 

(

,0
&

 <

 < `( 

(

,0Q

 n

 n7``+`k `( 

(



0
&

 <

 < `( 

(



0Q

 n

Jn.$8&`Y7@+`nX<`s,,`$,~X(14H ECA47 ENTERED)(11H ECA47 EXIT) 0K
E`\aD`x7@+ab0NUDNUGQHGQad`y$DNUaGQD`y`y &/`x $ ($0 N7Pa

 G3L`y



`w ($ N7T`y G3Pa N7 ($

 G3.$8&a(oHa=D`y`w

oL`y=Hao= &/`x $ F` Da/$ D`~ a.$ D`w a D`{"&/`x.`{ `{ F`~ Da@d`y@f`za"`~ $ *$
 a(. ,$

`{ 
(
.
0 N6P(N6

 G2L(G2



`y

`y *$
 a(. ,$

`{ 
(
.
 N6P(G2

 G2L(N6



a

a.$8&a4 &$`{ a(.(`yG2G2 &$`{ a(.(aN6N6:a; `~+a1 a Da$$ a(.N6HN6

G2LG2

ah`y a$& a(.(HN6a a$& a(.G2D`y`y `x3$`w+b"&/`x.`w `w F`} D`{@d`v@f`v`z"`~ $ *$
 a(. ,$

`{ 
(
.
 G2P(G2, N6L(N6



`v

`v *$
 a(. ,$

`{ 
(
.
 G2P(N6

 N6L(G2



`z

`z.$8&ae &$`{ a(.(`vG2G2 &$`{ a(.(`zN6N6 &$`{ a(.,N6LaG2H`y`w &$`{ a(.N6P`y

G2La



N6 &$`{ a(.G2:`{; `}+ac@d`v@f`v`z"`~ $ *$
 a(. 
(
 G2P(<, N6L(n



`v

`v *$
 a(. 
(
 G2P(n

 N6L(<



`z

`z.$8&b a((`v<< a((`znn a(,nLa<H`y`w a(nP`y

<La



na(<:a;`+a+7@+b3<b7,,a,~X(14H ECA48 ENTERED)(11H ECA48 EXIT)K
F \bD  Db;7`+bJ <b},, $2$b;+bo b;(<a b;(n	 &/b; $ Fb= Db> $.b;/b> Db?.$ Db:@db<@fb<b>"&/b;.b: b: *$
 b?(. 
(
 G2P(a, N6L(	



b<

b< *$
 b?(. 
(
 G2P(	

 N6L(a



b>

b>.$8&bYb?(<(b<ab?(n(b>	:b>;b=+bR+byNUHNUGQDGQb<oHNU=DGQdb<b(=HNUoDGQdb<	7@+b{<c,,bD,~X(14H ECA49 ENTERED)(///' FREQ=',1PG15.8/)(I,6E15.7)(F)(1X,A7,6X,6(5X,A7,4X))(//)(1X,132A1)(4X,I2,3X,'MAG',6(3X,1PE13.6))(4X,I2,3X,'PHA',6(3X,F13.6))(1X,A7,6X,4(4X,A7,3X))(4X,I2,3X,'MAG',4(3X,1PE11.4))(4X,I2,3X,'PHA',4(3X,F11.4))(11H ECA49 EXIT)CURRENT   NODE OR   Oh;ELEMENT    y~h-    TTY  POWER     VOLTAGE   LOSSES      NODE    XBRANCH    K
F  \c77@+cH <fH,, c;@fUX*dcH@dc Dc c> Dcc:XcBXcCXXc?Xc<XXXc@XXc9X

cA

XXX "/////3D+ca ~c= Dc <fK, <fN,
 e0D+ca <fP, <fS,
 <fE,g07`+cl:c & FX!" $ ($c. 
VU J X ($c. 
W J Y:.$8&cf" $ (@l 	e@n 	f (

  w Hc 
W Jc
4Hcy ( 

c(



0a

 	e ( 

c(



0	

 7@c
+d ( 

c
(

,0a

 	e

 	e ( 

c
(

,0	

 

 .$8&cm <fB,g07`+d

:c & FX!" $ ($c. 
VU J X ($c. 
W J Y:.$8&d" $ ( 

 .

 	e

 	e ( 

{ .

 

 #6/(4Hd5hd# ("

 

~ .L 

 
& ( 

 

~ .L 	e

 Q+d* ( 

! .L 	e

 
& ( 

! .L 

 Q+d* ( 

A


i .L 

 
& ("

A


i .L 	e

 Q.$8&d+d6:c & FX!" $ ($c. 
VU J X ($c. 
W J Y:.$8&d0@dc  Dc7@c+dW"c $7@c+d= ~ Hc	  Hc+dJ  Hc	 s Hc(7@ 	e+dV c	( 

c(

  2P0	e 
& 
& c	( 

c(

  2P0 Q Q+dV c(7@ 	e+dV c	( 

c(

 b
i 2P0 
& 
& c	( 

c(

"b
i 2P0	e Q Q.$8&d96@c+d[ $ Dc }( Dc+d7 <f<,g07`+de:c & FX!" $ ($c. 
VU J X ($c. 
W J Y:.$8&d_" $ ( P Q

 	eL 
&

,m+ L< ("

 .

 Q

 Q ("

/ .

 
&

 
&.$8&df7`+dy:c & FX!" $ ($c. 
< J X.$8&du" $@hVU HW.$8&dz" $ w Hc 
W Jc
4he c 

(

  VU 200
&,m6 P VU 

(

  W 200Q,m6 P W7`c
+e c
 

(

  VU 20
&,m6 P VU 

(

  W 20Q,m6 P W.$8&d}@dc Dc	  Dc" $#VUHc#WHc	.$8&e s3$c+e s2$c	+e $ D <f;,h9 <f9,i77@+e' <f6,g0:c & FX!" $ ($c. 
VU J X ($c. 
WJ>Y:.$8&e!cD7Dc+f2,
"c $ Fc Dc c X!( <f\,
:c; c+e0, <f], <f`,
"c $ Fc Dc c X!( <fb,
:c; c+e8, <fc,"c(/& $ Fc Dc <ff,
:c; c+eA,  Dc cC 3f+eI 0F+eI  Fc*deE"c $ <fh, <fk,
"
c ( Jc Hc ($c. <fl,
:c; c+eO, <fn, <fq,
"
c ( Jc Hc ($c. <fr,
:c; c+eW,.$8&eK+f c Dc1d+e` & Fc <ft,, <fw, <fz,
"c $ Fc Dc c.c X!( <f{,
:c; c+ef, <f}, <g,
"c $ Fc Dc c.c X!( <g,
:c; c+eo, <g,"c$&/& $ Fc Dc <g,
:c; c+ex,  Dc cC 3f+f 0F+f  Fc*de|"c $ <g, <g
,
"
c ( Jc Hc c.c$(. <g

,
:c;<c+f, <g
"
c ( Jc Hc c.c$(. <g,
:c; c+f,.$8&f $2$c+f Dc"$.Dc+e]7`e+f2  Dc cC 3f+f 0F+f  Fc*df"c $ <g, <g,
"
c ( Jc Hc ($c. <g,
:c; c+f$, <g, <g,
"
c ( Jc Hc ($c. <g,
:c; c+f-,.$8&f 7@+f5 <g,, c7,~X
'RVVWhc=VVWxc=X
'RVVWX	fVVWX	fVVWXb	VVWX
c"(cXXX
c!$( XX
c!$(Y:X(14H ECA50 ENTERED)(11H ECA50 EXIT) Y~j!4/=!\Rw&o;^KPC 9~jFoK
T \g* !p @g$ !p @g" p @g# !p @g% !p @g#7@+g8 <g{,,"g# $ (.g$7,'+gM4Lg_ (.g"7 '+gF ( 

.

g$ .g"Gp7g* <gz,m,m! @WR+ge ( 

.

g$ .g"0Gp7g* <gy,m,m!"@WR+ge (.g"7 '+gW ( 

.

g$ .g"0Gp7g* <gx,m g,,m! @WR+ge ( 

.

g$ .g"Gp7g* <gw,mg.,m! @WR+ge (.g"7L'+gc5lgd g/ HWR+ge@hWR+ge g/ HWR ( Hg*.g" 
g*.
g$/P/

'L'



g+ <gv,lW,m! 

.

g% @7 .g# 
WR
g-J'.$8&g97@+gt<g~,,1g*,~xg+xg*xg*xg*xg*X VOLTAGES//)(///4X8HBRANCHES10X17H ELEMENT CURRENTS//)(///4X8HBRANCHES10X17H ELEMENT VOLTAGES//)(///4X8HBRANCHES10X16H BRANCH CURRENTS//)(///4X8HBRANCHES10X16H BRANCH VOLTAGES//)(///4X8HBRANCHES10X13H BRANCH POWER//)(///1X24H SENSITIVITIES NOT CALC.//)(///1X21H WORST-CASE NOT CALC.//)(///1X20H STD. DEV. NOT CALC.//)(///,' SOLUTION NOT OBTAINED TO DESIRED TOLERANCE',//)(7X,5HNODES,10X,19H CURRENT UNBALANCES,/)(1X11H ECA51 EXIT) y~hK
T  \h8 p @h7@+h> <hl, <ho,
 $2Dh+hG"/////3D+hG ~h8 Dh <hq, <ht,
 $3Dh+hb h7@+hh6bh0b+hP+hK4hP4hR4hT4hV4hX4hZ4h\4h^4h` <hu,,+hh <hx,,+hh <h{,,+hh <h~,,+hh <i,,+hh <i,,+hh <i,,+hh <i
,,+hh<i,,<i,,<i,,<i,,7@+hk<i,,Eh8,~XX3HMAG,I3,1H-,I3,4(1PG15.8))(1X3HPHA,7X4(1PG15.8)//)(1X,4HREAL,1X,I3,1H-,I3,4(E14.7))(1X,4HIMAG,8X,4(E14.7)//)(1X11H ECA52 EXIT)K
T@ \i6 p @i !p @i$ !p @i!7@+i> <i|, <i,
  Di% $3Di+iC i7`+ix $2Di+iD  Di%@di  $.i  Di  $.di 3di%+iI i% Di "$.i4Di]5dif <j, <j,
"&/i .i  i  Fi$ Di! i!.i$ <j,
:i!; i$+iP, <j,"&/i .i  i  Fi# Di! i!.i! <j
,
:i!; i#+iX,+iw <j

, <j,
"&/i .i  i  Fi# Di! i! <j,
:i!; i#+ib,+iw <j, <j,
"&/i .i  i  Fi" Di! i!.i$ <j,
:i!; i"+ik, <j,"&/i .i  i  Fi" Di! i!.i! <j,
:i!;i"+is,i%2dii+iE7@+i{<j,,i6,~X(' ECA53 ENTERED. MO=',I3)(11H ECA53 EXIT) y~hqoQOK
T` \j,7@+j2 <kT, <kW,
6b60b+j6+j44j64k4k@d
j Dj! D6 Dj" D
k!$~ D
i $ D4"! $ Fj% Dj& Dj#6@j!+jy j# 0 Fj!#I Fj'6bj'0b+jG+jB4jG4jN4jW4j`4jj4jo4jq4ju j#7$I+jL4Djz j! j#!(e H!+jz j! j# e F!+jz j#7DI+jz5djS j! j# e F+jz j! s Fj& j#  e! H+jz j! j# e H.& Fj# ej. Hj" <kS,l4 @{ <kR,l1@ ( Hj!+jz j! j# e H/.& Fj# ej. Hj" <kQ,l4/ @ <kP,l1@/ ( Hj!+jz j! j#!(e H	E 	E FA & Fj"+jz j! j# e F +jz j! j# e F
k $ Dj"+jz j# ej- D~!$~ D
i+jz@dj!+j j#7@b+j j# D
j@fb Fb & F6 j' F
j:j&; j%+j=7@j"+kK7@}+kK" $ 	E HA.$8&k"} $ 
k Hb 
w H~  H j$ 
b J b 
 J ~ 
~ J .$8&k $ D
k+kL $ Dj  $ D6 
j#I D
j6b
j0b+k+k4k(4k(4k$4k$4k(4k(4k(4k9 
j#I D
j6b
j0b+k!+k4k+4k+4k!4k!4k+4k+4k+4k@:
j 
hFe"&.F
j+k+:
j e~ F
iFe F
h"&.F
j 
j e~ F
i 
j 
iFe 
j e4&kC5fkC6b
j0b+k5+k04kC4kC4k54k54kC4kC4kC4kC6@
i+kC $.
j Dj# 3fe+kC+kC6b<0b+k<+k;4k<4k( 
j ~ D
i 
j 
iFe+k,6b<0b+kC+kA4k>4k+@d6 
j Dj#+j>6b
j0b+kK+kF4kK4kK4kK4kK4k4kK4k4kK $ D
k7@+kN<kX,,j,,~xj"xj"xj"xj"XE16.8,2H /,E16.8)(11H ECA54 EXIT)~c`E    ~(@ C    I    L    R    G    M    K
U \ke7@+km <l,,7@
j+l"/////3D+l6b
j0b+kx+kt4kx4kz4l4l4l4l4l4l 
j7`I+k|+k~ 
j7`I+k+l ki Dk[+l	 kh Dk[+l	 kf Dk[+l	 ke Dk[+l	 kf Dk[+l	 kg Dk[+l	 kh Dk[+l	 kg Dk[+l	 ki Dk[6b
j0b+l+l4l4l4l4l4l4l4l4l <l, 
j <l,
+l <l!, 
j <l$,
7@+l<l&,,ke,~XX+l5g&t@1,>?BplL++l5G?1,>?BplM+l5g&p1,>?BpBlK#`3blJ+lG9DlMlM3blN+l@%"(D?d$Z"@($)Btrx[6m[{6m[lTIO-1,>?B lS* lUp5`l\4@lj+P90lk!p 
(Jr/*@(*XJli(Jnd ~@(? (lR"(lQ(lP"(lO(lN (lV`FlV`@!
lS**,~AttemptotakeDSQRTofNegativeArg!u|a>K8!:"u-jQF^u#Ggvc\y:>x0aEqILwu!RSA.T,PkA+H3^`Kyl~p4@mR

d,7  !& (3@6@3 +mh,l,fl3 m +mly*l*l@lx`l9

m#3&l{+m@lmlv .lv+m8m?f?~m?}`/.0nlo+m@laL+mlw=

m`llz7  !l{*.,~^Opg:9d4 m%`bm@+m) Am*,~ `bm@+m)"Km*,~",~`g:9e@4,m/`nmL+m4 A

m4

,~,`nmL+m3"K

m5

,~"

,~`g:9d(40m:`rmP+m> Am?,~0`rmP+m>"Km?,~",~`C

^`GQxmF[HK
DINX@K1e`@@ HB(>(z[3p[Iq [MeGQ @[MeDQ@K
D[HK
D INX@K1e`@@ HB(>(9[S:0\

Q@K
D [SHK
D@#INX@K1e`@@ HB(>(A@\$DH]!Q@K
D@\%HK
D`-INX@K1e`@@ HB(>(T]0V^!Q@K
D`]1HK
E8INX@K1e`@@ HB(>(d^+e8_

Q@K
E^,HK
E BINX@K1e`@@ HB(>(q@_/ux`Q@K
E _0HK
E@MINX@K1e`@@ HB(>(

 `&

``uQ@K
E@`&HK
E`WINX@K1e`@@ HB(>(

Xa	

b:Q@K
E`a	HK
FbINX@K1e`@@ HB(>(

' bF

(`cQ@K
FbFHK
F lINX@K1e`@@ HB(>(

0(cD

8Hg"Q@K
F cEHK
TwINX@K1e`@@ HB(>(

t g0

vhQ@K
Tg0HK
TINX@K1e`@@ HB(>(
T h9HK
T@

INX@K1e`@@ HB(>(
T@i7HK
T`INX@K1e`@@ HB(>(
T`j/HK
U!INX@K1e`@@ HB(>(
UkjHg&q`0ggM?J1e`@H-H9B&(ggM?J1e`@HH9B&(XcR,x4{&p'NHaJ.CW cFcV4nBH~Q&p%{z83aN-a^$/p9cJcZ[?(cj!w`:
VH
?P1aB"{8+G06

cNc^cn7JH{b8*aF0cBq [Md 0 @[Md 5q [Md@e @[Md@q [Md`
k @[Md`Kq@[MeGQ @[MeDq S>J`
D[Q_W!`QS>f=
Q@K
D [SQ@K
D@\%Q@K
D`]1Q@K
E^,Q@K
E _0Q@K
E@`&Q@K
E`a	Q@K
FbFQ@K
F cEQ@K
T`j/Q@K
UkjQM&q`Q@g&q`l4Q@G?`l1Q@g:9e@m+Q@g:9d(m6Q@K
Tg0Q@K
T h9Q@K
T@i7Q@I$GmQ@g:9dm!Q@IO-lWQGE?BQ@G?C@l)Q@g&tC@l-QM?\G9iHm"GQ%X{%[HC`EmJ(' TRANSIENT MAINLINE-ECA70 ENTERED.')(///' FINAL TIME PARAMETER OMITTED, ONLY ONE TIME STEP CALCULATED.')(25H1TRANSIENT JOB TERMINATED//12H EXCESSIVE (I3,21H ) CURRENT UNBALANCES/1H1)(' ECA70 EXIT')K
t \[- $ D[7@+[4 <\m,, $ D[ ~ D

_ <\j,cO@d< D

[ D

d & F

\ & F

\ |.| F6 D

] <\j,ji $ D

Z <\j,]

 <\j,a $ D

Z <\j,]

 <\j,ai <\j,]p <\j,j <\j,^K <\j,bQ <\j,ai 5 D

` D

c <\j,c6`

Z+\b <\j,]O <\j,]p <\j,^K@d

^ D

^ <\j,dV <\j,g6@

[+[p+\f6b

[0b+[X+[U4[X4[t4[t4[t4[p4[p $ D

Z <\j,]

 $ D

Z <\j,a $ D

Z <\j,]

" $ (

 }

 / (@l }@n ~.$8&[_ <\j,ai <\j,]p <\j,^K <\j,bQ <\j,ai <\j,c6`

Z+\b <\j,]O <\j,]p <\j,^K@d

d <\j,g+[t6b

\0b+[s+[r4[s4[t <\j,l!$2d>+[z6b

\0b+[y+[w4[y4\ $ D

[+\ $3d

[+\ <\j,_7`

]+\ <\j,]O <\j,]p <\j,^K@d

]"$.

[4D\5d\ 

^ D

^ ~D

`+\ 

^ D

^+\	 

` D

c 

^ D

^ 

_

c D

`:

^ $ D

[ $ D

Z <\j,a" $ (

 }

 /.$8&\6b

\0b+\+\4\4\ $ D

Z <\j,d+" $ (@l }@n ~.$8&\ <\j,ai <\j,bQ <\j,ai <\j,c6`

Z+\b@d

d7`+\( <\k,m6b[0b+\&+\$4\&4\( <\j,g $ D

d7`}+\9 <\j,`7@

]+\5 $ D

Z <\j,a <\j,]8 <\j,]p <\j,^K6b

\0b+\3+\14\34\5 $ D

Z <\j,d+6b

[0b+\9+\64\94\4\4\4\>6b

[0b+\>+\;4\T4[S4[S4[S4\T4\T6b

\0b+\A+\@4\A4\K <\j,_V6b

\0b+\E+\D4\E4\I6b

\0b+\H+\G4\H4\I <\j,l <\j,g+\Q 

_ D~ $ D

[ $ D

\ <\j,]O <\j,]p <\j,^K6b

\0b+\T+\R4\T4[S W2d

`+\[ $ D[6`W+\^ <\p,, <\s,,+\^ =2d

^+[S@d

^ $2d

[+\_ <\j,g6b[0b+\b+\a4[S4\f <\v, <\y,
 <\z, <\},
7`+\i<\,,[-,~p[/[X0X,7H NUMBC=,I4,7H NUMBR=,I4,7H NUMBL=,I4)S

 \]
7@+] <],, <]/,
6b

Z0b+]+]4]4]7`!+]   D]"! $:] 
 

. J] 

(b L(!.$8&]7` +]"  $ 

. H]!*
! J !.$8&]7` +]+  .! D]"  $:] 
 

. J]6b

Z0b+]&+]%4]&4]( ]@j !+]* ]!*
e J !.$8&]" ]
,~X]$ $!$ (7H Y01   ,10X,7H NUMBC=,I4)rA \]67@+]; <]B, <]E,
7` +]A"  $ 

. H]2 
 b
~J!.$8&]=]6,~X(7H Y03   ,10X,7H NUMBC=,I4,10X,7H NUMBL=,I4)rA \]N7@+]S <]b, <]e,
7` +]X"  $ 

. H]G 
 b
~ J !.$8&]U7` +]`  .! D]G"  $:]G 
 

. J]G 

(b

~LL(!.$8&]\]N,~X(7H MATRIX)[&*< \]n7@+]s <^=,," $ F]k D]h" $ *2$
]h (.@l G@n G.$8&]v:]h; ]k+]u" $ w H]h 
W J]g5H^6@]g+^+^6@]g+^ ]h H]g+^ *2$
]h ]h(."

! .

 G

 G *2$
]h ]g(. 

! .

 G

 G *2$
]g ]h(. 

! .

 G

 G *2$
]g ]g(."

! .

 G

 G.$8&]}7`+^;" $  H]l 
s J]j 

D

(!

(b L]j 

 w L]k4l^+ ]j  W H]h4h^% *2$
]h ]k(. 

]j .

 G

 G ]j  w H]h4h^+ *2$
]h ]k(."

]j .

 G

 G ]l  W H]k4h^: ]j  w H]h4h^4 *2$
]h ]k(. 

]j .

 G

 G ]j  W H]h4h^: *2$
]h ]k(."

]j .

 G

JG.$8&^]n,~X(7H REDUCE) 0p(1W^6mw9"e&Xr \^G7@+^N <,, $3$+^R^HdGQGQ+

"$. D^@ $ D^E $ D^A &2$^E ^E(.G^D &2$^E ^E(.^HG" $ *2$
 ^E(.

 Gl^D

 G.$8&^]"&/.^A ^A F^C D^@ (2$^E(.G7 (^J5h^n &2$^E ^@(.@hG@jG+^z &2$^E ^@(.G^D"&/.^A ^A (2$ 
^@(
.
 

^E(

.

,0GL^D

(G

(G.$8&^s:^@; ^C+^e ^@3d^E+^:^E.$ D^A+^U &2$ (.G^D &2$ (.^HG" $ *2$
 (.

 Gl^D

JG.$8&^G,~X(7H MODIFY,10X,7H LOCK= ,I4,7H LOCKB=,I4)0c=tu*U&[>%\ \7@+ <D, <G,
@d

]!$> D_6b

[0b+_#+_4_#4_14_74_<4_@4_C $ D

[ $ D

\ ~ D

c _ D

_ 

_

_ _ 

_D_ D

_

_

__$} D_#_2d_+_' 

c_ D~+_B $ D

[ 

_

_ 

c"

c_ D~+_B $ D

[ 

_

_"

c 

c

_ D~+_B $ D

["

c

_

c D~+_B $ D

[ 

_ D~ $ D

],~X$

[$

\(7H SWITCH,10X,7H LOCKB=,I4,7H LIST= ,I4) g^NHt \_T7@+_Z <`

, <`,
 $ D

\7`

Z+`"

Z $ F_M D_J m F_I@h_M"_I $ .F_M.$8(_` _I &._M/ F_N"&/_M._N _N F_L D_O  F_N R H_O 
1 JR H1 p H_O 
P Jp HP b H_O 
B Jb HB7`+_w" $ s2H_N+_v D H_O 
# JD H#.$8&_r:_O; _L+_h:_J; _M+_^ 

`

b

_ D_J2$_U+` =3$_J+`
 

b D

`Od

]+`!$=2d_J+`
 

_

b D

` 

_ F~ D

c 

^ D

^ & F

\3$=+`
@d

^ D

^ $ D

]T,~X$

\$

Z(7H SCAN  ,10X,7H LOCKS=,I4,7H LOCKA=,I4,7H LOCKB=,I4) 0T@ng
@d

] ~ D

`6b

[0b+`'+`$4`'4`04`Z4`04`{"~

` D

b@d

b 

`

`

c

_ D

Y@d

Y `3$=+`/ `= D

a+`0 ` D

a@d

Z"} $@hm { H` e H

Z6b

Z0b+`7+`64`74`: `(6  
j+`<+`= `(6` 
j+`=:

Z D m.$8&`26b

[0b+`B+`?4`B4`D4`D4`D $2d

Z+`r $ D

\"$.

Z4$`Q4D`M $ D

[ 

Z D

Y"

Z $ m H

.$8&`I 

` D

a+`S $ D

[ $ D

Y m D

 

` D

a+`h $ D

[ 

` D

b 

a

b D`

_ D`3d

a+`r 

a

bD D~

b D

`+`p 

 D` { F` e F

Z6b

Z0b+``+`_4``4`c `(7(
j+`f4H`r+`g `(7(
j+`g4H`r 

` D

b+`h 

` D

a 

a

b D` 

a

bF F~

_ D` `=2$`+`r ~

b D

` $ D

]+`{6b

\0b+`u+`s4`u4`z 

Y D

Z1$+`{"

Z $ 

 Hm.$8&`x $ D

[`,~X$}$

[$

\(7H FLOW03,10X,7H NUMBL=,I4,7H LATCH=,I4)M2~t	 \a7@+a <aU, <aX,
7` +aT6b

Z0b+a+a4a&4a4a&7`+a%" $  Ha 
 60J+a$ s Ha 
a(
 

a(

"D 2P0
j  b 6p(
j(
j.$8&a $ D

Z  .! Da"  $ Da:a 

. Ha 
 w Ja4ja1 a( }a a( /a+a2@ha@jaa a W Da4da9 a( }a	 a( /a+a:@ha	@ja	a6b

Z0b+a>+a<4a>4aT4aE a( a 

 R .a0a	 

 ! .L


j

++aS a( a 

 R .a0a"

 ! .L

+

+ ~

`D !( a 

R .a0a 

! .L

 +

J+:a8&a)a,~X
$ $

Z(7H CURRNT)XGW+Z \af7@+al <bD,," $ w Ha_5hap@ha[@ja\a]+at a_( }a[ a_( /a] W Ha[5hax@hac@jadaa+a| a[( }ac a[( /aa 6 Ha^6ba^0b+b+a~4b4b4b7@

[+b (a[0a]0acaa 

! .L

 
j+b ( 

R .a[0ac 

! .L

 
j6ba^0b+b+b4b4b4b (

 +

 
j

 
j+b ( 

!

 .

 
j

 
j.$8&am6b

\0b+b+b4b4b&7@

[+b& ahZDac ac7`b+b& ac b FaZ 60H+b% aZ( ac 
aZ 

(b

 

S .


j


j*db7`+b0" $ s Hab 
 JaZ(
 

ab(

 D 2P0
j  b 6p(
j(
j.$8&b(" $ (@l I@n I.$8&b1" $ W Ha_ 
w Ja[4hb< a_( 

(

 p 200
j I I7`a[+bB a[( 

(

"p 20
jII.$8&b5af,~X(7H SOLVE )g>fi  \bN7@+bT <b,,GQDJJ $3$+bXJ~+b~ &/ $ FbL DbL( bL$(2. GHII bL/$ DbH"bH $ bL( 

(

 02$.0@GP0I I I.$8&ba:bL; bL+b[ (I} &/ $ FbK DbL $./bL DbG.$ DbH@dbI@fbJ"&/.bH bH ( .2$ 

bG(

.



0GL }

bI

bI.$8&bsbG(I(bI}:bL;bK+bmHbN,~XSOLUTION NOT OBTAINED TO DESIRED TOLERANCE',/,' AT TIME = ',E16.7,///)(10H NODE NO. I4,6X,21H CURRENT UNBALANCE = E11.4)(///)M2~|` \c7@+c <c3,,@d

Z@dc" $ (

 I7 , c *,l} Hc.$8&c s2$c+c1 <c6, <c9,
 <c:, <c=,
" $ (

 I,m"Lc <c?, <cB,
.$8&c& <cD,,:<6`+c1 $
2$<+c1 $ D

Zc,~XX

`Xc(

`Xc$(cX(7H SORT  )hg?@ \cL7@+cR <cf,,@d

]" $ (@l }@n ~ (

 /.$8&cT" $ ( 

/ .

 
j.$8&cY@dcH cN_DcIZDcH" $ 62HcH+cb:cH D 

..$8&c`:cH;cI+ccL,~X(7H UPDATE) 0kB$ \cm p @ci p @cj7@+cs <d!,,6bcj0b+cv+cu4cv4d ci:v Fck e!3fcm+d ci"g.ck4Dd5dd  ck(.ck.ci ci HE

N H

S+d  ci6 @+d ci@f

S@fq"&.F6+d  ci ck(.ck.ci HE

N H

S@fv+d  $.ci Dcj:v Fck ci/ i4Fd5fd  ck(.ck.ci ci jh 
cj(

N H

V+d  ci6 E+d ci@f

V cj@fq"$.D6+d  ci ck(.ck.ci jh cj

N H

V@dvcm,~X(7H CURVES,10X,7H LATCH=,I4)GWi9 \d)7@+d. <dK, <dN,
7`|+d<"| $ b Hd%6b

Z0b+d4+d34d44d7 d% 


S
~J R+d9 d% 
~


`


SJ R d% 
 R J 1.$8&d07`|+dI"| $ d Hd%6b

Z0b+dB+d@4dB4dD d% 


V
~J p+dG d% 
~


`


VJ p d% 
JpJP.$8&d>d),~X

Z(7H PRINT1)(///22H STEADY STATE SOLUTION//) 0aJMm \dU7@+dY <dd,, e!3ddU+d^ $ D

["6/ 3$ +db@d

[.DdO4ddb<dg,,dU,~X(7H PRINT2)(///,'    T = ',1PG15.7,/)(1PG15.7)(//)(1X,A7,6X,6(5X,A7,4X))(4X,I2,8X,6(3X,1PE13.6))(1X,130A1)(1X,A7,6X,4(4X,A7,3X))(4X,I2,8X,4(3X,1PE11.4))(I,6E15.7)(//,' SWITCH',I3,' IS ON')(//,' SWITCH',I3,' IS OFF')CURRENT   NODE OR   ELEMENT   | -    TTY  POWER     VOLTAGE   LOSSES      NODE    XPBRANCH    aJMm	 \f{7@+g
:<i,,@df# Df' fDf&ZDf[ g &$&.f[@hdN*dg

@dfa f DfZf}fIgfJgfKfLgfMf~fNfOfPgfQfRf|fS

g

fTfUfV g .Ff#*dg7 

]+hm7@

[+g06`

d+hl <i,m6bfY0b+g&+g%4g'4g&7`f#+g- <i
, <i
 e0D+g- <i, <i,
6bfY0b+g0+g.4g14g07`+g;:fa & Ff[" $ (

 },m Lf' ($fa. 

(

0},m P dN.$8&g3"/2$+gZ" $ w Hf!4hgB f!(

 },m Lf' W Hf!4hgG f!( 

f' ., },m Lf'.$8&g>7`+gO:fa & Ff[" $ ($fa. 
f' J dN.$8&gK"2$+gZ" $ RHf'.$8&gQ7`+gZ:fa & Ff[" $ ($fa. 
f' J dN.$8&gW6bfY0b+g]+g\4g^4g]7`+gf:fa & Ff[" $ ($fa. 

(

0
j,m P dN.$8&ga7`+gp:fa & Ff[" $ ( 

f' .L 
j,m Lf' ($fa. 
f' J dN.$8&gi7`+g{:fa & Ff[" $ ("

p .

 
j,m Lf' ($fa. 
f'JdN.$8&gt7Dfa+hl, <i,
"fa $ FfX Df[ f[ f[( <i,
:f[; fX+h, <i, <i,
"fa $ FfW Df[ f[ f[( <i ,
:f[; fW+h, <i","fa(/& $ FfI Df[ <i%,
:f[; fI+h,  Df[ g 3f+h 0F+h  Ff[*dh"f[ $ <i&, <i),
"
fa ( Jdj Hf! ($f!. <i+,
:f!; dj+h",.$8&h6`e+h\+hl fa Df 1d+h, & Ff  <i,,, <i/, <i2,
"f  $ Ffb Df[ f'.f[ f[( <i4,
:f[; fb+h1, <i5, <i8,
"f  $ Ffb Df[ f'.f[ f[( <i:,
:f[; fb+h:, <i;,"f $&/& $ Ffa Df[ <i>,
:f[; fa+hC,  Df[ g 3f+hL 0F+hL  Ff[*dhH"f[ $ <i@, <iC,
"
f  ( Jf_ Hf! f'.f!$(. <iD,
:f!; f_+hQ,.$8&hM $2$fa+h[ Df'"$.Dfa+h)7`e+hl  Df[ g 3f+ha 0F+ha  Ff[*dh]"f[ $ <iF, <iI,
"
fa ( Jdk Hf! ($f!. <iJ,
:f!; dk+hg,.$8&hc7`

]+i"

Z $ m Hdj 
 e J

Z6b

Z0b+hs+hr4hs4hw dj * J e <iL, <iO,
+h{ dj * J e <iP, <iS,
.$8&hn6b

\0b+h+h}4h4i $ D

\+i"

`

b

Y D~ $ D

[@d

]f{,~pf{fYX

`X
fg(

`XfhXfI0fIX
ft$(dNX(7H PRINT3)(//10H TIME STEP,7X,2H= ,1PG15.8/,19H OUTPUT INTERVAL = ,I14/,7H 1ERROR,10X,2H= ,1PG15.8/,7H 2ERROR,10X,2H= ,1PG15.8/,7H 3ERROR,10X,2H= ,1PG15.8/,6H SHORT,11X,2H= ,1PG15.8/,5H OPEN,12X,2H= ,1PG15.8//)(//26H EQUIVALENT CURRENT VECTOR//9H NODE NO.5X7HCURRENT//)(I3,I7,2H -I2,3X,41PG15.8)(//25H NODAL CONDUCTANCE MATRIX//4H ROW,6X,4HCOLS//)(I6,4X,1PG15.8)aJMm	 \i7@+j <j&,,  DiW4dj$ <j), <j,,
 <j0, <j3,
 <j8,," $@hiU (.iU HiU (.hiU3h+j  HiU <j;, <j>,
"*/
iU.
iU iU JiX HiV *2$
iV (. <j@,
:iV; iX+j, 2hiU+j

.$8&j

 <jB,," $ <jE, ( <jH,
.$8&ji,~X~$=(s(=(>(!(iXX(14H TVSET ENTERED)(30H PERIOD OF SINE WAVE IN BRANCH,I4,12H IS TOO LONG/27H SET TO 126. * TIME STEP = ,1PG15.8//)(30H PERIOD OF SINE WAVE IN BRANCH,I4,13H IS TOO SHORT/25H SET TO 3. * TIME STEP = ,1PG15.8//) y~hi[] \jf7`+jl <kk,,7`|+k("| $ FjO DjP7&@+k4Fk jP H FjJ J FjO M FjM > FjN 

_ H

N ( Hq

_&F Fg1f?+k jP b FjK!&|

_ FjJ <kn, <kq,
 <ks, <kv,
 &? Fg jP g0$+k

 jP b FjK 

_F

_ FjJ <kx, <k{,
 <k}, <l,
 & Fg jP g DjL@fjP"jL $ (..jP"
jM
jP
jh
jN Jjf <kj,lbjJjO @ E 

_HjP.$8&k+k jP"&.Fg jP > FjN

_ F

N jN&F Fq jP q Fl@fv <ki,cn jP@fv b FjK H HR R H1:jP; jO+jo $ D

\7`|+ke"| $ FjM DjP7&E+kW4FkU jP j FjJ m FjO o FjM C FjN 

_ H

Q ( Hs

_&F Fi1f?+k> jP d FjK!&|

_ FjJ <l, <l,
 <l, <l
,
 &? Fi jP i0$+kI jP d FjK 

_F

_ FjJ <l

, <l,
 <l, <l,
 & Fi jP i DjL@fjP"jL $ (..jP"
jM
jP
jh
jN Jjf <kh,lbjJjO @ h 

_HjP.$8&kL+k[ jP"&.Fi jP C FjN

_ F

Q jN&F Fs jP s Fn@fx <kf,cn jP@fx d FjK j Hp p HP:jP; jM+k+ $ D

\jf,~pjPjgxjfpjPjgxjfXH TVS ENTERED)i[ \l7`+l <l:,,7`|+l)"| $ Fl Dl l/q4&l&5fl' l@fl <l8,cn l:l:l; l+l"7`|+l3"| $ Fl Dl.$ Dl l/q4&l15fl2 l@fl <l7,cn l:l:l; l+l,6`6+l5 $ D

\l,~pllpllXTERED')gO= \l@ p @l= p @l=7`+lG <lT,, <lS,;<"&("*.
l=Jl@<lQ,;<&.Dl=p$/Dl=l@l=Ap,~plAl@plAl=X,>?Bpl{+lcg&p1,>?BpBly#`3blx+lu9Dl{l{3bl|+ln%"(D?d$"@($)B
Am,~(`jmH+m"
Km,~",~`g:9e@4,m`nmL+m A

m

,~,`nmL+m"K

m

,~"

,~`g:9d(40m`rmP+m Am,~0`rmP+m"Km,~",~`gO>Ht1,>?B"p! (  " Cp	bcB>p,~iH[GQxm([0HK
tINX@K\(z[/5x]q [MeGQ @[MeDQ@K
t[0HS

INX@K(P]Q8]1Q@S

]

HrA#INX@KV]7Vx]FQ@rA]8HrA-INX@K

`

PaQ@gM2~t	lINX@K

a

aZQ@M2~t	aHGW+ZwINX@K

 ah

bGQ@GW+ZaiHg>fiBINX@K

(pbP

*cQ@g>fi bQHM2~|`

INX@KHB(\(

0 c

2HcFQ@M2~|`cHg?@INX@K

8hcO

9pciQ@g?@cOHkB$!INX@K

=cn

=`d$Q@kB$cnHGWi9+INX@K

D@d*

E(dOQ@GWi9d+HaJMm6INX@K

IpdV

J`diQ@aJMmdVHaJMm	@INX@K

Mg

phiTQ@aJMm	gHaJMm	KINX@KJ1e`@HH9B&(M?J1e`@HH9B&(XrA0rA$eN{&p:NH"4 <CW <X';.4n3<@%
*`!<P"l0P1BH~Q&p(7{j84?Ax-/pC"~x"[?@i[=i[(
VH%h*{89G0?

*@+BJH{b86#s`> `S

q [Md 0 @[Md 5q [Md@e @[Md@q [Md`
k @[Md`Kq@[MeGQ @[MeDq S>J`
t[0Q_W!`QM&q`Q@g?@cOQ@i[]jiQ@S

]

Q@M2~t	aQ@GW+ZaiQ@[&*<]pQ@aJMm	jQ@e&Xr^KQ@g>fi bQQ@M2~|`cQ@rA]OQ@aJMmdVQ@aJMm	gQ@i[lQ@[>%\Q@GWi9d+Q@gO>HtmQ@g
Q@g:9el}Q@g:9e@mQ@kB$cnQ@g:9d(mQ@g&q`lbQ@gO=lBQKc@;<QGE?BQ@G?`l_Q@G?C@lWQ@g&tC@l[