|
|
楼主 |
发表于 2010-4-21 21:04:42
|
显示全部楼层
回复 4# 大笨蛋
- X( S _" H" x# B, a) E# H3 S& m3 u
是不是从生成的lis文件中查找?8 n! z1 X0 L+ |3 P `
Alternative Transients Program (ATP), GNU Linux or DOS. All rights reserved by Can/Am user group of Portland, Oregon, USA.7 C* b) F5 y" w* L* _
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
4 ~3 f+ ~; }7 `) I. e/ B7 ?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.
2 `5 [. v) U1 X6 [Total size of LABCOM tables = 9868232 INTEGER words. VARDIM List Sizes follow : 6002 10K 192K 900 420K 1200
3 w) i7 B; G. A+ X5 L' m 15K 120K 2250 3800 720 1200 72800 510 90K 800 90 254 120K 100K 3K 15K 192K 120 30K 160K 600 210K 300 60
, Y5 O4 |* I6 m3 b4 I$ _# U--------------------------------------------------+--------------------------------------------------------------------------------9 S/ j8 H, ` h' q- N- d! T
Descriptive interpretation of input data cards. | Input data card images are shown below, all 80 columns, character by character
9 L- O! ]2 D: b; |) e 0 1 2 3 4 5 6 7 8
/ ], \; {: C, N' e$ d/ R4 N 012345678901234567890123456789012345678901234567890123456789012345678901234567890- o/ F% ~' h7 | F
--------------------------------------------------+--------------------------------------------------------------------------------, U0 }0 \4 S8 [) ]: `) u
Comment card. KOMPAR > 0. |C data:LIN750_4.ATP" G% z0 E7 @% Z! I( Z+ H. D0 L
Marker card preceding new EMTP data case. |BEGIN NEW DATA CASE
4 s e8 a6 B# z+ L: L/ ^Jose Marti`s line fitter. PDT0 = 0.00000000E+00 |JMARTI SETUP* u$ M1 Z5 L* g
Erase all of 0 cards in the punch buffer. |$ERASE) ^: j# d" K2 p' h/ U& o
Pairs of A6 terminal node names for each phase. |BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C
! s, o, C4 r( X! ?# E- n. v: |Compute overhead line constants. Limit = 120 |LINE CONSTANTS
" s; g' t+ t1 HRequest for metric (not English) units. |METRIC
- k" X- z7 h' D6 ?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: B$ o" [0 _$ b5 u
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. 45 K/ I; A1 V6 J) K; D& {: g, M/ x
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
1 a+ v9 n* U7 ]; L2 y) {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
6 b; @/ ]" g* W- ^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& T( ?+ n5 w5 L5 ?" F" ]/ z* h) f
Blank card terminating conductor cards. |BLANK CARD ENDING CONDUCTOR CARDS0 b# Q0 [8 Q R2 Z8 ~+ }4 ]# A
Frequency card. 2.000E+01 1.000E+03 7.570E+01 | 20. 1.E3 75.7 13 ~0 e% X6 B# |( H
3 k0 v5 ?4 l$ w5 v8 g, ^4 SLine conductor table after sorting and initial processing.
T g! v! j' w Q- p9 b2 F" D Table Phase Skin effect Resistance Reactance data specification Diameter Horizontal Avg height' p( O' k0 r9 B5 `& W0 Q
Row Number R-type R (ohm/km) X-type X(ohm/km) or GMR ( cm ) X (mtrs) Y (mtrs) Name
8 @6 |- o& C$ Z7 f" j2 j2 I 1 1 .25900 .06900 4 .000000 2.90000 -19.200 14.8006 D3 ?7 o6 C# o! i$ n% S& {
2 2 .25900 .06900 4 .000000 2.90000 0.300 14.8002 }; F; y9 _+ [3 A. S
3 3 .25900 .06900 4 .000000 2.90000 19.800 14.800
9 O6 b4 S. w1 A& q* d 4 1 .25900 .06900 4 .000000 2.90000 -19.800 14.800
$ N7 `( y2 U6 a 5 1 .25900 .06900 4 .000000 2.90000 -19.800 15.400 l. R3 L1 N4 l/ ?7 T
6 1 .25900 .06900 4 .000000 2.90000 -19.200 15.400
* ?2 l5 Q6 S: o; y 7 2 .25900 .06900 4 .000000 2.90000 -0.300 14.800
7 O4 _6 h7 x5 w5 Y( W w 8 2 .25900 .06900 4 .000000 2.90000 -0.300 15.4006 Q$ P+ j) B7 i+ [4 \
9 2 .25900 .06900 4 .000000 2.90000 0.300 15.400
$ y" O$ O C K. n1 r9 z. _. _/ j 10 3 .25900 .06900 4 .000000 2.90000 19.200 14.8000 v" a+ I6 m1 \# O9 |
11 3 .25900 .06900 4 .000000 2.90000 19.200 15.400
4 k4 ]. U9 l G* y; I 12 3 .25900 .06900 4 .000000 2.90000 19.800 15.400
# H4 w; e/ a2 T9 d' s% Q ^9 ~( l 13 0 .17500 .44000 4 .000000 1.54000 -15.000 29.700) K- E$ \0 ~, B
14 0 .17500 .44000 4 .000000 1.54000 15.000 29.700
+ Z/ @1 t- ]' V ) T) s2 [6 d$ K$ m9 R! x2 W3 ]
Matrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 1.00000000E+03 Hz. Correction factor =
% u$ \$ n/ I$ c5 `9 Y5 W1.00000000E-06! q4 x2 T7 I- A
7 ?/ K) c& I/ I# DModal parameters at frequency FREQ = 1.00000000E+03 Hz
/ E: p0 S. o+ D2 H - T% y+ E7 g( N3 V
Eigenvector matrix [Ti] for current transformation: I-phase = [Ti]*I-mode. First the real part, row by row:. B/ a+ O% |! C, L* S% B( V
5.748140047158274E-01-7.071067811865638E-01-4.281225696572995E-01
$ S8 U- ]9 o* P- R5 _ 5.823896633398591E-01 1.700454252111332E-14 7.958782134849792E-01
2 i8 ^/ e. F% y" j2 ]2 b& N2 M 5.748140047158198E-01 7.071067811865313E-01-4.281225696573222E-01
$ D+ t/ }; t! l. s+ Q" `' ^( jFinally, the imaginary part, row by row:* p' ^" G: Z, F$ T! O) D0 Y
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00( K& [2 l% j* s! I
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
# {: ]* G% K, w- p 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
$ o& C! A7 x [& H( JFrequency card. 2.000E+01 5.000E+01 7.570E+01 | 20. 50. 75.7 1
6 v4 t: i& j. }3 M/ a ; P" C3 Y9 E0 T' ]. ^$ X& ^0 d9 m
Matrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 5.00000000E+01 Hz. Correction factor =
4 s" ~; v) v+ r1.00000000E-06
6 j0 a- ~& o0 nFrequency card. 2.000E+01 5.000E-03 7.570E+01 | 20. 0.005 75.7 7 10 1! X; _) q6 {8 Y
Blank card terminating frequency cards. |BLANK CARD ENDING FREQUENCY CARDS
8 ^3 v- n/ m% m2 w. bBlank card ending "LINE CONSTANTS" cases. |BLANK CARD ENDING LINE CONSTANT
: c" z4 D Q2 g/ r' P: f9 YRequest for default fitting (= 3 blank cards) |DEFAULT
; g$ I; o* s" y
* q. ^% W b) {( G1 w! j===== ===== Begin Zc fitting for mode IMODE = 1 ===== =====
; B# S8 S8 `3 c8 q4 U& WThe number of poles NPOLES = 41 in this loop exceeds the specified limit NORMAX = 300 S& G' M# }; D7 K5 L7 z! c, T U
. ?8 X! p3 z" ^4 y9 U$ y2 r
@@@@@ @@@@@ Begin A1 fitting for mode IMODE = 1 @@@@@ @@@@@
7 Z* o2 k9 h/ B$ I% j( {3 N6 M9 F2 M
( m9 p0 q6 ^1 |6 O( c===== ===== Begin Zc fitting for mode IMODE = 2 ===== =====5 F' J/ @! m' ^7 C0 R; i- t
The number of poles NPOLES = 34 in this loop exceeds the specified limit NORMAX = 303 d- i1 @9 h8 C% D$ b1 Q
- o6 ~ }2 m( y, g) N( A @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 2 @@@@@ @@@@@4 u4 I e) G; R2 \& J' x3 M/ p
m! h- l& t/ X* d+ H$ u x) k) A8 e! m
===== ===== Begin Zc fitting for mode IMODE = 3 ===== =====* a1 K7 h: }: u
The number of poles NPOLES = 31 in this loop exceeds the specified limit NORMAX = 30: }& u8 S" G( Y9 r3 P+ u6 v, {; }
3 i- h$ n1 Q' V* Q8 o3 P- b" T @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 3 @@@@@ @@@@@/ o6 Y! q. k! L/ {$ s
2 _0 ^, L8 @& b/ qRequest for flushing of punch buffer. |$PUNCH
) C) P3 c3 G) \. W @; Z4 o' T: E
% T$ D/ b. r2 U) G% Z; ZA listing of 80-column card images now being flushed from punch buffer follows.
+ I+ S8 {+ S% { N' g===============================================================================
( H* @, b" O" R) z! ]1234567890123456789012345678901234567890123456789012345678901234567890123456789
K/ U% D% A! r2 M |% x===============================================================================( Y( N' S7 {8 O \4 ]) b: H1 q! M
C <++++++> Cards punched by support routine on 13-Apr-10 16:56:55 <++++++>; W% ^: ^& \! Z
C ***** UNTRANSPOSED JMARTI line segment ******
* ~' H! g& `5 S2 QC JMARTI SETUP$ q6 [, n1 M3 a! R8 w+ h
C $ERASE
( e1 u( c4 ^1 ]$ zC BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C! A2 y# p9 l5 G5 ^; D! I# V
C LINE CONSTANTS# Z8 ^% H* r# R& P" o9 `
C METRIC3 ]2 U# i; K: h( }. d
C 10.259 0.069 4 2.9 -19.5 25.1 10.1 60. 45.
2 k; |! G9 G' d% y- aC 20.259 0.069 4 2.9 0.0 25.1 10.1 60. 45.
7 d8 J+ E$ O& z1 k6 S5 X/ V- bC 30.259 0.069 4 2.9 19.5 25.1 10.1 60. 45./ J7 ~1 U8 ]5 @3 j& k* }% L
C 00.175 0.44 4 1.54 -15. 39.7 24.7 0.0 0.0
4 j: j4 {- n' R$ d/ pC 00.175 0.44 4 1.54 15. 39.7 24.7 0.0 0.0
4 S D7 {. I. D) p: QC BLANK CARD ENDING CONDUCTOR CARDS
" p3 M5 }" @( p9 {9 E3 Q% `2 fC 20. 1.E3 75.7 1" t% U# H/ d i/ U; p
C 20. 50. 75.7 1- C# V; v" }- L
C 20. 0.005 75.7 7 10 1
7 N6 N( B; t6 n( a& M8 oC BLANK CARD ENDING FREQUENCY CARDS
; w! u( H; X1 {% E. jC BLANK CARD ENDING LINE CONSTANT2 J4 g; u5 o4 f% @* r) U; e
C DEFAULT* ?* Z B( q& Y$ m# J# _2 ^
-1IN___AOUT__A 2. 0.00 -2 3
" F/ B' a# T0 v1 p4 P# O 17 3.3876136028747050000E+02
, W' r3 d, S b6 _ 1.56748087606698020E+02 1.53350246690381570E+02 5.91752415177784810E+01) w" ~4 T" Q. B6 n8 o F
2.01342311994593360E+02 2.35228649588483170E+02 2.53692631526845670E+02& o5 j- Z, _2 ~ z w9 ~( _
1.66995629609519800E+02 3.13013616521086590E+02 7.77592731836887200E+02
4 K. b* W& h$ `# v# P8 U2 t 2.92709376085682020E+03 8.36186324719264120E+03 6.39337717296788010E+038 C1 B* T! `' K, y
1.11850636212671030E+04 4.41394197432314540E+04 3.57997951874029590E+05
; z0 J2 s: Y. v0 e# N/ S" t% G [ 7.56151786639699950E+05 1.36950810507648970E+06
& A4 h+ t' c& t" c2 H: ^( \ 1.42216936124761770E-01 2.00869674971664410E-01 2.46548549642172290E-01* { u: p5 F' n" B" H
4.83183838918269940E-01 8.90165197319727430E-01 1.60597725665316450E+00
0 n; @% a8 P$ i2 R t+ I. L 2.89724575888037260E+00 5.22044042049842180E+00 1.93205621429485000E+01
. \8 `4 \7 Z, m% K! d3 \! J 6.43540045186946370E+01 1.19989060419415150E+02 2.38618178257245120E+02
% l g6 g4 `% A# ?/ h2 t 7.72151589982453290E+02 2.99346013405561330E+03 1.27367479883974610E+04( k+ M8 d5 c* Y+ q. ~
5.61967457160417400E+04 1.12259275941284690E+05
, p- z* W4 C5 z: U 18 2.5648081591925806000E-04
; _' T. L4 y+ }* s6 Z4 L 4.39088902072225850E-02 2.51823882949434860E-01 2.09625388083036990E-01
2 k1 h( }) S; g; ~. o$ g2 i 3.78494708253580230E-01 4.21222198449916040E-01 1.12875930767027930E+00# I1 B0 T3 }8 Y
1.71876255372116240E+00 5.22622351239333400E+00 2.87507803450135600E+01( ?$ b- G; Q- U* J5 |% |
3.11711415283725670E+02 -4.25029687238800080E+02 4.11909331052564360E+03( n, G1 @3 G5 o/ Q, C+ q
2.03169322161820860E+04 9.92298833352391920E+03 9.73079142175107300E+07
# V8 i. X) k( Z P* q# b -9.55146506480773540E+07 1.78452787243354890E+08 -1.80280334637975660E+08+ I5 }4 P( i# R( ^2 _& ]2 ~
1.71037480519741610E+01 8.83202394182148960E+01 9.05344339387639390E+01# H! W, d2 K9 K; @, ~# x
1.45765976458050060E+02 1.67604264020870910E+02 4.33406916110919100E+02" P* p" h) k+ y5 D2 n' ?1 j
6.63140374794807490E+02 1.92887674552758430E+03 1.33200718265846740E+03. j# S P1 ?2 l1 _- v! ^- b" A; m
5.71524437659357950E+03 1.42342855758340520E+04 1.25142080353191360E+04# {, e9 F* |0 d6 [: }( ]$ m2 I
3.62317843255328920E+04 5.63019677971675190E+04 2.08969723652870020E+05
3 |! ^. m/ L6 |: R 2.09178693376523150E+05 1.79625128065165980E+05 1.79804753193231360E+05- |! o0 A7 K5 s i
-2IN___BOUT__B 2. 0.00 -2 3
, f9 l# k, Q$ r6 _( T: h 16 2.7356159603025270000E+023 R) m+ W# c7 U2 Z) i; L
3.69404660026332070E+02 -6.57736076515949720E+01 3.81922741682533400E+02
1 R2 K$ {/ {. _1 v8 |6 N2 S 7.08453587370238780E+02 5.41167797769398360E+02 3.06226540265072910E+024 J8 z l1 v1 [( w7 K& p, L
9.12429137114825860E+01 1.45546235045872410E+02 4.35671648435959070E+02( v' c& j! G w* H" k3 v" I, k6 e
9.89457112977898990E+02 1.20421629942927280E+04 2.52441351892631970E+04& v& R3 ]; e: {' A
1.31721403134872210E+05 1.00702634087143390E+05 1.00067739988421900E+05
! k2 ^3 E1 e7 d9 \" K# I 1.98945562771848960E+05- Y& p0 q' u1 U" I" E) N8 S. t& r
1.48932587810283570E-01 1.91111259756068880E-01 5.23244958961560200E-017 j" |9 y: F* l+ i
1.98685487501559810E+00 5.99260600202752600E+00 1.07800276387683840E+01
8 M7 h2 b/ Y" z& V 1.40587613181405300E+01 2.26773470722948250E+01 3.15477144275676150E+02* M/ }" p& @6 ]
7.20661772011409880E+02 8.57135008822161760E+03 1.81290494844508870E+04
/ S% K0 X" Q# G2 s 9.82444873325722870E+04 6.84224792084696670E+04 7.51320465443383440E+04+ p3 o" H( P* L/ n1 [8 u: x
1.48835602821329780E+05
) W0 z) P& Y, F0 u 8 2.5331274985951097000E-04
# {% g0 @+ c* W( b7 {6 a8 u 9.77519359442743510E+00 9.06749971882869370E+01 3.89917698321721050E+02
8 |# a$ ?- o" I& x 2.14763901924745410E+03 3.21139859861504280E+03 7.78666160670429240E+03
: ^1 X: w; O5 Z -4.35590044273043600E+04 1.46424632739437020E+05
7 G1 o& J- O4 T 1.34347544158826870E+03 1.11481723747429880E+04 2.13548802821824830E+04
+ D" q1 L; n# W 3.88406059295760640E+04 4.48673492254774170E+04 6.34696015771263410E+04! s$ |1 Q# F6 z! v: v9 g
5.71514355618160570E+05 1.84730022532517380E+05
' I# Y/ w2 w1 i, T-3IN___COUT__C 2. 0.00 -2 3: y. m2 G3 V; j. r
12 2.4217757892053910000E+02& E( c& x$ ?$ p$ T8 _
3.11081567238861170E+02 -2.67647353791795130E+01 3.71876217221247710E+02- K/ o1 u+ f5 w& j7 |" h5 N
7.07422509445779840E+02 7.84485674697519240E+02 5.15644097900284780E+013 u5 ]$ E7 y* X( } S8 @
8.62357151535732380E+01 1.33677642835807010E+02 1.31608612652184290E+02
6 N! {- ?, Z9 e& k3 l/ v6 _ 1.14893287428216410E+02 9.93716544256342760E+01 5.59773592553784180E+04
, b8 ?+ M# d/ C 1.34344252475530860E-01 1.81414794097451400E-01 5.11374925899225950E-010 O% B: e3 S$ m- g, n% B. C9 K
2.04824350656590370E+00 7.03072667690498320E+00 1.02204034540275260E+01$ l5 ~5 w# ^, d2 @" D- H) V
1.40807516766374870E+01 2.26422726843327060E+01 3.61527808309766810E+014 I4 M2 S& Q+ }& K) h& B3 @
5.66127229741269180E+01 9.24983189391125220E+01 4.52655232370584050E+042 ]; O4 J. k$ f- o- G3 Z( V0 m' m
6 2.5172653258524589000E-044 W Y) D+ I* t# ?4 |
9.16195806109742070E+00 3.77612637640999710E+02 6.49218461519983410E+022 v: j, H( {* _
2.16338680527304540E+03 -2.80386507590504550E+04 4.81761010930565240E+05
5 j; q; [/ N$ h9 C1 \6 ] 1.48053740522388740E+03 4.65974978309593280E+04 5.01953038655574710E+04
4 } [2 w/ w2 _ 7.89025069563385330E+04 2.89584576325553890E+06 5.04629561166254750E+05
3 B0 G3 g# U T# a 0.57481400 -0.70710678 -0.42812257
9 e$ m' i4 q% |7 H; q 0.00000000 0.00000000 0.00000000+ Y; c4 R( N0 {
0.58238966 0.00000000 0.79587821
# w t' H7 W8 x5 a 0.00000000 0.00000000 0.00000000' `5 l# W2 z A# j
0.57481400 0.70710678 -0.42812257# k/ j* t9 R0 p+ g' R
0.00000000 0.00000000 0.00000000! R- I1 r$ [+ J- q* h2 s- F
=========< End of LUNIT7 punched cards as flushed by $PUNCH request >=======
# \+ w. o' I5 d2 w# s) \
1 O" z I* i: P; T/ Y$ [1 aBlank card ending "JMARTI SETUP" data. |BLANK CARD ENDING JMARTI SETUP
. m' O! |5 D- N, ZTotal case timing (CP, I/O, tot), sec: 0.219 0.000 0.2194 D" b$ p+ t. D5 v7 r+ W [2 `
R L C参数是那些啊?麻烦您一下 |
|