|
|
楼主 |
发表于 2010-4-21 21:04:42
|
显示全部楼层
回复 4# 大笨蛋 6 p8 o" Y- q6 P* J4 B$ o
# b, G" A7 |2 \0 P4 K8 J: o
是不是从生成的lis文件中查找?' x$ q8 J: g" l, L c1 w% m% a) E
Alternative Transients Program (ATP), GNU Linux or DOS. All rights reserved by Can/Am user group of Portland, Oregon, USA.! J! B8 a3 H" G3 t4 S% u
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
Z; b: ~% i, jConsult the 860-page ATP Rule Book of the Can/Am EMTP User Group in Portland, Oregon, USA. Source code date is 21 February 2003.
- ]6 E9 r( S6 N% ^! L2 j8 JTotal size of LABCOM tables = 9868232 INTEGER words. VARDIM List Sizes follow : 6002 10K 192K 900 420K 1200
4 t- S$ a+ c c& t) F$ e; @% t; v 15K 120K 2250 3800 720 1200 72800 510 90K 800 90 254 120K 100K 3K 15K 192K 120 30K 160K 600 210K 300 60
d5 h- Z) `) V( f* L8 D--------------------------------------------------+--------------------------------------------------------------------------------- e: p, e; s0 U. `, L
Descriptive interpretation of input data cards. | Input data card images are shown below, all 80 columns, character by character3 L1 b2 U( g7 U) M G$ S8 K8 r
0 1 2 3 4 5 6 7 8
6 U5 l: z6 A+ e$ t 0123456789012345678901234567890123456789012345678901234567890123456789012345678904 [0 P" v& h* W* V6 x/ P8 S
--------------------------------------------------+--------------------------------------------------------------------------------7 p( H8 o( I/ ]2 V9 F
Comment card. KOMPAR > 0. |C data:LIN750_4.ATP3 K( @1 R$ A" T. y S
Marker card preceding new EMTP data case. |BEGIN NEW DATA CASE
! X% b) T# D9 |. x# ^/ HJose Marti`s line fitter. PDT0 = 0.00000000E+00 |JMARTI SETUP1 z9 r3 A% A) e' T0 O' [
Erase all of 0 cards in the punch buffer. |$ERASE: `0 F/ w" V8 I0 I" Z
Pairs of A6 terminal node names for each phase. |BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C- ^4 Y2 h, i% ]) S# ^
Compute overhead line constants. Limit = 120 |LINE CONSTANTS; @7 y3 X! |5 Z8 U
Request for metric (not English) units. |METRIC
: O9 [% ]7 K& o0 m2 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. 4
9 T) o' ]- |5 W! 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" a2 X1 q1 h+ n
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. 46 }) a& l+ J- @9 G3 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
% ]( V- M) y! X$ _) tLine 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 04 m% K3 k6 _! H) e1 l
Blank card terminating conductor cards. |BLANK CARD ENDING CONDUCTOR CARDS, W' _7 ~" R( F0 X$ h
Frequency card. 2.000E+01 1.000E+03 7.570E+01 | 20. 1.E3 75.7 1
]* [" \' x: k
- c: ~9 j% p+ Q9 [( ILine conductor table after sorting and initial processing.
! S# O2 Z- b2 \/ p; R6 I Table Phase Skin effect Resistance Reactance data specification Diameter Horizontal Avg height7 U0 k7 A* m8 o8 o9 E3 |% z
Row Number R-type R (ohm/km) X-type X(ohm/km) or GMR ( cm ) X (mtrs) Y (mtrs) Name8 g T4 q2 r2 n, W1 t0 O7 P2 O
1 1 .25900 .06900 4 .000000 2.90000 -19.200 14.800; V* ~) |/ P" @* r' ^7 f6 G
2 2 .25900 .06900 4 .000000 2.90000 0.300 14.800 d b+ P/ W- G! C& @" t6 w8 c
3 3 .25900 .06900 4 .000000 2.90000 19.800 14.800
( s4 X9 c7 _2 h3 K 4 1 .25900 .06900 4 .000000 2.90000 -19.800 14.800 c0 p& ]& }1 d
5 1 .25900 .06900 4 .000000 2.90000 -19.800 15.400
! W& W+ m G4 S' x& u0 Y" L$ E 6 1 .25900 .06900 4 .000000 2.90000 -19.200 15.400! ^- o9 q! b/ N$ b4 k- f) k3 r
7 2 .25900 .06900 4 .000000 2.90000 -0.300 14.800
1 j0 t3 Y9 G2 v( @/ j0 z 8 2 .25900 .06900 4 .000000 2.90000 -0.300 15.400
1 M/ S4 c: ~# g; g/ O- Z/ J2 M 9 2 .25900 .06900 4 .000000 2.90000 0.300 15.400
* q! F+ c# Z, g0 v1 v: D 10 3 .25900 .06900 4 .000000 2.90000 19.200 14.800) E5 X9 a8 q) X9 z; |7 h5 L$ z9 Y
11 3 .25900 .06900 4 .000000 2.90000 19.200 15.400
' U' c6 X& u# p, L 12 3 .25900 .06900 4 .000000 2.90000 19.800 15.400! Q% K/ Y4 _* q) ^) E5 j0 B
13 0 .17500 .44000 4 .000000 1.54000 -15.000 29.700) D5 n& I0 n C, ~
14 0 .17500 .44000 4 .000000 1.54000 15.000 29.7007 ^) R/ H. C7 r/ n
8 @) t R$ s7 y3 U6 P) F: ?* {
Matrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 1.00000000E+03 Hz. Correction factor =( v! X7 v+ x& K+ A9 Z$ g3 m
1.00000000E-061 _) T2 Z! y. ~4 A
% N& y) ?0 p4 H4 r
Modal parameters at frequency FREQ = 1.00000000E+03 Hz
; r5 W4 a' J5 I' A % }( p) ]9 g) O+ [! F( q
Eigenvector matrix [Ti] for current transformation: I-phase = [Ti]*I-mode. First the real part, row by row:) ^& ^5 \3 Q0 L% g" B
5.748140047158274E-01-7.071067811865638E-01-4.281225696572995E-01- f- [' p, `' d& X8 e" C
5.823896633398591E-01 1.700454252111332E-14 7.958782134849792E-01
# ?, q) I7 K) h/ b. r 5.748140047158198E-01 7.071067811865313E-01-4.281225696573222E-015 T6 R2 }5 k& J4 p
Finally, the imaginary part, row by row:- l X* b- _/ s6 D( {+ P
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00" \- |6 g% d- ~, D
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
- d0 Y5 m+ U% c 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
- F/ i9 W. Q' {+ _. p& m2 ^Frequency card. 2.000E+01 5.000E+01 7.570E+01 | 20. 50. 75.7 1+ y' k6 ~0 O8 p( }
) v* o! j# _7 _. |Matrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 5.00000000E+01 Hz. Correction factor =
- ^2 K q. ^! Q4 E1.00000000E-06
4 q# {" K- Z1 y8 cFrequency card. 2.000E+01 5.000E-03 7.570E+01 | 20. 0.005 75.7 7 10 1& W e+ I0 @6 n2 b$ R7 J5 n
Blank card terminating frequency cards. |BLANK CARD ENDING FREQUENCY CARDS
, \' f! q( q3 ~- B7 y: tBlank card ending "LINE CONSTANTS" cases. |BLANK CARD ENDING LINE CONSTANT
0 G2 J: t3 a" U1 `9 f- T; FRequest for default fitting (= 3 blank cards) |DEFAULT
- @7 k/ Z1 z9 K) w" m' v7 W. Z + r% M2 m8 K4 C
===== ===== Begin Zc fitting for mode IMODE = 1 ===== =====
9 B6 Q W8 _& H' C' FThe number of poles NPOLES = 41 in this loop exceeds the specified limit NORMAX = 30
4 H, w8 R A/ V7 q- N
8 m! q/ F0 w- k @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 1 @@@@@ @@@@@
3 b* s# l$ o1 V7 @5 `0 b
5 x3 ]; @9 v! Q* f0 g/ W: o! ~===== ===== Begin Zc fitting for mode IMODE = 2 ===== =====
q V4 }) h7 n% ?The number of poles NPOLES = 34 in this loop exceeds the specified limit NORMAX = 30, b! {+ }5 G% G) X' ?9 G. b
* R$ O: }1 r6 y5 G3 }- Y
@@@@@ @@@@@ Begin A1 fitting for mode IMODE = 2 @@@@@ @@@@@
3 V- w9 P9 Y" g+ o9 m1 `3 j 5 e& h5 g9 V! h6 u
===== ===== Begin Zc fitting for mode IMODE = 3 ===== =====
, U3 e. W2 v1 p# o7 A3 fThe number of poles NPOLES = 31 in this loop exceeds the specified limit NORMAX = 30: Y* ~+ A, @; k
# X7 ?1 O/ c- H2 [- C& y @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 3 @@@@@ @@@@@
* e. f6 e' @3 e7 O- C* k ! }( P9 r% Y/ |& u5 [ a4 t
Request for flushing of punch buffer. |$PUNCH
0 {) T" X3 U) B
+ p* a; ~' L* o& Q* cA listing of 80-column card images now being flushed from punch buffer follows.
' k' G: i0 r# Q; T {4 \- k===============================================================================
2 d7 T) n, Y- `2 L1234567890123456789012345678901234567890123456789012345678901234567890123456789
4 V1 z3 g- V( o$ n) `===============================================================================2 a/ H( A! E# i3 c, H
C <++++++> Cards punched by support routine on 13-Apr-10 16:56:55 <++++++>$ W+ g" Y; S% ~/ L
C ***** UNTRANSPOSED JMARTI line segment ******% X, m+ e( c; l0 O0 d6 Q4 P
C JMARTI SETUP, `+ ]3 O. @& p" [
C $ERASE
: O8 y* n5 \8 r8 W! L$ FC BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C2 B" T" r- t& b ~( a7 d7 ]% n
C LINE CONSTANTS
6 n r/ `3 s& [6 T4 r, E" EC METRIC
3 M+ z& M, m# S3 D1 VC 10.259 0.069 4 2.9 -19.5 25.1 10.1 60. 45.4 `" j) d/ u0 D% H: _- K; [+ b
C 20.259 0.069 4 2.9 0.0 25.1 10.1 60. 45.! B: f9 g" O- }5 G
C 30.259 0.069 4 2.9 19.5 25.1 10.1 60. 45.
P. A/ r# | ]; ]C 00.175 0.44 4 1.54 -15. 39.7 24.7 0.0 0.0 w3 K2 `1 G- a0 d: W! z
C 00.175 0.44 4 1.54 15. 39.7 24.7 0.0 0.0 O$ g( s4 U4 a4 l1 F, G9 \
C BLANK CARD ENDING CONDUCTOR CARDS
3 k5 B: u0 r! CC 20. 1.E3 75.7 1
! ?3 u) v6 v, [C 20. 50. 75.7 1/ y( M0 j4 k5 W3 C) F3 l
C 20. 0.005 75.7 7 10 16 ~, q# b, l" H4 I. l9 A, C4 B
C BLANK CARD ENDING FREQUENCY CARDS7 t' n, V4 C1 Y& p1 e: L. r% s
C BLANK CARD ENDING LINE CONSTANT( m( Q0 L. ~; l& v# P
C DEFAULT
a5 y# a1 t" |* _, q-1IN___AOUT__A 2. 0.00 -2 3
1 H7 h f& F$ y2 M- ~5 ] 17 3.3876136028747050000E+02+ h$ Z5 B7 ?+ w7 S+ Q" \
1.56748087606698020E+02 1.53350246690381570E+02 5.91752415177784810E+01
5 S: s D6 q$ ?$ H 2.01342311994593360E+02 2.35228649588483170E+02 2.53692631526845670E+02
: ^& G8 D. f. P7 [4 ? 1.66995629609519800E+02 3.13013616521086590E+02 7.77592731836887200E+02
) L, ~: b: f3 v/ H0 h# i 2.92709376085682020E+03 8.36186324719264120E+03 6.39337717296788010E+03
( Q, V3 L" L# U6 y8 R R 1.11850636212671030E+04 4.41394197432314540E+04 3.57997951874029590E+054 H7 ]6 W: K7 x6 _0 [
7.56151786639699950E+05 1.36950810507648970E+06: `0 e, i6 B9 `
1.42216936124761770E-01 2.00869674971664410E-01 2.46548549642172290E-010 R K6 y0 ~* n* }
4.83183838918269940E-01 8.90165197319727430E-01 1.60597725665316450E+001 a8 P6 y) \' i- I( q1 t
2.89724575888037260E+00 5.22044042049842180E+00 1.93205621429485000E+01% Q9 W+ @8 x, e: C0 N
6.43540045186946370E+01 1.19989060419415150E+02 2.38618178257245120E+02
/ z- l. J [# w' M; k8 M! { 7.72151589982453290E+02 2.99346013405561330E+03 1.27367479883974610E+04
( }# `. ]7 K, x! Z, @" l* F 5.61967457160417400E+04 1.12259275941284690E+05
, M$ A: e6 J; m9 l+ C; x 18 2.5648081591925806000E-04
- h, Q6 g6 f) K0 M8 u R( v, N 4.39088902072225850E-02 2.51823882949434860E-01 2.09625388083036990E-013 ^: V- Z7 o3 t, X
3.78494708253580230E-01 4.21222198449916040E-01 1.12875930767027930E+00
' @! D7 ~/ F+ v8 R0 Q 1.71876255372116240E+00 5.22622351239333400E+00 2.87507803450135600E+01
" Y* z3 i7 x! N( c( u; M* e" Q 3.11711415283725670E+02 -4.25029687238800080E+02 4.11909331052564360E+03
* A2 z5 c& Z+ l( q: j5 r 2.03169322161820860E+04 9.92298833352391920E+03 9.73079142175107300E+07. ?9 l* i# ~' Q; a, }: I
-9.55146506480773540E+07 1.78452787243354890E+08 -1.80280334637975660E+08
2 }, |# @% l" I& x 1.71037480519741610E+01 8.83202394182148960E+01 9.05344339387639390E+01
1 i' m5 n: m) z 1.45765976458050060E+02 1.67604264020870910E+02 4.33406916110919100E+02
( h' J @7 Q* |5 n$ Y1 ] 6.63140374794807490E+02 1.92887674552758430E+03 1.33200718265846740E+03" i8 s0 b" f% H" d+ C/ H0 P
5.71524437659357950E+03 1.42342855758340520E+04 1.25142080353191360E+04
; { k3 X8 L; L/ O 3.62317843255328920E+04 5.63019677971675190E+04 2.08969723652870020E+05
9 ]' G3 d. ?; b 2.09178693376523150E+05 1.79625128065165980E+05 1.79804753193231360E+05; L. P6 W( Z/ m( j
-2IN___BOUT__B 2. 0.00 -2 3! j( N1 b1 ~$ n/ h8 I; {
16 2.7356159603025270000E+02( T' b- ]0 k0 H+ z
3.69404660026332070E+02 -6.57736076515949720E+01 3.81922741682533400E+029 q" }- Q5 P/ w9 N( b
7.08453587370238780E+02 5.41167797769398360E+02 3.06226540265072910E+023 W0 z. a5 E4 U# c) b
9.12429137114825860E+01 1.45546235045872410E+02 4.35671648435959070E+02
) V4 b) k$ w8 X; w 9.89457112977898990E+02 1.20421629942927280E+04 2.52441351892631970E+04
7 e& G C% a, E3 C6 s 1.31721403134872210E+05 1.00702634087143390E+05 1.00067739988421900E+05
d( X+ B. U7 m4 j6 |. d 1.98945562771848960E+05
2 U8 ~8 b5 I% S+ c" q' _- J% a/ O 1.48932587810283570E-01 1.91111259756068880E-01 5.23244958961560200E-01" M# V: V0 g1 n) [- g- v
1.98685487501559810E+00 5.99260600202752600E+00 1.07800276387683840E+016 b5 P) W4 M9 I
1.40587613181405300E+01 2.26773470722948250E+01 3.15477144275676150E+02
; \3 k' G3 D: Z$ G 7.20661772011409880E+02 8.57135008822161760E+03 1.81290494844508870E+049 }9 l1 d( Z8 y& z4 z. z
9.82444873325722870E+04 6.84224792084696670E+04 7.51320465443383440E+04( L% ]5 d; P5 |
1.48835602821329780E+05
8 w1 n" l. f. W+ ~3 G 8 2.5331274985951097000E-04: r/ \/ \2 L, I7 a
9.77519359442743510E+00 9.06749971882869370E+01 3.89917698321721050E+02! n K/ ?' O# A! M" K
2.14763901924745410E+03 3.21139859861504280E+03 7.78666160670429240E+03
; W0 r, |9 k+ ^- h0 V6 V -4.35590044273043600E+04 1.46424632739437020E+057 O6 C. F8 o: q
1.34347544158826870E+03 1.11481723747429880E+04 2.13548802821824830E+042 h% G* Q% z9 G& Y
3.88406059295760640E+04 4.48673492254774170E+04 6.34696015771263410E+046 [' a, ~" v6 P7 [
5.71514355618160570E+05 1.84730022532517380E+05
: C2 v; k( K# }+ y-3IN___COUT__C 2. 0.00 -2 3
2 m; \; i0 h! R( ~ ?! P" p4 S M; O 12 2.4217757892053910000E+02
- r* p4 [) B% u# _9 S) e8 Q1 y 3.11081567238861170E+02 -2.67647353791795130E+01 3.71876217221247710E+02
6 g; _3 w4 S# P$ e* @ 7.07422509445779840E+02 7.84485674697519240E+02 5.15644097900284780E+01* h" W6 r2 u6 W. ]0 F
8.62357151535732380E+01 1.33677642835807010E+02 1.31608612652184290E+02; @" ^8 o1 g) R! O
1.14893287428216410E+02 9.93716544256342760E+01 5.59773592553784180E+04; E9 {+ d6 U% s' v/ ~) q$ M
1.34344252475530860E-01 1.81414794097451400E-01 5.11374925899225950E-01; \/ Z" b) b" ^& ~2 X
2.04824350656590370E+00 7.03072667690498320E+00 1.02204034540275260E+011 ]* w, _9 _4 J* K2 u% v8 ?5 {
1.40807516766374870E+01 2.26422726843327060E+01 3.61527808309766810E+01
" c) f# l' s2 W 5.66127229741269180E+01 9.24983189391125220E+01 4.52655232370584050E+04& X4 d$ F5 G; ]( \
6 2.5172653258524589000E-04! N# Y1 T- U9 D
9.16195806109742070E+00 3.77612637640999710E+02 6.49218461519983410E+02
% F. f; a `& a# P) j2 S. Q 2.16338680527304540E+03 -2.80386507590504550E+04 4.81761010930565240E+05
1 S' f2 G* d) t7 _ 1.48053740522388740E+03 4.65974978309593280E+04 5.01953038655574710E+04
# R, n! }, f; |* ~ 7.89025069563385330E+04 2.89584576325553890E+06 5.04629561166254750E+05
$ d. w- h# G, o" x9 ?+ O0 d 0.57481400 -0.70710678 -0.428122577 s$ ] j: u- L- [/ h- `6 \( p
0.00000000 0.00000000 0.00000000
9 W5 r/ Z. o [( `& X% A1 M 0.58238966 0.00000000 0.79587821
. I {6 H' I* W6 K( ~5 E 0.00000000 0.00000000 0.00000000
4 ^9 N" A' ]' U. O% v 0.57481400 0.70710678 -0.42812257* g7 b4 D2 O9 W# o4 F9 e. y
0.00000000 0.00000000 0.00000000. j: V2 E7 a! z1 q) v
=========< End of LUNIT7 punched cards as flushed by $PUNCH request >=======
/ D$ @# v6 T. l" D5 g+ a 4 l% R" M3 d" w! G
Blank card ending "JMARTI SETUP" data. |BLANK CARD ENDING JMARTI SETUP7 s2 ?9 N2 o0 e. z% f9 F
Total case timing (CP, I/O, tot), sec: 0.219 0.000 0.219
8 A0 g! N5 d9 q0 X# S R L C参数是那些啊?麻烦您一下 |
|