|
楼主 |
发表于 2010-4-21 21:04:42
|
显示全部楼层
回复 4# 大笨蛋
! S. d; k* K8 _% z9 C. h% ^+ @9 ]/ K7 q8 ]/ `; Z
是不是从生成的lis文件中查找?8 y4 I# a& c& _. k( e; @7 u- j; |8 D
Alternative Transients Program (ATP), GNU Linux or DOS. All rights reserved by Can/Am user group of Portland, Oregon, USA.3 U! p) m8 f$ _: i6 G: U y! a
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.pl4
1 P" d, p4 m) FConsult the 860-page ATP Rule Book of the Can/Am EMTP User Group in Portland, Oregon, USA. Source code date is 21 February 2003.
q3 h8 J3 J: H- C& w) @* C6 STotal size of LABCOM tables = 9868232 INTEGER words. VARDIM List Sizes follow : 6002 10K 192K 900 420K 12004 C) ?, ^! I ?1 k; S- u
15K 120K 2250 3800 720 1200 72800 510 90K 800 90 254 120K 100K 3K 15K 192K 120 30K 160K 600 210K 300 60
4 q( F3 }* W$ u2 | W--------------------------------------------------+--------------------------------------------------------------------------------) R/ k R5 G" l% ~ y! J
Descriptive interpretation of input data cards. | Input data card images are shown below, all 80 columns, character by character
$ Q7 B0 T8 G' a 0 1 2 3 4 5 6 7 86 ~" g2 \6 s1 q5 R* i. J5 e$ n$ T
012345678901234567890123456789012345678901234567890123456789012345678901234567890/ K X& |0 Z o. M
--------------------------------------------------+--------------------------------------------------------------------------------& x. i( j; A2 T; z- L
Comment card. KOMPAR > 0. |C data:LIN750_4.ATP' R9 @4 g; o' C" e4 Z7 x
Marker card preceding new EMTP data case. |BEGIN NEW DATA CASE
6 x7 U$ j% Z6 d& r0 CJose Marti`s line fitter. PDT0 = 0.00000000E+00 |JMARTI SETUP
E) G- t( c: t7 l; s* U* xErase all of 0 cards in the punch buffer. |$ERASE
" P3 h4 H+ |( N* vPairs of A6 terminal node names for each phase. |BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C
" _) e% `, g" b5 W- hCompute overhead line constants. Limit = 120 |LINE CONSTANTS/ a3 D7 \- A* i9 ~
Request for metric (not English) units. |METRIC
- ~: N" x6 e. \3 F# Q9 K% b' ?( E1 BLine 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
0 L/ j& D" ?/ T' D1 iLine conductor card. 2.590E-01 6.900E-02 4 | 20.259 0.069 4 2.9 0.0 25.1 10.1 60. 45. 41 `7 F* f" j2 {% F& v1 C" 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% |% Y I. S& k: `; w6 V
Line 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 09 L* H2 g4 p5 @1 K
Line 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 08 C& v, z3 @) Z+ z
Blank card terminating conductor cards. |BLANK CARD ENDING CONDUCTOR CARDS
e5 I* L' a0 n* BFrequency card. 2.000E+01 1.000E+03 7.570E+01 | 20. 1.E3 75.7 1- r" S( o; I! o4 Y+ i# ^
% F# H4 D7 b4 E4 J
Line conductor table after sorting and initial processing.
- r, `+ O9 j" B' H$ j- L+ k+ _+ v Table Phase Skin effect Resistance Reactance data specification Diameter Horizontal Avg height
9 F, U$ D; r) f" p Row Number R-type R (ohm/km) X-type X(ohm/km) or GMR ( cm ) X (mtrs) Y (mtrs) Name. ]- g3 j; ~: |
1 1 .25900 .06900 4 .000000 2.90000 -19.200 14.800( T J- v! ^- V+ O2 e2 q D
2 2 .25900 .06900 4 .000000 2.90000 0.300 14.800
& G" F- t% d/ e& @6 I# _+ {! H 3 3 .25900 .06900 4 .000000 2.90000 19.800 14.800- o/ d* C4 \0 b2 H5 _
4 1 .25900 .06900 4 .000000 2.90000 -19.800 14.800
- W, o1 R& \8 p! Q 5 1 .25900 .06900 4 .000000 2.90000 -19.800 15.400
# p6 d8 W# M: P' O 6 1 .25900 .06900 4 .000000 2.90000 -19.200 15.400
/ {4 {% ]: E0 J( a$ X& d9 U+ F/ y D( G 7 2 .25900 .06900 4 .000000 2.90000 -0.300 14.8004 U/ f' B$ i* i- f' a
8 2 .25900 .06900 4 .000000 2.90000 -0.300 15.400/ I7 h) d1 a" z; n& o
9 2 .25900 .06900 4 .000000 2.90000 0.300 15.400
+ t+ b" Y2 @: `6 t( W3 X 10 3 .25900 .06900 4 .000000 2.90000 19.200 14.800# f6 ~" V" v+ U+ k6 f
11 3 .25900 .06900 4 .000000 2.90000 19.200 15.400
& k3 A# @2 x, X$ h 12 3 .25900 .06900 4 .000000 2.90000 19.800 15.400
}! R1 P5 y' n8 V 13 0 .17500 .44000 4 .000000 1.54000 -15.000 29.700" c) t7 d+ Q1 B% B' P9 G% o
14 0 .17500 .44000 4 .000000 1.54000 15.000 29.7005 |* `. Z: f, U& P$ {
; e" _: C0 p2 k) u4 _4 G6 x
Matrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 1.00000000E+03 Hz. Correction factor =6 y0 h3 D" X2 S2 Q) E2 k
1.00000000E-069 e$ r9 F* S, v h9 m+ X, L
# N9 ^7 f/ I8 D2 r: PModal parameters at frequency FREQ = 1.00000000E+03 Hz2 [& j2 _* n% X% D
, T( a) X- L% d0 t5 x' l
Eigenvector matrix [Ti] for current transformation: I-phase = [Ti]*I-mode. First the real part, row by row:
O: y7 V0 ?2 w1 X 5.748140047158274E-01-7.071067811865638E-01-4.281225696572995E-01
9 o( j8 c1 p+ L9 S7 u5 |( E 5.823896633398591E-01 1.700454252111332E-14 7.958782134849792E-01! F" u) n( T$ @% @5 u
5.748140047158198E-01 7.071067811865313E-01-4.281225696573222E-01! i5 o( _& @+ B2 p& W- c' P3 L
Finally, the imaginary part, row by row:
; `/ b" c6 c2 ^2 \& g- G 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
5 G3 r; j7 V9 e. G 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00; s8 a% c; {0 v! a8 U E
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
1 A5 B8 n% G* y9 h7 u6 N( y! |Frequency card. 2.000E+01 5.000E+01 7.570E+01 | 20. 50. 75.7 1' J; }% B, L4 B1 F; s7 ]; N# z
% ~2 A9 \5 E$ D7 g+ ^
Matrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 5.00000000E+01 Hz. Correction factor =
7 x+ Z/ E! e& R' ]7 a0 j% m% ~0 Q1.00000000E-06
* R+ d X1 k% K( C! \- @Frequency card. 2.000E+01 5.000E-03 7.570E+01 | 20. 0.005 75.7 7 10 1
5 z1 B& n, I. U4 P, z. p8 ^3 w- U U+ DBlank card terminating frequency cards. |BLANK CARD ENDING FREQUENCY CARDS
$ h1 N) u3 F9 M" L2 t+ I6 xBlank card ending "LINE CONSTANTS" cases. |BLANK CARD ENDING LINE CONSTANT7 u1 c- ^8 A* I2 e- [
Request for default fitting (= 3 blank cards) |DEFAULT
& Y! L- z0 v9 T9 N ) z6 T( ^ D; t) @
===== ===== Begin Zc fitting for mode IMODE = 1 ===== =====3 t- a& r$ I( R L2 z, b! l
The number of poles NPOLES = 41 in this loop exceeds the specified limit NORMAX = 303 _$ I/ u6 G* B7 c
% j' h3 u% o6 Z. ^1 x+ L @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 1 @@@@@ @@@@@
9 B! `3 Q3 r( a' U& U
, W. o6 N+ r% g2 `===== ===== Begin Zc fitting for mode IMODE = 2 ===== =====
$ L% [4 Q& H, @1 BThe number of poles NPOLES = 34 in this loop exceeds the specified limit NORMAX = 30
7 \2 C- `3 \/ n, V9 n8 n
$ @0 C% B1 Z; [0 G @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 2 @@@@@ @@@@@+ b, |/ e+ ?& v9 q( S
+ u1 K' W4 W5 C- j2 K# x0 ]===== ===== Begin Zc fitting for mode IMODE = 3 ===== =====/ Q. m& r' Q) `3 [' `% G
The number of poles NPOLES = 31 in this loop exceeds the specified limit NORMAX = 30
v0 u% H0 v: U" a0 j3 O1 v* [
1 }3 K: ?- I* ^7 X5 N k) H0 l @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 3 @@@@@ @@@@@& Z Q. H4 \+ F' l
2 X8 i# V8 P3 j9 M8 R6 sRequest for flushing of punch buffer. |$PUNCH# t8 H5 J+ R, h9 d" X
$ V( A$ g1 E+ ?! [6 AA listing of 80-column card images now being flushed from punch buffer follows.
. ^) [) {7 y" x0 m+ a3 @% Q% m===============================================================================% r$ M5 ~8 C3 h2 e
1234567890123456789012345678901234567890123456789012345678901234567890123456789
' }+ q% t8 X1 t0 ?===============================================================================
' F2 f3 Q3 d6 I4 yC <++++++> Cards punched by support routine on 13-Apr-10 16:56:55 <++++++>
% _. C& g% Y1 r% a$ jC ***** UNTRANSPOSED JMARTI line segment ******/ R7 `- _% M+ B& O. z7 R
C JMARTI SETUP
3 K+ o8 g; b& }9 z' N0 iC $ERASE2 O2 G, K: x& Y- j/ }
C BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C. j% i8 M$ w) Y3 G7 B1 S* s
C LINE CONSTANTS
, }6 Z6 X4 V2 z! h, EC METRIC8 m5 L8 Z% z) U6 `# F
C 10.259 0.069 4 2.9 -19.5 25.1 10.1 60. 45.
3 d6 d( S9 \) m* L; z3 S% [2 }C 20.259 0.069 4 2.9 0.0 25.1 10.1 60. 45.! _& a- c% m5 e: ~& h, S
C 30.259 0.069 4 2.9 19.5 25.1 10.1 60. 45.
& S+ D( D! y0 k! Q. w5 gC 00.175 0.44 4 1.54 -15. 39.7 24.7 0.0 0.0
& r9 A- K- \- V9 s0 X4 f7 ?C 00.175 0.44 4 1.54 15. 39.7 24.7 0.0 0.0
2 R* P; L5 m" X; s, N1 v. c1 LC BLANK CARD ENDING CONDUCTOR CARDS9 N4 w' ~' L1 \+ P4 {, k
C 20. 1.E3 75.7 18 |1 k3 Y# K* [! ]7 U
C 20. 50. 75.7 1
' G; Z, G2 |# |3 u6 [( D( gC 20. 0.005 75.7 7 10 1' V& k& n, @9 H9 C4 d- P7 x
C BLANK CARD ENDING FREQUENCY CARDS- N, y+ F! m, Q* S9 S6 o; A
C BLANK CARD ENDING LINE CONSTANT+ g- y: l4 J5 V! i
C DEFAULT
- ^8 ^ g( w9 q& |! m& J& l1 P9 ?-1IN___AOUT__A 2. 0.00 -2 3
9 d- x A% ^/ F5 b% p% c 17 3.3876136028747050000E+02$ v" f4 W; J: G7 A0 U5 i0 r6 }$ f; L
1.56748087606698020E+02 1.53350246690381570E+02 5.91752415177784810E+01- Q% H: q; A$ _6 K
2.01342311994593360E+02 2.35228649588483170E+02 2.53692631526845670E+02. ?1 y1 O7 D( C4 e
1.66995629609519800E+02 3.13013616521086590E+02 7.77592731836887200E+02, J$ D. v: n# y, }: I. r
2.92709376085682020E+03 8.36186324719264120E+03 6.39337717296788010E+03 a1 ]( G3 |$ @# c0 K' x
1.11850636212671030E+04 4.41394197432314540E+04 3.57997951874029590E+05
( H( q) U( S& F* F" d+ x 7.56151786639699950E+05 1.36950810507648970E+06
b/ \! B) h3 W5 G9 W2 h 1.42216936124761770E-01 2.00869674971664410E-01 2.46548549642172290E-01/ X6 A) n0 ~9 ]% B/ m
4.83183838918269940E-01 8.90165197319727430E-01 1.60597725665316450E+001 F4 @2 r% O+ }* r9 f! d2 ~
2.89724575888037260E+00 5.22044042049842180E+00 1.93205621429485000E+01( Y& `6 }5 `' S% s9 _, W* l+ Y Y2 ]
6.43540045186946370E+01 1.19989060419415150E+02 2.38618178257245120E+02' v u9 M: {+ y
7.72151589982453290E+02 2.99346013405561330E+03 1.27367479883974610E+04
; a9 y6 | M q/ |" h 5.61967457160417400E+04 1.12259275941284690E+05
3 y% H K8 p- M* K, X7 U' C, s 18 2.5648081591925806000E-04' \% I. E/ t; H
4.39088902072225850E-02 2.51823882949434860E-01 2.09625388083036990E-019 v9 l6 m& U" O' t
3.78494708253580230E-01 4.21222198449916040E-01 1.12875930767027930E+00
: T6 x) L# d: g% T6 } 1.71876255372116240E+00 5.22622351239333400E+00 2.87507803450135600E+01
9 {; a [+ q3 I1 g2 ~ 3.11711415283725670E+02 -4.25029687238800080E+02 4.11909331052564360E+03
" b$ N8 y: @! C& W7 P 2.03169322161820860E+04 9.92298833352391920E+03 9.73079142175107300E+07
6 l. l8 X) i+ v* v9 Q -9.55146506480773540E+07 1.78452787243354890E+08 -1.80280334637975660E+08$ r- u3 s3 s+ b6 v4 V+ Q
1.71037480519741610E+01 8.83202394182148960E+01 9.05344339387639390E+01$ u+ Z: ]. U# R
1.45765976458050060E+02 1.67604264020870910E+02 4.33406916110919100E+02 C O. n& c$ { S$ I
6.63140374794807490E+02 1.92887674552758430E+03 1.33200718265846740E+03, }0 d0 ` Y: ]% V5 D
5.71524437659357950E+03 1.42342855758340520E+04 1.25142080353191360E+04
6 A6 b; H, P: t' }6 R c: E 3.62317843255328920E+04 5.63019677971675190E+04 2.08969723652870020E+05
3 w& \7 s# Q! a9 C) Y 2.09178693376523150E+05 1.79625128065165980E+05 1.79804753193231360E+05$ y4 a( r/ m2 f+ G8 M( Q2 I2 l
-2IN___BOUT__B 2. 0.00 -2 39 \3 }9 f2 C5 `" I2 `
16 2.7356159603025270000E+02
( ^( u9 o% _' N9 N' ]' F# Z( s) \ 3.69404660026332070E+02 -6.57736076515949720E+01 3.81922741682533400E+025 C. \: e( E/ _- c8 p
7.08453587370238780E+02 5.41167797769398360E+02 3.06226540265072910E+02. F" y/ A8 i" k9 h2 I2 l/ j
9.12429137114825860E+01 1.45546235045872410E+02 4.35671648435959070E+02
3 W8 C/ T8 X1 C 9.89457112977898990E+02 1.20421629942927280E+04 2.52441351892631970E+04
7 s6 i9 U: R# k" y1 T5 j 1.31721403134872210E+05 1.00702634087143390E+05 1.00067739988421900E+05
" z4 N9 V1 p4 j1 R 1.98945562771848960E+05
6 I2 v6 e- N- C9 a9 \$ F 1.48932587810283570E-01 1.91111259756068880E-01 5.23244958961560200E-01
0 j- w6 d: D% q 1.98685487501559810E+00 5.99260600202752600E+00 1.07800276387683840E+01
* j9 ?, O9 E4 ]+ r2 \7 E 1.40587613181405300E+01 2.26773470722948250E+01 3.15477144275676150E+02
5 b, T6 B5 t& \0 _3 f0 x2 R; ? 7.20661772011409880E+02 8.57135008822161760E+03 1.81290494844508870E+04
/ `, t& t7 }; L) S 9.82444873325722870E+04 6.84224792084696670E+04 7.51320465443383440E+04
/ S( x4 f4 b" w$ d: m7 Z8 G 1.48835602821329780E+05! i# x" {3 ~- J
8 2.5331274985951097000E-04
& d; I( d) @* t7 |' @( g8 w% S 9.77519359442743510E+00 9.06749971882869370E+01 3.89917698321721050E+024 v- P4 k/ C: i5 k7 W' C# q; _
2.14763901924745410E+03 3.21139859861504280E+03 7.78666160670429240E+03* L$ {9 R* n) `6 j6 B7 A& T
-4.35590044273043600E+04 1.46424632739437020E+05
: o( ~+ ?6 g# T( c% V: o 1.34347544158826870E+03 1.11481723747429880E+04 2.13548802821824830E+04
+ a* h# A, J) C 3.88406059295760640E+04 4.48673492254774170E+04 6.34696015771263410E+04
/ r9 R$ P7 b* u5 z7 N5 Y6 ] 5.71514355618160570E+05 1.84730022532517380E+05$ p( j* A3 M' \& k1 t
-3IN___COUT__C 2. 0.00 -2 3
; _" G! E2 }, Z' a 12 2.4217757892053910000E+02' n- k8 i4 ]( q4 U. `" @6 y
3.11081567238861170E+02 -2.67647353791795130E+01 3.71876217221247710E+02$ _( D+ W1 O4 K
7.07422509445779840E+02 7.84485674697519240E+02 5.15644097900284780E+01
1 ]3 s) j2 B& |, M) w" X) @0 H 8.62357151535732380E+01 1.33677642835807010E+02 1.31608612652184290E+02
0 F; { L/ p- D8 ], r M/ D' W& p H 1.14893287428216410E+02 9.93716544256342760E+01 5.59773592553784180E+04/ D3 _& K7 t0 s3 N! \
1.34344252475530860E-01 1.81414794097451400E-01 5.11374925899225950E-01: q1 v- k- L7 b8 b
2.04824350656590370E+00 7.03072667690498320E+00 1.02204034540275260E+01# R! }( ^* |$ J4 h
1.40807516766374870E+01 2.26422726843327060E+01 3.61527808309766810E+01/ Y' F+ u9 u; d, P5 l0 Z( }: ~
5.66127229741269180E+01 9.24983189391125220E+01 4.52655232370584050E+04
9 {: O9 r% U6 D% R5 \2 p* O 6 2.5172653258524589000E-04
( a& H7 `' I V9 ~! d 9.16195806109742070E+00 3.77612637640999710E+02 6.49218461519983410E+02
3 r4 n9 L- j( f; s. B+ A& o5 N/ c 2.16338680527304540E+03 -2.80386507590504550E+04 4.81761010930565240E+05
1 W' S7 A& ^/ S8 g# E! q1 h 1.48053740522388740E+03 4.65974978309593280E+04 5.01953038655574710E+04) @: w1 `! `+ V6 Z4 s
7.89025069563385330E+04 2.89584576325553890E+06 5.04629561166254750E+05+ {! U4 C% L |2 |% Z" D6 \% c
0.57481400 -0.70710678 -0.42812257. O8 ?8 D8 U5 ]0 m2 n
0.00000000 0.00000000 0.000000000 i; x- k- Q; V$ x4 i+ y7 P
0.58238966 0.00000000 0.79587821' d; e6 v1 Z5 ], d8 h' q* M
0.00000000 0.00000000 0.00000000
& `. E% X% x8 ?& B" P m1 Q: R 0.57481400 0.70710678 -0.428122572 K& q* b6 O3 I
0.00000000 0.00000000 0.000000001 d ]. O/ V |$ c$ u4 t
=========< End of LUNIT7 punched cards as flushed by $PUNCH request >=======. W s' ] o0 g& b. s) p; U
* K" p# o% F- R+ }. n4 YBlank card ending "JMARTI SETUP" data. |BLANK CARD ENDING JMARTI SETUP1 T2 [$ L5 Q/ U+ \- @
Total case timing (CP, I/O, tot), sec: 0.219 0.000 0.219
* u3 @& F2 o, X R L C参数是那些啊?麻烦您一下 |
|