|
|
楼主 |
发表于 2010-4-21 21:04:42
|
显示全部楼层
回复 4# 大笨蛋 & M7 i$ ` B/ j8 l# O
: c% f5 S$ E) h, H m! R, [# J4 F是不是从生成的lis文件中查找?, O/ U2 k [* I; Q r
Alternative Transients Program (ATP), GNU Linux or DOS. All rights reserved by Can/Am user group of Portland, Oregon, USA.
- g# f* R% f+ D- b1 } 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
/ k6 a% a& X7 y) D8 `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., P8 \5 m+ Y* y; N* f9 v
Total size of LABCOM tables = 9868232 INTEGER words. VARDIM List Sizes follow : 6002 10K 192K 900 420K 1200
r' F$ ]# e' ?- q# ?" k# ~ 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 f4 B- m7 h! d, \, K5 ^--------------------------------------------------+--------------------------------------------------------------------------------
4 h3 t9 w& [3 w. a. xDescriptive interpretation of input data cards. | Input data card images are shown below, all 80 columns, character by character
h7 i; {) c6 {& Y5 C 0 1 2 3 4 5 6 7 8
; L6 T0 @) J' o 012345678901234567890123456789012345678901234567890123456789012345678901234567890% a# J ]* v- N _ f6 K4 x
--------------------------------------------------+--------------------------------------------------------------------------------; |1 B, n. f+ O' [
Comment card. KOMPAR > 0. |C data:LIN750_4.ATP
. D: n1 g# N9 @) L; O4 AMarker card preceding new EMTP data case. |BEGIN NEW DATA CASE
; G! @* }1 ~, S" R9 \: bJose Marti`s line fitter. PDT0 = 0.00000000E+00 |JMARTI SETUP
4 C) v: o; Q# kErase all of 0 cards in the punch buffer. |$ERASE5 ?. X" G/ q ^% {5 J6 q1 I
Pairs of A6 terminal node names for each phase. |BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C
9 l- {$ r- |3 s0 d5 ICompute overhead line constants. Limit = 120 |LINE CONSTANTS
8 H2 P0 y4 q z2 y. E U( ^: ^Request for metric (not English) units. |METRIC
8 d& d( p( D+ H7 }5 ^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
$ k+ I5 Z# m6 V( r# ~8 @5 L! d: ~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. 4. M: l* N0 w/ f8 `- k$ R7 `
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
" k, _) P9 S8 D+ a# Z* ALine 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: @( e, j. p* r$ m) M; x7 ~
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 L* ^+ |) }- s7 v( e
Blank card terminating conductor cards. |BLANK CARD ENDING CONDUCTOR CARDS
0 Q% k- C4 f0 b& N$ r4 W" KFrequency card. 2.000E+01 1.000E+03 7.570E+01 | 20. 1.E3 75.7 1
) a% t2 k4 X; d
7 y$ d8 n+ R2 P! c" eLine conductor table after sorting and initial processing.+ g: g4 p! w1 E# t a' Q2 A
Table Phase Skin effect Resistance Reactance data specification Diameter Horizontal Avg height
8 J( b1 i6 p2 l) q9 E& j Row Number R-type R (ohm/km) X-type X(ohm/km) or GMR ( cm ) X (mtrs) Y (mtrs) Name
1 `& B( t% `3 O9 | 1 1 .25900 .06900 4 .000000 2.90000 -19.200 14.800# E9 M" u" g Z: q$ Q9 f
2 2 .25900 .06900 4 .000000 2.90000 0.300 14.800
! P9 a1 [- ~/ P1 _2 ^# |: r 3 3 .25900 .06900 4 .000000 2.90000 19.800 14.800
- @0 }- o5 s- @/ Y6 M$ \ 4 1 .25900 .06900 4 .000000 2.90000 -19.800 14.800
" Q6 {. w, Y2 K& D- E2 t 5 1 .25900 .06900 4 .000000 2.90000 -19.800 15.400. @# U5 t$ q" s$ g
6 1 .25900 .06900 4 .000000 2.90000 -19.200 15.400
/ S" ]2 r! e& P' x. z6 a+ o 7 2 .25900 .06900 4 .000000 2.90000 -0.300 14.8001 X4 x% v9 u6 M1 r4 }) M- `# K
8 2 .25900 .06900 4 .000000 2.90000 -0.300 15.400
. p8 k* u% ~! z$ d/ F 9 2 .25900 .06900 4 .000000 2.90000 0.300 15.400( Z: r# A! r) u( I' A
10 3 .25900 .06900 4 .000000 2.90000 19.200 14.800, R. e) S0 e! |1 n
11 3 .25900 .06900 4 .000000 2.90000 19.200 15.400
' H# ^5 \( F+ k6 D 12 3 .25900 .06900 4 .000000 2.90000 19.800 15.4005 Z/ d7 c% d$ U3 V2 w
13 0 .17500 .44000 4 .000000 1.54000 -15.000 29.7005 p' t1 ?2 i+ @( d: A# F
14 0 .17500 .44000 4 .000000 1.54000 15.000 29.700! X, p s5 R) |& k
7 A! w* F4 n7 b2 vMatrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 1.00000000E+03 Hz. Correction factor =
: v' R$ S* }& L% c, n. s2 C1.00000000E-06
# |* C0 _: d4 i' ~* u0 H& N: \ : j% T7 r9 ?8 C* L; J3 @' d3 i% L
Modal parameters at frequency FREQ = 1.00000000E+03 Hz+ B. }: P) Q2 Y( U
$ m) e1 P" k. o! i. V$ e; k) k
Eigenvector matrix [Ti] for current transformation: I-phase = [Ti]*I-mode. First the real part, row by row:
3 K' w4 C. y7 |& O L 5.748140047158274E-01-7.071067811865638E-01-4.281225696572995E-017 S% g; n8 I: z9 L6 D& _1 {' I
5.823896633398591E-01 1.700454252111332E-14 7.958782134849792E-01
& b% g- [! b/ {' p 5.748140047158198E-01 7.071067811865313E-01-4.281225696573222E-01# i$ u Q; F9 `' V- [
Finally, the imaginary part, row by row:
' H. f% P" ~/ S1 d 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
2 X) h$ A9 Q* ^7 V 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00+ h4 |1 f3 g+ X. ?" [3 i$ a
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00% a0 G, A1 m& U' p# J
Frequency card. 2.000E+01 5.000E+01 7.570E+01 | 20. 50. 75.7 1
7 \0 m6 u8 B: T3 L
6 s' n6 \7 ]" b' @/ f" R3 r+ YMatrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 5.00000000E+01 Hz. Correction factor =# x: s; ^% H2 H- }- U/ b) ?
1.00000000E-06% x1 O$ p0 F7 F8 E, F
Frequency card. 2.000E+01 5.000E-03 7.570E+01 | 20. 0.005 75.7 7 10 1
0 i/ {" X$ \1 b' T! \& ABlank card terminating frequency cards. |BLANK CARD ENDING FREQUENCY CARDS
. [' P6 g6 O% ^- JBlank card ending "LINE CONSTANTS" cases. |BLANK CARD ENDING LINE CONSTANT
t: X/ W( _7 Q9 M+ A# d" MRequest for default fitting (= 3 blank cards) |DEFAULT# t$ i o5 B( |7 E) h7 G, `0 N/ f
2 e* z8 V& C" T===== ===== Begin Zc fitting for mode IMODE = 1 ===== =====
% z' o- s) d3 R9 K) f. MThe number of poles NPOLES = 41 in this loop exceeds the specified limit NORMAX = 30: W6 d9 @/ ?' m( G7 L4 R
H9 M0 H5 O3 `0 Y. z
@@@@@ @@@@@ Begin A1 fitting for mode IMODE = 1 @@@@@ @@@@@6 ]+ S# s- D& o! @8 X E8 w; @% u
; h/ H4 y5 k% G3 {9 D- \3 D
===== ===== Begin Zc fitting for mode IMODE = 2 ===== =====
$ z& n6 } [1 H4 i- J/ R. WThe number of poles NPOLES = 34 in this loop exceeds the specified limit NORMAX = 309 T9 a4 e/ u, M4 i# f
5 K9 d- r! B* S% K8 X7 C( ` @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 2 @@@@@ @@@@@
4 Z3 g4 A1 f! l0 Y% w# f. Q$ [
' W1 V/ x3 {6 |# K9 e2 c===== ===== Begin Zc fitting for mode IMODE = 3 ===== =====) l9 l ]& } ?; a2 @: V
The number of poles NPOLES = 31 in this loop exceeds the specified limit NORMAX = 30
! G3 l! r/ ]* _/ ~/ n4 {/ _ 2 ], D( Z N" ?! [. G
@@@@@ @@@@@ Begin A1 fitting for mode IMODE = 3 @@@@@ @@@@@4 B9 E4 x# y3 _0 g/ {) H- k9 N. E
3 P N( J8 ^+ t/ m* O1 SRequest for flushing of punch buffer. |$PUNCH% s* G$ r6 ?6 G% s- c* E# p( Y
2 X8 }; Z* ]0 {( p4 [A listing of 80-column card images now being flushed from punch buffer follows.
p. n1 ]" T, Q+ `! L0 d- w7 S===============================================================================4 Y8 {2 |' }9 K. y
1234567890123456789012345678901234567890123456789012345678901234567890123456789
: r4 ?/ v X; `! ?+ u* w===============================================================================" T9 n4 E, ~6 m) U' {4 n# c* e
C <++++++> Cards punched by support routine on 13-Apr-10 16:56:55 <++++++>; P l+ d1 s# L
C ***** UNTRANSPOSED JMARTI line segment ******
; [* J8 {" K, \7 V: aC JMARTI SETUP( Z8 R8 o- e3 ~4 Z0 R0 p
C $ERASE5 e3 {" D- `* g2 X8 ~5 P0 d2 h
C BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C
3 a( e( i* I+ y. L" b# R* X% |C LINE CONSTANTS
9 @1 K' J$ d& ?' Q7 O5 LC METRIC) W+ s2 u$ Z& b! Q: q: K
C 10.259 0.069 4 2.9 -19.5 25.1 10.1 60. 45.2 z+ q$ z/ {9 p6 Y0 T4 O! n9 b# `5 B- o
C 20.259 0.069 4 2.9 0.0 25.1 10.1 60. 45.
( B8 u6 a+ X0 V% yC 30.259 0.069 4 2.9 19.5 25.1 10.1 60. 45.
- d" O+ E. _0 IC 00.175 0.44 4 1.54 -15. 39.7 24.7 0.0 0.0& Y) R F, `: k+ s+ ~* P
C 00.175 0.44 4 1.54 15. 39.7 24.7 0.0 0.0
5 M$ \+ F. E" |% Q# pC BLANK CARD ENDING CONDUCTOR CARDS" F4 s5 T3 y6 R4 h$ J5 G
C 20. 1.E3 75.7 1
) H7 I5 ~1 A7 Y8 m: {9 ]( i$ p, a& VC 20. 50. 75.7 1
" F! p* r. L0 |7 `+ X1 B3 J, L0 UC 20. 0.005 75.7 7 10 1! q7 W+ T+ N; X6 V( I3 q
C BLANK CARD ENDING FREQUENCY CARDS
( A) s* P Q6 r5 [1 f( Z) nC BLANK CARD ENDING LINE CONSTANT
; u* _" u7 H5 x, E) S! _C DEFAULT. v9 [9 W; Q$ {3 M' W
-1IN___AOUT__A 2. 0.00 -2 3' F/ H7 }6 B8 E8 {7 I
17 3.3876136028747050000E+02
' J, I& k9 P0 W6 j* a) { 1.56748087606698020E+02 1.53350246690381570E+02 5.91752415177784810E+01
: ^( _& [5 S! p$ Z l5 u+ U 2.01342311994593360E+02 2.35228649588483170E+02 2.53692631526845670E+02
3 {9 _! l! w P1 H/ K; s& f6 K 1.66995629609519800E+02 3.13013616521086590E+02 7.77592731836887200E+024 u# C. }, O7 U1 w
2.92709376085682020E+03 8.36186324719264120E+03 6.39337717296788010E+03. h* h$ h* H2 C# u2 [9 ^
1.11850636212671030E+04 4.41394197432314540E+04 3.57997951874029590E+05
" b, f# E" @. J7 S 7.56151786639699950E+05 1.36950810507648970E+06
- N/ c$ H; g! ~6 K, Q1 i 1.42216936124761770E-01 2.00869674971664410E-01 2.46548549642172290E-01
3 \& N7 |4 ~! r; x( H; W 4.83183838918269940E-01 8.90165197319727430E-01 1.60597725665316450E+002 C, n( J% S$ r* B6 Y: i
2.89724575888037260E+00 5.22044042049842180E+00 1.93205621429485000E+01
k% r- I% |$ i& }, `1 b- | 6.43540045186946370E+01 1.19989060419415150E+02 2.38618178257245120E+02# P( J9 w, m* J0 A) t
7.72151589982453290E+02 2.99346013405561330E+03 1.27367479883974610E+04
: ]. ]8 N, P- \. F3 F3 { 5.61967457160417400E+04 1.12259275941284690E+05
& l4 G& p9 q1 r; X( o# L+ S 18 2.5648081591925806000E-049 O; `! [ i: u2 k( |
4.39088902072225850E-02 2.51823882949434860E-01 2.09625388083036990E-01- |( M$ h" O8 \3 z
3.78494708253580230E-01 4.21222198449916040E-01 1.12875930767027930E+00/ P ^( F) ]0 h, ?: c6 f: O: j9 W" j
1.71876255372116240E+00 5.22622351239333400E+00 2.87507803450135600E+01
. @' J' p( T1 `" a) ? 3.11711415283725670E+02 -4.25029687238800080E+02 4.11909331052564360E+03
: M6 [/ x7 D) \! b' q 2.03169322161820860E+04 9.92298833352391920E+03 9.73079142175107300E+07
7 e' `1 _+ E; d1 } -9.55146506480773540E+07 1.78452787243354890E+08 -1.80280334637975660E+08. h$ }; K/ o9 Y! g4 f$ d X/ S
1.71037480519741610E+01 8.83202394182148960E+01 9.05344339387639390E+01
* \3 M+ o2 d! w& p- y/ b3 b 1.45765976458050060E+02 1.67604264020870910E+02 4.33406916110919100E+02# d5 z7 ]3 \, K4 `; X4 m9 @
6.63140374794807490E+02 1.92887674552758430E+03 1.33200718265846740E+03
+ W/ U! `( y! X8 F$ a: ` 5.71524437659357950E+03 1.42342855758340520E+04 1.25142080353191360E+04
# v- c7 [* M1 {0 J) s& B0 F+ y, t% ]$ S 3.62317843255328920E+04 5.63019677971675190E+04 2.08969723652870020E+05' y; h$ C+ d0 t& ` U6 r! `: M
2.09178693376523150E+05 1.79625128065165980E+05 1.79804753193231360E+05- B& I9 k5 M2 S
-2IN___BOUT__B 2. 0.00 -2 3
" I: G3 F) @9 ` 16 2.7356159603025270000E+02
- x7 `8 S( g% X 3.69404660026332070E+02 -6.57736076515949720E+01 3.81922741682533400E+02/ v0 S/ i% H; F
7.08453587370238780E+02 5.41167797769398360E+02 3.06226540265072910E+021 K5 \# }/ ^$ u9 s2 c
9.12429137114825860E+01 1.45546235045872410E+02 4.35671648435959070E+02
f0 o4 x U, ~8 {- f+ t 9.89457112977898990E+02 1.20421629942927280E+04 2.52441351892631970E+048 R& q. w' q+ G1 b% w3 k
1.31721403134872210E+05 1.00702634087143390E+05 1.00067739988421900E+05
2 s6 o) k2 v/ m 1.98945562771848960E+05
9 ]* e! v, X' Q& K, C3 y 1.48932587810283570E-01 1.91111259756068880E-01 5.23244958961560200E-015 h" g. h8 Y) }# z! m4 O" `
1.98685487501559810E+00 5.99260600202752600E+00 1.07800276387683840E+01
/ I: F7 o( y( q1 W# c 1.40587613181405300E+01 2.26773470722948250E+01 3.15477144275676150E+02
( m- R6 \8 V# b3 P" V- H 7.20661772011409880E+02 8.57135008822161760E+03 1.81290494844508870E+04
! z8 W$ v) W3 A$ k% F6 F/ B 9.82444873325722870E+04 6.84224792084696670E+04 7.51320465443383440E+04 c V. M) t0 N: q
1.48835602821329780E+05
$ u* `/ @% P2 F; H, E7 U N+ Q1 W5 \ 8 2.5331274985951097000E-04
- j; o1 X3 T% | 9.77519359442743510E+00 9.06749971882869370E+01 3.89917698321721050E+02
# k7 i* h* {8 V 2.14763901924745410E+03 3.21139859861504280E+03 7.78666160670429240E+03
# m" J, Y/ P) C1 y% d- y' w -4.35590044273043600E+04 1.46424632739437020E+05 A$ c# ^" k* v1 S
1.34347544158826870E+03 1.11481723747429880E+04 2.13548802821824830E+04& K8 _7 W; g% ]
3.88406059295760640E+04 4.48673492254774170E+04 6.34696015771263410E+04% y& m5 X4 A' s, J) I+ u
5.71514355618160570E+05 1.84730022532517380E+05& d$ L5 g; s8 z
-3IN___COUT__C 2. 0.00 -2 3
% ]/ @" @! S8 e, T8 g, Q4 I ?, ] 12 2.4217757892053910000E+02
9 f/ t: K' T, U) B 3.11081567238861170E+02 -2.67647353791795130E+01 3.71876217221247710E+02
$ k0 g9 I G$ r1 v 7.07422509445779840E+02 7.84485674697519240E+02 5.15644097900284780E+01
5 r9 \2 Z O) p1 @ 8.62357151535732380E+01 1.33677642835807010E+02 1.31608612652184290E+025 ] l, v" Q. {0 A
1.14893287428216410E+02 9.93716544256342760E+01 5.59773592553784180E+04
( s) x3 @6 y' X! t 1.34344252475530860E-01 1.81414794097451400E-01 5.11374925899225950E-014 v. t+ _" B4 A
2.04824350656590370E+00 7.03072667690498320E+00 1.02204034540275260E+01
, g/ Y: y( a6 u x" @7 V( ^ 1.40807516766374870E+01 2.26422726843327060E+01 3.61527808309766810E+01
$ a+ K9 W4 P" c0 ~7 k& d6 e0 ~ 5.66127229741269180E+01 9.24983189391125220E+01 4.52655232370584050E+04
0 ?1 N) L4 f) e3 r6 e 6 2.5172653258524589000E-04' F; G* a) E" M9 D9 u
9.16195806109742070E+00 3.77612637640999710E+02 6.49218461519983410E+02/ b6 P$ n2 U! p" c! N% u
2.16338680527304540E+03 -2.80386507590504550E+04 4.81761010930565240E+05
+ d3 y8 x1 B$ h 1.48053740522388740E+03 4.65974978309593280E+04 5.01953038655574710E+04% e. e' b: _/ l' I9 ?, j
7.89025069563385330E+04 2.89584576325553890E+06 5.04629561166254750E+05
+ D# ]. N E' D& g% k5 ~3 R 0.57481400 -0.70710678 -0.42812257: @6 c! N; k9 g! i( v9 B* E- D! q, a
0.00000000 0.00000000 0.00000000. _' H% I }: b9 U- i" N- z8 y- A( E
0.58238966 0.00000000 0.79587821
$ F0 L+ `3 p6 G+ x9 k0 b0 d 0.00000000 0.00000000 0.000000000 c7 ^; W: m& s5 i' A. E4 u
0.57481400 0.70710678 -0.42812257
/ S1 u: H" w) J 0.00000000 0.00000000 0.00000000/ ~4 Z" q' H4 R; J8 j
=========< End of LUNIT7 punched cards as flushed by $PUNCH request >=======8 M8 R8 u% k+ }
, b) I& ?2 O; M) F. l
Blank card ending "JMARTI SETUP" data. |BLANK CARD ENDING JMARTI SETUP7 U( R" ~. O+ |, D. ?7 B
Total case timing (CP, I/O, tot), sec: 0.219 0.000 0.2191 v* a, T6 [3 U6 a" _0 n
R L C参数是那些啊?麻烦您一下 |
|