|
楼主 |
发表于 2010-4-21 21:04:42
|
显示全部楼层
回复 4# 大笨蛋
' s0 P- k; y4 J- I1 C2 V" m; `' ~" f; |6 S; `" ^
是不是从生成的lis文件中查找?& }: `$ M) I" R3 H
Alternative Transients Program (ATP), GNU Linux or DOS. All rights reserved by Can/Am user group of Portland, Oregon, USA.
8 _$ b' w6 h$ |) j3 _, l. x Date (dd-mth-yy) and time of day (hh.mm.ss) = 13-Apr-10 16:56:55 Name of disk plot file is lin750_4.pl44 C2 m5 G }4 B7 I2 [) Q
Consult the 860-page ATP Rule Book of the Can/Am EMTP User Group in Portland, Oregon, USA. Source code date is 21 February 2003.
O4 ?+ s/ X: uTotal size of LABCOM tables = 9868232 INTEGER words. VARDIM List Sizes follow : 6002 10K 192K 900 420K 1200) k6 z/ G( s; A& r
15K 120K 2250 3800 720 1200 72800 510 90K 800 90 254 120K 100K 3K 15K 192K 120 30K 160K 600 210K 300 60
1 I, \7 w8 u. J( D. N" y--------------------------------------------------+--------------------------------------------------------------------------------
! }: O' a" T0 FDescriptive interpretation of input data cards. | Input data card images are shown below, all 80 columns, character by character3 `0 q! X) G) ]2 @: T. Q
0 1 2 3 4 5 6 7 8
9 I* C$ X6 t5 n5 `/ Q, ] 012345678901234567890123456789012345678901234567890123456789012345678901234567890# T, n7 O! T8 X; U* P+ ^/ K
--------------------------------------------------+--------------------------------------------------------------------------------! \8 E) J: h1 u$ k- V5 }1 F
Comment card. KOMPAR > 0. |C data:LIN750_4.ATP
' V; A0 @6 I. G( R( n# pMarker card preceding new EMTP data case. |BEGIN NEW DATA CASE4 q: C9 h( ^! p5 Q( I4 m# ~
Jose Marti`s line fitter. PDT0 = 0.00000000E+00 |JMARTI SETUP$ D* s. ~/ z: _3 e
Erase all of 0 cards in the punch buffer. |$ERASE
1 o% M1 }" @) `Pairs of A6 terminal node names for each phase. |BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C
$ ?- K! h* B2 P7 a8 WCompute overhead line constants. Limit = 120 |LINE CONSTANTS7 Z: H a$ a8 f$ \) `, I0 }
Request for metric (not English) units. |METRIC( p1 D1 ?; E4 l# s, A
Line conductor card. 2.590E-01 6.900E-02 4 | 10.259 0.069 4 2.9 -19.5 25.1 10.1 60. 45. 4
+ v6 d# X: F7 U2 h/ T+ c r( ?Line conductor card. 2.590E-01 6.900E-02 4 | 20.259 0.069 4 2.9 0.0 25.1 10.1 60. 45. 42 a1 {# E q# d1 x L5 o9 d
Line conductor card. 2.590E-01 6.900E-02 4 | 30.259 0.069 4 2.9 19.5 25.1 10.1 60. 45. 4
% }3 b/ k" F1 j" JLine conductor card. 1.750E-01 4.400E-01 4 | 00.175 0.44 4 1.54 -15. 39.7 24.7 0.0 0.0 0
8 ^- p5 z; E# C' _7 \0 n, L4 z! p6 xLine conductor card. 1.750E-01 4.400E-01 4 | 00.175 0.44 4 1.54 15. 39.7 24.7 0.0 0.0 0/ |! f3 I3 R; n: B' w) K, l* r
Blank card terminating conductor cards. |BLANK CARD ENDING CONDUCTOR CARDS" R! X+ o5 z' O5 ~9 g
Frequency card. 2.000E+01 1.000E+03 7.570E+01 | 20. 1.E3 75.7 1
; Z) i. R' k( c( N7 I& B
: R& f& _; O8 [Line conductor table after sorting and initial processing.
) ^) e7 C- q5 K- a( m3 U8 N Table Phase Skin effect Resistance Reactance data specification Diameter Horizontal Avg height
3 t$ s, z: J$ W! U' G Row Number R-type R (ohm/km) X-type X(ohm/km) or GMR ( cm ) X (mtrs) Y (mtrs) Name! D4 C. g0 Y3 q2 B( m: q) ^8 c
1 1 .25900 .06900 4 .000000 2.90000 -19.200 14.800# p+ E( V/ y3 L" Z8 `7 s( g4 I% @4 v7 l: X
2 2 .25900 .06900 4 .000000 2.90000 0.300 14.800
$ u6 O8 g$ y: r$ @7 G$ ^& n& w 3 3 .25900 .06900 4 .000000 2.90000 19.800 14.800! ^7 s4 x7 G) E, L; M
4 1 .25900 .06900 4 .000000 2.90000 -19.800 14.8008 }: g0 S! O% ]: W3 `3 y
5 1 .25900 .06900 4 .000000 2.90000 -19.800 15.400
9 j( H7 Y, Z4 X4 H 6 1 .25900 .06900 4 .000000 2.90000 -19.200 15.400% A1 x6 Z" z* n0 ?
7 2 .25900 .06900 4 .000000 2.90000 -0.300 14.8006 y4 c" `8 K1 B2 h5 G
8 2 .25900 .06900 4 .000000 2.90000 -0.300 15.400
: q3 r3 W* o W 9 2 .25900 .06900 4 .000000 2.90000 0.300 15.400& D. K1 t7 S/ |* ]) i! l
10 3 .25900 .06900 4 .000000 2.90000 19.200 14.800
1 f& `3 M5 O5 l2 s1 c0 P- q& q 11 3 .25900 .06900 4 .000000 2.90000 19.200 15.400! m- Z$ M3 p6 A+ J/ l
12 3 .25900 .06900 4 .000000 2.90000 19.800 15.400
; x0 H2 W# {- Q* i 13 0 .17500 .44000 4 .000000 1.54000 -15.000 29.700
. I7 u# e/ B0 ]; \/ C: y4 J 14 0 .17500 .44000 4 .000000 1.54000 15.000 29.700
% `2 e* V4 v9 c2 x3 D- g
( t0 v; l! L( B0 k4 j% E, kMatrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 1.00000000E+03 Hz. Correction factor =
# d" x# s9 H' W$ c1.00000000E-06
5 X# V1 B7 y7 Z$ ~. J7 Y % ~! a; t2 G% j) O: @
Modal parameters at frequency FREQ = 1.00000000E+03 Hz5 Z2 B- T/ X1 H, A
% _! P4 B- ?7 X& o/ y/ M1 g) xEigenvector matrix [Ti] for current transformation: I-phase = [Ti]*I-mode. First the real part, row by row:
) t; |6 z( a1 t2 ]- ?3 Z3 ~ 5.748140047158274E-01-7.071067811865638E-01-4.281225696572995E-017 W+ n( h$ n+ ]0 y! ]6 O6 J$ R
5.823896633398591E-01 1.700454252111332E-14 7.958782134849792E-01
. t, H6 ~7 O6 e/ g 5.748140047158198E-01 7.071067811865313E-01-4.281225696573222E-01; \8 g' A, Y% H7 Z+ ]9 Q& y# V2 q
Finally, the imaginary part, row by row: \* P& Q1 ?: q* ]* h
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00. H" R5 F G, [% K# i
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
2 c8 H; X6 f! h: b3 g0 h- e 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
K% N$ X, z: mFrequency card. 2.000E+01 5.000E+01 7.570E+01 | 20. 50. 75.7 1
( p+ V# S/ Z9 t( l0 H9 |
2 O V B1 x, p* [6 ~$ yMatrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 5.00000000E+01 Hz. Correction factor =8 ~% r2 L/ T- S) \" ]4 q7 e0 }( ]( l
1.00000000E-06; ~9 @% {0 Q2 s" e" O6 j
Frequency card. 2.000E+01 5.000E-03 7.570E+01 | 20. 0.005 75.7 7 10 1
7 c0 {1 \$ V. @Blank card terminating frequency cards. |BLANK CARD ENDING FREQUENCY CARDS
( v7 L* L* E8 A: M: v+ K* I9 x5 bBlank card ending "LINE CONSTANTS" cases. |BLANK CARD ENDING LINE CONSTANT
7 n/ }- M h" BRequest for default fitting (= 3 blank cards) |DEFAULT8 U2 L- u/ Z1 E( _! Q
# Z" k! ?" L$ e3 s6 i. k+ W" A===== ===== Begin Zc fitting for mode IMODE = 1 ===== =====
' N% F6 f ^, H! KThe number of poles NPOLES = 41 in this loop exceeds the specified limit NORMAX = 30
* P6 ~3 j$ E9 s
2 w7 A0 l2 D; [ K! M @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 1 @@@@@ @@@@@9 i3 D& X) @" e; N2 z
4 e A z0 M( {. A" ?* _===== ===== Begin Zc fitting for mode IMODE = 2 ===== =====
: d% O7 i& k8 N! e: DThe number of poles NPOLES = 34 in this loop exceeds the specified limit NORMAX = 30
1 X6 p; }5 E2 j, {0 C . ?/ P r: D. e) I: X/ Y
@@@@@ @@@@@ Begin A1 fitting for mode IMODE = 2 @@@@@ @@@@@5 Z9 {6 [" v6 m F
( J2 v- ]/ b9 Z4 h
===== ===== Begin Zc fitting for mode IMODE = 3 ===== =====
) }' M4 ]5 O$ m; n4 W1 FThe number of poles NPOLES = 31 in this loop exceeds the specified limit NORMAX = 30! a) h% N) N& Q U( u3 i
/ k" I/ u4 P" v% G" `. b( f1 H @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 3 @@@@@ @@@@@
0 i, ~# C$ t. A Y
* f& s+ S# p- M$ vRequest for flushing of punch buffer. |$PUNCH, Z, ^/ h3 \# J d) @" m
6 w- K6 x% }+ i2 u; X4 S3 D- b: g+ @7 B
A listing of 80-column card images now being flushed from punch buffer follows.
* {& b. i$ m8 ^! j* @+ M/ [! e===============================================================================* O1 h: q) r$ z- h7 L/ {+ T
1234567890123456789012345678901234567890123456789012345678901234567890123456789, j. k' q9 [% }- i5 ]7 A: m" w
===============================================================================: D# V' k& r7 D1 J+ A, u- Y
C <++++++> Cards punched by support routine on 13-Apr-10 16:56:55 <++++++>- O6 @" j& R8 y# }2 |2 B" A2 b* N
C ***** UNTRANSPOSED JMARTI line segment ******
, L' q4 v: [9 A. c) y1 }' uC JMARTI SETUP% U, F! f& s& X
C $ERASE% c1 m. \( L% K2 S# Q! J% \- z
C BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C
) V1 j' }& r1 W6 a& J+ yC LINE CONSTANTS+ c3 G% l8 y! E( W% d
C METRIC( l$ T' g8 M; B9 Z9 }* c/ y- P7 s
C 10.259 0.069 4 2.9 -19.5 25.1 10.1 60. 45.0 |, D7 Y2 s' s( x: Q; d9 _
C 20.259 0.069 4 2.9 0.0 25.1 10.1 60. 45.
/ C' k0 `' |( u& {# OC 30.259 0.069 4 2.9 19.5 25.1 10.1 60. 45.2 }) }5 @# }& W; `6 p% b4 P# ?- v* R
C 00.175 0.44 4 1.54 -15. 39.7 24.7 0.0 0.0
/ D5 X- r1 D3 M( c6 [: d+ n2 U7 |C 00.175 0.44 4 1.54 15. 39.7 24.7 0.0 0.0
$ H, G* j2 k1 G" A, `C BLANK CARD ENDING CONDUCTOR CARDS; g( X7 ~( l9 T7 G5 d" [: y
C 20. 1.E3 75.7 1: S9 M" h: a/ s p) |2 t
C 20. 50. 75.7 12 t- L- ?% W, w) w' Y2 h# F7 w7 T
C 20. 0.005 75.7 7 10 1
9 F, ]7 t% {: j0 BC BLANK CARD ENDING FREQUENCY CARDS% t" }0 u! N& T; ?6 z
C BLANK CARD ENDING LINE CONSTANT
. Z9 Z0 ?. `( n0 W9 N% Z( P4 pC DEFAULT$ e" p: j' K9 B, i$ w6 i! s
-1IN___AOUT__A 2. 0.00 -2 3" x) C4 {2 m( u& C2 K" C! M1 ?
17 3.3876136028747050000E+02
- R" T" {% n) `2 q 1.56748087606698020E+02 1.53350246690381570E+02 5.91752415177784810E+01
& f4 G3 b& h4 v2 K# z. k: ~ 2.01342311994593360E+02 2.35228649588483170E+02 2.53692631526845670E+02
0 ]* I# |; w$ p 1.66995629609519800E+02 3.13013616521086590E+02 7.77592731836887200E+026 }/ `. w, V* D
2.92709376085682020E+03 8.36186324719264120E+03 6.39337717296788010E+03
# G" }2 o! e# v, V: w, I" B 1.11850636212671030E+04 4.41394197432314540E+04 3.57997951874029590E+05
& u6 t7 Z7 _, P" I9 a6 | y$ t: O 7.56151786639699950E+05 1.36950810507648970E+06; |# E; W$ y: m s" [8 |
1.42216936124761770E-01 2.00869674971664410E-01 2.46548549642172290E-01. z" z) u4 A8 K: @- i$ {
4.83183838918269940E-01 8.90165197319727430E-01 1.60597725665316450E+00' g, }' h2 J* V1 ?% A
2.89724575888037260E+00 5.22044042049842180E+00 1.93205621429485000E+01
t$ B4 z. P) m* |4 _ 6.43540045186946370E+01 1.19989060419415150E+02 2.38618178257245120E+02, ?& t. Y- ]" O% T- O
7.72151589982453290E+02 2.99346013405561330E+03 1.27367479883974610E+04- H# U8 \8 F2 ~& c: C
5.61967457160417400E+04 1.12259275941284690E+05
) k- t8 I# U+ Q$ U" o 18 2.5648081591925806000E-04( i7 m- s, Q5 B/ R2 ]6 }
4.39088902072225850E-02 2.51823882949434860E-01 2.09625388083036990E-01
* r; Q, p0 O+ p: F 3.78494708253580230E-01 4.21222198449916040E-01 1.12875930767027930E+00) g# v$ k8 t. T% @
1.71876255372116240E+00 5.22622351239333400E+00 2.87507803450135600E+01
2 b* ^& V, Q, i4 m1 y2 I, s, i 3.11711415283725670E+02 -4.25029687238800080E+02 4.11909331052564360E+03
7 k: n' y) R4 h- ^' d 2.03169322161820860E+04 9.92298833352391920E+03 9.73079142175107300E+07% g0 Q @/ U; u; t
-9.55146506480773540E+07 1.78452787243354890E+08 -1.80280334637975660E+080 X! y% l' K9 Q1 }) N% c
1.71037480519741610E+01 8.83202394182148960E+01 9.05344339387639390E+01
/ P, a) x% B" o2 @% k 1.45765976458050060E+02 1.67604264020870910E+02 4.33406916110919100E+02, n. L; E5 E$ j9 y
6.63140374794807490E+02 1.92887674552758430E+03 1.33200718265846740E+03+ O( l: j0 \; ?2 `/ N9 s2 a8 {
5.71524437659357950E+03 1.42342855758340520E+04 1.25142080353191360E+04; h H G) K6 b$ l( C4 A' S
3.62317843255328920E+04 5.63019677971675190E+04 2.08969723652870020E+05
; ?7 s# P% n9 A2 ]. b u 2.09178693376523150E+05 1.79625128065165980E+05 1.79804753193231360E+054 U) q8 S! O5 d) b. y* q; b
-2IN___BOUT__B 2. 0.00 -2 30 V0 \6 ]3 K# Y6 n
16 2.7356159603025270000E+02/ l- s3 ?: [2 t8 j
3.69404660026332070E+02 -6.57736076515949720E+01 3.81922741682533400E+023 p7 o O+ u4 C
7.08453587370238780E+02 5.41167797769398360E+02 3.06226540265072910E+02
$ B* D8 R* i& y E4 t. e 9.12429137114825860E+01 1.45546235045872410E+02 4.35671648435959070E+02
6 O( m/ a, Q7 t3 q% g 9.89457112977898990E+02 1.20421629942927280E+04 2.52441351892631970E+04
1 c1 K' F( `; [ 1.31721403134872210E+05 1.00702634087143390E+05 1.00067739988421900E+05
2 g" [. J: `8 j5 j; ~) _ 1.98945562771848960E+05
) W* H: f6 f* H% f; q) k 1.48932587810283570E-01 1.91111259756068880E-01 5.23244958961560200E-016 Y3 v9 z; B5 ]: l. U7 H" w# ~
1.98685487501559810E+00 5.99260600202752600E+00 1.07800276387683840E+01
% ?. O0 K. c4 y3 _+ i' x 1.40587613181405300E+01 2.26773470722948250E+01 3.15477144275676150E+02
& v2 ^9 [. x. h5 j/ \$ f 7.20661772011409880E+02 8.57135008822161760E+03 1.81290494844508870E+044 x7 O, F; s3 l, ]0 e4 T7 V
9.82444873325722870E+04 6.84224792084696670E+04 7.51320465443383440E+044 z, C$ }' b- B5 _8 d6 L
1.48835602821329780E+05( d7 b# b$ R( b9 }$ c6 Y5 K
8 2.5331274985951097000E-04
+ x/ p6 @9 R/ R; P 9.77519359442743510E+00 9.06749971882869370E+01 3.89917698321721050E+02% B$ L/ d; p& Q: ` E
2.14763901924745410E+03 3.21139859861504280E+03 7.78666160670429240E+03
a. c, R( `1 A9 ?6 v -4.35590044273043600E+04 1.46424632739437020E+05
3 A4 Q7 I4 g- F& B C( i i 1.34347544158826870E+03 1.11481723747429880E+04 2.13548802821824830E+045 W7 @9 h' D, A' V& V! p5 f
3.88406059295760640E+04 4.48673492254774170E+04 6.34696015771263410E+04
; j- B: A% c+ V8 F 5.71514355618160570E+05 1.84730022532517380E+05
4 {0 l! D/ k7 N( v7 p-3IN___COUT__C 2. 0.00 -2 3
' l* B7 s8 {6 c L7 M 12 2.4217757892053910000E+02
# X/ l* K! u N1 I7 k) q 3.11081567238861170E+02 -2.67647353791795130E+01 3.71876217221247710E+029 a0 i+ x! ^- r M" Q
7.07422509445779840E+02 7.84485674697519240E+02 5.15644097900284780E+019 Y, `7 T$ H6 _, Q# w
8.62357151535732380E+01 1.33677642835807010E+02 1.31608612652184290E+021 r( S. ?) H9 S
1.14893287428216410E+02 9.93716544256342760E+01 5.59773592553784180E+04
, N, _* U: H F( Q( D! ^$ A' d, R 1.34344252475530860E-01 1.81414794097451400E-01 5.11374925899225950E-011 U9 J+ S2 X( w$ {0 \0 l! ]/ q
2.04824350656590370E+00 7.03072667690498320E+00 1.02204034540275260E+01
) W" Y( G- s3 [* @2 M; l) ?. e+ |8 L 1.40807516766374870E+01 2.26422726843327060E+01 3.61527808309766810E+01
; r) L, S! d! ?: i' r. } 5.66127229741269180E+01 9.24983189391125220E+01 4.52655232370584050E+047 M$ @1 o# L8 R% A* Y, @
6 2.5172653258524589000E-04
+ `3 q/ f* ]) U" s2 I% i: X0 i 9.16195806109742070E+00 3.77612637640999710E+02 6.49218461519983410E+027 z! y1 I, e: K* M# R3 ~- |
2.16338680527304540E+03 -2.80386507590504550E+04 4.81761010930565240E+05
~+ D$ r5 z" }3 K' Z# @ 1.48053740522388740E+03 4.65974978309593280E+04 5.01953038655574710E+04
0 O6 J' a7 l$ X m3 L. z 7.89025069563385330E+04 2.89584576325553890E+06 5.04629561166254750E+05
! Y! A8 J% ~1 x6 Y, x 0.57481400 -0.70710678 -0.42812257
S: k8 Y3 s! K0 B 0.00000000 0.00000000 0.00000000
0 X# w' R/ j2 I 0.58238966 0.00000000 0.79587821: Q2 |( s, }2 W7 Y. R- U5 C
0.00000000 0.00000000 0.00000000
! B# u- g1 i4 h6 N; I" x 0.57481400 0.70710678 -0.428122579 B! ^, h9 a6 [2 Q: ^
0.00000000 0.00000000 0.00000000. G. _6 _ W2 e/ h
=========< End of LUNIT7 punched cards as flushed by $PUNCH request >=======6 q# F/ {$ m- K5 a
, z l! @: r; x, Q
Blank card ending "JMARTI SETUP" data. |BLANK CARD ENDING JMARTI SETUP
- O& o4 n3 s9 I: B% vTotal case timing (CP, I/O, tot), sec: 0.219 0.000 0.219
' T) x: F9 ]" H2 P& p R L C参数是那些啊?麻烦您一下 |
|