|
|
楼主 |
发表于 2010-4-21 21:04:42
|
显示全部楼层
回复 4# 大笨蛋
' P6 {( G" r& {" `! P, _2 e6 a3 D( `. c
是不是从生成的lis文件中查找?
" W9 U. @; _; v# C; ~/ KAlternative Transients Program (ATP), GNU Linux or DOS. All rights reserved by Can/Am user group of Portland, Oregon, USA.
7 F' V" j( I5 W; W 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) L6 r8 f/ m5 o
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.
3 W/ V! [: h( L& T8 wTotal size of LABCOM tables = 9868232 INTEGER words. VARDIM List Sizes follow : 6002 10K 192K 900 420K 1200- A# x8 V/ p* ?
15K 120K 2250 3800 720 1200 72800 510 90K 800 90 254 120K 100K 3K 15K 192K 120 30K 160K 600 210K 300 600 Z8 r( e3 U: q) B& S
--------------------------------------------------+--------------------------------------------------------------------------------/ w3 j- x f# s
Descriptive interpretation of input data cards. | Input data card images are shown below, all 80 columns, character by character
+ A6 P `, o, y+ d3 J9 M 0 1 2 3 4 5 6 7 8
$ I$ p7 w# ^1 ]) J4 k6 o) |% \ 0123456789012345678901234567890123456789012345678901234567890123456789012345678902 p( @: l, x2 U
--------------------------------------------------+--------------------------------------------------------------------------------
0 y- y1 Y9 m! B4 E( P. mComment card. KOMPAR > 0. |C data:LIN750_4.ATP5 x% @4 q/ s8 p: s1 H
Marker card preceding new EMTP data case. |BEGIN NEW DATA CASE
: s' f" g6 c6 b6 PJose Marti`s line fitter. PDT0 = 0.00000000E+00 |JMARTI SETUP
: q# j7 X+ c/ V* r- D2 I! {Erase all of 0 cards in the punch buffer. |$ERASE5 I2 F7 v: z$ ~( ^2 ~, e2 V, r/ N4 V
Pairs of A6 terminal node names for each phase. |BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C
8 L2 |2 C$ {6 S8 d( N/ bCompute overhead line constants. Limit = 120 |LINE CONSTANTS
' E9 _6 }2 @ E- ?: U ^/ M! ~Request for metric (not English) units. |METRIC
/ U3 }! h- \+ nLine 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* z! T+ x) t; a- I
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
. }( F y. V7 j* _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, x- L3 A) K1 I3 ]. a; 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
- x6 K+ _* k4 c; r. ~2 nLine 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, H; I, r5 Q. ?4 l y x
Blank card terminating conductor cards. |BLANK CARD ENDING CONDUCTOR CARDS. {" n: L$ e3 w& b3 G2 Z; f
Frequency card. 2.000E+01 1.000E+03 7.570E+01 | 20. 1.E3 75.7 1
! N; Y* h# B% s6 G8 a, d; w
' Y. U2 s9 h& J# \Line conductor table after sorting and initial processing.- j3 D9 W9 T6 p) Y7 {
Table Phase Skin effect Resistance Reactance data specification Diameter Horizontal Avg height* m8 M }( @2 ^4 ]( d" C! p
Row Number R-type R (ohm/km) X-type X(ohm/km) or GMR ( cm ) X (mtrs) Y (mtrs) Name
T/ U$ I( H0 G$ c/ I 1 1 .25900 .06900 4 .000000 2.90000 -19.200 14.8008 ~ Y8 K3 l- J# q, z& I6 F; a
2 2 .25900 .06900 4 .000000 2.90000 0.300 14.800; ]! u# g/ K" Z
3 3 .25900 .06900 4 .000000 2.90000 19.800 14.800
* L$ y! x$ A" s% Y% f: ?" H8 o% b# ^/ R 4 1 .25900 .06900 4 .000000 2.90000 -19.800 14.800& t3 @& T* |) }1 }9 x1 f
5 1 .25900 .06900 4 .000000 2.90000 -19.800 15.4006 C& s! V* ^) q2 c+ }
6 1 .25900 .06900 4 .000000 2.90000 -19.200 15.400
; h6 s5 V( h+ S1 Y' D$ A 7 2 .25900 .06900 4 .000000 2.90000 -0.300 14.8002 N3 ?' j5 `8 M# r1 B
8 2 .25900 .06900 4 .000000 2.90000 -0.300 15.400
8 n" d" h; D5 n9 t3 t7 r 9 2 .25900 .06900 4 .000000 2.90000 0.300 15.400. e+ Y/ G6 G2 Z2 |. E7 J: C5 q
10 3 .25900 .06900 4 .000000 2.90000 19.200 14.800/ B% l. _: O2 Q" F4 X
11 3 .25900 .06900 4 .000000 2.90000 19.200 15.400/ @" ^& M1 w! R$ F' D3 @& p
12 3 .25900 .06900 4 .000000 2.90000 19.800 15.400
# w0 ]* f' s% c4 n 13 0 .17500 .44000 4 .000000 1.54000 -15.000 29.700/ w3 w% b& }1 v
14 0 .17500 .44000 4 .000000 1.54000 15.000 29.700
5 R5 F& j ?8 Z. W, O2 K; j8 F
6 ~5 d w0 ?) M2 h1 FMatrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 1.00000000E+03 Hz. Correction factor =
; n7 n% c) x& N1.00000000E-06! u) H& @1 u+ \# V; b) _
7 m# t: e7 ]: `: ^' V4 B
Modal parameters at frequency FREQ = 1.00000000E+03 Hz& E/ ?+ H) K# I
+ r5 T! j2 Z" i2 C+ c, ] sEigenvector matrix [Ti] for current transformation: I-phase = [Ti]*I-mode. First the real part, row by row:
2 R8 {- |5 L( _" } 5.748140047158274E-01-7.071067811865638E-01-4.281225696572995E-018 o. ^) G" H3 |7 t
5.823896633398591E-01 1.700454252111332E-14 7.958782134849792E-01
5 {* |' Y* k/ W; b% R, z0 t5 y 5.748140047158198E-01 7.071067811865313E-01-4.281225696573222E-01
: m) Y' i0 C1 e0 [4 i/ T# IFinally, the imaginary part, row by row:% R: m7 Z# m+ @( T5 E4 }8 ?
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+008 D7 \- P2 r; \: ^1 E
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00' ^: H& |$ O; H7 k. i
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00" x" Q# C- s! K2 @4 n2 R3 U
Frequency card. 2.000E+01 5.000E+01 7.570E+01 | 20. 50. 75.7 1
x' g- V- L3 q " @! r4 r! [- z$ z3 l( E' j
Matrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 5.00000000E+01 Hz. Correction factor =& h/ d' M8 R" Z! H5 L
1.00000000E-062 J' G1 t) V5 Z! n
Frequency card. 2.000E+01 5.000E-03 7.570E+01 | 20. 0.005 75.7 7 10 1
5 W8 H; p/ s. r- Y% V. t/ w& Q9 r. ~. nBlank card terminating frequency cards. |BLANK CARD ENDING FREQUENCY CARDS
! d- G) F" ~' q6 @Blank card ending "LINE CONSTANTS" cases. |BLANK CARD ENDING LINE CONSTANT5 J6 y4 u7 O2 ^, M o# A$ g W: m
Request for default fitting (= 3 blank cards) |DEFAULT) u- R' z/ K8 h# v
/ `# f6 c. |" i- `' @* ]: @
===== ===== Begin Zc fitting for mode IMODE = 1 ===== =====# Z/ Q0 K" u/ B0 w% h
The number of poles NPOLES = 41 in this loop exceeds the specified limit NORMAX = 30
B+ G1 m) x' [0 L ~
: W2 d! _- n0 ?" v1 L+ k2 | @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 1 @@@@@ @@@@@
. D# Z% a b8 ?, ~
, z" S2 ]+ z) N( @3 w' C i===== ===== Begin Zc fitting for mode IMODE = 2 ===== =====
! G! A% X9 V6 e: f9 e9 cThe number of poles NPOLES = 34 in this loop exceeds the specified limit NORMAX = 30
" t$ l$ H% i4 @ 2 y: U) Z! e, J2 A- [2 B
@@@@@ @@@@@ Begin A1 fitting for mode IMODE = 2 @@@@@ @@@@@0 B7 R& \5 k' Y- ^3 Z
4 Z# r) Z& G, g8 v: A0 Q2 S& w
===== ===== Begin Zc fitting for mode IMODE = 3 ===== =====8 K; J. F, O' ~6 w
The number of poles NPOLES = 31 in this loop exceeds the specified limit NORMAX = 30
0 M. |; S4 a* F" H2 B* Q ) S& b/ y: c- ^' u! {
@@@@@ @@@@@ Begin A1 fitting for mode IMODE = 3 @@@@@ @@@@@- r" U) ^4 i t
9 b3 L' Q7 |! H' k$ p) M. `9 ?Request for flushing of punch buffer. |$PUNCH& x: g9 K& K: V. t5 y" ^( F* ]( `
8 b* E3 ~+ r. b, R0 _. B
A listing of 80-column card images now being flushed from punch buffer follows.
& G) D! `& _( H- a===============================================================================
b" I5 ] n- a3 A4 w/ F: m3 F% p12345678901234567890123456789012345678901234567890123456789012345678901234567896 i% d# P2 I4 M2 o% z6 ^3 s
===============================================================================
+ @! j6 v* e$ [/ v9 e) yC <++++++> Cards punched by support routine on 13-Apr-10 16:56:55 <++++++>3 `( Y3 e+ [1 v. x/ M) y( Z
C ***** UNTRANSPOSED JMARTI line segment ******
# V1 c, r( d; g! ~8 U) {$ dC JMARTI SETUP! r! \# G3 r9 x/ u4 B K+ C% U. L: k+ W
C $ERASE
, K' v% ^, w% }1 e# m. AC BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C/ s! M% v; _1 v. q" V. @7 g7 Z! V
C LINE CONSTANTS
& _' o5 S! l2 ?$ k+ s/ J [1 Q4 TC METRIC
' f6 W2 s/ Y1 Z1 k5 x l; VC 10.259 0.069 4 2.9 -19.5 25.1 10.1 60. 45.! n N: Y) d. h2 n( C- @9 m
C 20.259 0.069 4 2.9 0.0 25.1 10.1 60. 45.9 q1 Y: O( d' j3 p( B( [- [
C 30.259 0.069 4 2.9 19.5 25.1 10.1 60. 45.
9 {" c+ |8 n) t* n! ]C 00.175 0.44 4 1.54 -15. 39.7 24.7 0.0 0.0
5 U9 Z4 c w, x4 @* uC 00.175 0.44 4 1.54 15. 39.7 24.7 0.0 0.0( S! B& T5 a; A9 K$ ^
C BLANK CARD ENDING CONDUCTOR CARDS
; O0 V' `3 _. A" x7 F5 JC 20. 1.E3 75.7 1
% H" C0 D) ^" m: _( s3 J% K6 B! _C 20. 50. 75.7 1/ S4 k3 G- q) X) c; z0 H0 O( f8 Y8 D
C 20. 0.005 75.7 7 10 1
+ J9 N& }) O, {& }6 W. B: WC BLANK CARD ENDING FREQUENCY CARDS
! Q g/ e3 p+ p! F& @C BLANK CARD ENDING LINE CONSTANT1 d" A% m1 \3 F8 h& A. o M
C DEFAULT
% e0 i5 L4 L" o5 e+ `-1IN___AOUT__A 2. 0.00 -2 3
6 M' f8 X0 _$ G" x! I 17 3.3876136028747050000E+02& Q5 M/ u' r: G. e4 i8 x2 k `
1.56748087606698020E+02 1.53350246690381570E+02 5.91752415177784810E+01
5 A% }! r4 x" f2 m M 2.01342311994593360E+02 2.35228649588483170E+02 2.53692631526845670E+02
" Y9 I, c. _' [6 p6 O3 v 1.66995629609519800E+02 3.13013616521086590E+02 7.77592731836887200E+02" ~* U: e0 u7 g7 T* u( \* m2 C
2.92709376085682020E+03 8.36186324719264120E+03 6.39337717296788010E+03
4 d1 ~0 }3 }& a 1.11850636212671030E+04 4.41394197432314540E+04 3.57997951874029590E+05# R/ ^$ {% _' Z9 o0 X3 C; F4 [
7.56151786639699950E+05 1.36950810507648970E+06: f p2 Q9 V$ f$ ?# t4 o
1.42216936124761770E-01 2.00869674971664410E-01 2.46548549642172290E-01( r+ H7 i3 @. h( h0 w$ W0 N
4.83183838918269940E-01 8.90165197319727430E-01 1.60597725665316450E+006 Y- q3 b0 C/ T) e4 G4 N: Z8 @2 Z
2.89724575888037260E+00 5.22044042049842180E+00 1.93205621429485000E+01
. k }7 A7 u% a& J1 G$ l 6.43540045186946370E+01 1.19989060419415150E+02 2.38618178257245120E+02; S5 [/ ~- N* k' N
7.72151589982453290E+02 2.99346013405561330E+03 1.27367479883974610E+04
% ]. Q7 ~ C) g; I 5.61967457160417400E+04 1.12259275941284690E+059 ~/ X! K; E6 ?: G4 n
18 2.5648081591925806000E-04
1 y3 r1 Z2 @# d. s3 _* E/ k 4.39088902072225850E-02 2.51823882949434860E-01 2.09625388083036990E-01
6 e+ ?( e% I s) ^4 g1 f% h 3.78494708253580230E-01 4.21222198449916040E-01 1.12875930767027930E+00
* ~2 c: o$ X' R 1.71876255372116240E+00 5.22622351239333400E+00 2.87507803450135600E+01
8 h1 E( e9 Y" V) u8 O; Q. I' g 3.11711415283725670E+02 -4.25029687238800080E+02 4.11909331052564360E+03
1 C f, L) Q4 B" J: b 2.03169322161820860E+04 9.92298833352391920E+03 9.73079142175107300E+07( ?+ s2 F4 U6 h2 x8 ?- X( u Z* X
-9.55146506480773540E+07 1.78452787243354890E+08 -1.80280334637975660E+08
% a( C5 Z3 v6 o6 U) p! P 1.71037480519741610E+01 8.83202394182148960E+01 9.05344339387639390E+01
$ g6 i+ \8 q* {4 X" D9 J; B. _3 K 1.45765976458050060E+02 1.67604264020870910E+02 4.33406916110919100E+02
8 y' z4 S! [+ F2 ?1 t 6.63140374794807490E+02 1.92887674552758430E+03 1.33200718265846740E+03: Q4 [; c* Z8 m; r) Y4 p6 |
5.71524437659357950E+03 1.42342855758340520E+04 1.25142080353191360E+04, B/ ~% Y- ^. T1 ]$ p
3.62317843255328920E+04 5.63019677971675190E+04 2.08969723652870020E+054 p: B. M: ?, m- a
2.09178693376523150E+05 1.79625128065165980E+05 1.79804753193231360E+05# ^; v2 h- c' \' f. ^4 C
-2IN___BOUT__B 2. 0.00 -2 3$ _1 E; r; _: v7 _0 D
16 2.7356159603025270000E+02
, V: H& O( F& P% e 3.69404660026332070E+02 -6.57736076515949720E+01 3.81922741682533400E+02
$ u; w( }& o- D5 R* A 7.08453587370238780E+02 5.41167797769398360E+02 3.06226540265072910E+026 r' q$ y" Z- Q" l/ E" @
9.12429137114825860E+01 1.45546235045872410E+02 4.35671648435959070E+02" D9 U/ g) [2 R# R" ?
9.89457112977898990E+02 1.20421629942927280E+04 2.52441351892631970E+04
3 J8 U4 A' o7 ^8 {/ u- G: e 1.31721403134872210E+05 1.00702634087143390E+05 1.00067739988421900E+05. O1 Z. k) \. Q0 j
1.98945562771848960E+058 D; C6 m$ n5 U0 Y* ^2 u
1.48932587810283570E-01 1.91111259756068880E-01 5.23244958961560200E-01
& E: T/ `9 B' h9 U: ~- U5 l 1.98685487501559810E+00 5.99260600202752600E+00 1.07800276387683840E+01
: a. f7 ^- h) i+ t- w 1.40587613181405300E+01 2.26773470722948250E+01 3.15477144275676150E+028 G1 A" M/ z- U- J' \% x6 {
7.20661772011409880E+02 8.57135008822161760E+03 1.81290494844508870E+04
7 L1 p# g3 V6 ^" z1 [; B 9.82444873325722870E+04 6.84224792084696670E+04 7.51320465443383440E+04
' W7 N% e" u- H0 z0 s 1.48835602821329780E+05
8 h% r! J- Y" H9 G 8 2.5331274985951097000E-04
1 h9 n9 Z# C# s3 l% t 9.77519359442743510E+00 9.06749971882869370E+01 3.89917698321721050E+02
% {* g+ {8 y: l* f/ n2 U 2.14763901924745410E+03 3.21139859861504280E+03 7.78666160670429240E+03! r, g& l5 B# |5 X7 `
-4.35590044273043600E+04 1.46424632739437020E+053 k* X3 |5 p$ N
1.34347544158826870E+03 1.11481723747429880E+04 2.13548802821824830E+04
: S; Y4 i" ^- p0 j! U l 3.88406059295760640E+04 4.48673492254774170E+04 6.34696015771263410E+04
' j: }' J# \/ b! O- ~ 5.71514355618160570E+05 1.84730022532517380E+055 e, Q! R# ^! f: |% J$ u8 G- N4 ^- G1 j" U
-3IN___COUT__C 2. 0.00 -2 3
- L: t. w2 \% P8 q: d 12 2.4217757892053910000E+02& N6 f* f% M* W6 Y8 e; y: J9 l
3.11081567238861170E+02 -2.67647353791795130E+01 3.71876217221247710E+02
; X6 L- d4 {1 G" [5 x 7.07422509445779840E+02 7.84485674697519240E+02 5.15644097900284780E+01
+ O+ X" E) j/ v- [& _1 m 8.62357151535732380E+01 1.33677642835807010E+02 1.31608612652184290E+02
6 @ w) u6 n+ {* N9 [2 } 1.14893287428216410E+02 9.93716544256342760E+01 5.59773592553784180E+047 A2 ~. _' N! B3 d
1.34344252475530860E-01 1.81414794097451400E-01 5.11374925899225950E-01( B6 `8 W0 m$ r& m
2.04824350656590370E+00 7.03072667690498320E+00 1.02204034540275260E+01
' u1 `% W/ `4 h' o* n 1.40807516766374870E+01 2.26422726843327060E+01 3.61527808309766810E+013 |. }: f! l0 A2 z- ?: z6 _
5.66127229741269180E+01 9.24983189391125220E+01 4.52655232370584050E+04
* ^% l* V: R9 V4 Y 6 2.5172653258524589000E-04
6 o" {( c/ L1 T H% z- v. i8 v5 x! o! z 9.16195806109742070E+00 3.77612637640999710E+02 6.49218461519983410E+02
- |+ q" W5 V. h( R* N; O 2.16338680527304540E+03 -2.80386507590504550E+04 4.81761010930565240E+057 X! U; c; `7 V% W3 x1 G. P8 w
1.48053740522388740E+03 4.65974978309593280E+04 5.01953038655574710E+04; S/ U, X3 E# Q) d
7.89025069563385330E+04 2.89584576325553890E+06 5.04629561166254750E+05
% R' X5 m! n! A6 _/ j( [; ^ 0.57481400 -0.70710678 -0.42812257
4 j3 V$ A5 F$ R P2 O L6 R 0.00000000 0.00000000 0.00000000
8 f5 J" h% b V 0.58238966 0.00000000 0.795878218 U$ v4 Z* W: }( Z# O$ ]
0.00000000 0.00000000 0.00000000# |0 ]% y7 O6 j! d k0 I
0.57481400 0.70710678 -0.42812257
: o' T5 ~/ a0 c7 K* O 0.00000000 0.00000000 0.00000000) [4 c; [" r. A% e0 V( W! B
=========< End of LUNIT7 punched cards as flushed by $PUNCH request >=======
( @* ^4 F# E$ N9 H5 Y# B 4 u1 R6 ~9 c8 u. e( C
Blank card ending "JMARTI SETUP" data. |BLANK CARD ENDING JMARTI SETUP! ]2 o; ^) S+ f& L, X. K* t+ U+ |
Total case timing (CP, I/O, tot), sec: 0.219 0.000 0.219
9 r" r3 w& s0 y6 c4 ], O4 O$ w+ W* R R L C参数是那些啊?麻烦您一下 |
|