|
|
楼主 |
发表于 2010-4-21 21:04:42
|
显示全部楼层
回复 4# 大笨蛋
& ^' W5 g$ R% q, L8 p/ |$ o- r" d0 J% n4 U
是不是从生成的lis文件中查找?
% `# g R& H1 r2 I# K1 @( Z- cAlternative Transients Program (ATP), GNU Linux or DOS. All rights reserved by Can/Am user group of Portland, Oregon, USA.) R6 |6 p' [! j2 ?2 z, V! W% K" B
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.pl49 r6 |$ ?5 p' C4 ?- [
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.0 J7 M; Y0 I, x4 E! }9 {* w
Total size of LABCOM tables = 9868232 INTEGER words. VARDIM List Sizes follow : 6002 10K 192K 900 420K 1200
+ o/ P& E j( g+ @0 i1 Z5 K" ]0 {" W, H 15K 120K 2250 3800 720 1200 72800 510 90K 800 90 254 120K 100K 3K 15K 192K 120 30K 160K 600 210K 300 60
0 ^' `4 d) a4 E4 |" O* Q--------------------------------------------------+--------------------------------------------------------------------------------
; {5 U0 R2 L+ N# g8 Q% w9 _Descriptive interpretation of input data cards. | Input data card images are shown below, all 80 columns, character by character$ [: X6 @1 q4 Q; A! C
0 1 2 3 4 5 6 7 8
1 f( ?3 m, c! d% b+ j: H% W) v 012345678901234567890123456789012345678901234567890123456789012345678901234567890 i1 i3 A7 I9 |% U
--------------------------------------------------+--------------------------------------------------------------------------------
6 k( `0 e$ E5 ]( pComment card. KOMPAR > 0. |C data:LIN750_4.ATP
1 P T3 s, I: I' @' qMarker card preceding new EMTP data case. |BEGIN NEW DATA CASE" Z" | t( e6 A8 P( p
Jose Marti`s line fitter. PDT0 = 0.00000000E+00 |JMARTI SETUP
1 I0 A% P$ W! c2 _ q' m) R ?Erase all of 0 cards in the punch buffer. |$ERASE: _$ I; m% Z$ A. c0 b3 m7 ^& L9 z
Pairs of A6 terminal node names for each phase. |BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C
( w. S* r" _9 o) D/ k. aCompute overhead line constants. Limit = 120 |LINE CONSTANTS
o i# ?7 R7 p, u( x( ARequest for metric (not English) units. |METRIC
5 \) `5 ^. @; q# {- A, `4 a4 ^" ~$ U" rLine conductor card. 2.590E-01 6.900E-02 4 | 10.259 0.069 4 2.9 -19.5 25.1 10.1 60. 45. 44 q1 C( y" V1 q# o8 ]
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. 46 \/ I8 s8 R4 k( R& \
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. 49 |% c( F5 i6 s, R0 ]
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 0
" Z1 ?% t2 _& T `5 u) ?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 0
; Q) E" n8 S8 ? g, {+ k( FBlank card terminating conductor cards. |BLANK CARD ENDING CONDUCTOR CARDS- d' n% K, y) P& X! f
Frequency card. 2.000E+01 1.000E+03 7.570E+01 | 20. 1.E3 75.7 1 Q( D8 l# w) E& w( N
$ k+ f# o( F, J( H3 h3 ELine conductor table after sorting and initial processing.) X% z. V$ ?* r4 N1 h% w5 K, k
Table Phase Skin effect Resistance Reactance data specification Diameter Horizontal Avg height" ~# W; a# \& q0 d
Row Number R-type R (ohm/km) X-type X(ohm/km) or GMR ( cm ) X (mtrs) Y (mtrs) Name
" [ o! l* Z. | s. y% A4 u 1 1 .25900 .06900 4 .000000 2.90000 -19.200 14.8009 \: p" y8 c; o8 ]
2 2 .25900 .06900 4 .000000 2.90000 0.300 14.800" q5 \" F. Z, i0 O! ?
3 3 .25900 .06900 4 .000000 2.90000 19.800 14.8006 e9 j! W6 Y2 s3 I2 z" R
4 1 .25900 .06900 4 .000000 2.90000 -19.800 14.800
& _8 F7 t8 k9 ?$ k 5 1 .25900 .06900 4 .000000 2.90000 -19.800 15.4002 t/ C7 D( t/ f4 ^
6 1 .25900 .06900 4 .000000 2.90000 -19.200 15.400
$ j- o$ i( G9 x4 U 7 2 .25900 .06900 4 .000000 2.90000 -0.300 14.800
$ u F, t! u7 g: a7 f 8 2 .25900 .06900 4 .000000 2.90000 -0.300 15.400' r. j- D7 _. B. I& X
9 2 .25900 .06900 4 .000000 2.90000 0.300 15.400
* U, T' R* w4 q7 `1 S 10 3 .25900 .06900 4 .000000 2.90000 19.200 14.800
4 p$ o& }# A2 l( ?$ S 11 3 .25900 .06900 4 .000000 2.90000 19.200 15.400) A3 F) Y2 }- g
12 3 .25900 .06900 4 .000000 2.90000 19.800 15.400
( h* B" \; l) \* X. a 13 0 .17500 .44000 4 .000000 1.54000 -15.000 29.700
( g6 i5 {" N! ?! k: ~ 14 0 .17500 .44000 4 .000000 1.54000 15.000 29.700) X& u# J; A7 P
/ g C6 t y: ]! |: AMatrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 1.00000000E+03 Hz. Correction factor =3 a6 L; A7 z6 w! `
1.00000000E-06% V7 S" ?9 M! \6 |3 k' i! m
: m+ p% W2 T: @/ ~% Z6 j- jModal parameters at frequency FREQ = 1.00000000E+03 Hz
+ g# K- L; C, R7 ~
; w, Z, g3 {2 \# A+ e0 UEigenvector matrix [Ti] for current transformation: I-phase = [Ti]*I-mode. First the real part, row by row:" n, T' K8 W# P4 p- z
5.748140047158274E-01-7.071067811865638E-01-4.281225696572995E-01
- k( n* Y# V8 @: V/ w 5.823896633398591E-01 1.700454252111332E-14 7.958782134849792E-01: A$ p' T; P7 J- s
5.748140047158198E-01 7.071067811865313E-01-4.281225696573222E-016 ~# T x" o% S1 d
Finally, the imaginary part, row by row:
! F6 O3 |7 q$ F' w" P 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00# I: D% W( G: O
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00# `) [" }2 S7 {% h/ L, ]% [
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+006 J6 r; C# o9 {7 a
Frequency card. 2.000E+01 5.000E+01 7.570E+01 | 20. 50. 75.7 17 b b( H, P# x
! n. T2 j" j' @4 A, q5 i9 @
Matrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 5.00000000E+01 Hz. Correction factor =8 |+ K' I6 B; I6 | K$ M0 v
1.00000000E-06
- B3 E- C; j1 j6 }3 W# u+ CFrequency card. 2.000E+01 5.000E-03 7.570E+01 | 20. 0.005 75.7 7 10 1( D6 O+ R6 l% Z! `: D/ D3 w* E4 ~ Q
Blank card terminating frequency cards. |BLANK CARD ENDING FREQUENCY CARDS
" W$ ?* F; l8 z4 s+ ]- ~( P3 SBlank card ending "LINE CONSTANTS" cases. |BLANK CARD ENDING LINE CONSTANT
N! L0 F* O% M8 uRequest for default fitting (= 3 blank cards) |DEFAULT
0 J( e' t2 M/ u6 U, s; k
: t0 V7 {" v9 U, i, b8 K% I===== ===== Begin Zc fitting for mode IMODE = 1 ===== =====% c; @% |+ \8 @2 n2 n% w. k
The number of poles NPOLES = 41 in this loop exceeds the specified limit NORMAX = 309 j' G+ z$ Z4 M6 y8 T4 y
) `- `* B' h( F, ~9 o+ r) S5 B* ]. E) f @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 1 @@@@@ @@@@@6 X2 \/ T6 s- G( K" h5 c9 n, I* ]4 o9 o
% a r5 ], N9 b2 s% i S7 V. K* n===== ===== Begin Zc fitting for mode IMODE = 2 ===== =====/ B% g3 D' _2 g; I# [9 }3 ?( X
The number of poles NPOLES = 34 in this loop exceeds the specified limit NORMAX = 30
& Y3 A( P7 u1 Z. _: K " F' }7 D8 A m# q+ z
@@@@@ @@@@@ Begin A1 fitting for mode IMODE = 2 @@@@@ @@@@@4 a6 l4 n% D- l! f: H
. ^' `; `2 ]& y+ g# ^: b( n* W===== ===== Begin Zc fitting for mode IMODE = 3 ===== =====( f% k- ^' G" v6 W5 P; X! \
The number of poles NPOLES = 31 in this loop exceeds the specified limit NORMAX = 30
0 {, B# y1 Z/ Z& M
* t. d- e! _3 ^1 V/ D @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 3 @@@@@ @@@@@0 [+ J6 G: r; m: O0 O# \
/ ?/ |% ~7 ?2 k; ]; z( ~% LRequest for flushing of punch buffer. |$PUNCH
" K1 d# e! |. U2 }# M
0 R; `: l, U: N) Y5 mA listing of 80-column card images now being flushed from punch buffer follows.9 \$ q) B8 [6 }4 u& R
===============================================================================
2 b( G! U# U2 g M, z9 \; f12345678901234567890123456789012345678901234567890123456789012345678901234567895 ~ x" F$ B. s" t; C0 Z/ \2 x5 [8 i
===============================================================================
' y% B7 \) g0 G4 l; S0 ~C <++++++> Cards punched by support routine on 13-Apr-10 16:56:55 <++++++># F, Z. Q* M2 Y7 p- @) |
C ***** UNTRANSPOSED JMARTI line segment ******% C: ?/ B3 n F: q' b* B% s/ K
C JMARTI SETUP
" v9 D3 ~9 s( D! T( H0 o6 [C $ERASE
- v' O2 h3 r: ?4 t P$ H+ WC BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C
8 I8 N; W8 `0 g8 bC LINE CONSTANTS
* ?( A7 f$ a4 _2 p% vC METRIC
( U/ ?6 V- `, p7 K! CC 10.259 0.069 4 2.9 -19.5 25.1 10.1 60. 45.
! O! i+ D+ E7 h4 t. ~7 qC 20.259 0.069 4 2.9 0.0 25.1 10.1 60. 45.% j+ ?. M# Z( P! ~5 E' V& Y7 u
C 30.259 0.069 4 2.9 19.5 25.1 10.1 60. 45.9 `# z7 u5 ]% J* D3 G
C 00.175 0.44 4 1.54 -15. 39.7 24.7 0.0 0.0
( q* }$ v( z C" WC 00.175 0.44 4 1.54 15. 39.7 24.7 0.0 0.0
; e3 h$ i: O+ RC BLANK CARD ENDING CONDUCTOR CARDS! V" r7 @, c- c% w' k
C 20. 1.E3 75.7 1
1 o6 k; s' h; _( HC 20. 50. 75.7 1$ s- D* z2 }5 U- g i( C
C 20. 0.005 75.7 7 10 1
) |" H( h2 g5 w! u. R% j+ mC BLANK CARD ENDING FREQUENCY CARDS
! J" L* Q6 @. r: t7 E ?( ZC BLANK CARD ENDING LINE CONSTANT
- N4 p- D# ]' x; O- l: OC DEFAULT) L3 G# q4 F# n: `# M( N/ H
-1IN___AOUT__A 2. 0.00 -2 3, Z" j7 \- A0 @8 A1 y$ e
17 3.3876136028747050000E+02
- w0 Y1 _- F, U! d8 o9 ]( n 1.56748087606698020E+02 1.53350246690381570E+02 5.91752415177784810E+01
# C+ j; {; t: T 2.01342311994593360E+02 2.35228649588483170E+02 2.53692631526845670E+029 i" t! A% u7 u0 v7 S+ y- q
1.66995629609519800E+02 3.13013616521086590E+02 7.77592731836887200E+02. P" {& K" ~' j8 t
2.92709376085682020E+03 8.36186324719264120E+03 6.39337717296788010E+03
% d; g: b! u( I7 g* x 1.11850636212671030E+04 4.41394197432314540E+04 3.57997951874029590E+05
1 K5 {' `( F& `; O/ J8 v, W6 a 7.56151786639699950E+05 1.36950810507648970E+06
& m3 Z! T* |( ~" V8 @ 1.42216936124761770E-01 2.00869674971664410E-01 2.46548549642172290E-01
# r6 Y, S- E5 U. j7 G$ _0 G 4.83183838918269940E-01 8.90165197319727430E-01 1.60597725665316450E+00+ f# t. `" D; J. j
2.89724575888037260E+00 5.22044042049842180E+00 1.93205621429485000E+01; x0 f% H# x/ X0 N! @& a
6.43540045186946370E+01 1.19989060419415150E+02 2.38618178257245120E+024 q. e8 w% W v4 r5 ^9 V2 r6 }) l
7.72151589982453290E+02 2.99346013405561330E+03 1.27367479883974610E+04
, r, R% u3 x2 h7 i4 I 5.61967457160417400E+04 1.12259275941284690E+05
+ y3 B1 ]$ O5 r ~; o4 Q( T& H4 \ 18 2.5648081591925806000E-04 {4 Q7 F* l" r: J) B8 n
4.39088902072225850E-02 2.51823882949434860E-01 2.09625388083036990E-01
* e' W2 a4 a' q0 [; Z) n7 z% l- ] 3.78494708253580230E-01 4.21222198449916040E-01 1.12875930767027930E+00. k/ w4 o' E# u$ Q2 q$ u
1.71876255372116240E+00 5.22622351239333400E+00 2.87507803450135600E+016 l& E$ g4 X8 f( @, W6 _ J3 ^
3.11711415283725670E+02 -4.25029687238800080E+02 4.11909331052564360E+03- q) x% o" \/ u2 T- C. g1 Y4 D( K
2.03169322161820860E+04 9.92298833352391920E+03 9.73079142175107300E+07- I5 l! A( g# z6 @) l# f
-9.55146506480773540E+07 1.78452787243354890E+08 -1.80280334637975660E+08. s+ Y$ D7 a1 B: N/ j5 M0 M
1.71037480519741610E+01 8.83202394182148960E+01 9.05344339387639390E+01% p1 n0 W) L$ h, B% \
1.45765976458050060E+02 1.67604264020870910E+02 4.33406916110919100E+026 H( c$ A) s1 V2 y6 h+ T6 `
6.63140374794807490E+02 1.92887674552758430E+03 1.33200718265846740E+03$ Y- \9 g6 X1 @
5.71524437659357950E+03 1.42342855758340520E+04 1.25142080353191360E+048 \* x& v5 t4 ^! B! q6 _4 l
3.62317843255328920E+04 5.63019677971675190E+04 2.08969723652870020E+05
1 Y0 k G) b0 L5 q; ^: c* Z- A 2.09178693376523150E+05 1.79625128065165980E+05 1.79804753193231360E+05* ^" n9 h3 M" Y; Q
-2IN___BOUT__B 2. 0.00 -2 3& I) A9 F0 ~- ]/ X% ^6 P- ]1 C
16 2.7356159603025270000E+02
' x" O! Q) O& S6 ]0 x+ a 3.69404660026332070E+02 -6.57736076515949720E+01 3.81922741682533400E+024 u2 k& V6 [/ X2 Q
7.08453587370238780E+02 5.41167797769398360E+02 3.06226540265072910E+02+ q9 B; U# Q8 R1 [% _6 Q$ V
9.12429137114825860E+01 1.45546235045872410E+02 4.35671648435959070E+020 t% e! I) P, t# N% J' V% M, s
9.89457112977898990E+02 1.20421629942927280E+04 2.52441351892631970E+04
! J+ F' V7 `7 b* j: f; a4 N 1.31721403134872210E+05 1.00702634087143390E+05 1.00067739988421900E+05
2 R7 Q. o2 ?( U% j1 d 1.98945562771848960E+05* _" G1 ^ ^+ V' j. J. Y
1.48932587810283570E-01 1.91111259756068880E-01 5.23244958961560200E-018 s& v1 Y# @4 {' i
1.98685487501559810E+00 5.99260600202752600E+00 1.07800276387683840E+013 h3 @4 D9 @2 J' b
1.40587613181405300E+01 2.26773470722948250E+01 3.15477144275676150E+02
5 y9 s) ` g G- O$ i; l 7.20661772011409880E+02 8.57135008822161760E+03 1.81290494844508870E+04
* z5 O1 t) |& @9 k7 L 9.82444873325722870E+04 6.84224792084696670E+04 7.51320465443383440E+04
, P& W1 u7 N: {: j* C9 Y 1.48835602821329780E+05; F. B) {) r- i3 X% [6 I3 B
8 2.5331274985951097000E-04* E4 E# K; N* h, ~+ Y+ L/ M
9.77519359442743510E+00 9.06749971882869370E+01 3.89917698321721050E+021 u7 t' a+ c9 O! T' X% l
2.14763901924745410E+03 3.21139859861504280E+03 7.78666160670429240E+03
8 F6 B A) M5 B -4.35590044273043600E+04 1.46424632739437020E+05* M4 E8 H* ?: X' T( i' k
1.34347544158826870E+03 1.11481723747429880E+04 2.13548802821824830E+04
+ w3 ]: {7 U% P+ M: P9 v 3.88406059295760640E+04 4.48673492254774170E+04 6.34696015771263410E+04
) i" t+ L# [0 h/ T' B9 T 5.71514355618160570E+05 1.84730022532517380E+05
0 }0 f/ @* r5 P-3IN___COUT__C 2. 0.00 -2 3% \3 O$ C) M$ P* U3 M! A F
12 2.4217757892053910000E+02
% A& e& T0 U! b" F/ p8 q 3.11081567238861170E+02 -2.67647353791795130E+01 3.71876217221247710E+020 A& K5 f8 {- w6 m( g
7.07422509445779840E+02 7.84485674697519240E+02 5.15644097900284780E+014 v& _% k8 d! j S
8.62357151535732380E+01 1.33677642835807010E+02 1.31608612652184290E+028 ?( m) _3 ?% P' f1 s
1.14893287428216410E+02 9.93716544256342760E+01 5.59773592553784180E+04; X( e J* p+ @: A
1.34344252475530860E-01 1.81414794097451400E-01 5.11374925899225950E-01
, }9 x5 M5 z- ^ a9 P 2.04824350656590370E+00 7.03072667690498320E+00 1.02204034540275260E+01
[0 ?! k ^9 D; @ 1.40807516766374870E+01 2.26422726843327060E+01 3.61527808309766810E+013 I9 t. X4 j! m8 |" Y" p
5.66127229741269180E+01 9.24983189391125220E+01 4.52655232370584050E+04
7 [5 ^, Y( }9 c) w 6 2.5172653258524589000E-04
$ W' o9 w3 m# l; R6 F 9.16195806109742070E+00 3.77612637640999710E+02 6.49218461519983410E+02
" M) t- V- y4 A: f3 M6 ^) V0 B3 P 2.16338680527304540E+03 -2.80386507590504550E+04 4.81761010930565240E+05
* j% {: @ B4 P. ^- N 1.48053740522388740E+03 4.65974978309593280E+04 5.01953038655574710E+04
8 F/ p# c G! w% s' ]; D1 q. \ 7.89025069563385330E+04 2.89584576325553890E+06 5.04629561166254750E+05
% n1 `/ t0 V+ H 0.57481400 -0.70710678 -0.42812257# D# f- K, Y2 j! ?
0.00000000 0.00000000 0.00000000
# I! l/ E: F/ \, K 0.58238966 0.00000000 0.795878219 g3 }& A0 p% V) E- k: ^
0.00000000 0.00000000 0.00000000
5 w" w; S) w7 u* {: [ 0.57481400 0.70710678 -0.42812257
) i, i' m4 r2 {& z& T" P7 b7 ? 0.00000000 0.00000000 0.00000000" u! B% K3 }( G j, Q! o( r4 I& ]
=========< End of LUNIT7 punched cards as flushed by $PUNCH request >=======8 m/ E. n) `: u% d% ^$ P' G: l! K
* O5 d* x4 E b: N8 `) X
Blank card ending "JMARTI SETUP" data. |BLANK CARD ENDING JMARTI SETUP
9 y$ Q: Z6 z6 n! r/ b# [- f& U& E" U/ @( ITotal case timing (CP, I/O, tot), sec: 0.219 0.000 0.219' R8 ]( ?+ a( ^! U5 F
R L C参数是那些啊?麻烦您一下 |
|