OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
sortie_mvw.F File Reference
#include "implicit_f.inc"
#include "task_c.inc"
#include "com08_c.inc"
#include "scr14_c.inc"
#include "chara_c.inc"

Go to the source code of this file.

Functions/Subroutines

subroutine sortie_mvw (imvw, imvw_ref)

Function/Subroutine Documentation

◆ sortie_mvw()

subroutine sortie_mvw ( integer imvw,
integer imvw_ref )

Definition at line 30 of file sortie_mvw.F.

31C-----------------------------------------------
32C M o d u l e s
33C-----------------------------------------------
34 USE inoutfile_mod
35C-----------------------------------------------
36C I m p l i c i t T y p e s
37C-----------------------------------------------
38#include "implicit_f.inc"
39C-----------------------------------------------
40C C o m m o n B l o c k s
41C-----------------------------------------------
42#include "task_c.inc"
43#include "com08_c.inc"
44#include "scr14_c.inc"
45#include "chara_c.inc"
46C-----------------------------------------------
47C D u m m y A r g u m e n t s
48C-----------------------------------------------
49c my_real
50c . X(3,*)
51 integer
52 . imvw,imvw_ref
53C-----------------------------------------------
54C L o c a l V a r i a b l e s
55C-----------------------------------------------
56 integer
57 . ioutmvw,i
58 CHARACTER FILNAM*100
59 CHARACTER LINE*200
60 CHARACTER*100 FMW
61
62 INTEGER :: LEN_TMP_NAME
63 CHARACTER(len=2148) :: TMP_NAME
64C=======================================================================
65 IF(ispmd == 0) THEN
66 filnam=rootnam(1:rootlen)//'.mvw'
67 ioutmvw = 123123
68
69 len_tmp_name = outfile_name_len + len_trim(filnam)
70 tmp_name=outfile_name(1:outfile_name_len)//filnam(1:len_trim(filnam))
71
72 OPEN(unit=ioutmvw,file=tmp_name(1:len_tmp_name),
73 . access='SEQUENTIAL',
74 . form='FORMATTED',status='UNKNOWN')
75 IF(imvw == 1 .OR. imvw == 2)THEN
76 IF(izip == 0) THEN
77 WRITE(ioutmvw,'(A)')'{ safe_quotes_on }'
78 line='{ GRAPHIC_FILE_1 = "'//rootnam(1:rootlen)//'A001"}'
79 WRITE(ioutmvw,'(A)') line
80 line='{ RESULT_FILE_1 = "'//rootnam(1:rootlen)//'A001"}'
81 WRITE(ioutmvw,'(A)') line
82 ELSE
83 WRITE(ioutmvw,'(A)')'{ safe_quotes_on }'
84 line='{ graphic_file_1 = "'//ROOTNAM(1:ROOTLEN)//'A001.gz"}'
85 WRITE(IOUTMVW,'(a)') LINE
86 LINE='{ result_file_1 = "'//ROOTNAM(1:ROOTLEN)//'A001.gz"}'
87 WRITE(IOUTMVW,'(a)') LINE
88 ENDIF
89.OR. ELSEIF(IMVW == 3 IMVW == 4)THEN
90 WRITE(IOUTMVW,'(a)')'{ safe_quotes_on }'
91 LINE='{ graphic_file_1 = "'//ROOTNAM(1:ROOTLEN)//'.h3d"}'
92 WRITE(IOUTMVW,'(a)') LINE
93 LINE='{ result_file_1 = "'//ROOTNAM(1:ROOTLEN)//'.h3d"}'
94 WRITE(IOUTMVW,'(a)') LINE
95 ENDIF
96
97 IF (IMVW_REF == 1) THEN
98 WRITE(IOUTMVW,'(a)')'{ safe_quotes_on }'
99 LINE='{ graphic_file_2 = "'//IMVW_REFPATH(1:LEN_TRIM(IMVW_REFPATH))//ROOTNAM(1:ROOTLEN)//'A001"}'
100 WRITE(IOUTMVW,'(a)') LINE
101 LINE='{ result_file_2 = "'//IMVW_REFPATH(1:LEN_TRIM(IMVW_REFPATH))//ROOTNAM(1:ROOTLEN)//'A001"}'
102 WRITE(IOUTMVW,'(a)') LINE
103 LINE='{ plot_file_2 = "'//IMVW_REFPATH(1:LEN_TRIM(IMVW_REFPATH))//ROOTNAM(1:ROOTLEN)//'T01"}'
104 WRITE(IOUTMVW,'(a)') LINE
105 ENDIF
106
107.OR. IF (IMVW == 1 IMVW == 3)LINE='{ plot_file_1 = "'//ROOTNAM(1:ROOTLEN)//'T01"}'
108.OR. IF (IMVW == 2 IMVW == 4)LINE='{ plot_file_1 = "'//ROOTNAM(1:ROOTLEN)//'_0001.abf"}'
109 WRITE(IOUTMVW,'(a)') LINE
110 WRITE(IOUTMVW,'(a)')'*id("HyperWorks", "13.*")'
111 WRITE(IOUTMVW,'(a)')'*beginpalette()'
112 WRITE(IOUTMVW,'(a)')'*endpalette()'
113 WRITE(IOUTMVW,'(a)')'*beginpage() // page 1'
114 WRITE(IOUTMVW,'(a)')' *isactive()'
115 WRITE(ioutmvw,'(A)')' *Name("page1")'
116 WRITE(ioutmvw,'(A)')' *Title("{p1w2c1.y.HWDatatype}", On)'
117 WRITE(ioutmvw,'(A)')' *TitleFont("Arial", 1, 0, 12)'
118 IF (imvw_ref == 0) WRITE(ioutmvw,'(A)')' *Layout(10)'
119 IF (imvw_ref == 1) WRITE(ioutmvw,'(A)')' *Layout(10)'
120 WRITE(ioutmvw,'(A)')' *BeginAnimator(Transient)'
121 WRITE(ioutmvw,'(A)')' *CurrentTime(Undeformed)'
122 WRITE(ioutmvw,'(A)')' *StartTime(0,0)'
123 WRITE(ioutmvw,'(A)')' *EndTime(20,100433349)'
124 WRITE(ioutmvw,'(A)')' *Increment(Forward, Frame, 1, BounceOff)'
125 WRITE(ioutmvw,'(A)')' *EndAnimator()'
126 WRITE(ioutmvw,'(A)')' *WindowIDs(1, 2, 3, 4)'
127 WRITE(ioutmvw,'(A)')' *BeginWindow(Animation) // Window 1'
128 WRITE(ioutmvw,'(A)')' *IsActive()'
129 WRITE(ioutmvw,'(A)')' *ExportFormat("PNG")'
130 WRITE(ioutmvw,'(A)')' *AnimationNote("RUN REPORT")'
131 WRITE(ioutmvw,'(A)')' *BeginGraphic()'
132 WRITE(ioutmvw,'(A)')' *LightInfo(0, 0, 1, 0, 0, 0, 64)'
133 WRITE(ioutmvw,'(A)')' *RotationAngle(15)'
134 WRITE(ioutmvw,'(A)')' *BeginModel({GRAPHIC_FILE_1}, "RADIOSS (A) Result Reader")'
135 WRITE(ioutmvw,'(A)')' *ReaderProperty("Create 1D components:", "By solver output")'
136 WRITE(ioutmvw,'(A)')' *ReaderProperty("Displacement result based on:", "Model position")'
137 WRITE(ioutmvw,'(A)')' *ReaderProperty("Maximum Plastic strain over layers", "No")'
138 WRITE(ioutmvw,'(A)')' *ReaderProperty("Maximum Plastic strain over layers with prestrain removed", "No")'
139 WRITE(ioutmvw,'(A)')' *ReaderProperty("Plastic strain with prestrain removed", "No")'
140 WRITE(ioutmvw,'(A)')' *ReaderProperty("Strain Tensor with prestrain removed", "No")'
141 WRITE(ioutmvw,'(A)')' *ResultMathTemplate("Standard")'
142 WRITE(ioutmvw,'(A)')' *BeginResult({RESULT_FILE_1}, "RADIOSS (A) Result Reader")'
143 WRITE(ioutmvw,'(A)')' *CurrentSubcase(1)'
144 WRITE(ioutmvw,'(A)')' *ReaderProperty("Create 1D components:", "By solver output")'
145 WRITE(ioutmvw,'(A)')' *ReaderProperty("Displacement result based on:", "Model position")'
146 WRITE(ioutmvw,'(A)')' *ReaderProperty("Maximum Plastic strain over layers", "No")'
147 WRITE(ioutmvw,'(A)')' *ReaderProperty("Maximum Plastic strain over layers with prestrain removed", "No")'
148 WRITE(ioutmvw,'(A)')' *ReaderProperty("Plastic strain with prestrain removed", "No")'
149 WRITE(ioutmvw,'(A)')' *ReaderProperty("Strain Tensor with prestrain removed", "No")'
150 WRITE(ioutmvw,'(A)')' *EndResult()'
151cc
152c GENERIC PARTS
153cc
154 WRITE(ioutmvw,'(A)')' *BeginPart(1, "Orphan-Node", "PART", 0)'
155 WRITE(ioutmvw,'(A)')' *Attribute(On, IdOff, 41, Opa, Sha, Msh, InFit, InCut, InIso)'
156 WRITE(ioutmvw,'(A)')' *EndPart()'
157 WRITE(ioutmvw,'(A)')' *BeginPart(851, "Rigid", "PART", 0)'
158 WRITE(ioutmvw,'(A)')' *Attribute(On, IdOff, 18, Opa, Sha, Msh, InFit, InCut, InIso)'
159 WRITE(ioutmvw,'(A)')' *EndPart()'
160cc
161c GROUPS
162cc
163 WRITE(ioutmvw,'(A)')' *BeginGroup("0D Set", "Off", "Off", "255 0 0", 1, "wire")'
164 WRITE(ioutmvw,'(A)')' *BeginSelection(Part, SelectAll, "User_Set", 1)'
165 WRITE(ioutmvw,'(A)')' *Add("dimension == 0")'
166 WRITE(ioutmvw,'(A)')' *EndSelection()'
167 WRITE(ioutmvw,'(A)')' *EndGroup()'
168 WRITE(ioutmvw,'(A)')' *BeginGroup("1D Set", "Off", "Off", " 0 255 0", 1, "wire")'
169 WRITE(ioutmvw,'(A)')' *BeginSelection(Part, SelectAll, "User_Set", 2)'
170 WRITE(ioutmvw,'(A)')' *Add("dimension == 1")'
171 WRITE(ioutmvw,'(a)')' *endselection()'
172 WRITE(IOUTMVW,'(a)')' *endgroup()'
173 WRITE(IOUTMVW,'(a)')' *begingroup("2D Set", "Off", "Off", " 0 0 255", 1, "wire")'
174 WRITE(IOUTMVW,'(a)')' *beginselection(part, selectall, "User_Set", 3)'
175 WRITE(IOUTMVW,'(a)')' *add("dimension == 2")'
176 WRITE(IOUTMVW,'(a)')' *endselection()'
177 WRITE(IOUTMVW,'(a)')' *endgroup()'
178 WRITE(IOUTMVW,'(a)')' *begingroup("3D Set", "Off", "Off", " 0 0 255", 1, "wire")'
179 WRITE(IOUTMVW,'(a)')' *BeginSelection(Part, SelectAll, "User_Set", 4)'
180 WRITE(ioutmvw,'(A)')' *Add("dimension == 3")'
181 WRITE(ioutmvw,'(A)')' *EndSelection()'
182 WRITE(ioutmvw,'(A)')' *EndGroup()'
183 WRITE(ioutmvw,'(A)')' *BeginGroup("Orphan Nodes", "Off", "Off", "255 255 255", 1, "wire")'
184 WRITE(ioutmvw,'(A)')' *BeginSelection(Part, SelectAll, "User_Set", 5)'
185 WRITE(ioutmvw,'(A)')' *Add("Orphan-Node id 1")'
186 WRITE(ioutmvw,'(A)')' *EndSelection()'
187 WRITE(ioutmvw,'(A)')' *EndGroup()'
188cc
189c
190cc
191 WRITE(ioutmvw,'(A)')' *BeginDeformed()'
192 WRITE(ioutmvw,'(A)')' *ScaleMode("ScaleFactor")'
193 WRITE(ioutmvw,'(A)')' *Scale("1.000000 1.000000 1.000000")'
194 WRITE(ioutmvw,'(A)')' *ResolvedInSystem(0)'
195 WRITE(ioutmvw,'(A)')' *ResultType("Displacement")'
196 WRITE(ioutmvw,'(A)')' *UndeformedMode("None")'
197 WRITE(ioutmvw,'(A)')' *UndeformedColor("componentcolor")'
198 WRITE(ioutmvw,'(A)')' *UndeformedTracking("off")'
199 WRITE(ioutmvw,'(A)')' *EndDeformed()'
200 WRITE(ioutmvw,'(A)')' *BeginResultMath()'
201 WRITE(ioutmvw,'(A)')' *EndResultMath()'
202 WRITE(ioutmvw,'(A)')' *LayerNumber(0)'
203 WRITE(ioutmvw,'(a)')' *endmodel()'
204 WRITE(IOUTMVW,'(a)')' *renderoptions("None", "ClipTransparencyOff")'
205 WRITE(IOUTMVW,'(a)')' *displayoptions("NotesOn")'
206 WRITE(IOUTMVW,'(a)')' *beginnote("On", "Model Info")'
207 WRITE(IOUTMVW,'(a)')' *transparent("On")'
208 WRITE(IOUTMVW,'(a)')' *autohide("Off")'
209 WRITE(IOUTMVW,'(a)')' *fillcolor(31)'
210 WRITE(IOUTMVW,'(a)')' *textcolor(1)'
211 WRITE(IOUTMVW,'(a)')' *attach("WINDOW")'
212 WRITE(IOUTMVW,'(a)')' *position(0.500000, 0.500000)'
213 WRITE(IOUTMVW,'(a)')' *text("{for (i = 0; i != numpts(window.modeltitlelist); ++i) }\n
214 . {window.modelidlist[i]}:{window.modeltitlelist[i]}\n{window.loadcaselist[i]} :
215 . {window.simulationsteplist[i]} : {window.framelist[i]}\n{endloop}")'
216
217 WRITE(IOUTMVW,'(a)')' *font("Arial", "regular", "regular", 10)'
218 WRITE(ioutmvw,'(A)')' *Color(1)'
219 WRITE(ioutmvw,'(A)')' *BorderWidth(0)'
220 WRITE(ioutmvw,'(A)')' *NoteAlignment("Right")'
221 WRITE(ioutmvw,'(A)')' *NoteAnchor("Right", "Top")'
222 WRITE(ioutmvw,'(A)')' *TitleFlag("Yes")'
223 WRITE(ioutmvw,'(A)')' *EndNote()'
224 WRITE(ioutmvw,'(A)')' *Preferences(1, 31, 10, 0, 2, 3, 4, TriadOn, 30, "TopToBottom", "Off")'
225 WRITE(ioutmvw,'(A)')' *CurrentModel(1)'
226 WRITE(ioutmvw,'(A)')' *View(0.707107, 0.353553, -0.612372, 0, '
227 WRITE(ioutmvw,'(A)')' -0.707107, 0.353553, -0.612372, 0, '
228 WRITE(ioutmvw,'(A)')' -3.60866e-012, 0.866025, 0.5, 0, '
229 WRITE(ioutmvw,'(A)')' 0, 0, 0, 1)'
230 WRITE(ioutmvw,'(A)')' *ClippingRegion(-99.7008, 538.081, -174.535, 492.689, -560.868, 111.237)'
231
232
233 WRITE(ioutmvw,'(A)')' *BeginNote("On", "Note 2")'
234 WRITE(ioutmvw,'(A)')' *Transparent("On") '
235 WRITE(ioutmvw,'(A)')' *AutoHide("Off") '
236 WRITE(ioutmvw,'(A)')' *FillColor(31) '
237 WRITE(ioutmvw,'(A)')' *TextColor(1) '
238 WRITE(ioutmvw,'(A)')' *Attach("WINDOW") '
239 WRITE(ioutmvw,'(A)')' *Position(0.081395, 0.944444) '
240 WRITE(ioutmvw,'(A)')' *Text("RUN REPORT") '
241 WRITE(ioutmvw,'(A)')' *Font("Arial", "regular", "regular", 10) '
242 WRITE(ioutmvw,'(A)')' *Color(1) '
243 WRITE(ioutmvw,'(A)')' *BorderWidth(1) '
244 WRITE(ioutmvw,'(A)')' *Shape("Rectangle") '
245 WRITE(ioutmvw,'(A)')' *NoteAlignment("Left") '
246 WRITE(ioutmvw,'(A)')' *NoteAnchor("Left", "Top") '
247 WRITE(ioutmvw,'(A)')' *TitleFlag("No") '
248 WRITE(ioutmvw,'(A)')' *EndNote() '
249
250c
251c FMW = "(A28,1PG15.6,A,1PG15.6,A,1PG15.6,A,1PG15.6,A,1PG15.6,A,1PG15.6,A )"
252c WRITE(IOUTMVW,FMT=FMW) ,' *ClippingRegion(',XMIN_GLOB,',',XMAX_GLOB,',',YMIN_GLOB,',',
253c . YMAX_GLOB,',',ZMIN_GLOB,',',ZMAX_GLOB ,')'
254c
255 WRITE(ioutmvw,'(A)')' *EndGraphic()'
256 WRITE(ioutmvw,'(A)')' *EndWindow()'
257 WRITE(ioutmvw,'(A)')' *BeginWindow(Plot) // Window 2'
258 WRITE(ioutmvw,'(A)')' *SaveDataInline(0)'
259 WRITE(ioutmvw,'(A)')' *exportformat("PNG")'
260 WRITE(IOUTMVW,'(a)')' *beginplot()'
261 WRITE(IOUTMVW,'(a)')' *plottype(0)'
262 WRITE(IOUTMVW,'(a)')' *beginplotheader(on)'
263 WRITE(IOUTMVW,'(a)')' *primaryfont("Microsoft Sans Serif", 0, 0, 14)'
264 WRITE(IOUTMVW,'(a)')' *secondaryfont("Microsoft Sans Serif", 0, 0, 12)'
265 WRITE(IOUTMVW,'(a)')' *tertiaryfont("Microsoft Sans Serif", 0, 0, 12)'
266 WRITE(IOUTMVW,'(a)')' *color(0)'
267 WRITE(IOUTMVW,'(a)')' *text("run report(energies)")'
268 WRITE(IOUTMVW,'(A)')' *HeaderAlignment(2)'
269 WRITE(IOUTMVW,'(A)')' *EndPlotHeader()'
270 WRITE(IOUTMVW,'(A)')' *BeginPlotFooter(Off)'
271 WRITE(IOUTMVW,'(A)')' *PrimaryFont("microsoft sans serif", 0, 0, 12)'
272 WRITE(IOUTMVW,'(A)')' *SecondaryFont("microsoft sans serif", 0, 0, 12)'
273 WRITE(IOUTMVW,'(A)')' *TertiaryFont("microsoft sans serif", 0, 0, 12)'
274 WRITE(IOUTMVW,'(A)')' *Color(0)'
275 WRITE(IOUTMVW,'(A)')' *Text("{p1w2c1.y.hwrequest} - {p1w2c1.y.hwcomponent}")'
276 WRITE(IOUTMVW,'(A)')' *FooterAlignment(2)'
277 WRITE(IOUTMVW,'(A)')' *EndPlotFooter()'
278 WRITE(IOUTMVW,'(A)')' *BeginLegend(On)'
279 WRITE(IOUTMVW,'(A)')' *Font("microsoft sans serif", 0, 0, 10)'
280 WRITE(IOUTMVW,'(A)')' *BorderWidth(1)'
281 WRITE(IOUTMVW,'(A)')' *Color(0)'
282 WRITE(IOUTMVW,'(A)')' *Leader(Left)'
283 WRITE(IOUTMVW,'(A)')' *Location(INSIDE)'
284 WRITE(IOUTMVW,'(A)')' *Position(0.152542, 2.46092e+007, 9.45763, 1.85524e+007)'
285 WRITE(IOUTMVW,'(A)')' *AutoPosition(True)'
286 WRITE(IOUTMVW,'(A)')' *Reversed(no)'
287 WRITE(IOUTMVW,'(A)')' *EndLegend()'
288 WRITE(IOUTMVW,'(A)')' *UniformAspectRatio(0)'
289 WRITE(IOUTMVW,'(A)')' *FrameColor(66)'
290 WRITE(IOUTMVW,'(A)')' *BackgroundColor(1)'
291 WRITE(IOUTMVW,'(A)')' *GridLineColor(9)'
292 WRITE(IOUTMVW,'(A)')' *ZeroLineColor(0)'
293 WRITE(IOUTMVW,'(A)')' *BeginAxis(X, "x1", on)'
294 WRITE(IOUTMVW,'(A)')' *Label("time")'
295 WRITE(IOUTMVW,'(A)')' *Scale(Linear)'
296 WRITE(IOUTMVW,'(A)')' *TicMethod(PerAxis)'
297 WRITE(IOUTMVW,'(A)')' *Min(0)'
298c WRITE(IOUTMVW,'(A)')' *Max(22.5)'
299 FMW = "(a21,1pg15.6,a)"
300 WRITE(ioutmvw,fmt=fmw) ' *Max(',tt,')'
301C
302 WRITE(ioutmvw,'(A)')' *Format(Auto)'
303 WRITE(ioutmvw,'(A)')' *Precision(5)'
304 WRITE(ioutmvw,'(A)')' *Tics(10)'
305 WRITE(ioutmvw,'(A)')' *Grids(2)'
306 WRITE(ioutmvw,'(A)')' *Color(67)'
307 WRITE(ioutmvw,'(A)')' *AutoFit(TRUE)'
308 WRITE(ioutmvw,'(A)')' *LabelFont("Microsoft Sans Serif", 0, 0, 12)'
309 WRITE(ioutmvw,'(A)')' *TicsFont("Microsoft Sans Serif", 0, 0, 10)'
310 WRITE(ioutmvw,'(A)')' *FitRange(FALSE)'
311 WRITE(ioutmvw,'(A)')' *EndAxis()'
312 WRITE(ioutmvw,'(A)')' *BeginAxis(Y, "Y1", on)'
313 WRITE(ioutmvw,'(A)')' *Label("{p1w2c1.y.HWDatatype}")'
314 WRITE(ioutmvw,'(A)')' *Scale(Linear)'
315 WRITE(ioutmvw,'(A)')' *TicMethod(PerAxis)'
316c WRITE(IOUTMVW,'(A)')' *Min(-2.5e+006)'
317c WRITE(IOUTMVW,'(A)')' *Max(2.5e+007)'
318 WRITE(ioutmvw,'(A)')' *Format(Auto)'
319 WRITE(ioutmvw,'(A)')' *Precision(5)'
320 WRITE(ioutmvw,'(A)')' *Tics(12)'
321 WRITE(ioutmvw,'(A)')' *Grids(2)'
322 WRITE(ioutmvw,'(A)')' *Color(67)'
323 WRITE(ioutmvw,'(A)')' *AutoFit(TRUE)'
324 WRITE(ioutmvw,'(A)')' *LabelFont("Microsoft Sans Serif", 0, 0, 12)'
325 WRITE(ioutmvw,'(A)')' *TicsFont("Microsoft Sans Serif", 0, 0, 10)'
326 WRITE(ioutmvw,'(A)')' *FitRange(FALSE)'
327 WRITE(ioutmvw,'(A)')' *EndAxis()'
328 WRITE(ioutmvw,'(A)')' *BeginCurve(On, "{y.HWRequest}")'
329 WRITE(ioutmvw,'(A)')' *line(1, 22, 1)'
330 WRITE(IOUTMVW,'(a)')' *symbol(0, 22, 1)'
331 WRITE(IOUTMVW,'(a)')' *shade(false)'
332 WRITE(IOUTMVW,'(a)')' *bar(0, 0, 2)'
333 WRITE(IOUTMVW,'(a)')' *showinlegend(true)'
334 WRITE(IOUTMVW,'(a)')' *beginvector(y, file)'
335 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
336 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
337 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
338 WRITE(IOUTMVW,'(a)')' *request("Internal Energy")'
339 WRITE(IOUTMVW,'(a)')' *component("MAG")'
340 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
341 WRITE(IOUTMVW,'(a)')' *offset("0")'
342 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
343 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
344 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
345 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
346 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
347 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
348 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
349 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Internal Energy")'
350 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
351 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
352 WRITE(ioutmvw,'(A)')' *EndVector()'
353 WRITE(ioutmvw,'(A)')' *BeginVector(X, File)'
354 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
355 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
356 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
357 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
358 WRITE(ioutmvw,'(A)')' *Offset("0")'
359 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
360 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
361 WRITE(ioutmvw,'(a)')' *attribute("HWSolver", "Solver", "string", "radioss")'
362 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
363 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
364 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
365 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
366 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
367 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
368 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
369 WRITE(IOUTMVW,'(A)')' *EndVector()'
370 WRITE(IOUTMVW,'(A)')' *BeginVector(Time, File)'
371 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
372 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
373 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
374 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
375 WRITE(IOUTMVW,'(A)')' *Offset("0")'
376 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
377 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
378 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
379 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
380 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
381 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
382 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
383 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
384 WRITE(IOUTMVW,'(a)')' *endvector()'
385 WRITE(IOUTMVW,'(a)')' *beginvector(u, file)'
386 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
387 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
388 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
389 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
390 WRITE(IOUTMVW,'(a)')' *offset("0")'
391 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
392 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
393 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
394 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
395 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
396 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
397 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
398 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
399 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
400 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
401 WRITE(IOUTMVW,'(a)')' *endvector()'
402 WRITE(IOUTMVW,'(a)')' *beginvector(v, file)'
403 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
404 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
405 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
406 WRITE(IOUTMVW,'(a)')' *request("Internal Energy")'
407 WRITE(IOUTMVW,'(a)')' *component("MAG")'
408 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
409 WRITE(IOUTMVW,'(a)')' *offset("0")'
410 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
411 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
412 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
413 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
414 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
415 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
416 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
417 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Internal Energy")'
418 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
419 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
420 WRITE(IOUTMVW,'(a)')' *endvector()'
421 WRITE(IOUTMVW,'(a)')' *attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "Internal Energy")'
422 WRITE(IOUTMVW,'(a)')' *endcurve()'
423c
424 WRITE(IOUTMVW,'(a)')' *begincurve(on, "{y.HWRequest}")'
425 WRITE(IOUTMVW,'(a)')' *line(1, 18, 1)'
426 WRITE(IOUTMVW,'(a)')' *symbol(0, 18, 1)'
427 WRITE(IOUTMVW,'(a)')' *shade(false)'
428 WRITE(IOUTMVW,'(a)')' *bar(0, 0, 2)'
429 WRITE(IOUTMVW,'(a)')' *showinlegend(true)'
430 WRITE(IOUTMVW,'(a)')' *beginvector(y, file)'
431 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
432 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
433 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
434 WRITE(IOUTMVW,'(a)')' *request("Kinetic Energy")'
435 WRITE(IOUTMVW,'(a)')' *component("MAG")'
436 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
437 WRITE(IOUTMVW,'(a)')' *offset("0")'
438 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
439 WRITE(IOUTMVW,'(a)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
440 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
441 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "MAG")'
442 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
443 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
444 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Global Variables")'
445 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Kinetic Energy")'
446 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
447 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
448 WRITE(ioutmvw,'(A)')' *EndVector()'
449 WRITE(ioutmvw,'(A)')' *BeginVector(X, File)'
450 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
451 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
452 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
453 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
454 WRITE(ioutmvw,'(A)')' *Offset("0")'
455 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
456 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
457 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
458 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
459 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
460 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
461 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
462 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
463 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
464 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
465 WRITE(ioutmvw,'(A)')' *EndVector()'
466 WRITE(ioutmvw,'(A)')' *BeginVector(Time, File)'
467 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
468 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
469 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
470 WRITE(ioutmvw,'(a)')' *scalefactor("1")'
471 WRITE(IOUTMVW,'(a)')' *offset("0")'
472 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
473 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
474 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
475 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
476 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
477 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
478 WRITE(ioutmvw,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
479 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
480 WRITE(IOUTMVW,'(a)')' *endvector()'
481 WRITE(IOUTMVW,'(a)')' *beginvector(u, file)'
482 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
483 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
484 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
485 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
486 WRITE(IOUTMVW,'(a)')' *offset("0")'
487 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
488 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
489 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
490 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
491 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
492 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
493 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
494 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
495 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
496 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
497 WRITE(ioutmvw,'(A)')' *EndVector()'
498 WRITE(ioutmvw,'(A)')' *BeginVector(V, File)'
499 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
500 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
501 WRITE(ioutmvw,'(A)')' *Datatype("Global Variables")'
502 WRITE(ioutmvw,'(A)')' *Request("Kinetic Energy")'
503 WRITE(ioutmvw,'(A)')' *Component("MAG")'
504 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
505 WRITE(ioutmvw,'(A)')' *Offset("0")'
506 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
507 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
508 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
509 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "MAG")'
510 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
511 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
512 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Global Variables")'
513 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Kinetic Energy")'
514 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
515 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
516 WRITE(ioutmvw,'(A)')' *EndVector()'
517 WRITE(ioutmvw,'(A)')' *Attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "Kinetic Energy")'
518 WRITE(ioutmvw,'(A)')' *EndCurve()'
519c
520 WRITE(ioutmvw,'(A)')' *BeginCurve(On, "{y.HWRequest}")'
521 WRITE(ioutmvw,'(A)')' *Line(1, 55, 1)'
522 WRITE(ioutmvw,'(A)')' *Symbol(0, 55, 1)'
523 WRITE(ioutmvw,'(A)')' *Shade(False)'
524 WRITE(ioutmvw,'(A)')' *Bar(0, 0, 2)'
525 WRITE(ioutmvw,'(A)')' *ShowInLegend(True)'
526 WRITE(ioutmvw,'(A)')' *BeginVector(Y, File)'
527 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
528 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
529 WRITE(ioutmvw,'(A)')' *Datatype("Global Variables")'
530 WRITE(ioutmvw,'(A)')' *Request("Rotational kinetic energy")'
531 WRITE(ioutmvw,'(A)')' *Component("MAG")'
532 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
533 WRITE(ioutmvw,'(A)')' *Offset("0")'
534 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
535 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
536 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
537 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "MAG")'
538 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
539 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
540 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Global Variables")'
541 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Rotational kinetic energy")'
542 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
543 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
544 WRITE(ioutmvw,'(A)')' *EndVector()'
545 WRITE(ioutmvw,'(A)')' *BeginVector(X, File)'
546 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
547 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
548 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
549 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
550 WRITE(ioutmvw,'(A)')' *Offset("0")'
551 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
552 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
553 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
554 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
555 WRITE(ioutmvw,'(A)')' *attribute("HWRequest", "Request", "String", "Time")'
556 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
557 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
558 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
559 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
560 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
561 WRITE(IOUTMVW,'(a)')' *endvector()'
562 WRITE(IOUTMVW,'(a)')' *beginvector(time, file)'
563 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
564 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
565 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
566 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
567 WRITE(IOUTMVW,'(a)')' *offset("0")'
568 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
569 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
570 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
571 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
572 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
573 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
574 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
575 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
576 WRITE(IOUTMVW,'(a)')' *endvector()'
577 WRITE(IOUTMVW,'(a)')' *beginvector(u, file)'
578 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
579 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
580 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
581 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
582 WRITE(IOUTMVW,'(a)')' *offset("0")'
583 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
584 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
585 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
586 WRITE(ioutmvw,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
587 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
588 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
589 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
590 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "wordsize", "string", "4")'
591 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
592 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
593 WRITE(IOUTMVW,'(A)')' *EndVector()'
594 WRITE(IOUTMVW,'(A)')' *BeginVector(V, File)'
595 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
596 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
597 WRITE(IOUTMVW,'(A)')' *Datatype("global variables")'
598 WRITE(IOUTMVW,'(A)')' *Request("rotational kinetic energy")'
599 WRITE(IOUTMVW,'(A)')' *Component("mag")'
600 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
601 WRITE(IOUTMVW,'(A)')' *Offset("0")'
602 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
603 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
604 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
605 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "mag")'
606 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
607 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
608 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "global variables")'
609 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "rotational kinetic energy")'
610 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "mag")'
611 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
612 WRITE(IOUTMVW,'(A)')' *EndVector()'
613 WRITE(IOUTMVW,'(A)')' *Attribute("hwlastgoodcurvename", "hwlastgoodcurvename", "string", "rotational kinetic e
614 .nergy")'
615 WRITE(IOUTMVW,'(A)')' *EndCurve()'
616c
617 WRITE(IOUTMVW,'(A)')' *BeginCurve(On, "{y.hwrequest}")'
618 WRITE(IOUTMVW,'(A)')' *Line(1, 46, 1)'
619 WRITE(IOUTMVW,'(A)')' *Symbol(0, 46, 1)'
620 WRITE(IOUTMVW,'(A)')' *Shade(False)'
621 WRITE(IOUTMVW,'(A)')' *Bar(0, 0, 2)'
622 WRITE(IOUTMVW,'(A)')' *ShowInLegend(True)'
623 WRITE(IOUTMVW,'(A)')' *BeginVector(Y, File)'
624 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
625 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
626 WRITE(IOUTMVW,'(A)')' *Datatype("global variables")'
627 WRITE(IOUTMVW,'(A)')' *Request("External forces work")'
628 WRITE(IOUTMVW,'(A)')' *Component("mag")'
629 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
630 WRITE(IOUTMVW,'(A)')' *Offset("0")'
631 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
632 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
633 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
634 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
635 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
636 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
637 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
638 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "External forces work")'
639 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "complexcomponent", "string", "mag")'
640 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
641 WRITE(IOUTMVW,'(A)')' *EndVector()'
642 WRITE(IOUTMVW,'(A)')' *BeginVector(X, File)'
643 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
644 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
645 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
646 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
647 WRITE(IOUTMVW,'(A)')' *Offset("0")'
648 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
649 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
650 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
651 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
652 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
653 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
654 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
655 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
656 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
657 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
658 WRITE(IOUTMVW,'(A)')' *EndVector()'
659 WRITE(IOUTMVW,'(A)')' *BeginVector(Time, File)'
660 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
661 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
662 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
663 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
664 WRITE(IOUTMVW,'(A)')' *Offset("0")'
665 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
666 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
667 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
668 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
669 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
670 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
671 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
672 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
673 WRITE(IOUTMVW,'(A)')' *EndVector()'
674 WRITE(IOUTMVW,'(A)')' *BeginVector(U, File)'
675 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
676 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
677 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
678 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
679 WRITE(IOUTMVW,'(A)')' *Offset("0")'
680 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
681 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
682 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
683 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
684 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
685 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
686 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
687 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
688 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
689 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
690 WRITE(IOUTMVW,'(A)')' *EndVector()'
691 WRITE(IOUTMVW,'(A)')' *BeginVector(V, File)'
692 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
693 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
694 WRITE(IOUTMVW,'(A)')' *Datatype("global variables")'
695 WRITE(IOUTMVW,'(A)')' *Request("External forces work")'
696 WRITE(IOUTMVW,'(A)')' *Component("mag")'
697 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
698 WRITE(IOUTMVW,'(A)')' *Offset("0")'
699 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
700 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
701 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
702 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
703 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
704 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
705 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
706 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "External forces work")'
707 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
708 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
709 WRITE(IOUTMVW,'(a)')' *endvector()'
710 WRITE(IOUTMVW,'(a)')' *Attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "External forces work
711 .")'
712 WRITE(ioutmvw,'(A)')' *EndCurve()'
713c
714 WRITE(ioutmvw,'(A)')' *BeginCurve(On, "{y.HWRequest}")'
715 WRITE(ioutmvw,'(A)')' *Line(1, 24, 1)'
716 WRITE(ioutmvw,'(A)')' *Symbol(0, 24, 1)'
717 WRITE(ioutmvw,'(A)')' *Shade(False)'
718 WRITE(ioutmvw,'(A)')' *Bar(0, 0, 2)'
719 WRITE(ioutmvw,'(A)')' *ShowInLegend(True)'
720 WRITE(ioutmvw,'(A)')' *BeginVector(Y, File)'
721 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
722 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
723 WRITE(ioutmvw,'(A)')' *Datatype("Global Variables")'
724 IF (imvw == 1 .OR. imvw == 3) THEN
725 WRITE(ioutmvw,'(A)')' *Request("Springs internal energy")'
726 ELSE
727 WRITE(ioutmvw,'(A)')' *Request("Spring internal energy")'
728 ENDIF
729 WRITE(ioutmvw,'(A)')' *Component("MAG")'
730 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
731 WRITE(ioutmvw,'(A)')' *Offset("0")'
732 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
733 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
734 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
735 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "MAG")'
736 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
737 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
738 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Global Variables")'
739 IF (imvw == 1 .OR. imvw == 3) THEN
740 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Springs internal energy")'
741 ELSE
742 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Spring internal energy")'
743 ENDIF
744 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
745 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
746 WRITE(ioutmvw,'(A)')' *EndVector()'
747 WRITE(ioutmvw,'(A)')' *BeginVector(X, File)'
748 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
749 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
750 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
751 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
752 WRITE(ioutmvw,'(A)')' *Offset("0")'
753 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
754 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
755 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
756 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
757 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
758 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
759 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
760 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
761 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
762 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
763 WRITE(ioutmvw,'(A)')' *EndVector()'
764 WRITE(ioutmvw,'(A)')' *BeginVector(Time, File)'
765 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
766 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
767 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
768 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
769 WRITE(ioutmvw,'(A)')' *Offset("0")'
770 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
771 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
772 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
773 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
774 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
775 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
776 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
777 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
778 WRITE(ioutmvw,'(A)')' *EndVector()'
779 WRITE(ioutmvw,'(A)')' *BeginVector(U, File)'
780 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
781 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
782 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
783 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
784 WRITE(ioutmvw,'(A)')' *Offset("0")'
785 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
786 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
787 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
788 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
789 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
790 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
791 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
792 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
793 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
794 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
795 WRITE(ioutmvw,'(A)')' *EndVector()'
796 WRITE(ioutmvw,'(a)')' *beginvector(v, file)'
797 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
798 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
799 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
800.OR. IF (IMVW == 1 IMVW == 3) THEN
801 WRITE(IOUTMVW,'(a)')' *request("Springs internal energy")'
802 ELSE
803 WRITE(IOUTMVW,'(a)')' *request("Spring internal energy")'
804 ENDIF
805 WRITE(IOUTMVW,'(a)')' *component("MAG")'
806 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
807 WRITE(IOUTMVW,'(a)')' *offset("0")'
808 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
809 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
810 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
811 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
812 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
813 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
814 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
815.OR. IF (IMVW == 1 IMVW == 3) THEN
816 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Springs internal energy")'
817 ELSE
818 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "string", "springs internal energy")'
819 ENDIF
820 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "mag")'
821 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
822 WRITE(IOUTMVW,'(A)')' *EndVector()'
823.OR. IF (IMVW == 1 IMVW == 3) THEN
824 WRITE(IOUTMVW,'(A)')' *Attribute("hwlastgoodcurvename", "hwlastgoodcurvename", "string", "springs internal e
825 .nergy")'
826 ELSE
827 WRITE(IOUTMVW,'(A)')' *Attribute("hwlastgoodcurvename", "hwlastgoodcurvename", "string", "spring internal en
828 .ergy")'
829 ENDIF
830 WRITE(IOUTMVW,'(A)')' *EndCurve()'
831c
832 WRITE(IOUTMVW,'(A)')' *BeginCurve(On, "{y.hwrequest}")'
833 WRITE(IOUTMVW,'(A)')' *Line(1, 54, 1)'
834 WRITE(IOUTMVW,'(A)')' *Symbol(0, 54, 1)'
835 WRITE(IOUTMVW,'(A)')' *Shade(False)'
836 WRITE(IOUTMVW,'(A)')' *Bar(0, 0, 2)'
837 WRITE(IOUTMVW,'(A)')' *ShowInLegend(True)'
838 WRITE(IOUTMVW,'(A)')' *BeginVector(Y, File)'
839 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
840 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
841 WRITE(IOUTMVW,'(A)')' *Datatype("global variables")'
842 WRITE(IOUTMVW,'(A)')' *Request("contact energy")'
843 WRITE(IOUTMVW,'(A)')' *Component("mag")'
844 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
845 WRITE(IOUTMVW,'(A)')' *Offset("0")'
846 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
847 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
848 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
849 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "mag")'
850 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
851 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
852 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "global variables")'
853 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "contact energy")'
854 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "mag")'
855 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
856 WRITE(IOUTMVW,'(A)')' *EndVector()'
857 WRITE(IOUTMVW,'(A)')' *BeginVector(X, File)'
858 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
859 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
860 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
861 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
862 WRITE(IOUTMVW,'(A)')' *Offset("0")'
863 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
864 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
865 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
866 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
867 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
868 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
869 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
870 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
871 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
872 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
873 WRITE(IOUTMVW,'(A)')' *EndVector()'
874 WRITE(IOUTMVW,'(A)')' *BeginVector(Time, File)'
875 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
876 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
877 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
878 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
879 WRITE(IOUTMVW,'(A)')' *Offset("0")'
880 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
881 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
882 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "Datatype", "String", "Time")'
883 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
884 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
885 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
886 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
887 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
888 WRITE(IOUTMVW,'(a)')' *endvector()'
889 WRITE(IOUTMVW,'(a)')' *beginvector(u, file)'
890 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
891 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
892 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
893 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
894 WRITE(IOUTMVW,'(a)')' *offset("0")'
895 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
896 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
897 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
898 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
899 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
900 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
901 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
902 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
903 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
904 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
905 WRITE(IOUTMVW,'(a)')' *endvector()'
906 WRITE(IOUTMVW,'(a)')' *beginvector(v, file)'
907 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
908 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
909 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
910 WRITE(IOUTMVW,'(a)')' *request("Contact energy")'
911 WRITE(IOUTMVW,'(a)')' *component("MAG")'
912 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
913 WRITE(IOUTMVW,'(a)')' *offset("0")'
914 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
915 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
916 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
917 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
918 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
919 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
920 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
921 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Contact energy")'
922 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
923 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
924 WRITE(IOUTMVW,'(a)')' *endvector()'
925 WRITE(IOUTMVW,'(a)')' *attribute("hwlastgoodcurvename", "hwlastgoodcurvename", "string", "contact energy")'
926 WRITE(IOUTMVW,'(A)')' *EndCurve()'
927c
928 WRITE(IOUTMVW,'(A)')' *BeginCurve(On, "{y.hwrequest}")'
929 WRITE(IOUTMVW,'(A)')' *Line(1, 38, 1)'
930 WRITE(IOUTMVW,'(A)')' *Symbol(0, 38, 1)'
931 WRITE(IOUTMVW,'(A)')' *Shade(False)'
932 WRITE(IOUTMVW,'(A)')' *Bar(0, 0, 2)'
933 WRITE(IOUTMVW,'(A)')' *ShowInLegend(True)'
934 WRITE(IOUTMVW,'(A)')' *BeginVector(Y, File)'
935 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
936 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
937 WRITE(IOUTMVW,'(A)')' *Datatype("global variables")'
938 WRITE(IOUTMVW,'(A)')' *Request("hourglass energy")'
939 WRITE(IOUTMVW,'(A)')' *Component("mag")'
940 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
941 WRITE(IOUTMVW,'(A)')' *Offset("0")'
942 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
943 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
944 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
945 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "mag")'
946 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
947 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
948 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "global variables")'
949 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "hourglass energy")'
950 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "mag")'
951 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
952 WRITE(IOUTMVW,'(A)')' *EndVector()'
953 WRITE(IOUTMVW,'(A)')' *BeginVector(X, File)'
954 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
955 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
956 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
957 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
958 WRITE(IOUTMVW,'(A)')' *Offset("0")'
959 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
960 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
961 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
962 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
963 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
964 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
965 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
966 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
967 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
968 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
969 WRITE(IOUTMVW,'(A)')' *EndVector()'
970 WRITE(IOUTMVW,'(A)')' *BeginVector(Time, File)'
971 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
972 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
973 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
974 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
975 WRITE(IOUTMVW,'(A)')' *Offset("0")'
976 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {plot_file_1})'
977 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
978 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
979 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
980 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
981 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
982 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
983 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
984 WRITE(IOUTMVW,'(a)')' *endvector()'
985 WRITE(IOUTMVW,'(a)')' *beginvector(u, file)'
986 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
987 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
988 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
989 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
990 WRITE(IOUTMVW,'(a)')' *offset("0")'
991 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
992 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
993 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
994 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
995 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
996 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
997 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
998 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
999 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1000 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1001 WRITE(IOUTMVW,'(a)')' *endvector()'
1002 WRITE(IOUTMVW,'(a)')' *beginvector(v, file)'
1003 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1004 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1005 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
1006 WRITE(IOUTMVW,'(a)')' *request("Hourglass energy")'
1007 WRITE(IOUTMVW,'(a)')' *component("MAG")'
1008 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1009 WRITE(IOUTMVW,'(a)')' *offset("0")'
1010 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1011 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1012 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1013 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
1014 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1015 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1016 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
1017 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Hourglass energy")'
1018 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
1019 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1020 WRITE(IOUTMVW,'(a)')' *endvector()'
1021 WRITE(IOUTMVW,'(a)')' *attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "Hourglass energy")'
1022 WRITE(IOUTMVW,'(a)')' *endcurve()'
1023c
1024.OR. IF (IMVW == 1 IMVW == 3) THEN
1025 WRITE(IOUTMVW,'(a)')' *begincurve(on, "{y.HWRequest}")'
1026 WRITE(IOUTMVW,'(a)')' *line(1, 24, 1)'
1027 WRITE(IOUTMVW,'(a)')' *symbol(0, 24, 1)'
1028 WRITE(IOUTMVW,'(a)')' *shade(false)'
1029 WRITE(IOUTMVW,'(a)')' *bar(0, 0, 2)'
1030 WRITE(IOUTMVW,'(a)')' *showinlegend(true)'
1031 WRITE(IOUTMVW,'(a)')' *beginvector(y, file)'
1032 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1033 WRITE(IOUTMVW,'(a)')' *ReaderTargetVersion(14)'
1034 WRITE(ioutmvw,'(A)')' *Datatype("Global Variables")'
1035 WRITE(ioutmvw,'(A)')' *Request("TE-Total Energy")'
1036 WRITE(ioutmvw,'(A)')' *Component("MAG")'
1037 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
1038 WRITE(ioutmvw,'(A)')' *Offset("0")'
1039 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
1040 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
1041 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
1042 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "MAG")'
1043 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1044 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
1045 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Global Variables")'
1046 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "TE-Total Energy")'
1047 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
1048 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1049 WRITE(ioutmvw,'(A)')' *EndVector()'
1050 WRITE(ioutmvw,'(A)')' *BeginVector(X, File)'
1051 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
1052 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
1053 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
1054 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
1055 WRITE(ioutmvw,'(A)')' *Offset("0")'
1056 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
1057 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
1058 WRITE(ioutmvw,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1059 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
1060 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
1061 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
1062 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1063 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1064 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1065 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1066 WRITE(IOUTMVW,'(a)')' *endvector()'
1067 WRITE(IOUTMVW,'(a)')' *beginvector(time, file)'
1068 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1069 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1070 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
1071 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1072 WRITE(IOUTMVW,'(a)')' *offset("0")'
1073 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1074 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1075 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
1076 WRITE(IOUTMVW,'(a)')' *attribute("hwrequest", "request", "string", "time")'
1077 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
1078 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
1079 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
1080 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "ReaderTargetVersion", "String", "14.000000")'
1081 WRITE(IOUTMVW,'(a)')' *endvector()'
1082 WRITE(IOUTMVW,'(a)')' *beginvector(u, file)'
1083 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1084 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1085 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
1086 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1087 WRITE(IOUTMVW,'(a)')' *offset("0")'
1088 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1089 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1090 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1091 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
1092 WRITE(IOUTMVW,'(a)')' *Attribute("HWRequest", "Request", "String", "Time")'
1093 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
1094 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1095 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
1096 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1097 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1098 WRITE(ioutmvw,'(A)')' *endvector()'
1099 WRITE(IOUTMVW,'(a)')' *beginvector(v, file)'
1100 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1101 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1102 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
1103 WRITE(IOUTMVW,'(a)')' *request("TE-Total Energy")'
1104 WRITE(IOUTMVW,'(a)')' *component("MAG")'
1105 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1106 WRITE(IOUTMVW,'(a)')' *offset("0")'
1107 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1108 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1109 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1110 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
1111 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1112 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1113 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
1114 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "TE-Total Energy")'
1115 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
1116 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1117 WRITE(IOUTMVW,'(a)')' *endvector()'
1118 WRITE(IOUTMVW,'(a)')' *attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "TE-Total Energy")'
1119 WRITE(IOUTMVW,'(a)')' *endcurve()'
1120c
1121 WRITE(IOUTMVW,'(a)')' *begincurve(on, "{y.HWRequest}")'
1122 WRITE(IOUTMVW,'(a)')' *line(1, 54, 1)'
1123 WRITE(IOUTMVW,'(a)')' *symbol(0, 54, 1)'
1124 WRITE(IOUTMVW,'(a)')' *shade(false)'
1125 WRITE(IOUTMVW,'(a)')' *bar(0, 0, 2)'
1126 WRITE(IOUTMVW,'(a)')' *showinlegend(true)'
1127 WRITE(IOUTMVW,'(a)')' *beginvector(y, file)'
1128 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1129 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1130 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
1131 WRITE(IOUTMVW,'(a)')' *request("TER-Total Rotational Energy")'
1132 WRITE(IOUTMVW,'(a)')' *component("MAG")'
1133 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1134 WRITE(IOUTMVW,'(a)')' *offset("0")'
1135 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1136 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1137 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1138 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
1139 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1140 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1141 WRITE(IOUTMVW,'(a)')' *attribute("hwdatatype", "datatype", "string", "global variables")'
1142 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "String", "TER-Total Rotational Energy")'
1143 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
1144 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1145 WRITE(IOUTMVW,'(a)')' *endvector()'
1146 WRITE(IOUTMVW,'(a)')' *beginvector(x, file)'
1147 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1148 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1149 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
1150 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1151 WRITE(IOUTMVW,'(a)')' *offset("0")'
1152 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1153 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1154 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1155 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "datatype", "string", "time")'
1156 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
1157 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
1158 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
1159 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
1160 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
1161 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
1162 WRITE(IOUTMVW,'(A)')' *EndVector()'
1163 WRITE(IOUTMVW,'(A)')' *BeginVector(Time, File)'
1164 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
1165 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
1166 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
1167 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
1168 WRITE(IOUTMVW,'(A)')' *Offset("0")'
1169 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
1170 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
1171 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
1172 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
1173 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
1174 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
1175 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
1176 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
1177 WRITE(IOUTMVW,'(A)')' *EndVector()'
1178 WRITE(IOUTMVW,'(A)')' *BeginVector(U, File)'
1179 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
1180 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
1181 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
1182 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
1183 WRITE(IOUTMVW,'(A)')' *Offset("0")'
1184 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
1185 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
1186 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
1187 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
1188 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
1189 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
1190 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
1191 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
1192 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
1193 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
1194 WRITE(IOUTMVW,'(a)')' *endvector()'
1195 WRITE(IOUTMVW,'(a)')' *beginvector(v, file)'
1196 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1197 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1198 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
1199 WRITE(IOUTMVW,'(a)')' *request("TER-Total Rotational Energy")'
1200 WRITE(IOUTMVW,'(a)')' *component("MAG")'
1201 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1202 WRITE(IOUTMVW,'(a)')' *offset("0")'
1203 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1204 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1205 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1206 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
1207 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1208 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1209 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
1210 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "TE-Total Energy")'
1211 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
1212 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1213 WRITE(IOUTMVW,'(a)')' *endvector()'
1214 WRITE(IOUTMVW,'(a)')' *attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "TER-Total Rotation
1215 .al Energy")'
1216 WRITE(IOUTMVW,'(a)')' *endcurve()'
1217c
1218 WRITE(IOUTMVW,'(a)')' *begincurve(on, "{y.HWRequest}")'
1219 WRITE(IOUTMVW,'(a)')' *line(1, 38, 1)'
1220 WRITE(IOUTMVW,'(a)')' *symbol(0, 38, 1)'
1221 WRITE(IOUTMVW,'(a)')' *shade(false)'
1222 WRITE(IOUTMVW,'(a)')' *bar(0, 0, 2)'
1223 WRITE(IOUTMVW,'(a)')' *showinlegend(true)'
1224 WRITE(IOUTMVW,'(a)')' *beginvector(y, file)'
1225 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1226 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1227 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
1228 WRITE(IOUTMVW,'(a)')' *request("TTE-Total Translational Energy")'
1229 WRITE(IOUTMVW,'(a)')' *component("MAG")'
1230 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1231 WRITE(IOUTMVW,'(a)')' *offset("0")'
1232 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1233 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1234 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1235 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
1236 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1237 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1238 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
1239 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "TTE-Total Translational Energy")'
1240 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
1241 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1242 WRITE(IOUTMVW,'(a)')' *endvector()'
1243 WRITE(IOUTMVW,'(a)')' *beginvector(x, file)'
1244 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1245 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1246 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
1247 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1248 WRITE(IOUTMVW,'(a)')' *offset("0")'
1249 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1250 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1251 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1252 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
1253 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
1254 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
1255 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1256 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1257 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1258 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1259 WRITE(IOUTMVW,'(a)')' *endvector()'
1260 WRITE(IOUTMVW,'(a)')' *beginvector(time, file)'
1261 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1262 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1263 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
1264 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1265 WRITE(IOUTMVW,'(a)')' *offset("0")'
1266 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1267 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1268 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
1269 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
1270 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
1271 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1272 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1273 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1274 WRITE(IOUTMVW,'(a)')' *endvector()'
1275 WRITE(IOUTMVW,'(a)')' *beginvector(u, file)'
1276 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1277 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1278 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
1279 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1280 WRITE(IOUTMVW,'(a)')' *offset("0")'
1281 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1282 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1283 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1284 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
1285 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
1286 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
1287 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1288 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1289 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1290 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1291 WRITE(IOUTMVW,'(a)')' *endvector()'
1292 WRITE(IOUTMVW,'(a)')' *beginvector(v, file)'
1293 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1294 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1295 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
1296 WRITE(IOUTMVW,'(a)')' *request("TTE-Total Translational Energy")'
1297 WRITE(IOUTMVW,'(a)')' *component("MAG")'
1298 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1299 WRITE(IOUTMVW,'(a)')' *offset("0")'
1300 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1301 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1302 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1303 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
1304 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1305 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1306 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
1307 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "TE-Total Energy")'
1308 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
1309 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1310 WRITE(IOUTMVW,'(a)')' *endvector()'
1311 WRITE(IOUTMVW,'(a)')' *attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "TTE-Total Translat
1312 .ional Energy")'
1313 WRITE(IOUTMVW,'(a)')' *endcurve()'
1314c
1315 ENDIF
1316 WRITE(IOUTMVW,'(a)')' *endplot()'
1317 WRITE(IOUTMVW,'(a)')' *endwindow()'
1318
1319 IF(IMVW_REF == 0) THEN
1320
1321 WRITE(IOUTMVW,'(a)')' *beginwindow(plot) // window 3'
1322 WRITE(IOUTMVW,'(a)')' *savedatainline(0)'
1323 WRITE(IOUTMVW,'(a)')' *exportformat("PNG")'
1324 WRITE(IOUTMVW,'(a)')' *beginplot()'
1325 WRITE(IOUTMVW,'(a)')' *plottype(0)'
1326 WRITE(IOUTMVW,'(a)')' *beginplotheader(on)'
1327 WRITE(IOUTMVW,'(a)')' *primaryfont("Microsoft Sans Serif", 0, 0, 14)'
1328 WRITE(IOUTMVW,'(a)')' *secondaryfont("Microsoft Sans Serif", 0, 0, 12)'
1329 WRITE(IOUTMVW,'(a)')' *tertiaryfont("Microsoft Sans Serif", 0, 0, 12)'
1330 WRITE(IOUTMVW,'(a)')' *color(0)'
1331 WRITE(IOUTMVW,'(a)')' *text("RUN REPORT (Mass)")'
1332 WRITE(IOUTMVW,'(a)')' *headeralignment(2)'
1333 WRITE(IOUTMVW,'(a)')' *endplotheader()'
1334 WRITE(IOUTMVW,'(a)')' *BeginPlotFooter(Off)'
1335 WRITE(ioutmvw,'(A)')' *PrimaryFont("Microsoft Sans Serif", 0, 0, 12)'
1336 WRITE(ioutmvw,'(A)')' *SecondaryFont("Microsoft Sans Serif", 0, 0, 12)'
1337 WRITE(ioutmvw,'(A)')' *TertiaryFont("Microsoft Sans Serif", 0, 0, 12)'
1338 WRITE(ioutmvw,'(A)')' *Color(0)'
1339 WRITE(ioutmvw,'(A)')' *Text("{p1w2c1.y.HWRequest} - {p1w2c1.y.HWComponent}")'
1340 WRITE(ioutmvw,'(A)')' *FooterAlignment(2)'
1341 WRITE(ioutmvw,'(A)')' *EndPlotFooter()'
1342 WRITE(ioutmvw,'(A)')' *beginlegend(on)'
1343 WRITE(IOUTMVW,'(a)')' *font("Microsoft Sans Serif", 0, 0, 10)'
1344 WRITE(IOUTMVW,'(a)')' *borderwidth(1)'
1345 WRITE(IOUTMVW,'(a)')' *color(0)'
1346 WRITE(IOUTMVW,'(a)')' *Leader(Left)'
1347 WRITE(ioutmvw,'(A)')' *Location(INSIDE)'
1348 WRITE(ioutmvw,'(A)')' *Position(0.152542, 2.46092e+007, 9.45763, 1.85524e+007)'
1349 WRITE(ioutmvw,'(A)')' *AutoPosition(True)'
1350 WRITE(ioutmvw,'(A)')' *Reversed(no)'
1351 WRITE(ioutmvw,'(A)')' *EndLegend()'
1352 WRITE(ioutmvw,'(A)')' *UniformAspectRatio(0)'
1353 WRITE(ioutmvw,'(A)')' *FrameColor(66)'
1354 WRITE(ioutmvw,'(A)')' *BackgroundColor(1)'
1355 WRITE(ioutmvw,'(A)')' *GridLineColor(9)'
1356 WRITE(ioutmvw,'(A)')' *ZeroLineColor(0)'
1357 WRITE(ioutmvw,'(A)')' *BeginAxis(X, "X1", on)'
1358 WRITE(ioutmvw,'(A)')' *Label("Time")'
1359 WRITE(ioutmvw,'(A)')' *Scale(Linear)'
1360 WRITE(ioutmvw,'(A)')' *TicMethod(PerAxis)'
1361 WRITE(ioutmvw,'(A)')' *Min(0)'
1362c WRITE(IOUTMVW,'(A)')' *Max(22.5)'
1363 fmw = "(A21,1PG15.6,A)"
1364 WRITE(ioutmvw,fmt=fmw) ' *Max(',tt,')'
1365C
1366 WRITE(ioutmvw,'(A)')' *Format(Auto)'
1367 WRITE(ioutmvw,'(A)')' *Precision(5)'
1368 WRITE(ioutmvw,'(A)')' *Tics(10)'
1369 WRITE(ioutmvw,'(A)')' *Grids(2)'
1370 WRITE(ioutmvw,'(A)')' *Color(67)'
1371 WRITE(ioutmvw,'(A)')' *AutoFit(TRUE)'
1372 WRITE(ioutmvw,'(A)')' *LabelFont("Microsoft Sans Serif", 0, 0, 12)'
1373 WRITE(ioutmvw,'(A)')' *TicsFont("Microsoft Sans Serif", 0, 0, 10)'
1374 WRITE(ioutmvw,'(A)')' *FitRange(FALSE)'
1375 WRITE(ioutmvw,'(A)')' *EndAxis()'
1376 WRITE(ioutmvw,'(A)')' *BeginAxis(Y, "Y1", on)'
1377 WRITE(ioutmvw,'(A)')' *Label("{p1w2c1.y.HWDatatype}")'
1378 WRITE(ioutmvw,'(A)')' *Scale(Linear)'
1379 WRITE(ioutmvw,'(A)')' *TicMethod(PerAxis)'
1380c WRITE(IOUTMVW,'(A)')' *Min(-2.5e+006)'
1381c WRITE(IOUTMVW,'(A)')' *Max(2.5e+007)'
1382 WRITE(ioutmvw,'(A)')' *Format(Auto)'
1383 WRITE(ioutmvw,'(A)')' *Precision(5)'
1384 WRITE(ioutmvw,'(A)')' *Tics(12)'
1385 WRITE(ioutmvw,'(a)')' *grids(2)'
1386 WRITE(IOUTMVW,'(a)')' *color(67)'
1387 WRITE(IOUTMVW,'(a)')' *autofit(true)'
1388 WRITE(IOUTMVW,'(a)')' *labelfont("Microsoft Sans Serif", 0, 0, 12)'
1389 WRITE(IOUTMVW,'(a)')' *ticsfont("Microsoft Sans Serif", 0, 0, 10)'
1390 WRITE(IOUTMVW,'(a)')' *fitrange(false)'
1391 WRITE(IOUTMVW,'(a)')' *endaxis()'
1392 WRITE(IOUTMVW,'(a)')' *begincurve(on, "{y.hwrequest}")'
1393 WRITE(IOUTMVW,'(A)')' *Line(1, 22, 1)'
1394 WRITE(IOUTMVW,'(A)')' *Symbol(0, 22, 1)'
1395 WRITE(IOUTMVW,'(A)')' *Shade(False)'
1396 WRITE(IOUTMVW,'(A)')' *Bar(0, 0, 2)'
1397 WRITE(IOUTMVW,'(A)')' *ShowInLegend(True)'
1398 WRITE(IOUTMVW,'(A)')' *BeginVector(Y, File)'
1399 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
1400 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
1401 WRITE(IOUTMVW,'(A)')' *Datatype("global variables")'
1402 WRITE(IOUTMVW,'(A)')' *Request("mass")'
1403 WRITE(IOUTMVW,'(A)')' *Component("mag")'
1404 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
1405 WRITE(IOUTMVW,'(A)')' *Offset("0")'
1406 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
1407 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
1408 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
1409 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "mag")'
1410 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
1411 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
1412 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "global variables")'
1413 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "mass")'
1414 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "mag")'
1415 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
1416 WRITE(IOUTMVW,'(A)')' *EndVector()'
1417 WRITE(IOUTMVW,'(A)')' *BeginVector(X, File)'
1418 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_1})'
1419 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
1420 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
1421 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
1422 WRITE(IOUTMVW,'(A)')' *Offset("0")'
1423 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
1424 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_1})'
1425 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
1426 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "String", "Time")'
1427 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
1428 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
1429 WRITE(IOUTMVW,'(a)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1430 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
1431 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1432 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1433 WRITE(ioutmvw,'(A)')' *EndVector()'
1434 WRITE(ioutmvw,'(A)')' *BeginVector(Time, File)'
1435 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
1436 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
1437 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
1438 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
1439 WRITE(ioutmvw,'(A)')' *Offset("0")'
1440 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
1441 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
1442 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
1443 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
1444 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
1445 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1446 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1447 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1448 WRITE(ioutmvw,'(A)')' *EndVector()'
1449 WRITE(ioutmvw,'(A)')' *BeginVector(U, File)'
1450 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
1451 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
1452 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
1453 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
1454 WRITE(ioutmvw,'(A)')' *Offset("0")'
1455 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
1456 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
1457 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
1458 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
1459 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
1460 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
1461 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1462 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
1463 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1464 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1465 WRITE(ioutmvw,'(A)')' *EndVector()'
1466 WRITE(ioutmvw,'(A)')' *BeginVector(V, File)'
1467 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
1468 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
1469 WRITE(ioutmvw,'(A)')' *Datatype("Global Variables")'
1470 WRITE(ioutmvw,'(A)')' *Request("Internal Energy")'
1471 WRITE(ioutmvw,'(A)')' *Component("MAG")'
1472 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
1473 WRITE(ioutmvw,'(A)')' *Offset("0")'
1474 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
1475 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
1476 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
1477 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "MAG")'
1478 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1479 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
1480 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Global Variables")'
1481 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Internal Energy")'
1482 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
1483 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1484 WRITE(ioutmvw,'(A)')' *EndVector()'
1485 WRITE(ioutmvw,'(A)')' *Attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "Internal Energy")'
1486 WRITE(ioutmvw,'(A)')' *EndCurve()'
1487c
1488 WRITE(ioutmvw,'(A)')' *EndPlot()'
1489 WRITE(ioutmvw,'(A)')' *EndWindow()'
1490 WRITE(ioutmvw,'(A)')' *BeginWindow(Plot) // Window 4'
1491 WRITE(ioutmvw,'(A)')' *SaveDataInline(0)'
1492 WRITE(ioutmvw,'(A)')' *ExportFormat("PNG")'
1493 WRITE(ioutmvw,'(A)')' *BeginPlot()'
1494 WRITE(ioutmvw,'(A)')' *PlotType(0)'
1495 WRITE(ioutmvw,'(A)')' *BeginPlotHeader(On)'
1496 WRITE(ioutmvw,'(A)')' *PrimaryFont("Microsoft Sans Serif", 0, 0, 14)'
1497 WRITE(ioutmvw,'(A)')' *SecondaryFont("Microsoft Sans Serif", 0, 0, 12)'
1498 WRITE(ioutmvw,'(A)')' *TertiaryFont("Microsoft Sans Serif", 0, 0, 12)'
1499 WRITE(ioutmvw,'(A)')' *Color(0)'
1500 WRITE(ioutmvw,'(A)')' *Text("RUN REPORT (Time step)")'
1501 WRITE(ioutmvw,'(A)')' *HeaderAlignment(2)'
1502 WRITE(ioutmvw,'(A)')' *EndPlotHeader()'
1503 WRITE(ioutmvw,'(A)')' *BeginPlotFooter(Off)'
1504 WRITE(ioutmvw,'(A)')' *PrimaryFont("Microsoft Sans Serif", 0, 0, 12)'
1505 WRITE(ioutmvw,'(a)')' *secondaryfont("Microsoft Sans Serif", 0, 0, 12)'
1506 WRITE(IOUTMVW,'(a)')' *tertiaryfont("Microsoft Sans Serif", 0, 0, 12)'
1507 WRITE(IOUTMVW,'(a)')' *color(0)'
1508 WRITE(IOUTMVW,'(a)')' *text("{p1w2c1.y.HWRequest} - {p1w2c1.y.HWComponent}")'
1509 WRITE(IOUTMVW,'(a)')' *footeralignment(2)'
1510 WRITE(IOUTMVW,'(a)')' *endplotfooter()'
1511 WRITE(IOUTMVW,'(a)')' *beginlegend(on)'
1512 WRITE(IOUTMVW,'(a)')' *font("Microsoft Sans Serif", 0, 0, 10)'
1513 WRITE(IOUTMVW,'(a)')' *borderwidth(1)'
1514 WRITE(IOUTMVW,'(a)')' *color(0)'
1515 WRITE(IOUTMVW,'(a)')' *leader(left)'
1516 WRITE(IOUTMVW,'(a)')' *location(inside)'
1517 WRITE(IOUTMVW,'(a)')' *position(0.152542, 2.46092e+007, 9.45763, 1.85524e+007)'
1518 WRITE(IOUTMVW,'(a)')' *autoposition(true)'
1519 WRITE(IOUTMVW,'(a)')' *reversed(no)'
1520 WRITE(IOUTMVW,'(a)')' *EndLegend()'
1521 WRITE(ioutmvw,'(A)')' *UniformAspectRatio(0)'
1522 WRITE(ioutmvw,'(A)')' *FrameColor(66)'
1523 WRITE(ioutmvw,'(A)')' *BackgroundColor(1)'
1524 WRITE(ioutmvw,'(A)')' *GridLineColor(9)'
1525 WRITE(ioutmvw,'(A)')' *ZeroLineColor(0)'
1526 WRITE(ioutmvw,'(A)')' *BeginAxis(X, "X1", on)'
1527 WRITE(ioutmvw,'(A)')' *Label("Time")'
1528 WRITE(ioutmvw,'(A)')' *Scale(Linear)'
1529 WRITE(ioutmvw,'(A)')' *TicMethod(PerAxis)'
1530 WRITE(ioutmvw,'(A)')' *Min(0)'
1531c WRITE(IOUTMVW,'(A)')' *Max(22.5)'
1532 fmw = "(A21,1PG15.6,A)"
1533 WRITE(ioutmvw,fmt=fmw) ' *Max(',tt,')'
1534C
1535 WRITE(ioutmvw,'(A)')' *Format(Auto)'
1536 WRITE(ioutmvw,'(A)')' *Precision(5)'
1537 WRITE(ioutmvw,'(A)')' *Tics(10)'
1538 WRITE(ioutmvw,'(A)')' *Grids(2)'
1539 WRITE(ioutmvw,'(A)')' *Color(67)'
1540 WRITE(ioutmvw,'(A)')' *AutoFit(TRUE)'
1541 WRITE(ioutmvw,'(A)')' *LabelFont("Microsoft Sans Serif", 0, 0, 12)'
1542 WRITE(ioutmvw,'(A)')' *TicsFont("Microsoft Sans Serif", 0, 0, 10)'
1543 WRITE(ioutmvw,'(A)')' *FitRange(FALSE)'
1544 WRITE(ioutmvw,'(A)')' *EndAxis()'
1545 WRITE(ioutmvw,'(A)')' *BeginAxis(Y, "Y1", on)'
1546 WRITE(ioutmvw,'(A)')' *Label("{p1w2c1.y.HWDatatype}")'
1547 WRITE(ioutmvw,'(A)')' *Scale(Linear)'
1548 WRITE(ioutmvw,'(A)')' *TicMethod(PerAxis)'
1549c WRITE(IOUTMVW,'(A)')' *Min(-2.5e+006)'
1550c WRITE(IOUTMVW,'(A)')' *Max(2.5e+007)'
1551 WRITE(ioutmvw,'(A)')' *Format(Auto)'
1552 WRITE(ioutmvw,'(A)')' *Precision(5)'
1553 WRITE(ioutmvw,'(A)')' *Tics(12)'
1554 WRITE(ioutmvw,'(A)')' *Grids(2)'
1555 WRITE(ioutmvw,'(A)')' *Color(67)'
1556 WRITE(ioutmvw,'(A)')' *AutoFit(TRUE)'
1557 WRITE(ioutmvw,'(A)')' *LabelFont("Microsoft Sans Serif", 0, 0, 12)'
1558 WRITE(ioutmvw,'(A)')' *TicsFont("Microsoft Sans Serif", 0, 0, 10)'
1559 WRITE(ioutmvw,'(a)')' *fitrange(false)'
1560 WRITE(IOUTMVW,'(a)')' *endaxis()'
1561 WRITE(IOUTMVW,'(a)')' *begincurve(on, "{y.HWRequest}")'
1562 WRITE(IOUTMVW,'(a)')' *line(1, 22, 1)'
1563 WRITE(IOUTMVW,'(a)')' *symbol(0, 22, 1)'
1564 WRITE(IOUTMVW,'(a)')' *shade(false)'
1565 WRITE(IOUTMVW,'(a)')' *bar(0, 0, 2)'
1566 WRITE(IOUTMVW,'(a)')' *showinlegend(true)'
1567 WRITE(IOUTMVW,'(a)')' *beginvector(y, file)'
1568 WRITE(IOUTMVW,'(a)')' *Filename({PLOT_FILE_1})'
1569 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
1570 WRITE(ioutmvw,'(A)')' *Datatype("Global Variables")'
1571 WRITE(ioutmvw,'(A)')' *Request("Time step")'
1572 WRITE(ioutmvw,'(A)')' *Component("MAG")'
1573 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
1574 WRITE(ioutmvw,'(A)')' *Offset("0")'
1575 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
1576 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
1577 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
1578 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "MAG")'
1579 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1580 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
1581 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Global Variables")'
1582 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time step")'
1583 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
1584 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1585 WRITE(ioutmvw,'(A)')' *EndVector()'
1586 WRITE(ioutmvw,'(A)')' *BeginVector(X, File)'
1587 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
1588 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
1589 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
1590 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
1591 WRITE(ioutmvw,'(A)')' *Offset("0")'
1592 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
1593 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
1594 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
1595 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
1596 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
1597 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
1598 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1599 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
1600 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1601 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1602 WRITE(ioutmvw,'(A)')' *EndVector()'
1603 WRITE(ioutmvw,'(A)')' *BeginVector(Time, File)'
1604 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
1605 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
1606 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
1607 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
1608 WRITE(ioutmvw,'(A)')' *Offset("0")'
1609 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_1})'
1610 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
1611 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
1612 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
1613 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
1614 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1615 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1616 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1617 WRITE(ioutmvw,'(A)')' *EndVector()'
1618 WRITE(ioutmvw,'(A)')' *BeginVector(U, File)'
1619 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_1})'
1620 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
1621 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
1622 WRITE(ioutmvw,'(a)')' *scalefactor("1")'
1623 WRITE(IOUTMVW,'(a)')' *offset("0")'
1624 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1625 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1626 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1627 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
1628 WRITE(IOUTMVW,'(a)')' *attribute("hwrequest", "request", "string", "time")'
1629 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
1630 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
1631 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "WordSize", "String", "4")'
1632 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
1633 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1634 WRITE(IOUTMVW,'(a)')' *endvector()'
1635 WRITE(IOUTMVW,'(a)')' *beginvector(v, file)'
1636 WRITE(IOUTMVW,'(a)')' *filename({plot_file_1})'
1637 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1638 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
1639 WRITE(IOUTMVW,'(a)')' *request("Internal Energy")'
1640 WRITE(IOUTMVW,'(a)')' *component("MAG")'
1641 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1642 WRITE(IOUTMVW,'(a)')' *offset("0")'
1643 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1644 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_1})'
1645 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1646 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
1647 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1648 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1649 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
1650 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "string", "Internal Energy")'
1651 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
1652 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1653 WRITE(IOUTMVW,'(a)')' *endvector()'
1654 WRITE(IOUTMVW,'(a)')' *attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "Internal Energy")'
1655 WRITE(IOUTMVW,'(a)')' *endcurve()'
1656 WRITE(IOUTMVW,'(a)')' *endplot()'
1657 WRITE(IOUTMVW,'(a)')' *endwindow()'
1658
1659 ELSEIF(IMVW_REF == 1) THEN
1660
1661 WRITE(IOUTMVW,'(a)')' *beginwindow(animation) // window 3'
1662 WRITE(IOUTMVW,'(a)')' *isactive()'
1663 WRITE(IOUTMVW,'(a)')' *exportformat("PNG")'
1664 WRITE(IOUTMVW,'(a)')' *animationnote("REFERENCE REPORT")'
1665 WRITE(IOUTMVW,'(a)')' *begingraphic()'
1666 WRITE(IOUTMVW,'(a)')' *lightinfo(0, 0, 1, 0, 0, 0, 64)'
1667 WRITE(IOUTMVW,'(a)')' *rotationangle(15)'
1668 WRITE(IOUTMVW,'(a)')' *beginmodel({graphic_file_2}, "RADIOSS (A) Result Reader")'
1669 WRITE(IOUTMVW,'(a)')' *readerproperty("Create 1D components:", "By solver output")'
1670 WRITE(IOUTMVW,'(a)')' *readerproperty("Displacement result based on:", "Model position")'
1671 WRITE(IOUTMVW,'(a)')' *readerproperty("Maximum Plastic strain over layers", "No")'
1672 WRITE(IOUTMVW,'(a)')' *readerproperty("Maximum Plastic strain over layers with prestrain removed", "No")'
1673 WRITE(IOUTMVW,'(a)')' *readerproperty("Plastic strain with prestrain removed", "No")'
1674 WRITE(IOUTMVW,'(a)')' *readerproperty("Strain Tensor with prestrain removed", "No")'
1675 WRITE(IOUTMVW,'(a)')' *resultmathtemplate("Standard")'
1676 WRITE(IOUTMVW,'(a)')' *beginresult({result_file_2}, "RADIOSS (A) Result Reader")'
1677 WRITE(IOUTMVW,'(a)')' *currentsubcase(1)'
1678 WRITE(IOUTMVW,'(a)')' *readerproperty("Create 1D components:", "By solver output")'
1679 WRITE(IOUTMVW,'(a)')' *readerproperty("Displacement result based on:", "Model position")'
1680 WRITE(IOUTMVW,'(a)')' *readerproperty("Maximum Plastic strain over layers", "No")'
1681 WRITE(IOUTMVW,'(a)')' *readerproperty("Maximum Plastic strain over layers with prestrain removed", "No")'
1682 WRITE(IOUTMVW,'(a)')' *readerproperty("Plastic strain with prestrain removed", "No")'
1683 WRITE(IOUTMVW,'(a)')' *readerproperty("Strain Tensor with prestrain removed", "No")'
1684 WRITE(IOUTMVW,'(a)')' *endresult()'
1685cc
1686c GENERIC PARTS
1687cc
1688 WRITE(IOUTMVW,'(a)')' *beginpart(1, "Orphan-Node", "PART", 0)'
1689 WRITE(IOUTMVW,'(a)')' *attribute(on, idoff, 41, opa, sha, msh, infit, incut, iniso)'
1690 WRITE(IOUTMVW,'(a)')' *endpart()'
1691 WRITE(IOUTMVW,'(a)')' *beginpart(851, "Rigid", "PART", 0)'
1692 WRITE(IOUTMVW,'(a)')' *attribute(on, idoff, 18, opa, sha, msh, infit, incut, iniso)'
1693 WRITE(IOUTMVW,'(a)')' *endpart()'
1694cc
1695c GROUPS
1696cc
1697 WRITE(IOUTMVW,'(a)')' *begingroup("0D Set", "Off", "Off", "255 0 0", 1, "wire")'
1698 WRITE(IOUTMVW,'(a)')' *beginselection(part, selectall, "User_Set", 1)'
1699 WRITE(IOUTMVW,'(a)')' *add("dimension == 0")'
1700 WRITE(IOUTMVW,'(a)')' *endselection()'
1701 WRITE(IOUTMVW,'(a)')' *endgroup()'
1702 WRITE(IOUTMVW,'(a)')' *begingroup("1D Set", "Off", "Off", " 0 255 0", 1, "wire")'
1703 WRITE(IOUTMVW,'(a)')' *beginselection(part, selectall, "User_Set", 2)'
1704 WRITE(IOUTMVW,'(a)')' *add("dimension == 1")'
1705 WRITE(IOUTMVW,'(a)')' *endselection()'
1706 WRITE(IOUTMVW,'(a)')' *endgroup()'
1707 WRITE(IOUTMVW,'(a)')' *begingroup("2D Set", "Off", "Off", " 0 0 255", 1, "wire")'
1708 WRITE(IOUTMVW,'(a)')' *beginselection(part, selectall, "User_Set", 3)'
1709 WRITE(IOUTMVW,'(a)')' *add("dimension == 2")'
1710 WRITE(IOUTMVW,'(a)')' *endselection()'
1711 WRITE(IOUTMVW,'(a)')' *endgroup()'
1712 WRITE(IOUTMVW,'(a)')' *begingroup("3D Set", "Off", "Off", " 0 0 255", 1, "wire")'
1713 WRITE(IOUTMVW,'(a)')' *beginselection(part, selectall, "User_Set", 4)'
1714 WRITE(IOUTMVW,'(a)')' *add("dimension == 3")'
1715 WRITE(IOUTMVW,'(A)')' *EndSelection()'
1716 WRITE(IOUTMVW,'(A)')' *EndGroup()'
1717 WRITE(IOUTMVW,'(A)')' *BeginGroup("orphan nodes", "off", "off", "255 255 255", 1, "wire")'
1718 WRITE(IOUTMVW,'(A)')' *BeginSelection(Part, SelectAll, "user_set", 5)'
1719 WRITE(IOUTMVW,'(A)')' *Add("orphan-node id 1")'
1720 WRITE(IOUTMVW,'(A)')' *EndSelection()'
1721 WRITE(IOUTMVW,'(A)')' *EndGroup()'
1722cc
1723c
1724cc
1725 WRITE(IOUTMVW,'(A)')' *BeginDeformed()'
1726 WRITE(IOUTMVW,'(A)')' *ScaleMode("scalefactor")'
1727 WRITE(IOUTMVW,'(A)')' *Scale("1.000000 1.000000 1.000000")'
1728 WRITE(IOUTMVW,'(A)')' *ResolvedInSystem(0)'
1729 WRITE(IOUTMVW,'(A)')' *ResultType("displacement")'
1730 WRITE(IOUTMVW,'(A)')' *UndeformedMode("none")'
1731 WRITE(IOUTMVW,'(a)')' *undeformedcolor("componentcolor")'
1732 WRITE(IOUTMVW,'(a)')' *undeformedtracking("off")'
1733 WRITE(IOUTMVW,'(a)')' *enddeformed()'
1734 WRITE(IOUTMVW,'(a)')' *beginresultmath()'
1735 WRITE(IOUTMVW,'(a)')' *EndResultMath()'
1736 WRITE(ioutmvw,'(A)')' *LayerNumber(0)'
1737 WRITE(ioutmvw,'(A)')' *EndModel()'
1738 WRITE(ioutmvw,'(A)')' *renderoptions("None", "ClipTransparencyOff")'
1739 WRITE(IOUTMVW,'(a)')' *displayoptions("NotesOn")'
1740 WRITE(IOUTMVW,'(a)')' *beginnote("On", "Model Info")'
1741 WRITE(IOUTMVW,'(a)')' *transparent("On")'
1742 WRITE(IOUTMVW,'(a)')' *autohide("Off")'
1743 WRITE(IOUTMVW,'(a)')' *fillcolor(31)'
1744 WRITE(IOUTMVW,'(a)')' *TextColor(1)'
1745 WRITE(ioutmvw,'(A)')' *Attach("WINDOW")'
1746 WRITE(ioutmvw,'(A)')' *Position(0.500000, 0.500000)'
1747 WRITE(ioutmvw,'(A)')' *Text("{for (i = 0; i != numpts(window.modeltitlelist); ++i) }\n
1748 . {window.modelidlist[i]}:{window.modeltitlelist[i]}\n{window.loadcaselist[i]} :
1749 . {window.simulationsteplist[i]} : {window.framelist[i]}\n{endloop}")'
1750
1751 WRITE(ioutmvw,'(A)')' *Font("Arial", "regular", "regular", 10)'
1752 WRITE(ioutmvw,'(A)')' *Color(1)'
1753 WRITE(ioutmvw,'(A)')' *BorderWidth(0)'
1754 WRITE(ioutmvw,'(A)')' *NoteAlignment("Right")'
1755 WRITE(ioutmvw,'(A)')' *NoteAnchor("Right", "Top")'
1756 WRITE(ioutmvw,'(A)')' *TitleFlag("Yes")'
1757 WRITE(ioutmvw,'(A)')' *EndNote()'
1758 WRITE(ioutmvw,'(A)')' *Preferences(1, 31, 10, 0, 2, 3, 4, TriadOn, 30, "TopToBottom", "Off")'
1759 WRITE(ioutmvw,'(A)')' *CurrentModel(1)'
1760 WRITE(ioutmvw,'(A)')' *View(0.707107, 0.353553, -0.612372, 0, '
1761 WRITE(ioutmvw,'(A)')' -0.707107, 0.353553, -0.612372, 0, '
1762 WRITE(ioutmvw,'(A)')' -3.60866e-012, 0.866025, 0.5, 0, '
1763 WRITE(ioutmvw,'(A)')' 0, 0, 0, 1)'
1764 WRITE(ioutmvw,'(A)')' *ClippingRegion(-99.7008, 538.081, -174.535, 492.689, -560.868, 111.237)'
1765
1766
1767 WRITE(ioutmvw,'(A)')' *BeginNote("On", "Note 2")'
1768 WRITE(ioutmvw,'(A)')' *Transparent("On") '
1769 WRITE(ioutmvw,'(A)')' *AutoHide("Off") '
1770 WRITE(ioutmvw,'(A)')' *FillColor(31) '
1771 WRITE(ioutmvw,'(A)')' *TextColor(1) '
1772 WRITE(ioutmvw,'(A)')' *Attach("WINDOW") '
1773 WRITE(ioutmvw,'(A)')' *Position(0.081395, 0.944444) '
1774 WRITE(ioutmvw,'(A)')' *Text("REFERENCE REPORT") '
1775 WRITE(ioutmvw,'(A)')' *Font("Arial", "regular", "regular", 10) '
1776 WRITE(ioutmvw,'(A)')' *Color(1) '
1777 WRITE(ioutmvw,'(A)')' *BorderWidth(1) '
1778 WRITE(ioutmvw,'(A)')' *Shape("Rectangle") '
1779 WRITE(ioutmvw,'(A)')' *NoteAlignment("Left") '
1780 WRITE(ioutmvw,'(A)')' *NoteAnchor("Left", "Top") '
1781 WRITE(ioutmvw,'(A)')' *TitleFlag("No") '
1782 WRITE(ioutmvw,'(A)')' *EndNote() '
1783 WRITE(ioutmvw,'(A)')' *Preferences(1, 31, 10, 0, 2, 3, 4, TriadOn, 30, "TopToBottom", "Off")'
1784 WRITE(ioutmvw,'(A)')' *CurrentModel(1)'
1785 WRITE(ioutmvw,'(A)')' *View(0.707107, 0.353553, -0.612372, 0, '
1786 WRITE(ioutmvw,'(A)')' -0.707107, 0.353553, -0.612372, 0, '
1787 WRITE(ioutmvw,'(A)')' -3.60866e-012, 0.866025, 0.5, 0, '
1788 WRITE(ioutmvw,'(A)')' 0, 0, 0, 1)'
1789 WRITE(ioutmvw,'(A)')' *ClippingRegion(-99.7008, 538.081, -174.535, 492.689, -560.868, 111.237)'
1790c
1791c FMW = "(A28,1PG15.6,A,1PG15.6,A,1PG15.6,A,1PG15.6,A,1PG15.6,A,1PG15.6,A )"
1792c WRITE(IOUTMVW,FMT=FMW) ,' *ClippingRegion(',XMIN_GLOB,',',XMAX_GLOB,',',YMIN_GLOB,',',
1793c . YMAX_GLOB,',',ZMIN_GLOB,',',ZMAX_GLOB ,')'
1794c
1795 WRITE(ioutmvw,'(A)')' *EndGraphic()'
1796 WRITE(ioutmvw,'(A)')' *EndWindow()'
1797 WRITE(ioutmvw,'(A)')' *BeginWindow(Plot) // Window 4'
1798 WRITE(ioutmvw,'(A)')' *SaveDataInline(0)'
1799 WRITE(ioutmvw,'(A)')' *ExportFormat("PNG")'
1800 WRITE(ioutmvw,'(A)')' *BeginPlot()'
1801 WRITE(ioutmvw,'(A)')' *PlotType(0)'
1802 WRITE(ioutmvw,'(A)')' *BeginPlotHeader(On)'
1803 WRITE(ioutmvw,'(A)')' *PrimaryFont("Microsoft Sans Serif", 0, 0, 14)'
1804 WRITE(ioutmvw,'(A)')' *SecondaryFont("Microsoft Sans Serif", 0, 0, 12)'
1805 WRITE(ioutmvw,'(A)')' *TertiaryFont("Microsoft Sans Serif", 0, 0, 12)'
1806 WRITE(ioutmvw,'(A)')' *Color(0)'
1807 WRITE(ioutmvw,'(A)')' *Text("REFERENCE REPORT (Energies)")'
1808 WRITE(ioutmvw,'(A)')' *HeaderAlignment(2)'
1809 WRITE(ioutmvw,'(A)')' *EndPlotHeader()'
1810 WRITE(ioutmvw,'(A)')' *BeginPlotFooter(Off)'
1811 WRITE(ioutmvw,'(A)')' *PrimaryFont("Microsoft Sans Serif", 0, 0, 12)'
1812 WRITE(ioutmvw,'(A)')' *SecondaryFont("Microsoft Sans Serif", 0, 0, 12)'
1813 WRITE(ioutmvw,'(A)')' *TertiaryFont("Microsoft Sans Serif", 0, 0, 12)'
1814 WRITE(ioutmvw,'(A)')' *Color(0)'
1815 WRITE(ioutmvw,'(A)')' *Text("{p1w2c1.y.HWRequest} - {p1w2c1.y.HWComponent}")'
1816 WRITE(ioutmvw,'(A)')' *FooterAlignment(2)'
1817 WRITE(ioutmvw,'(A)')' *EndPlotFooter()'
1818 WRITE(ioutmvw,'(A)')' *BeginLegend(On)'
1819 WRITE(ioutmvw,'(A)')' *Font("Microsoft Sans Serif", 0, 0, 10)'
1820 WRITE(ioutmvw,'(A)')' *BorderWidth(1)'
1821 WRITE(ioutmvw,'(A)')' *Color(0)'
1822 WRITE(ioutmvw,'(A)')' *Leader(Left)'
1823 WRITE(ioutmvw,'(A)')' *Location(INSIDE)'
1824 WRITE(ioutmvw,'(A)')' *Position(0.152542, 2.46092e+007, 9.45763, 1.85524e+007)'
1825 WRITE(ioutmvw,'(A)')' *AutoPosition(True)'
1826 WRITE(ioutmvw,'(A)')' *Reversed(no)'
1827 WRITE(ioutmvw,'(A)')' *EndLegend()'
1828 WRITE(ioutmvw,'(A)')' *UniformAspectRatio(0)'
1829 WRITE(ioutmvw,'(A)')' *FrameColor(66)'
1830 WRITE(ioutmvw,'(A)')' *BackgroundColor(1)'
1831 WRITE(ioutmvw,'(A)')' *GridLineColor(9)'
1832 WRITE(ioutmvw,'(A)')' *ZeroLineColor(0)'
1833 WRITE(ioutmvw,'(A)')' *BeginAxis(X, "X1", on)'
1834 WRITE(ioutmvw,'(A)')' *Label("Time")'
1835 WRITE(ioutmvw,'(A)')' *Scale(Linear)'
1836 WRITE(ioutmvw,'(A)')' *TicMethod(PerAxis)'
1837 WRITE(ioutmvw,'(A)')' *Min(0)'
1838c WRITE(IOUTMVW,'(A)')' *Max(22.5)'
1839 fmw = "(A21,1PG15.6,A)"
1840 WRITE(ioutmvw,fmt=fmw) ' *Max(',tt,')'
1841C
1842 WRITE(ioutmvw,'(A)')' *Format(Auto)'
1843 WRITE(ioutmvw,'(A)')' *Precision(5)'
1844 WRITE(ioutmvw,'(A)')' *Tics(10)'
1845 WRITE(ioutmvw,'(A)')' *Grids(2)'
1846 WRITE(ioutmvw,'(A)')' *Color(67)'
1847 WRITE(ioutmvw,'(A)')' *AutoFit(TRUE)'
1848 WRITE(ioutmvw,'(A)')' *LabelFont("Microsoft Sans Serif", 0, 0, 12)'
1849 WRITE(ioutmvw,'(A)')' *TicsFont("Microsoft Sans Serif", 0, 0, 10)'
1850 WRITE(ioutmvw,'(A)')' *FitRange(FALSE)'
1851 WRITE(ioutmvw,'(A)')' *EndAxis()'
1852 WRITE(ioutmvw,'(A)')' *BeginAxis(Y, "Y1", on)'
1853 WRITE(ioutmvw,'(A)')' *Label("{p1w2c1.y.HWDatatype}")'
1854 WRITE(ioutmvw,'(A)')' *Scale(Linear)'
1855 WRITE(ioutmvw,'(A)')' *TicMethod(PerAxis)'
1856c WRITE(IOUTMVW,'(A)')' *Min(-2.5e+006)'
1857c WRITE(IOUTMVW,'(A)')' *Max(2.5e+007)'
1858 WRITE(ioutmvw,'(A)')' *Format(Auto)'
1859 WRITE(ioutmvw,'(A)')' *Precision(5)'
1860 WRITE(ioutmvw,'(A)')' *Tics(12)'
1861 WRITE(ioutmvw,'(A)')' *Grids(2)'
1862 WRITE(ioutmvw,'(A)')' *Color(67)'
1863 WRITE(ioutmvw,'(A)')' *AutoFit(TRUE)'
1864 WRITE(ioutmvw,'(A)')' *LabelFont("Microsoft Sans Serif", 0, 0, 12)'
1865 WRITE(ioutmvw,'(A)')' *TicsFont("Microsoft Sans Serif", 0, 0, 10)'
1866 WRITE(ioutmvw,'(A)')' *FitRange(FALSE)'
1867 WRITE(ioutmvw,'(A)')' *EndAxis()'
1868 WRITE(ioutmvw,'(A)')' *BeginCurve(On, "{y.HWRequest}")'
1869 WRITE(ioutmvw,'(A)')' *Line(1, 22, 1)'
1870 WRITE(ioutmvw,'(A)')' *Symbol(0, 22, 1)'
1871 WRITE(ioutmvw,'(A)')' *Shade(False)'
1872 WRITE(ioutmvw,'(A)')' *Bar(0, 0, 2)'
1873 WRITE(ioutmvw,'(A)')' *ShowInLegend(True)'
1874 WRITE(ioutmvw,'(A)')' *BeginVector(Y, File)'
1875 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_2})'
1876 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
1877 WRITE(ioutmvw,'(A)')' *Datatype("Global Variables")'
1878 WRITE(ioutmvw,'(A)')' *Request("Internal Energy")'
1879 WRITE(ioutmvw,'(A)')' *Component("MAG")'
1880 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
1881 WRITE(ioutmvw,'(A)')' *Offset("0")'
1882 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
1883 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_2})'
1884 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
1885 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "MAG")'
1886 WRITE(ioutmvw,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1887 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1888 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
1889 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Internal Energy")'
1890 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
1891 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
1892 WRITE(IOUTMVW,'(a)')' *endvector()'
1893 WRITE(IOUTMVW,'(a)')' *beginvector(x, file)'
1894 WRITE(IOUTMVW,'(a)')' *filename({plot_file_2})'
1895 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1896 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
1897 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1898 WRITE(IOUTMVW,'(a)')' *offset("0")'
1899 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
1900 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_2})'
1901 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
1902 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
1903 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
1904 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
1905 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
1906 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
1907 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
1908 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
1909 WRITE(IOUTMVW,'(A)')' *EndVector()'
1910 WRITE(IOUTMVW,'(A)')' *BeginVector(Time, File)'
1911 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_2})'
1912 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
1913 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
1914 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
1915 WRITE(IOUTMVW,'(A)')' *Offset("0")'
1916 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_2})'
1917 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
1918 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
1919 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
1920 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
1921 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
1922 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
1923 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1924 WRITE(IOUTMVW,'(a)')' *endvector()'
1925 WRITE(IOUTMVW,'(a)')' *beginvector(u, file)'
1926 WRITE(IOUTMVW,'(a)')' *filename({plot_file_2})'
1927 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
1928 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
1929 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
1930 WRITE(IOUTMVW,'(a)')' *offset("0")'
1931 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1932 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_2})'
1933 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1934 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
1935 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
1936 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
1937 WRITE(IOUTMVW,'(a)')' *attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
1938 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
1939 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
1940 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
1941 WRITE(IOUTMVW,'(A)')' *EndVector()'
1942 WRITE(IOUTMVW,'(A)')' *BeginVector(V, File)'
1943 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_2})'
1944 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
1945 WRITE(IOUTMVW,'(A)')' *Datatype("global variables")'
1946 WRITE(IOUTMVW,'(A)')' *Request("internal energy")'
1947 WRITE(IOUTMVW,'(A)')' *Component("mag")'
1948 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
1949 WRITE(IOUTMVW,'(A)')' *Offset("0")'
1950 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
1951 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_2})'
1952 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
1953 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "mag")'
1954 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
1955 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
1956 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "global variables")'
1957 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "internal energy")'
1958 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "mag")'
1959 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
1960 WRITE(IOUTMVW,'(A)')' *EndVector()'
1961 WRITE(IOUTMVW,'(A)')' *Attribute("hwlastgoodcurvename", "hwlastgoodcurvename", "string", "internal energy")'
1962 WRITE(IOUTMVW,'(A)')' *EndCurve()'
1963 WRITE(IOUTMVW,'(A)')' *BeginCurve(On, "{y.hwrequest}")'
1964 WRITE(IOUTMVW,'(A)')' *Line(1, 18, 1)'
1965 WRITE(IOUTMVW,'(A)')' *Symbol(0, 18, 1)'
1966 WRITE(IOUTMVW,'(A)')' *Shade(False)'
1967 WRITE(IOUTMVW,'(A)')' *Bar(0, 0, 2)'
1968 WRITE(IOUTMVW,'(A)')' *ShowInLegend(True)'
1969 WRITE(IOUTMVW,'(A)')' *BeginVector(Y, File)'
1970 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_2})'
1971 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
1972 WRITE(IOUTMVW,'(A)')' *Datatype("global variables")'
1973 WRITE(IOUTMVW,'(A)')' *Request("kinetic energy")'
1974 WRITE(IOUTMVW,'(A)')' *Component("mag")'
1975 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
1976 WRITE(IOUTMVW,'(A)')' *Offset("0")'
1977 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
1978 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_2})'
1979 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
1980 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
1981 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
1982 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
1983 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "string", "global variables")'
1984 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "kinetic energy")'
1985 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "mag")'
1986 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
1987 WRITE(IOUTMVW,'(A)')' *EndVector()'
1988 WRITE(IOUTMVW,'(A)')' *BeginVector(X, File)'
1989 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_2})'
1990 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
1991 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
1992 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
1993 WRITE(IOUTMVW,'(A)')' *Offset("0")'
1994 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
1995 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_2})'
1996 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
1997 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
1998 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
1999 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
2000 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2001 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
2002 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
2003 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2004 WRITE(IOUTMVW,'(a)')' *endvector()'
2005 WRITE(IOUTMVW,'(a)')' *beginvector(time, file)'
2006 WRITE(IOUTMVW,'(a)')' *filename({plot_file_2})'
2007 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
2008 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
2009 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
2010 WRITE(IOUTMVW,'(a)')' *offset("0")'
2011 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_2})'
2012 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
2013 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
2014 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
2015 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
2016 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
2017 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2018 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2019 WRITE(IOUTMVW,'(a)')' *endvector()'
2020 WRITE(IOUTMVW,'(a)')' *beginvector(u, file)'
2021 WRITE(IOUTMVW,'(a)')' *filename({plot_file_2})'
2022 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
2023 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
2024 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
2025 WRITE(IOUTMVW,'(a)')' *offset("0")'
2026 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
2027 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_2})'
2028 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
2029 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "datatype", "string", "Time")'
2030 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "time")'
2031 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
2032 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
2033 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
2034 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
2035 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
2036 WRITE(IOUTMVW,'(A)')' *EndVector()'
2037 WRITE(IOUTMVW,'(A)')' *BeginVector(V, File)'
2038 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_2})'
2039 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
2040 WRITE(IOUTMVW,'(A)')' *Datatype("global variables")'
2041 WRITE(IOUTMVW,'(A)')' *Request("kinetic energy")'
2042 WRITE(IOUTMVW,'(A)')' *Component("mag")'
2043 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
2044 WRITE(IOUTMVW,'(A)')' *Offset("0")'
2045 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
2046 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_2})'
2047 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
2048 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "mag")'
2049 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
2050 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
2051 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "global variables")'
2052 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "kinetic energy")'
2053 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "ComplexComponent", "String", "MAG")'
2054 WRITE(IOUTMVW,'(a)')' *attribute("hwreader", "reader", "string", "hgradioss++.exe")'
2055 WRITE(IOUTMVW,'(A)')' *EndVector()'
2056 WRITE(IOUTMVW,'(A)')' *Attribute("hwlastgoodcurvename", "hwlastgoodcurvename", "string", "kinetic energy")'
2057 WRITE(IOUTMVW,'(A)')' *EndCurve()'
2058 WRITE(IOUTMVW,'(A)')' *BeginCurve(On, "{y.hwrequest}")'
2059 WRITE(IOUTMVW,'(A)')' *Line(1, 55, 1)'
2060 WRITE(IOUTMVW,'(A)')' *Symbol(0, 55, 1)'
2061 WRITE(IOUTMVW,'(A)')' *Shade(False)'
2062 WRITE(IOUTMVW,'(A)')' *Bar(0, 0, 2)'
2063 WRITE(IOUTMVW,'(A)')' *ShowInLegend(True)'
2064 WRITE(IOUTMVW,'(A)')' *BeginVector(Y, File)'
2065 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_2})'
2066 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
2067 WRITE(IOUTMVW,'(A)')' *Datatype("global variables")'
2068 WRITE(IOUTMVW,'(A)')' *Request("contact energy")'
2069 WRITE(IOUTMVW,'(A)')' *Component("mag")'
2070 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
2071 WRITE(IOUTMVW,'(A)')' *Offset("0")'
2072 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
2073 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_2})'
2074 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
2075 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "mag")'
2076 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
2077 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
2078 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "global variables")'
2079 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "contact energy")'
2080 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "mag")'
2081 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
2082 WRITE(IOUTMVW,'(A)')' *EndVector()'
2083 WRITE(IOUTMVW,'(A)')' *BeginVector(X, File)'
2084 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_2})'
2085 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
2086 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
2087 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
2088 WRITE(IOUTMVW,'(A)')' *Offset("0")'
2089 WRITE(IOUTMVW,'(A)')' *AxisIndex(1)'
2090 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_2})'
2091 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
2092 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
2093 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
2094 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
2095 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
2096 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
2097 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
2098 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
2099 WRITE(IOUTMVW,'(A)')' *EndVector()'
2100 WRITE(IOUTMVW,'(A)')' *BeginVector(Time, File)'
2101 WRITE(IOUTMVW,'(A)')' *Filename({PLOT_FILE_2})'
2102 WRITE(IOUTMVW,'(A)')' *ReaderTargetVersion(14)'
2103 WRITE(IOUTMVW,'(A)')' *Datatype("time")'
2104 WRITE(IOUTMVW,'(A)')' *ScaleFactor("1")'
2105 WRITE(IOUTMVW,'(A)')' *Offset("0")'
2106 WRITE(IOUTMVW,'(A)')' *Attribute("hwfile", "file", "string", {PLOT_FILE_2})'
2107 WRITE(IOUTMVW,'(A)')' *Attribute("hwsolver", "solver", "string", "radioss")'
2108 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "time")'
2109 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "time")'
2110 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "time")'
2111 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "time")'
2112 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
2113 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2114 WRITE(IOUTMVW,'(a)')' *endvector()'
2115 WRITE(IOUTMVW,'(a)')' *BeginVector(U, File)'
2116 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_2})'
2117 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
2118 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
2119 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
2120 WRITE(ioutmvw,'(A)')' *Offset("0")'
2121 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
2122 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_2})'
2123 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
2124 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
2125 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
2126 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
2127 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2128 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
2129 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
2130 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2131 WRITE(ioutmvw,'(A)')' *EndVector()'
2132 WRITE(ioutmvw,'(A)')' *BeginVector(V, File)'
2133 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_2})'
2134 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
2135 WRITE(ioutmvw,'(A)')' *Datatype("Global Variables")'
2136 WRITE(ioutmvw,'(A)')' *Request("Contact energy")'
2137 WRITE(ioutmvw,'(A)')' *Component("MAG")'
2138 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
2139 WRITE(ioutmvw,'(A)')' *Offset("0")'
2140 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
2141 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_2})'
2142 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
2143 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "MAG")'
2144 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2145 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
2146 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Global Variables")'
2147 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Contact energy")'
2148 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
2149 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2150 WRITE(ioutmvw,'(A)')' *EndVector()'
2151 WRITE(ioutmvw,'(A)')' *Attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "Contact energy")'
2152 WRITE(ioutmvw,'(A)')' *EndCurve()'
2153 WRITE(ioutmvw,'(A)')' *BeginCurve(On, "{y.HWRequest}")'
2154 WRITE(ioutmvw,'(A)')' *Line(1, 46, 1)'
2155 WRITE(ioutmvw,'(A)')' *Symbol(0, 46, 1)'
2156 WRITE(ioutmvw,'(A)')' *Shade(False)'
2157 WRITE(ioutmvw,'(A)')' *Bar(0, 0, 2)'
2158 WRITE(ioutmvw,'(A)')' *ShowInLegend(True)'
2159 WRITE(ioutmvw,'(A)')' *BeginVector(Y, File)'
2160 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_2})'
2161 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
2162 WRITE(ioutmvw,'(A)')' *Datatype("Global Variables")'
2163 WRITE(ioutmvw,'(A)')' *Request("Hourglass energy")'
2164 WRITE(ioutmvw,'(A)')' *Component("MAG")'
2165 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
2166 WRITE(ioutmvw,'(A)')' *Offset("0")'
2167 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
2168 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_2})'
2169 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
2170 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "MAG")'
2171 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2172 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
2173 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Global Variables")'
2174 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Hourglass energy")'
2175 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
2176 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2177 WRITE(ioutmvw,'(A)')' *EndVector()'
2178 WRITE(ioutmvw,'(A)')' *BeginVector(X, File)'
2179 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_2})'
2180 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
2181 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
2182 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
2183 WRITE(ioutmvw,'(A)')' *Offset("0")'
2184 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
2185 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_2})'
2186 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
2187 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
2188 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
2189 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
2190 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2191 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
2192 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
2193 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2194 WRITE(ioutmvw,'(A)')' *EndVector()'
2195 WRITE(ioutmvw,'(A)')' *BeginVector(Time, File)'
2196 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_2})'
2197 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
2198 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
2199 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
2200 WRITE(ioutmvw,'(A)')' *Offset("0")'
2201 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_2})'
2202 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
2203 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
2204 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
2205 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
2206 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
2207 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2208 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2209 WRITE(ioutmvw,'(A)')' *EndVector()'
2210 WRITE(ioutmvw,'(A)')' *BeginVector(U, File)'
2211 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_2})'
2212 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
2213 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
2214 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
2215 WRITE(ioutmvw,'(A)')' *Offset("0")'
2216 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
2217 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_2})'
2218 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
2219 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
2220 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
2221 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
2222 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2223 WRITE(ioutmvw,'(A)')' *Attribute("HWWordSize", "WordSize", "String", "4")'
2224 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
2225 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2226 WRITE(ioutmvw,'(A)')' *EndVector()'
2227 WRITE(ioutmvw,'(A)')' *BeginVector(V, File)'
2228 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_2})'
2229 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
2230 WRITE(ioutmvw,'(A)')' *Datatype("Global Variables")'
2231 WRITE(ioutmvw,'(A)')' *Request("Hourglass energy")'
2232 WRITE(ioutmvw,'(A)')' *Component("MAG")'
2233 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
2234 WRITE(ioutmvw,'(A)')' *Offset("0")'
2235 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
2236 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_2})'
2237 WRITE(ioutmvw,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
2238 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
2239 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2240 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
2241 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
2242 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Hourglass energy")'
2243 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
2244 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2245 WRITE(ioutmvw,'(A)')' *EndVector()'
2246 WRITE(ioutmvw,'(A)')' *Attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "Hourglass energy")'
2247 WRITE(ioutmvw,'(A)')' *EndCurve()'
2248 WRITE(ioutmvw,'(A)')' *BeginCurve(On, "{y.HWRequest}")'
2249 WRITE(ioutmvw,'(A)')' *Line(1, 24, 1)'
2250 WRITE(ioutmvw,'(A)')' *Symbol(0, 24, 1)'
2251 WRITE(ioutmvw,'(A)')' *Shade(False)'
2252 WRITE(ioutmvw,'(A)')' *Bar(0, 0, 2)'
2253 WRITE(ioutmvw,'(A)')' *ShowInLegend(True)'
2254 WRITE(ioutmvw,'(A)')' *BeginVector(Y, File)'
2255 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_2})'
2256 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
2257 WRITE(ioutmvw,'(A)')' *Datatype("Global Variables")'
2258 WRITE(ioutmvw,'(A)')' *Request("TE-Total Energy")'
2259 WRITE(ioutmvw,'(A)')' *Component("MAG")'
2260 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
2261 WRITE(ioutmvw,'(A)')' *Offset("0")'
2262 WRITE(ioutmvw,'(A)')' *axisindex(1)'
2263 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_2})'
2264 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
2265 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "MAG")'
2266 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2267 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
2268 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Global Variables")'
2269 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "TE-Total Energy")'
2270 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "MAG")'
2271 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2272 WRITE(IOUTMVW,'(a)')' *endvector()'
2273 WRITE(IOUTMVW,'(a)')' *beginvector(x, file)'
2274 WRITE(IOUTMVW,'(a)')' *filename({plot_file_2})'
2275 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
2276 WRITE(IOUTMVW,'(a)')' *datatype("Time")'
2277 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
2278 WRITE(IOUTMVW,'(a)')' *offset("0")'
2279 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
2280 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_2})'
2281 WRITE(IOUTMVW,'(a)')' *attribute("HWSolver", "Solver", "String", "RADIOSS")'
2282 WRITE(IOUTMVW,'(a)')' *attribute("HWDatatype", "Datatype", "String", "Time")'
2283 WRITE(IOUTMVW,'(a)')' *attribute("HWRequest", "Request", "String", "Time")'
2284 WRITE(IOUTMVW,'(a)')' *attribute("HWComponent", "Component", "String", "Time")'
2285 WRITE(IOUTMVW,'(a)')' *attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2286 WRITE(IOUTMVW,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
2287 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
2288 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2289 WRITE(ioutmvw,'(A)')' *EndVector()'
2290 WRITE(ioutmvw,'(A)')' *BeginVector(Time, File)'
2291 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_2})'
2292 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
2293 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
2294 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
2295 WRITE(ioutmvw,'(A)')' *Offset("0")'
2296 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_2})'
2297 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
2298 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
2299 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
2300 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
2301 WRITE(ioutmvw,'(A)')' *Attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
2302 WRITE(ioutmvw,'(A)')' *Attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2303 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2304 WRITE(ioutmvw,'(A)')' *EndVector()'
2305 WRITE(ioutmvw,'(A)')' *BeginVector(U, File)'
2306 WRITE(ioutmvw,'(A)')' *Filename({PLOT_FILE_2})'
2307 WRITE(ioutmvw,'(A)')' *ReaderTargetVersion(14)'
2308 WRITE(ioutmvw,'(A)')' *Datatype("Time")'
2309 WRITE(ioutmvw,'(A)')' *ScaleFactor("1")'
2310 WRITE(ioutmvw,'(A)')' *Offset("0")'
2311 WRITE(ioutmvw,'(A)')' *AxisIndex(1)'
2312 WRITE(ioutmvw,'(A)')' *Attribute("HWFile", "File", "String", {PLOT_FILE_2})'
2313 WRITE(ioutmvw,'(A)')' *Attribute("HWSolver", "Solver", "String", "RADIOSS")'
2314 WRITE(ioutmvw,'(A)')' *Attribute("HWDatatype", "Datatype", "String", "Time")'
2315 WRITE(ioutmvw,'(A)')' *Attribute("HWRequest", "Request", "String", "Time")'
2316 WRITE(ioutmvw,'(A)')' *Attribute("HWComponent", "Component", "String", "Time")'
2317 WRITE(ioutmvw,'(A)')' *Attribute("HWReaderTargetVersion", "ReaderTargetVersion", "String", "14.000000")'
2318 WRITE(ioutmvw,'(a)')' *attribute("HWWordSize", "WordSize", "String", "4")'
2319 WRITE(IOUTMVW,'(a)')' *attribute("HWComplexComponent", "ComplexComponent", "String", "Time")'
2320 WRITE(IOUTMVW,'(a)')' *attribute("HWReader", "Reader", "String", "hgradioss++.exe")'
2321 WRITE(IOUTMVW,'(a)')' *endvector()'
2322 WRITE(IOUTMVW,'(a)')' *beginvector(v, file)'
2323 WRITE(IOUTMVW,'(a)')' *filename({plot_file_2})'
2324 WRITE(IOUTMVW,'(a)')' *readertargetversion(14)'
2325 WRITE(IOUTMVW,'(a)')' *datatype("Global Variables")'
2326 WRITE(IOUTMVW,'(a)')' *request("TE-Total Energy")'
2327 WRITE(IOUTMVW,'(a)')' *component("MAG")'
2328 WRITE(IOUTMVW,'(a)')' *scalefactor("1")'
2329 WRITE(IOUTMVW,'(a)')' *offset("0")'
2330 WRITE(IOUTMVW,'(a)')' *axisindex(1)'
2331 WRITE(IOUTMVW,'(a)')' *attribute("HWFile", "File", "String", {plot_file_2})'
2332 WRITE(IOUTMVW,'(a)')' *attribute("hwsolver", "solver", "string", "radioss")'
2333 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomponent", "component", "string", "mag")'
2334 WRITE(IOUTMVW,'(A)')' *Attribute("hwreadertargetversion", "readertargetversion", "string", "14.000000")'
2335 WRITE(IOUTMVW,'(A)')' *Attribute("hwwordsize", "wordsize", "string", "4")'
2336 WRITE(IOUTMVW,'(A)')' *Attribute("hwdatatype", "datatype", "string", "global variables")'
2337 WRITE(IOUTMVW,'(A)')' *Attribute("hwrequest", "request", "string", "te-total energy")'
2338 WRITE(IOUTMVW,'(A)')' *Attribute("hwcomplexcomponent", "complexcomponent", "string", "mag")'
2339 WRITE(IOUTMVW,'(A)')' *Attribute("hwreader", "reader", "string", "hgradioss++.exe")'
2340 WRITE(IOUTMVW,'(a)')' *endvector()'
2341 WRITE(IOUTMVW,'(a)')' *attribute("HWLastGoodCurveName", "HWLastGoodCurveName", "String", "TE-Total Energy")'
2342 WRITE(IOUTMVW,'(a)')' *endcurve()'
2343 WRITE(IOUTMVW,'(a)')' *endplot()'
2344 WRITE(IOUTMVW,'(a)')' *endwindow()'
2345
2346 ENDIF
2347
2348
2349 WRITE(IOUTMVW,'(a)')' *timescales(1, 1)'
2350 WRITE(IOUTMVW,'(a)')' *timedelays(0, 0)'
2351 WRITE(IOUTMVW,'(a)')' *animationenable(1, 1)'
2352 WRITE(IOUTMVW,'(a)')' *synctolerance(2e-008)'
2353 WRITE(IOUTMVW,'(a)')' *synctablegenerationpolicy(all_blocks)'
2354 WRITE(IOUTMVW,'(a)')'*endpage()'
2355
2356
2357
2358
2359 ENDIF
2360c-----------
2361 RETURN
id
initmumps id
Definition multiplerhs_example.m:4
inoutfile_mod
Definition inoutfile_mod.F:96
inoutfile_mod::outfile_name
character(len=outfile_char_len) outfile_name
Definition inoutfile_mod.F:111
inoutfile_mod::outfile_name_len
integer outfile_name_len
Definition inoutfile_mod.F:109
radioss
program radioss
Definition radioss.F:34
report
subroutine report(ih3dreader, n, imvw, wfext, wfext_md)
Definition report.F:34