From b18347ffc9db9641e215995edea1c04c363b2bdf Mon Sep 17 00:00:00 2001 From: Angelo Rossi Date: Wed, 21 Jun 2023 12:04:16 +0000 Subject: Initial commit. --- benchmarks/dc65.dat | 63 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 63 insertions(+) create mode 100644 benchmarks/dc65.dat (limited to 'benchmarks/dc65.dat') diff --git a/benchmarks/dc65.dat b/benchmarks/dc65.dat new file mode 100644 index 0000000..9deb563 --- /dev/null +++ b/benchmarks/dc65.dat @@ -0,0 +1,63 @@ +BEGIN NEW DATA CASE +C BENCHMARK DC-65 +C The beginning case-marker card and the present comment cards represent +C an exception that must be carefully remembered. They are an exception +C to the rule that nothing must precede the definitions of argum. vectors +C KARD, KARG, KBEG, KEND, and KTEX. Well, only here, in and around KARD +C lines is such exceptional input allowed. Beginning with the very first +C KARG card and ending with the last KTEX card, there must be nothing +C but numbers. Now, about the data case, which was produced (except for +C these exceptional cards at the top!) by the 3rd subcase of DC-36, which +C uses "DATA BASE MODULE". There is a single argument, which is TMAX, +C the end-time of the study. The basic problem is that of DC-4, which +C has been modified by the removal of connectivity and phasor printout. +C To see 42 steps, key "file_name" as follows: "dc65. , 0.42" (note +C 3 or more blanks preceding the comma are required for automatic "dat". +KARD 2 +KARG 1 +KBEG 13 +KEND 16 +KTEX 0 +PRINTED NUMBER WIDTH, 13, 2, { Request maximum precision (for 8 output columns) + .010 TMAX + 1 1 0 3 1 -1 + 5 5 20 20 + BRANCH NAME:First { Even though name could go on next card, use this instead + GEN TRAN 5.0 5.E4 3 + TRAN NAME R-mag 1.E4 +93TRAN NAME Magnet .005 30. 3 + 0.0 0.0 { 1st point being origin is request to reflect + .005 30. + .01 40. + .02 45. + .10 50. + 5.0 100. + 9999 + TRAN LOADG 255. 5.E4 3 +C Note: original fixed-format card (next comment) converted to free-format: +C LOADG 1.E-6 +0,LOADG, , , , 1.E-6, 0.0, 0.0, , , , , , +BLANK card ending program branch cards. +BLANK card terminating program switch cards (none, for this case) +14GEN 70. .1591549 -1. +BLANK card terminating program source cards. +C Total network loss P-loss by summing injections = 8.286714400785E+00 +C Inject: GEN 70. 70. .23676326859385 .25769284993889 8.2867144007848 +C Inject: 0.0 0.0 -.1017288531066 -23.2514964 3.5605098587304 +C ---- Initial flux of coil "TRAN " to " " = -1.13295190E+01 +C Step Time GEN TRAN TRAN GEN TRAN +C TRAN TERRA LOADG +C 0 0.0 6.270257621 63.72974238 63.72974215 70. 63.72974238 +C 1 .01 6.156651781 63.83984825 63.83984802 69.99650003 63.83984825 + GEN TRAN +BLANK card ending program output-variable requests. +C 42 .42 1.105583309 62.81064576 62.81064551 63.91622907 62.81064576 +C Variable maxima : 6.270257621 64.72841365 64.7284134 70. 64.72841365 +C Times of maxima : 0.0 .18 .18 0.0 .18 +C Variable minima : 1.105583309 62.81064576 62.81064551 63.91622907 62.81064576 +C Times of minima : .42 .42 .42 .42 .42 + PRINTER PLOT +$WIDTH, 79, { Switch to narrow output to minimiz output (rest is of no interest) +BLANK card ending all plot cards +BEGIN NEW DATA CASE +BLANK -- cgit v1.2.3