OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
sortie_mvw.F
Go to the documentation of this file.
1Copyright> OpenRadioss
2Copyright> Copyright (C) 1986-2025 Altair Engineering Inc.
3Copyright>
4Copyright> This program is free software: you can redistribute it and/or modify
5Copyright> it under the terms of the GNU Affero General Public License as published by
6Copyright> the Free Software Foundation, either version 3 of the License, or
7Copyright> (at your option) any later version.
8Copyright>
9Copyright> This program is distributed in the hope that it will be useful,
10Copyright> but WITHOUT ANY WARRANTY; without even the implied warranty of
11Copyright> MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12Copyright> GNU Affero General Public License for more details.
13Copyright>
14Copyright> You should have received a copy of the GNU Affero General Public License
15Copyright> along with this program. If not, see <https://www.gnu.org/licenses/>.
16Copyright>
17Copyright>
18Copyright> Commercial Alternative: Altair Radioss Software
19Copyright>
20Copyright> As an alternative to this open-source version, Altair also offers Altair Radioss
21Copyright> software under a commercial license. Contact Altair to discuss further if the
22Copyright> commercial version may interest you: https://www.altair.com/radioss/.
23!||====================================================================
24!|| sortie_mvw ../engine/source/output/report/sortie_mvw.F
25!||--- called by ------------------------------------------------------
26!|| arret ../engine/source/system/arret.F
27!||--- uses -----------------------------------------------------
28!|| inoutfile_mod ../common_source/modules/inoutfile_mod.F
29!||====================================================================
30 SUBROUTINE sortie_mvw(IMVW,IMVW_REF)
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 ELSEIF(imvw == 3 .OR. 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 IF (imvw == 1 .OR. imvw == 3)line='{ PLOT_FILE_1 = "'//rootnam(1:rootlen)//'T01"}'
108 IF (imvw == 2 .OR. 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.OR. IF (IMVW == 1 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.OR. IF (IMVW == 1 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 IF (imvw == 1 .OR. 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 IF (imvw == 1 .OR. 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 IF (imvw == 1 .OR. 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
2362 END
min
#define min(a, b)
Definition macros.h:20
max
#define max(a, b)
Definition macros.h:21
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
sortie_mvw
subroutine sortie_mvw(imvw, imvw_ref)
Definition sortie_mvw.F:31