|
|
楼主 |
发表于 2010-4-21 21:04:42
|
显示全部楼层
回复 4# 大笨蛋
1 N6 k$ ^9 ]3 U. J/ c' x; @" G5 J# e! R: N z$ o9 d$ {
是不是从生成的lis文件中查找?; |7 `; |+ [; m) ~
Alternative Transients Program (ATP), GNU Linux or DOS. All rights reserved by Can/Am user group of Portland, Oregon, USA.- p/ _" T8 P5 T
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% v- B( z2 m5 W( X
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.& K! S" n1 V) {! P
Total size of LABCOM tables = 9868232 INTEGER words. VARDIM List Sizes follow : 6002 10K 192K 900 420K 1200
% L- }7 c. y$ P0 c5 N 15K 120K 2250 3800 720 1200 72800 510 90K 800 90 254 120K 100K 3K 15K 192K 120 30K 160K 600 210K 300 60
( c) Z, B+ g- R) w* I( m--------------------------------------------------+--------------------------------------------------------------------------------
! w5 C# c* r+ K1 X/ p& pDescriptive interpretation of input data cards. | Input data card images are shown below, all 80 columns, character by character. d8 e' z8 _% `0 q( S0 n/ t
0 1 2 3 4 5 6 7 8* l9 h# ]/ e" g3 H& O" e5 k
012345678901234567890123456789012345678901234567890123456789012345678901234567890
7 E; d: k' o5 M- x+ o--------------------------------------------------+--------------------------------------------------------------------------------
- w( i F5 H4 ~4 B0 y" gComment card. KOMPAR > 0. |C data:LIN750_4.ATP+ ]5 |( _ Y5 P- I' k
Marker card preceding new EMTP data case. |BEGIN NEW DATA CASE: F. g- {; ~! y: g- h: F
Jose Marti`s line fitter. PDT0 = 0.00000000E+00 |JMARTI SETUP
- H# e- B5 m( b% {+ D# J$ R. {' L( {Erase all of 0 cards in the punch buffer. |$ERASE2 h) y$ \( Q& D. |6 D
Pairs of A6 terminal node names for each phase. |BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C
7 E/ Y" T2 r( z: @8 m. P/ K& \0 wCompute overhead line constants. Limit = 120 |LINE CONSTANTS
2 M/ u; D( m# V' k+ IRequest for metric (not English) units. |METRIC
: ~/ X- \$ i2 a$ N: DLine 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
+ j; S9 i* U+ vLine 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: k0 {; Q$ y9 N6 u8 p T# f
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
( ?" y2 M( n; C/ E% c0 YLine 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. z5 x9 x5 k: [2 c/ V, Q) M8 J! N
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/ M5 r; H6 i5 m) G# H. W) a7 W
Blank card terminating conductor cards. |BLANK CARD ENDING CONDUCTOR CARDS
9 H# M8 d9 J! ]Frequency card. 2.000E+01 1.000E+03 7.570E+01 | 20. 1.E3 75.7 1
% k0 c$ i3 m5 F5 i- i & [ r @; h5 ^! g7 \
Line conductor table after sorting and initial processing.8 R; c1 Q: b6 x5 k1 V/ T
Table Phase Skin effect Resistance Reactance data specification Diameter Horizontal Avg height, K9 G) W# G4 o0 E
Row Number R-type R (ohm/km) X-type X(ohm/km) or GMR ( cm ) X (mtrs) Y (mtrs) Name
+ H$ P$ N: z! g8 [8 u- u5 P: @+ J 1 1 .25900 .06900 4 .000000 2.90000 -19.200 14.800
. c# D% D: ^' y2 D* W% p2 J) \ 2 2 .25900 .06900 4 .000000 2.90000 0.300 14.8006 K. ?% L6 l% z+ b/ L
3 3 .25900 .06900 4 .000000 2.90000 19.800 14.8003 R5 O- W8 K; ]% p& \( ?
4 1 .25900 .06900 4 .000000 2.90000 -19.800 14.800. W- t$ y8 u) O) z
5 1 .25900 .06900 4 .000000 2.90000 -19.800 15.400
# x4 _4 J5 ~0 E 6 1 .25900 .06900 4 .000000 2.90000 -19.200 15.400! E' }5 C6 M+ K
7 2 .25900 .06900 4 .000000 2.90000 -0.300 14.800
+ X1 s* L* r9 R% v( d) X9 y 8 2 .25900 .06900 4 .000000 2.90000 -0.300 15.400: g5 s' d0 e6 J$ L
9 2 .25900 .06900 4 .000000 2.90000 0.300 15.400
$ I4 D% u& B# r7 |' H& Y 10 3 .25900 .06900 4 .000000 2.90000 19.200 14.800
; w/ t. ^4 K- X0 z 11 3 .25900 .06900 4 .000000 2.90000 19.200 15.400
- ^! M1 i& t( F$ q! x3 _ 12 3 .25900 .06900 4 .000000 2.90000 19.800 15.400
! X' k) k/ |: @: F! h* r. J 13 0 .17500 .44000 4 .000000 1.54000 -15.000 29.700$ p' l# b7 ^9 t9 ^) J6 o
14 0 .17500 .44000 4 .000000 1.54000 15.000 29.700% Z+ E+ B5 ^5 [/ K$ m( T t( D
# k" L: O, K/ ~) C; `2 d
Matrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 1.00000000E+03 Hz. Correction factor =2 q5 e. D! G3 n- Q- I( ]- d* N( K
1.00000000E-064 D3 Y+ S* y$ b @! G% ~
, b B- r: `. `* `Modal parameters at frequency FREQ = 1.00000000E+03 Hz- E7 |& n: z0 ^. e |+ T1 y
" M0 @ v, J3 F6 I* \+ A, x6 @Eigenvector matrix [Ti] for current transformation: I-phase = [Ti]*I-mode. First the real part, row by row:! F* [! p0 @! j% G
5.748140047158274E-01-7.071067811865638E-01-4.281225696572995E-011 }# R0 X' n$ E3 f( R. a6 J
5.823896633398591E-01 1.700454252111332E-14 7.958782134849792E-01* u2 H! X. e) \2 `8 q4 A
5.748140047158198E-01 7.071067811865313E-01-4.281225696573222E-01/ n: z& h) j5 M9 z. y
Finally, the imaginary part, row by row:4 x7 Q% D8 E9 W# k2 N
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
) G" H& T( C) ? 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
- V2 w4 S7 }: ]0 a 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
& T$ n4 a6 F. c0 r6 c# g( G4 [; vFrequency card. 2.000E+01 5.000E+01 7.570E+01 | 20. 50. 75.7 1
/ x% c% B9 A5 k6 u* W, j# \ 1 Y; u5 N/ M$ p+ q' R, v3 M4 K2 b _
Matrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 5.00000000E+01 Hz. Correction factor =4 e3 J# f0 I) W! p5 C# g4 }
1.00000000E-06
N1 W. a X% a9 MFrequency card. 2.000E+01 5.000E-03 7.570E+01 | 20. 0.005 75.7 7 10 1
M$ L6 Z2 o1 i3 B2 V3 NBlank card terminating frequency cards. |BLANK CARD ENDING FREQUENCY CARDS
7 W1 J' t# o( S' K- h+ |/ {Blank card ending "LINE CONSTANTS" cases. |BLANK CARD ENDING LINE CONSTANT
% R% b |0 y+ P# T) I. ?$ Z# @Request for default fitting (= 3 blank cards) |DEFAULT
}2 p" P7 m3 B: ?2 B5 Q
7 ]/ ?, O2 y" E) L7 O. v7 V===== ===== Begin Zc fitting for mode IMODE = 1 ===== =====- n, N; k1 I6 ]6 m' ?3 _0 j$ n/ r1 [
The number of poles NPOLES = 41 in this loop exceeds the specified limit NORMAX = 30; l- J$ S: O/ K, ?# `# L
# M G9 v/ \9 x; L) ~ @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 1 @@@@@ @@@@@! O' q; g$ R/ ?8 O
6 |6 [% T+ p" d
===== ===== Begin Zc fitting for mode IMODE = 2 ===== =====7 z ^% h5 Y' d) S4 @- r
The number of poles NPOLES = 34 in this loop exceeds the specified limit NORMAX = 30& O1 \; s. b$ G
}6 c& H( a$ O: I9 P9 s9 N6 q @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 2 @@@@@ @@@@@
1 h6 _+ D1 C- ]) u6 Z- L b
- z7 A/ K0 F P. n- @===== ===== Begin Zc fitting for mode IMODE = 3 ===== =====
4 m0 k3 _) p7 I3 }9 s& ^# RThe number of poles NPOLES = 31 in this loop exceeds the specified limit NORMAX = 30) ~, D- I/ y) S' c/ ]& m9 U
! I5 t- i+ e) e1 I# A
@@@@@ @@@@@ Begin A1 fitting for mode IMODE = 3 @@@@@ @@@@@' X* v: y' g$ \0 K# ~4 B- h+ b3 l
3 a. e2 } i' t3 F/ t$ z/ W( M2 pRequest for flushing of punch buffer. |$PUNCH
% f: O; h" L3 w; _& H4 M: |5 U3 }: x7 [ ' R( N9 D4 T5 T7 U- |8 J- C0 m$ Z
A listing of 80-column card images now being flushed from punch buffer follows.
! _9 V5 d/ k1 q+ w* | w6 q===============================================================================
5 |# T$ b, f4 j( q7 ~0 M2 I1234567890123456789012345678901234567890123456789012345678901234567890123456789
- q" V3 g; s& N' ~===============================================================================, R r# G- i3 w$ \/ v0 B
C <++++++> Cards punched by support routine on 13-Apr-10 16:56:55 <++++++>
- c$ ~- t5 J& F/ D$ uC ***** UNTRANSPOSED JMARTI line segment ******
6 U8 S* r# t# TC JMARTI SETUP
6 E8 Q- r5 T: W$ y, Y- A6 \. x. DC $ERASE D! c& U0 I9 ^/ q' B, u5 i
C BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C4 F8 O" f6 A# f0 u
C LINE CONSTANTS# d( O7 J6 U+ F6 J4 I, G# v
C METRIC4 o7 @3 J" k5 |- X f ?
C 10.259 0.069 4 2.9 -19.5 25.1 10.1 60. 45.
& Y( w$ J5 g% o$ S% R0 u' mC 20.259 0.069 4 2.9 0.0 25.1 10.1 60. 45.
% H0 O' m8 i+ z/ u7 D1 a; g8 h& AC 30.259 0.069 4 2.9 19.5 25.1 10.1 60. 45./ {4 _1 U; c3 ]" K3 _7 {8 T0 o
C 00.175 0.44 4 1.54 -15. 39.7 24.7 0.0 0.0: @6 ]/ D# M6 @+ A5 O" |* `
C 00.175 0.44 4 1.54 15. 39.7 24.7 0.0 0.0: s; n$ h% I$ h3 T" U% u d8 u9 v
C BLANK CARD ENDING CONDUCTOR CARDS
$ ~1 L2 @; Q- eC 20. 1.E3 75.7 1
+ E+ P1 n& \" u9 v c! n. u1 eC 20. 50. 75.7 1
$ Q" i3 M- J' O' |8 T- K9 XC 20. 0.005 75.7 7 10 1
% q5 F/ s& ~. Z s/ SC BLANK CARD ENDING FREQUENCY CARDS
" j( y- @) B% _$ H2 w4 k5 QC BLANK CARD ENDING LINE CONSTANT
1 u; u: J; i( B3 Q, z, {C DEFAULT3 G A( p% e9 L4 \# a ^
-1IN___AOUT__A 2. 0.00 -2 3& o3 J' M4 v; Y; H$ ~7 Z! J( T$ o
17 3.3876136028747050000E+02
, X# {% _$ C' A* C& \7 p+ ~( z1 { 1.56748087606698020E+02 1.53350246690381570E+02 5.91752415177784810E+012 p) { B3 Y# e, k
2.01342311994593360E+02 2.35228649588483170E+02 2.53692631526845670E+02! c4 x: x/ ~# Y9 ^+ b( r
1.66995629609519800E+02 3.13013616521086590E+02 7.77592731836887200E+02
2 o( b4 _- d, R' ~& L6 e8 p 2.92709376085682020E+03 8.36186324719264120E+03 6.39337717296788010E+03
+ e% }9 ?% k Q( p3 X 1.11850636212671030E+04 4.41394197432314540E+04 3.57997951874029590E+054 l [4 W" p, S, d: ]
7.56151786639699950E+05 1.36950810507648970E+06! H9 T# {0 h. I
1.42216936124761770E-01 2.00869674971664410E-01 2.46548549642172290E-01
+ I5 P5 B' D7 E9 p 4.83183838918269940E-01 8.90165197319727430E-01 1.60597725665316450E+00; Q* R4 f+ Y- Y% V; q8 M3 h% I3 ?$ {6 n6 a
2.89724575888037260E+00 5.22044042049842180E+00 1.93205621429485000E+01 l% i2 f# v2 X6 I! a+ B, H
6.43540045186946370E+01 1.19989060419415150E+02 2.38618178257245120E+02
2 W& e5 w. ~- k! P. ^. m5 f 7.72151589982453290E+02 2.99346013405561330E+03 1.27367479883974610E+04
0 o Q7 r1 B% T& d8 z 5.61967457160417400E+04 1.12259275941284690E+05
: Z+ t/ E* \' [& y3 {$ p- W2 Z# d 18 2.5648081591925806000E-04
8 S0 I P9 s$ Y" w 4.39088902072225850E-02 2.51823882949434860E-01 2.09625388083036990E-01
, z- v' V8 {2 o# m5 F 3.78494708253580230E-01 4.21222198449916040E-01 1.12875930767027930E+00
- C/ P2 j# o' o, c- n 1.71876255372116240E+00 5.22622351239333400E+00 2.87507803450135600E+01
0 b- S& n: U( k( n8 d- A 3.11711415283725670E+02 -4.25029687238800080E+02 4.11909331052564360E+03
; G2 d2 g" d8 q: j 2.03169322161820860E+04 9.92298833352391920E+03 9.73079142175107300E+074 e% {1 Z9 s6 N) b7 |- L
-9.55146506480773540E+07 1.78452787243354890E+08 -1.80280334637975660E+08# L- v( i( j* z% ^
1.71037480519741610E+01 8.83202394182148960E+01 9.05344339387639390E+01+ n0 J& n2 t, S! |' W( C7 v& P
1.45765976458050060E+02 1.67604264020870910E+02 4.33406916110919100E+02
4 Q0 R" g8 `5 v3 G R6 y 6.63140374794807490E+02 1.92887674552758430E+03 1.33200718265846740E+039 {5 n/ e; O# c9 n* v( B* s% E
5.71524437659357950E+03 1.42342855758340520E+04 1.25142080353191360E+04
* R( ~8 ~5 b1 H" [6 S: `5 W 3.62317843255328920E+04 5.63019677971675190E+04 2.08969723652870020E+05- G" J6 X$ z3 [7 |) h
2.09178693376523150E+05 1.79625128065165980E+05 1.79804753193231360E+05
. Y5 y/ ]+ ]4 w' M9 O-2IN___BOUT__B 2. 0.00 -2 3" K( \5 b5 J5 H7 U
16 2.7356159603025270000E+02
5 d% Y1 \% P8 a( B 3.69404660026332070E+02 -6.57736076515949720E+01 3.81922741682533400E+021 e* W3 j# z7 E4 C3 N7 |- b
7.08453587370238780E+02 5.41167797769398360E+02 3.06226540265072910E+02
- f2 i1 |1 C% U1 x0 g3 V 9.12429137114825860E+01 1.45546235045872410E+02 4.35671648435959070E+02
! u" b0 S5 F* A. D6 L, Z 9.89457112977898990E+02 1.20421629942927280E+04 2.52441351892631970E+04
# |/ M1 m$ w7 y; M$ k 1.31721403134872210E+05 1.00702634087143390E+05 1.00067739988421900E+055 v" q- j6 b3 `
1.98945562771848960E+05. E" `$ ]7 @. o
1.48932587810283570E-01 1.91111259756068880E-01 5.23244958961560200E-01
! ?; V/ s4 V# B# D- u" Q) m! A 1.98685487501559810E+00 5.99260600202752600E+00 1.07800276387683840E+01( b2 S" O$ d0 j) \" R/ Y3 v5 v6 X
1.40587613181405300E+01 2.26773470722948250E+01 3.15477144275676150E+02% f. ?) {- a& `$ d: W" w
7.20661772011409880E+02 8.57135008822161760E+03 1.81290494844508870E+04
0 z* {& G& @) D 9.82444873325722870E+04 6.84224792084696670E+04 7.51320465443383440E+04
8 r2 [. `0 M. ^ 1.48835602821329780E+05
7 f" [+ r! Z3 e2 E 8 2.5331274985951097000E-04
0 g0 @" u3 w0 R7 x 9.77519359442743510E+00 9.06749971882869370E+01 3.89917698321721050E+02+ u `* O8 K4 J- U" I3 q( D
2.14763901924745410E+03 3.21139859861504280E+03 7.78666160670429240E+03
9 h. h+ \% q3 r% _ -4.35590044273043600E+04 1.46424632739437020E+05
3 C' e- I2 g- g# Y4 \' ^ 1.34347544158826870E+03 1.11481723747429880E+04 2.13548802821824830E+049 ?' r" w0 ]) W- i
3.88406059295760640E+04 4.48673492254774170E+04 6.34696015771263410E+04
0 h, O6 h# _) p7 A! r 5.71514355618160570E+05 1.84730022532517380E+05+ q8 d8 u' l6 e" r
-3IN___COUT__C 2. 0.00 -2 3
4 h5 D7 E' a: l 12 2.4217757892053910000E+02
y' M- X% Q8 Q5 B% x/ G 3.11081567238861170E+02 -2.67647353791795130E+01 3.71876217221247710E+02
0 X* y: I# @- _: _2 z! w" b* d 7.07422509445779840E+02 7.84485674697519240E+02 5.15644097900284780E+01& j' P/ ^) {' N) A- L8 V# s
8.62357151535732380E+01 1.33677642835807010E+02 1.31608612652184290E+02
2 }7 u! [( t4 r$ T+ g) a; o 1.14893287428216410E+02 9.93716544256342760E+01 5.59773592553784180E+04
1 w: c- g8 P: r: a: x) { 1.34344252475530860E-01 1.81414794097451400E-01 5.11374925899225950E-017 B4 i3 B( e) X8 f
2.04824350656590370E+00 7.03072667690498320E+00 1.02204034540275260E+01+ x& ]5 y: X, _! R, T/ j2 [4 Q
1.40807516766374870E+01 2.26422726843327060E+01 3.61527808309766810E+01
& `, O p9 _: B 5.66127229741269180E+01 9.24983189391125220E+01 4.52655232370584050E+042 r- j" K) D& F( a5 e+ m( i5 F, v
6 2.5172653258524589000E-04
( R- K! @, M- P8 g& I! U n 9.16195806109742070E+00 3.77612637640999710E+02 6.49218461519983410E+02
, i0 k+ G9 P! L) O! I 2.16338680527304540E+03 -2.80386507590504550E+04 4.81761010930565240E+05
+ l6 K: y$ @0 ]+ S$ b; ]! _$ l 1.48053740522388740E+03 4.65974978309593280E+04 5.01953038655574710E+04
3 y' m! k7 R* b; @& U9 a 7.89025069563385330E+04 2.89584576325553890E+06 5.04629561166254750E+05
$ x) d( O$ e; [1 ~# T7 m ~7 O! ] 0.57481400 -0.70710678 -0.42812257( n1 q9 D6 F! E- J6 \3 u! Q
0.00000000 0.00000000 0.00000000( d/ R9 \! C1 o6 m3 g$ {- B
0.58238966 0.00000000 0.79587821
4 f+ M+ g2 E, p 0.00000000 0.00000000 0.00000000* }- }; |% g+ E" p5 K/ p
0.57481400 0.70710678 -0.428122571 ^0 A" c; Y; Z3 g* K# n
0.00000000 0.00000000 0.000000005 [% N! F# N0 ?7 [) E4 n
=========< End of LUNIT7 punched cards as flushed by $PUNCH request >=======
^9 T, b5 e# ~4 }8 q ! i% y3 [' G7 S0 t9 m
Blank card ending "JMARTI SETUP" data. |BLANK CARD ENDING JMARTI SETUP# ~4 ^/ W$ l0 L6 ~: \* a( f
Total case timing (CP, I/O, tot), sec: 0.219 0.000 0.219
1 F1 R/ w* Z4 K# H5 R! b R L C参数是那些啊?麻烦您一下 |
|