|
楼主 |
发表于 2010-4-21 21:04:42
|
显示全部楼层
回复 4# 大笨蛋
' h' z* {3 Z3 A; p% f1 x# l+ B
! Y, R4 T6 `: b! q2 ~1 {是不是从生成的lis文件中查找? N6 k4 H2 |( b; g
Alternative Transients Program (ATP), GNU Linux or DOS. All rights reserved by Can/Am user group of Portland, Oregon, USA.# f/ j! h4 V+ d3 x
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) M+ j2 A+ Z! C
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.
( g& U. ^: @. ~, n6 d: Z- G2 QTotal size of LABCOM tables = 9868232 INTEGER words. VARDIM List Sizes follow : 6002 10K 192K 900 420K 1200
( y2 N' N. J- l/ s0 | _: k" y0 Q7 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, c( Y: ^' I8 v
--------------------------------------------------+--------------------------------------------------------------------------------: G9 l+ Z& f5 R2 T8 U) p
Descriptive interpretation of input data cards. | Input data card images are shown below, all 80 columns, character by character
9 m7 }9 n }3 }! ? 0 1 2 3 4 5 6 7 8
9 B7 M7 f) A, W. B8 j 012345678901234567890123456789012345678901234567890123456789012345678901234567890
1 `# U B% e0 R, i) S) s0 G; P--------------------------------------------------+--------------------------------------------------------------------------------2 X, S p5 D) ^. U# K- q: T V
Comment card. KOMPAR > 0. |C data:LIN750_4.ATP
6 W, L" U5 x2 N/ U! [Marker card preceding new EMTP data case. |BEGIN NEW DATA CASE6 X& ~: M* }" v4 J2 i
Jose Marti`s line fitter. PDT0 = 0.00000000E+00 |JMARTI SETUP; T @2 ?* `2 U( E$ Q- o9 ~
Erase all of 0 cards in the punch buffer. |$ERASE" {" M9 b' c# N N* f5 {6 \
Pairs of A6 terminal node names for each phase. |BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C0 a5 N* K H% n7 n9 k
Compute overhead line constants. Limit = 120 |LINE CONSTANTS
$ n7 F. _! P, [( N4 YRequest for metric (not English) units. |METRIC
8 x* ]7 \9 q8 h6 z9 I0 j" ]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
2 [; M% V( D: d kLine 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
6 ]# u! q( ~% f. m- `2 M" w: _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( F" U/ X7 ~8 Z! I2 W& I$ 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 |5 t* I# a# I( ^$ S' l/ G
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. r, _' e1 j4 ]+ S# B q
Blank card terminating conductor cards. |BLANK CARD ENDING CONDUCTOR CARDS0 a% {" E$ U3 v' m2 T6 E% v# J
Frequency card. 2.000E+01 1.000E+03 7.570E+01 | 20. 1.E3 75.7 1
8 g% D. ?4 I4 `4 w3 h0 a $ M# k+ v: `5 b6 j: t
Line conductor table after sorting and initial processing.8 J' q1 M% f8 g
Table Phase Skin effect Resistance Reactance data specification Diameter Horizontal Avg height
( D" t9 c2 P3 ~) Y% H5 X0 I5 t3 j7 x Row Number R-type R (ohm/km) X-type X(ohm/km) or GMR ( cm ) X (mtrs) Y (mtrs) Name
. E2 O0 A0 Z) O6 `, R: m; G) y 1 1 .25900 .06900 4 .000000 2.90000 -19.200 14.800
" Q G y! F& C1 a! M$ f% _ 2 2 .25900 .06900 4 .000000 2.90000 0.300 14.800% P: O5 u9 E u
3 3 .25900 .06900 4 .000000 2.90000 19.800 14.800
0 {+ Y2 t& }! J: K4 i" I/ y- Z: l* f 4 1 .25900 .06900 4 .000000 2.90000 -19.800 14.800
( K$ f }/ g m6 ^: E K( A 5 1 .25900 .06900 4 .000000 2.90000 -19.800 15.400
% \; B* d7 @8 A 6 1 .25900 .06900 4 .000000 2.90000 -19.200 15.400
/ i$ m9 ?2 u' F7 f8 h D 7 2 .25900 .06900 4 .000000 2.90000 -0.300 14.8004 ^' P0 O" M+ F3 Q! _8 M
8 2 .25900 .06900 4 .000000 2.90000 -0.300 15.400
) w2 G6 {' I0 ~ 9 2 .25900 .06900 4 .000000 2.90000 0.300 15.4004 `$ U4 v7 E X2 T. t, P; d; o/ {
10 3 .25900 .06900 4 .000000 2.90000 19.200 14.800& G% Q' S+ `# o. M/ H4 e
11 3 .25900 .06900 4 .000000 2.90000 19.200 15.400
( i% N/ w9 F6 O# \6 `) x 12 3 .25900 .06900 4 .000000 2.90000 19.800 15.400
& ]; {+ p- T4 I! Z: j) Z 13 0 .17500 .44000 4 .000000 1.54000 -15.000 29.700+ E3 H2 j) V8 k8 Z( {3 O
14 0 .17500 .44000 4 .000000 1.54000 15.000 29.700
# ~2 ?; u! ^4 @! k0 ?. q4 t0 P
' P( m0 d! \; G: NMatrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 1.00000000E+03 Hz. Correction factor =
5 J0 p% I! ^* D8 N1.00000000E-06
5 x( r% c1 i$ e6 H
# z5 Z1 `+ _& t$ W2 LModal parameters at frequency FREQ = 1.00000000E+03 Hz* T5 y c$ @( p* G, i4 h
# `+ D% ~ N+ Q
Eigenvector matrix [Ti] for current transformation: I-phase = [Ti]*I-mode. First the real part, row by row:- G& N0 B7 Q6 w6 C" X
5.748140047158274E-01-7.071067811865638E-01-4.281225696572995E-012 j2 W6 F/ L$ e& ~9 K
5.823896633398591E-01 1.700454252111332E-14 7.958782134849792E-01
) A0 |+ y# ?4 d# A+ K# S( R9 r, Y 5.748140047158198E-01 7.071067811865313E-01-4.281225696573222E-01
5 Q" Y( I0 C5 B5 fFinally, the imaginary part, row by row:
. D' n! p Z7 e5 Y0 h 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00 I) ^# Z0 x5 X# H; c* Z$ f- b: c
0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00
2 I4 }- x9 S0 G# o2 ` 0.000000000000000E+00 0.000000000000000E+00 0.000000000000000E+00# N9 B1 [' \% D( y2 Y( L
Frequency card. 2.000E+01 5.000E+01 7.570E+01 | 20. 50. 75.7 1
7 Y7 j {) ^ }# T( n* x 2 V+ a2 t5 h* r9 _6 G. ~' {3 g" c' G
Matrices are for earth resistivity = 2.00000000E+01 ohm-meters and frequency 5.00000000E+01 Hz. Correction factor =% g @2 j1 Z2 l) r) W# b& w6 W
1.00000000E-06
6 _+ c# M- u. Z) WFrequency card. 2.000E+01 5.000E-03 7.570E+01 | 20. 0.005 75.7 7 10 1# E) n6 h0 _0 d* c; {
Blank card terminating frequency cards. |BLANK CARD ENDING FREQUENCY CARDS
% a$ k- {. ] gBlank card ending "LINE CONSTANTS" cases. |BLANK CARD ENDING LINE CONSTANT
y5 i! g/ ^/ C/ nRequest for default fitting (= 3 blank cards) |DEFAULT. y' ~, e$ U; w% ^
* \ b2 j3 b8 s% w3 @===== ===== Begin Zc fitting for mode IMODE = 1 ===== =====- {! `5 R8 I2 {2 ~0 e4 F/ C
The number of poles NPOLES = 41 in this loop exceeds the specified limit NORMAX = 309 V9 [/ I4 z. q, x0 U* |
}. |5 @$ v! h8 V) a) A3 {6 U @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 1 @@@@@ @@@@@
* F! D! `; v* @. M* o! i
8 {& O% ]5 z0 F$ Q! K===== ===== Begin Zc fitting for mode IMODE = 2 ===== =====; C7 x$ U ^, U) \7 a P
The number of poles NPOLES = 34 in this loop exceeds the specified limit NORMAX = 308 |- P& t9 i8 z$ G
+ v7 j3 N( V0 {! s
@@@@@ @@@@@ Begin A1 fitting for mode IMODE = 2 @@@@@ @@@@@8 Y2 X, ]% C$ G+ O
7 z: l% a/ G/ ~, M4 f& S: \3 G
===== ===== Begin Zc fitting for mode IMODE = 3 ===== =====
2 B# L- e; p2 g# U) b( {. |5 gThe number of poles NPOLES = 31 in this loop exceeds the specified limit NORMAX = 30
; @( z6 T8 P0 y7 m( g8 z
) v% `& G9 S8 a) g+ I @@@@@ @@@@@ Begin A1 fitting for mode IMODE = 3 @@@@@ @@@@@, I. A: A2 a6 v! I
/ z: y8 ?: f5 v% _% U3 L) |" _& M
Request for flushing of punch buffer. |$PUNCH
' ~. Y1 v! ~, ~8 V. I7 R# { 2 C6 U2 q' P, K& U8 _
A listing of 80-column card images now being flushed from punch buffer follows.& k3 b4 `+ U! G
===============================================================================
8 J6 ]% w) K8 B; q- @8 f3 @1234567890123456789012345678901234567890123456789012345678901234567890123456789% N1 k5 Z2 v' }$ N: r; S- k; E
===============================================================================3 P" y% o- i2 k
C <++++++> Cards punched by support routine on 13-Apr-10 16:56:55 <++++++>4 Y( I9 m. J& L. t9 @
C ***** UNTRANSPOSED JMARTI line segment ******; s- z; P) l: c7 S
C JMARTI SETUP
7 r& @% t$ w7 L; G2 H3 eC $ERASE
+ ?: Z) s8 d0 H) i) cC BRANCH IN___AOUT__AIN___BOUT__BIN___COUT__C
! |6 t3 C$ H a* N$ MC LINE CONSTANTS
. [' @( o# V) z# N. n) k: Y+ I1 WC METRIC* L1 N% \- o7 K- G5 B6 w/ H$ f; t
C 10.259 0.069 4 2.9 -19.5 25.1 10.1 60. 45., Y0 I/ Y2 {, O6 N# F$ n; H
C 20.259 0.069 4 2.9 0.0 25.1 10.1 60. 45.
, T9 T) `3 q4 S+ ?- y; i9 PC 30.259 0.069 4 2.9 19.5 25.1 10.1 60. 45.0 F& x; M* |! V3 w- _
C 00.175 0.44 4 1.54 -15. 39.7 24.7 0.0 0.02 n( X% B1 f& y R) f
C 00.175 0.44 4 1.54 15. 39.7 24.7 0.0 0.0
5 H" o* X4 b' U! ZC BLANK CARD ENDING CONDUCTOR CARDS' m% b, K# R5 C% \* F2 [8 [1 e, p# e/ w
C 20. 1.E3 75.7 1' G& T0 Q1 P$ Q3 R4 c; ~! M9 f
C 20. 50. 75.7 1
, x0 u8 ?/ p& \C 20. 0.005 75.7 7 10 1
# @- x" N; a( s) ^5 F& M( rC BLANK CARD ENDING FREQUENCY CARDS5 q; z8 ?( Q g3 I7 Q7 C: m9 v
C BLANK CARD ENDING LINE CONSTANT
8 T, x: x2 ]0 cC DEFAULT& A1 H1 f1 O/ n/ [
-1IN___AOUT__A 2. 0.00 -2 3
; { ~& N& d, `) Q 17 3.3876136028747050000E+02
5 B8 Z+ b$ B; g9 c2 G4 W 1.56748087606698020E+02 1.53350246690381570E+02 5.91752415177784810E+01( _1 w3 |) V4 F
2.01342311994593360E+02 2.35228649588483170E+02 2.53692631526845670E+02
- E8 x* L6 T& ^! L) c5 [ 1.66995629609519800E+02 3.13013616521086590E+02 7.77592731836887200E+028 `8 J( _( `6 F
2.92709376085682020E+03 8.36186324719264120E+03 6.39337717296788010E+03
) }$ F6 K1 ` d: ~ 1.11850636212671030E+04 4.41394197432314540E+04 3.57997951874029590E+05+ M1 x5 @' F! Y% h0 q
7.56151786639699950E+05 1.36950810507648970E+060 S/ T# \1 z- H: v( N+ w. J2 T
1.42216936124761770E-01 2.00869674971664410E-01 2.46548549642172290E-01- b, j1 D& x& F4 c7 Y
4.83183838918269940E-01 8.90165197319727430E-01 1.60597725665316450E+00
0 l: b# R& ~2 Q+ | 2.89724575888037260E+00 5.22044042049842180E+00 1.93205621429485000E+01- T1 v5 G/ K& F! V- e$ c2 T0 x) c, z
6.43540045186946370E+01 1.19989060419415150E+02 2.38618178257245120E+02% X. W; M( o( a- a+ _" u4 E6 T
7.72151589982453290E+02 2.99346013405561330E+03 1.27367479883974610E+04% @# R4 x2 Y8 H6 ?% r; A+ d
5.61967457160417400E+04 1.12259275941284690E+05+ c+ f+ z4 _3 W0 K, k2 J
18 2.5648081591925806000E-04
; M' Y& o- w: k9 A$ z 4.39088902072225850E-02 2.51823882949434860E-01 2.09625388083036990E-01
8 i: R! z9 m& k# Y% A+ u 3.78494708253580230E-01 4.21222198449916040E-01 1.12875930767027930E+00
, @. a9 t7 U) n% u1 ~, J 1.71876255372116240E+00 5.22622351239333400E+00 2.87507803450135600E+01
" B: B" ]# p2 }" H( u4 a* ^ 3.11711415283725670E+02 -4.25029687238800080E+02 4.11909331052564360E+03
, {' \4 p G- t 2.03169322161820860E+04 9.92298833352391920E+03 9.73079142175107300E+07, ? W- Q$ k0 t/ A+ l& U5 ^! I
-9.55146506480773540E+07 1.78452787243354890E+08 -1.80280334637975660E+08- w& C+ a- ^, J% l
1.71037480519741610E+01 8.83202394182148960E+01 9.05344339387639390E+01
6 w- `6 r0 t! N# k# X$ I! d 1.45765976458050060E+02 1.67604264020870910E+02 4.33406916110919100E+02
0 f; Y1 c) G2 Q& a, s6 ~ q$ D' E 6.63140374794807490E+02 1.92887674552758430E+03 1.33200718265846740E+03$ W# _7 t# ^. y9 w) R: j
5.71524437659357950E+03 1.42342855758340520E+04 1.25142080353191360E+04$ R T4 Q6 r$ O2 F$ s% x- m
3.62317843255328920E+04 5.63019677971675190E+04 2.08969723652870020E+05, V- r0 Z# D! S
2.09178693376523150E+05 1.79625128065165980E+05 1.79804753193231360E+05
( k( j" x0 {. \: u5 {-2IN___BOUT__B 2. 0.00 -2 3
b3 i. l7 ~6 m2 H 16 2.7356159603025270000E+029 p9 b) g2 _2 k1 z8 e c, u
3.69404660026332070E+02 -6.57736076515949720E+01 3.81922741682533400E+02* a1 y& }( P( E B# U( o
7.08453587370238780E+02 5.41167797769398360E+02 3.06226540265072910E+023 T. t2 G6 x) a
9.12429137114825860E+01 1.45546235045872410E+02 4.35671648435959070E+02
' Z, v* ^, l$ \9 C 9.89457112977898990E+02 1.20421629942927280E+04 2.52441351892631970E+04! a: O- T& E+ [
1.31721403134872210E+05 1.00702634087143390E+05 1.00067739988421900E+05
- P* ?. s3 K1 R& j; C+ }% | r 1.98945562771848960E+05
" ]4 D+ b/ E, X& g" u K 1.48932587810283570E-01 1.91111259756068880E-01 5.23244958961560200E-01
- W) ? x# `! M6 m% e$ }7 { 1.98685487501559810E+00 5.99260600202752600E+00 1.07800276387683840E+01! F2 l$ A0 [8 j# w
1.40587613181405300E+01 2.26773470722948250E+01 3.15477144275676150E+02
" K- |/ Y; F- q& [- n 7.20661772011409880E+02 8.57135008822161760E+03 1.81290494844508870E+04* L t. X5 J$ A$ t, A
9.82444873325722870E+04 6.84224792084696670E+04 7.51320465443383440E+04
) E/ y+ I R3 e" l& t8 j$ _5 | z; Z 1.48835602821329780E+05
8 C% w: l2 r8 Q 8 2.5331274985951097000E-04: X, b& d" T2 l# Y' y B$ V
9.77519359442743510E+00 9.06749971882869370E+01 3.89917698321721050E+02' X( O4 f/ H& T# w/ v" q
2.14763901924745410E+03 3.21139859861504280E+03 7.78666160670429240E+037 o' H, r1 e$ ^+ g* [
-4.35590044273043600E+04 1.46424632739437020E+057 U+ Y. k* K. |6 q+ f1 X& e
1.34347544158826870E+03 1.11481723747429880E+04 2.13548802821824830E+04$ y% W/ r1 t" F5 P2 |9 {" v
3.88406059295760640E+04 4.48673492254774170E+04 6.34696015771263410E+04
! M2 \; I) N5 F( e+ k4 F8 } 5.71514355618160570E+05 1.84730022532517380E+05! B! W. j. Q' [' m
-3IN___COUT__C 2. 0.00 -2 3
7 x- c$ U9 U8 e3 W0 { 12 2.4217757892053910000E+020 b) c+ q% Z6 p0 l' X
3.11081567238861170E+02 -2.67647353791795130E+01 3.71876217221247710E+028 K0 q, B# s' q" O
7.07422509445779840E+02 7.84485674697519240E+02 5.15644097900284780E+01# X5 p: k% ], `% d2 M
8.62357151535732380E+01 1.33677642835807010E+02 1.31608612652184290E+02
" K/ X) V5 j: L5 U3 u8 N k 1.14893287428216410E+02 9.93716544256342760E+01 5.59773592553784180E+046 S# E+ M7 d. L, Y0 q1 r7 l4 P
1.34344252475530860E-01 1.81414794097451400E-01 5.11374925899225950E-01: @: a% a# b3 i) L2 w2 l; S: G5 o
2.04824350656590370E+00 7.03072667690498320E+00 1.02204034540275260E+01+ \% C1 c8 P: r7 L9 }
1.40807516766374870E+01 2.26422726843327060E+01 3.61527808309766810E+017 i+ }' |% K) Q& |
5.66127229741269180E+01 9.24983189391125220E+01 4.52655232370584050E+04+ Q9 X& S' y+ N
6 2.5172653258524589000E-043 E5 s" j$ R7 H( ~
9.16195806109742070E+00 3.77612637640999710E+02 6.49218461519983410E+02
: F) T+ l. O; m: W7 f5 u 2.16338680527304540E+03 -2.80386507590504550E+04 4.81761010930565240E+056 G( _2 T/ h7 X) l8 Z
1.48053740522388740E+03 4.65974978309593280E+04 5.01953038655574710E+04
6 G! {1 P6 b; n( }& O5 w; O 7.89025069563385330E+04 2.89584576325553890E+06 5.04629561166254750E+05! T4 ^+ G2 G2 @! R3 J
0.57481400 -0.70710678 -0.428122578 Z- \. T5 v) p8 v) L) h5 O
0.00000000 0.00000000 0.00000000( R2 M! {6 Q9 B4 j8 j
0.58238966 0.00000000 0.79587821
3 \- K5 n$ ?, Q$ m9 D7 r. Q! s 0.00000000 0.00000000 0.00000000+ I4 M* j4 e) `4 w2 W% h1 w9 Q
0.57481400 0.70710678 -0.42812257! ~' \& ]" w$ e) R/ ~& P4 G$ I
0.00000000 0.00000000 0.00000000
& E* B8 r5 p6 M) w* B; t=========< End of LUNIT7 punched cards as flushed by $PUNCH request >=======& `& f, I% H5 x1 [
3 u0 L2 D: m7 |0 q% w# W0 D
Blank card ending "JMARTI SETUP" data. |BLANK CARD ENDING JMARTI SETUP' b: _* O7 ?2 H& Z8 F. J
Total case timing (CP, I/O, tot), sec: 0.219 0.000 0.219* r7 T5 e" t# q# R) j* @
R L C参数是那些啊?麻烦您一下 |
|