pbhcrnt120.txt

这是一个简单基于VB程序电力系统计算的源代码

1,7,1,.908371836063461,-84.8120620654545,.158544852421842,89.6491573906808,0,0
2,9,2,.860199089813541,-89.3726645882529,.225294369395254,84.5351429971643,.157250961930092,88.8455225069884
3,22,3,1.39135330951274,-92.0782049857169,4.23218637825568E-02,100.194727474932,1.59022060946082E-02,100.012487825115
4,19,4,.994964909095957,-90.9182363647453,9.63911112064486E-03,-126.679793761265,2.22058302587088E-03,62.7082033693331
5,18,5,1.47165418553928,-90.8433857738039,1.28109527406726E-02,-124.44427351504,2.73136788129485E-03,70.6030754477559
6,17,6,.983688388855507,-92.2304325821588,6.9546323699432E-03,-125.348978415404,5.57250462424946E-03,61.8811166675203
7,7,8,.524053713816185,95.4060260527343,.08296638937074,-89.9461234623386,0,0
8,7,9,.384327095124906,94.8905607085396,7.55828049403445E-02,-90.7951012989083,0,0
9,8,9,9.05011817679435E-02,88.1994705087915,.128486817769781,-86.9396025116598,.105573337253927,-82.9155450962055
10,10,9,.902956145502569,-90.0850237362852,.474974519575006,88.7687773397758,.272987134393246,92.6568130287192
11,9,22,.432494143427014,95.3971081003152,4.70309794797535E-02,96.6411552485658,1.10677907137199E-02,104.663008146878
12,10,10,0,0,0,0,.155442752916006,88.6036258688763
13,11,10,.90295614550259,-90.0850237362852,.474974519575006,88.7687773397758,.428182090399322,91.1864511098358
14,15,12,.295097172599588,81.7870297431667,3.78811431924081E-02,85.4752324336915,1.07693172303415E-02,-143.057088042848
15,12,12,1.61765477212231,-90.2366478315879,3.96234664469097E-03,-114.399288974013,3.56545913514941E-04,40.3812538380131
16,12,13,1.97678626132129,88.688755697001,.036657807036465,-97.3949469576871,6.03786750269164E-03,47.6735185912833
17,17,13,1.33824697104971,91.2467344221672,.043012125132963,79.692810315326,6.91318811780148E-03,-132.623496599366
18,15,14,.29509717259953,-98.2129702568354,3.78811431924082E-02,-94.5247675663087,2.65510426321219E-03,21.5706030458909
19,14,19,.29509717259969,-98.2129702568309,3.78811431924083E-02,-94.5247675663087,2.65510426321219E-03,21.5706030458911
20,15,15,0,0,0,0,8.23932075257834E-03,41.8433623393276
21,16,17,.351829716517015,100.750751910408,.03586082807296,84.2773579743516,2.00809381336414E-03,-175.214005387642
22,16,19,6.94789771303558E-02,71.2989426259116,8.03059489742362E-04,58.1139871047827,2.10205907538806E-04,-103.519072090247
23,16,20,.391369403511147,84.1633517910665,2.08975114176441E-02,-83.708972417894,1.88930766881809E-03,-60.2323897403008
24,16,21,6.71046750815594E-02,71.2272767113234,5.65667209485405E-03,-84.7781545710602,5.54272315200396E-04,-64.5011441044334
25,16,18,1.47165418553927,-90.8433857738039,1.28109527406726E-02,-124.44427351504,2.73136788129485E-03,70.6030754477559
26,19,21,.318866935136353,91.032089394907,.029957774797295,-84.5483099815042,1.83133560851352E-03,-38.4209001814326
27,20,22,.185013862433036,-78.9675412935128,2.10918264147437E-02,-84.7623049445778,1.79271885359581E-03,-57.8683556593762
28,21,22,1.72659377132747E-02,-37.393845727048,.035813168332893,-85.0381845807732,2.80157382482358E-03,-53.8540573039742
29,22,8,7.46713160816665E-02,-45.3369935057296,4.80275909875719E-02,-81.9891908202932,7.14847552328747E-03,-69.4356310544426
30,24,25,1.00973567146542,89.5594288752659,.460123056271449,-88.9462223705342,.310026795268878,-92.7183698264779
31,16,16,.607164997686506,89.658463183881,7.49408308903825E-04,53.933728895664,7.23477241597423E-05,-117.587458622023
32,8,8,0,0,0,0,9.93930904225969E-02,96.1211445257399
33,21,21,0,0,0,0,7.02150764244319E-04,87.1742878558624
34,23,23,1.05385654641496,-90.1134661736244,.524939142963001,90.0873444728614,.285840762375986,90.2943757813562
35,24,24,1.07627087268284,-90.2216297617352,.537770409020184,89.9060982389856,.298515635120785,89.6623613849128
38,23,25,1.95681262409023,89.8996583696088,.999847628386367,-90.5389928446157,.714002073940784,-89.1706666742705