Screamer Project  V3.3.1
Screamer Structure
 All Files Functions Variables
zdempprm.h
Go to the documentation of this file.
1 c *****************************************************************************
2 c Parameters for output selections.
3 c use: include 'zdempprm.h'
4 c file zdempprm.h
5 c ---------------------------------------------------------------------
6 c Modifications:
7 c KWS, 10/14/93, Added MFI CB parameters.
8 c Added callouts for the radiation yield in the
9 c cylindrical foil model.
10 c MLK, 03/23/95, Added line: parameter (ip_gke = 71) to fix
11 c someone's previous programming error
12 c KWS, 06/06/95, Added keywords and indices for Zflow Plasma
13 c current loss model outputs. Also added a new
14 c output for MITLs.
15 c MLK, 06/07/95, Added keywords and indices for CSV output types
16 c KWS, 08/12/97, Added keywords and indices for Zflow Block outputs
17 c MLK, 12/23/97, Added keywords and indices for SFC output types
18 c 2014-05-05 RBS: Changed integer*4 to integer
19 c
20 c ---------------------------------------------------------------------
21  integer pkeyword_len
22  parameter (pkeyword_len = 3)
23 c
24 c ***** Output Format Keywords *****
25 c
26  character*(pkeyword_len)
27  & k_pltpts,
28  & k_prtpts,
29  & k_filpts,
30  & k_tabpts,
31  & k_ufopts,
32  & k_idrpts,
33  & k_pffpts,
34  & k_csvpts,
35  & k_sfcpts
36  parameter (k_pltpts = 'PLO')
37  parameter (k_prtpts = 'PRI')
38  parameter (k_filpts = 'FIL')
39  parameter (k_tabpts = 'TAB')
40  parameter (k_ufopts = 'UFO')
41  parameter (k_idrpts = 'IDR')
42  parameter (k_pffpts = 'PFF')
43  parameter (k_csvpts = 'CSV')
44  parameter (k_sfcpts = 'SFC')
45 c
46  parameter (ip_pltpts = 1)
47  parameter (ip_prtpts = 2)
48  parameter (ip_filpts = 3)
49  parameter (ip_tabpts = 4)
50  parameter (ip_ufopts = 5)
51  parameter (ip_idrpts = 6)
52  parameter (ip_pffpts = 7)
53  parameter (ip_csvpts = 8)
54  parameter (ip_sfcpts = 9)
55 c
56  integer
57  & oplot, oprint, ofile, otable, oidr, oufo, opff, ocsv, osfc
58 c
59  parameter (oplot = 1)
60  parameter (oprint = 2)
61  parameter (ofile = 3)
62  parameter (otable = 4)
63  parameter (oufo = 5)
64  parameter (oidr = 6)
65  parameter (opff = 7)
66  parameter (ocsv = 8)
67  parameter (osfc = 9)
68 c
69  character*(pkeyword_len)
70  & k_wholestep
71  parameter (k_wholestep = 'WHO')
72 c
73 c ***** Keywords and indicies for the various resistor types *****
74 c
75  character*(pkeyword_len)
76  & k_vr1,
77  & k_vr2,
78  & k_vr3,
79  & k_ir1,
80  & k_ir2,
81  & k_ir3,
82  & k_pr1,
83  & k_pr2,
84  & k_pr3,
85  & k_er1,
86  & k_er2,
87  & k_er3,
88  & k_r1,
89  & k_r2,
90  & k_r3,
91  & k_qr1,
92  & k_qr2,
93  & k_qr3
94  parameter (k_vr1 = 'VR1')
95  parameter (k_vr2 = 'VR2')
96  parameter (k_vr3 = 'VR3')
97  parameter (k_ir1 = 'IR1')
98  parameter (k_ir2 = 'IR2')
99  parameter (k_ir3 = 'IR3')
100  parameter (k_pr1 = 'PR1')
101  parameter (k_pr2 = 'PR2')
102  parameter (k_pr3 = 'PR3')
103  parameter (k_er1 = 'ER1')
104  parameter (k_er2 = 'ER2')
105  parameter (k_er3 = 'ER3')
106  parameter (k_r1 = 'R1 ')
107  parameter (k_r2 = 'R2 ')
108  parameter (k_r3 = 'R3 ')
109  parameter (k_qr1 = 'QR1')
110  parameter (k_qr2 = 'QR2')
111  parameter (k_qr3 = 'QR3')
112 c
113  parameter (ip_vr1 = 1)
114  parameter (ip_vr2 = 2)
115  parameter (ip_vr3 = 3)
116  parameter (ip_ir1 = 4)
117  parameter (ip_ir2 = 5)
118  parameter (ip_ir3 = 6)
119  parameter (ip_pr1 = 7)
120  parameter (ip_pr2 = 8)
121  parameter (ip_pr3 = 9)
122  parameter (ip_er1 = 10)
123  parameter (ip_er2 = 11)
124  parameter (ip_er3 = 12)
125  parameter (ip_r1 = 13)
126  parameter (ip_r2 = 14)
127  parameter (ip_r3 = 15)
128  parameter (ip_qr1 = 16)
129  parameter (ip_qr2 = 17)
130  parameter (ip_qr3 = 18)
131 c
132 c ***** Keywords and indicies for the various capacitor types *****
133 c
134  character*(pkeyword_len)
135  & k_vc1,
136  & k_vc3,
137  & k_ic1,
138  & k_ic3,
139  & k_pc1,
140  & k_pc3,
141  & k_ec1,
142  & k_ec3,
143  & k_c1,
144  & k_c3,
145  & k_qc1,
146  & k_qc3,
147  & k_c1e,
148  & k_c3e,
149  & k_pcdot,
150  & k_ecdot,
151  & k_pccon,
152  & k_eccon
153  parameter (k_vc1 = 'VC1')
154  parameter (k_vc3 = 'VC3')
155  parameter (k_ic1 = 'IC1')
156  parameter (k_ic3 = 'IC3')
157  parameter (k_pc1 = 'PC1')
158  parameter (k_pc3 = 'PC3')
159  parameter (k_ec1 = 'EC1')
160  parameter (k_ec3 = 'EC3')
161  parameter (k_c1 = 'C1 ')
162  parameter (k_c3 = 'C3 ')
163  parameter (k_qc1 = 'QC1')
164  parameter (k_qc3 = 'QC3')
165  parameter (k_c1e = 'C1E')
166  parameter (k_c3e = 'C3E')
167  parameter (k_pcdot = 'PCD')
168  parameter (k_ecdot = 'ECD')
169  parameter (k_pccon = 'PCC')
170  parameter (k_eccon = 'ECC')
171 c
172  parameter (ip_vc1 = 19)
173  parameter (ip_vc3 = 20)
174  parameter (ip_ic1 = 21)
175  parameter (ip_ic3 = 22)
176  parameter (ip_pc1 = 23)
177  parameter (ip_pc3 = 24)
178  parameter (ip_ec1 = 25)
179  parameter (ip_ec3 = 26)
180  parameter (ip_c1 = 27)
181  parameter (ip_c3 = 28)
182  parameter (ip_qc1 = 29)
183  parameter (ip_qc3 = 30)
184  parameter (ip_c1e = 53)
185  parameter (ip_c3e = 54)
186  parameter (ip_pcdot = 60)
187  parameter (ip_ecdot = 61)
188  parameter (ip_pccon = 62)
189  parameter (ip_eccon = 63)
190 c
191 c ***** Keywords and indicies for the inductor *****
192 c
193  character*(pkeyword_len)
194  & k_vl2,
195  & k_il2,
196  & k_pl2,
197  & k_el2,
198  & k_l2,
199  & k_fl2,
200  & k_ql2,
201  & k_l2e,
202  & k_pldot,
203  & k_eldot,
204  & k_plcon,
205  & k_elcon
206  parameter (k_vl2 = 'VL2')
207  parameter (k_il2 = 'IL2')
208  parameter (k_pl2 = 'PL2')
209  parameter (k_el2 = 'EL2')
210  parameter (k_l2 = 'L2 ')
211  parameter (k_fl2 = 'FL2')
212  parameter (k_ql2 = 'QL2')
213  parameter (k_l2e = 'L2E')
214  parameter (k_pldot = 'PLD')
215  parameter (k_eldot = 'ELD')
216  parameter (k_plcon = 'PLC')
217  parameter (k_elcon = 'ELC')
218 c
219  parameter (ip_vl2 = 31)
220  parameter (ip_il2 = 32)
221  parameter (ip_pl2 = 33)
222  parameter (ip_el2 = 34)
223  parameter (ip_l2 = 35)
224  parameter (ip_fl2 = 36)
225  parameter (ip_ql2 = 37)
226  parameter (ip_l2e = 55)
227  parameter (ip_pldot = 64)
228  parameter (ip_eldot = 65)
229  parameter (ip_plcon = 66)
230  parameter (ip_elcon = 67)
231 c
232 c ***** Keywords and indicies for the various source types *****
233 c
234  character*(pkeyword_len)
235  & k_vsrc,
236  & k_isrc,
237  & k_psrc,
238  & k_esrc,
239  & k_qsrc
240  parameter (k_vsrc = 'VSR')
241  parameter (k_isrc = 'ISR')
242  parameter (k_psrc = 'PSR')
243  parameter (k_esrc = 'ESR')
244  parameter (k_qsrc = 'QSR')
245 c
246  parameter (ip_vsrc = 38)
247  parameter (ip_isrc = 39)
248  parameter (ip_psrc = 40)
249  parameter (ip_esrc = 41)
250  parameter (ip_qsrc = 42)
251 c
252 c ***** Keywords and indicies for gross block types *****
253 c
254  character*(pkeyword_len)
255  & k_vin,
256  & k_iin,
257  & k_pin,
258  & k_ein,
259  & k_qin,
260  & k_vout,
261  & k_iout,
262  & k_pout,
263  & k_eout,
264  & k_qout
265  parameter (k_vin = 'VIN')
266  parameter (k_iin = 'IIN')
267  parameter (k_pin = 'PIN')
268  parameter (k_ein = 'EIN')
269  parameter (k_qin = 'QIN')
270  parameter (k_vout = 'VOU')
271  parameter (k_iout = 'IOU')
272  parameter (k_pout = 'POU')
273  parameter (k_eout = 'EOU')
274  parameter (k_qout = 'QOU')
275 c
276  parameter (ip_vin = 43)
277  parameter (ip_iin = 44)
278  parameter (ip_pin = 45)
279  parameter (ip_ein = 46)
280  parameter (ip_qin = 47)
281  parameter (ip_vout = 48)
282  parameter (ip_iout = 49)
283  parameter (ip_pout = 50)
284  parameter (ip_eout = 51)
285  parameter (ip_qout = 52)
286 
287 c
288 c ***** Keywords and indicies for foil and gas puff implosion outputs *****
289 c
290  character*(pkeyword_len)
291  & k_frad,
292  & k_fvel,
293  & k_facc,
294  & k_fke,
295  & k_grad,
296  & k_gvel,
297  & k_gacc,
298  & k_gke,
299  & k_yw_al,
300  & k_ym_al,
301  & k_yw_ar,
302  & k_ym_ar,
303  & k_yw_cu,
304  & k_ym_cu,
305  & k_yw_kr,
306  & k_ym_kr,
307  & k_yw_xe,
308  & k_ym_xe,
309  & k_srad,
310  & k_svel,
311  & k_sacc,
312  & k_ske,
313  & k_smass
314 c
315  character*(pkeyword_len)
316  & k_srad1,
317  & k_srad2,
318  & k_srad3,
319  & k_srad4,
320  & k_srad5,
321  & k_scur1,
322  & k_scur2,
323  & k_scur3,
324  & k_scur4,
325  & k_scur5
326 c
327  parameter (k_frad = 'FRA')
328  parameter (k_fvel = 'FVE')
329  parameter (k_facc = 'FAC')
330  parameter (k_fke = 'FKE')
331  parameter (k_grad = 'GRA')
332  parameter (k_gvel = 'GVE')
333  parameter (k_gacc = 'GAC')
334  parameter (k_gke = 'GKE')
335 c
336  parameter (k_yw_al = 'YWL')
337  parameter (k_ym_al = 'YML')
338  parameter (k_yw_ar = 'YWA')
339  parameter (k_ym_ar = 'YMA')
340  parameter (k_yw_cu = 'YWC')
341  parameter (k_ym_cu = 'YMC')
342  parameter (k_yw_kr = 'YWK')
343  parameter (k_ym_kr = 'YMK')
344  parameter (k_yw_xe = 'YWX')
345  parameter (k_ym_xe = 'YMX')
346 c
347  parameter (k_srad = 'SRA')
348  parameter (k_svel = 'SVE')
349  parameter (k_sacc = 'SAC')
350  parameter (k_ske = 'SKE')
351  parameter (k_smass = 'SMA')
352  parameter (k_srad1 = 'SR1')
353  parameter (k_srad2 = 'SR2')
354  parameter (k_srad3 = 'SR3')
355  parameter (k_srad4 = 'SR4')
356  parameter (k_srad5 = 'SR5')
357  parameter (k_scur1 = 'SC1')
358  parameter (k_scur2 = 'SC2')
359  parameter (k_scur3 = 'SC3')
360  parameter (k_scur4 = 'SC4')
361  parameter (k_scur5 = 'SC5')
362 c
363  parameter (ip_frad = 56)
364  parameter (ip_fvel = 57)
365  parameter (ip_facc = 58)
366  parameter (ip_fke = 59)
367  parameter (ip_grad = 68)
368  parameter (ip_gvel = 69)
369  parameter (ip_gacc = 70)
370  parameter (ip_gke = 71)
371  parameter (ip_yw_al = 101)
372  parameter (ip_ym_al = 102)
373  parameter (ip_yw_ar = 103)
374  parameter (ip_ym_ar = 104)
375  parameter (ip_yw_cu = 105)
376  parameter (ip_ym_cu = 106)
377  parameter (ip_yw_kr = 107)
378  parameter (ip_ym_kr = 108)
379  parameter (ip_yw_xe = 109)
380  parameter (ip_ym_xe = 110)
381  parameter (ip_srad = 111)
382  parameter (ip_svel = 112)
383  parameter (ip_sacc = 113)
384  parameter (ip_ske = 114)
385  parameter (ip_smass = 115)
386  parameter (ip_srad1 = 201)
387  parameter (ip_srad2 = 202)
388  parameter (ip_srad3 = 203)
389  parameter (ip_srad4 = 204)
390  parameter (ip_srad5 = 205)
391  parameter (ip_scur1 = 301)
392  parameter (ip_scur2 = 302)
393  parameter (ip_scur3 = 303)
394  parameter (ip_scur4 = 304)
395  parameter (ip_scur5 = 305)
396 c
397 c ***** Keywords and indicies user variable outputs *****
398 c
399  character*(pkeyword_len)
400  & k_u1,
401  & k_u2,
402  & k_u3,
403  & k_u4,
404  & k_u5,
405  & k_u6,
406  & k_u7,
407  & k_u8,
408  & k_u9,
409  & k_u10
410 c
411  parameter (k_u1 = 'U1')
412  parameter (k_u2 = 'U2')
413  parameter (k_u3 = 'U3')
414  parameter (k_u4 = 'U4')
415  parameter (k_u5 = 'U5')
416  parameter (k_u6 = 'U6')
417  parameter (k_u7 = 'U7')
418  parameter (k_u8 = 'U8')
419  parameter (k_u9 = 'U9')
420  parameter (k_u10 = 'U10')
421 c
422  parameter (ip_u1 = 72)
423  parameter (ip_u2 = 73)
424  parameter (ip_u3 = 74)
425  parameter (ip_u4 = 75)
426  parameter (ip_u5 = 76)
427  parameter (ip_u6 = 77)
428  parameter (ip_u7 = 78)
429  parameter (ip_u8 = 79)
430  parameter (ip_u9 = 80)
431  parameter (ip_u10 = 81)
432 c
433 c ***** Keywords and indicies for transmission line outputs *****
434 c
435  character*(pkeyword_len)
436  & k_edline,
437  & k_pdline,
438  & k_eline,
439  & k_pline
440 c
441  parameter (k_edline = 'EDL')
442  parameter (k_pdline = 'PDL')
443  parameter (k_eline = 'ELI')
444  parameter (k_pline = 'PLI')
445 c
446  parameter (ip_edline = 82)
447  parameter (ip_pdline = 83)
448  parameter (ip_eline = 84)
449  parameter (ip_pline = 85)
450 c
451 c ***** Keywords and indicies for Toms sw outputs *****
452 c
453  character*(pkeyword_len) k_fc, k_fc1, k_fc2, k_fc3, k_fc4
454 c
455  parameter (k_fc = 'FCH')
456  parameter (k_fc1 = 'FC1')
457  parameter (k_fc2 = 'FC2')
458  parameter (k_fc3 = 'FC3')
459  parameter (k_fc4 = 'FC4')
460 c
461  parameter (ip_fc = 86)
462 c
463 c ***** Keywords and indicies for MFI CB outputs *****
464 c
465  character*(pkeyword_len)
466  & k_efld,
467  & k_bfld,
468  & k_xmfi
469 c
470  parameter (k_efld = 'EFL')
471  parameter (k_bfld = 'BFL')
472  parameter (k_xmfi = 'XMF')
473 c
474  parameter (ip_efld = 90)
475  parameter (ip_bfld = 91)
476  parameter (ip_xmfi = 92)
477 c
478 c ***** Keywords and indicies for Zflow model outputs *****
479 c
480  character*(pkeyword_len)
481  & k_zflow,
482  & k_gzflow
483 c
484  parameter (k_zflow = 'ZFL')
485  parameter (k_gzflow = 'GZF')
486 c
487  parameter (ip_zflow = 93)
488  parameter (ip_gzflow = 94)
489 c
490 c
491 c ***** Keywords and indicies for Zflow Plasma Current Loss Model outputs *****
492 c
493  character*(pkeyword_len)
494  & k_zloss,
495  & k_gloss
496 c
497  parameter (k_zloss = 'CZL')
498  parameter (k_gloss = 'GLO')
499 c
500  parameter (ip_zloss = 95)
501  parameter (ip_gloss = 96)
502 c
503 c
504 c ***** Additional Keywords and indicies for the MITL Model *****
505 c
506  character*(pkeyword_len) k_aloss
507 c
508  parameter (k_aloss = 'ALO')
509 c
510  parameter (ip_aloss = 97)
511 c
512 c
513 c
514 c ***** Keywords and indicies for Measure Zflow Block outputs *****
515 c
516  character*(pkeyword_len)
517  & k_icathode,
518  & k_iplasma,
519  & k_zot
520 c
521  parameter (k_icathode = 'ICA')
522  parameter (k_iplasma = 'IPL')
523  parameter (k_zot = 'ZOT')
524 c
525  parameter (ip_icathode = 98)
526  parameter (ip_iplasma = 99)
527  parameter (ip_zot = 100)
528 c
529 c
530 c
531 c ********************************************************
532 c
c *****************************************************************************c Parameters for output selections c Added MFI CB parameters c Added callouts for the radiation yield in the c cylindrical foil model c Added line
Definition: zdempprm.h:7
c *****************************************************************************c Parameters for output selections c Added MFI CB parameters c Added callouts for the radiation yield in the c cylindrical foil model c Added Added keywords and indices for Zflow Plasma c current loss model outputs Also added a new c output for MITLs c Added keywords and indices for CSV output types c Added keywords and indices for Zflow Block outputs c Added keywords and indices for SFC output types c & k_tabpts
Definition: zdempprm.h:7
c *****************************************************************************c Parameters for output selections c Added MFI CB parameters c Added callouts for the radiation yield in the c cylindrical foil model c Added Added keywords and indices for Zflow Plasma c current loss model outputs Also added a new c output for MITLs c Added keywords and indices for CSV output types c Added keywords and indices for Zflow Block outputs c Added keywords and indices for SFC output types c & k_csvpts
Definition: zdempprm.h:7
c *****************************************************************************c Parameters for output selections c Added MFI CB parameters c Added callouts for the radiation yield in the c cylindrical foil model c Added Added keywords and indices for Zflow Plasma c current loss model outputs Also added a new c output for MITLs c Added keywords and indices for CSV output types c KWS
Definition: zdempprm.h:7
c *****************************************************************************c Parameters for output selections c Added MFI CB parameters c Added callouts for the radiation yield in the c cylindrical foil model c Added Added keywords and indices for Zflow Plasma c current loss model outputs Also added a new c output for MITLs c Added keywords and indices for CSV output types c Added keywords and indices for Zflow Block outputs c Added keywords and indices for SFC output types c & k_prtpts
Definition: zdempprm.h:7
c *****************************************************************************c Parameters for output selections c Added MFI CB parameters c Added callouts for the radiation yield in the c cylindrical foil model c Added Added keywords and indices for Zflow Plasma c current loss model outputs Also added a new c output for MITLs c Added keywords and indices for CSV output types c Added keywords and indices for Zflow Block outputs c Added keywords and indices for SFC output types c & k_idrpts
Definition: zdempprm.h:7
c *****************************************************************************c Various format statements for read_screamer_data output c To get these into made format to be characters c for each line corrected spelling errors in format added statement for Zflow Plasma Loss Model added format for CSV output type fixed more lines longer than characters added format for Measure Zflow Block and forward c reverse current directions in Zflow plasma loss c and Zflow POS models added format for SFC output type c removed from all code calls c c c c c a80 c i10 c No grids on plots c Do not write files containing the plotted points c Execute only one cycle c Do not echo the setup parameters and indicies c c &exitting c a13 c c c c c c c c102 c &described as a function of time c c c &described as a function of time c c c &function of time c R3
Definition: zdemfmt.h:78
c *****************************************************************************c Various format statements for read_screamer_data output c To get these into made format to be characters c for each line corrected spelling errors in format added statement for Zflow Plasma Loss Model added format for CSV output type fixed more lines longer than characters added format for Measure Zflow Block and forward c reverse current directions in Zflow plasma loss c and Zflow POS models added format for SFC output type c removed from all code calls c c c c c a80 c i10 c No grids on plots c Do not write files containing the plotted points c Execute only one cycle c Do not echo the setup parameters and indicies c c &exitting c a13 c c c c c c c c102 c &described as a function of time c c c &described as a function of time c c c &function of time c C3
Definition: zdemfmt.h:78
c *****************************************************************************c Various format statements for read_screamer_data output c To get these into made format to be characters c for each line corrected spelling errors in format added statement for Zflow Plasma Loss Model added format for CSV output type fixed more lines longer than characters added format for Measure Zflow Block and forward c reverse current directions in Zflow plasma loss c and Zflow POS models added format for SFC output type c removed from all code calls c c c c c a80 c i10 c No grids on plots c Do not write files containing the plotted points c Execute only one cycle c Do not echo the setup parameters and indicies c c &exitting c a13 c c c c c L2
Definition: zdemfmt.h:52
c *****************************************************************************c Parameters for output selections c Added MFI CB parameters c Added callouts for the radiation yield in the c cylindrical foil model c Added Added keywords and indices for Zflow Plasma c current loss model outputs Also added a new c output for MITLs c Added keywords and indices for CSV output types c Added keywords and indices for Zflow Block outputs c Added keywords and indices for SFC output types c & k_filpts
Definition: zdempprm.h:7
c *****************************************************************************c Parameters for output selections c Added MFI CB parameters c Added callouts for the radiation yield in the c cylindrical foil model c Added Added keywords and indices for Zflow Plasma c current loss model outputs Also added a new c output for MITLs c Added keywords and indices for CSV output types c Added keywords and indices for Zflow Block outputs c Added keywords and indices for SFC output types c & k_pffpts
Definition: zdempprm.h:7
c *****************************************************************************c Parameters for output selections c Added MFI CB parameters c Added callouts for the radiation yield in the c cylindrical foil model c Added Added keywords and indices for Zflow Plasma c current loss model outputs Also added a new c output for MITLs c Added keywords and indices for CSV output types c Added keywords and indices for Zflow Block outputs c Added keywords and indices for SFC output types c RBS
Definition: zdempprm.h:7
c *****************************************************************************c Various format statements for read_screamer_data output c To get these into made format to be characters c for each line corrected spelling errors in format added statement for Zflow Plasma Loss Model added format for CSV output type fixed more lines longer than characters added format for Measure Zflow Block and forward c reverse current directions in Zflow plasma loss c and Zflow POS models added format for SFC output type c removed from all code calls c c c c c a80 c i10 c No grids on plots c Do not write files containing the plotted points c Execute only one cycle c Do not echo the setup parameters and indicies c c &exitting c a13 c c c c c c c c102 c &described as a function of time c c c &described as a function of time c c c &function of time c c shell c &min A K c &trapped field c153 c c c Sin c c c remaining calls in rdscrelem c Tabular a10 Cond c c c &used with this model c Exponential model of a resistive c c c Rise model of a resistive c c Z FLOW POS model
Definition: zdemfmt.h:131
c *****************************************************************************c Various format statements for read_screamer_data output c To get these into made format to be characters c for each line corrected spelling errors in format added statement for Zflow Plasma Loss Model added format for CSV output type fixed more lines longer than characters added format for Measure Zflow Block and forward c reverse current directions in Zflow plasma loss c and Zflow POS models added format for SFC output type c removed from all code calls c c c c c a80 c i10 c No grids on plots c Do not write files containing the plotted points c Execute only one cycle c Do not echo the setup parameters and indicies c ***** Block
Definition: zdemfmt.h:36
c *****************************************************************************c Parameters for output selections c use
Definition: zdempprm.h:7
c *****************************************************************************c Common blocks for SCREAMER output and tabling c numsfc character indices
Definition: zdemout.h:59
c *****************************************************************************c Various format statements for read_screamer_data output c To get these into made format to be characters c for each line corrected spelling errors in format added statement for Zflow Plasma Loss Model added format for CSV output type fixed more lines longer than characters added format for Measure Zflow Block and forward c reverse current directions in Zflow plasma loss c and Zflow POS models added format for SFC output type c removed from all code calls c c c c c a80 c i10 c No grids on plots c Do not write files containing the plotted points c Execute only one cycle c Do not echo the setup parameters and indicies c c &exitting c a13 c c c c c c c c102 c &described as a function of time c c c &described as a function of time c c c &function of time c c shell c &min A K c &trapped field c153 c c c Sin c c c remaining calls in rdscrelem c Tabular a10 Cond c c c &used with this model c Exponential model of a resistive c c c Rise model of a resistive c c Z FLOW POS c c c c SW1 c c c158 MFI Insulator CB c c c c161 Z FLOW Plasma Loss Current c c c Applied B Diode c &Ion Ion c c c c Initial c PRINT Output Request for block
Definition: zdemfmt.h:192
c *****************************************************************************c Various format statements for read_screamer_data output c To get these into made format to be characters c for each line corrected spelling errors in format added statement for Zflow Plasma Loss Model added format for CSV output type fixed more lines longer than characters added format for Measure Zflow Block and forward c reverse current directions in Zflow plasma loss c and Zflow POS models added format for SFC output type c removed from all code calls c c c c c a80 c i10 c No grids on plots c Do not write files containing the plotted points c Execute only one cycle c Do not echo the setup parameters and indicies c c &exitting c a13 c c c c c R2
Definition: zdemfmt.h:52
c *****************************************************************************c Various format statements for read_screamer_data output c To get these into made format to be characters c for each line c
Definition: zdemfmt.h:7
c *****************************************************************************c Various format statements for read_screamer_data output c To get these into made format to be characters c for each line corrected spelling errors in format added statement for Zflow Plasma Loss Model added format for CSV output type fixed more lines longer than characters added format for Measure Zflow Block and forward c reverse current directions in Zflow plasma loss c and Zflow POS models added format for SFC output type c removed from all code calls c c c c c a80 c i10 c No grids on plots c Do not write files containing the plotted points c Execute only one cycle c Do not echo the setup parameters and indicies c c &exitting c a13 c c c c c c c c102 c &described as a function of time c c c &described as a function of time c R1
Definition: zdemfmt.h:72
c *****************************************************************************c Parameters for output selections c Added MFI CB parameters c Added callouts for the radiation yield in the c cylindrical foil model c MLK
Definition: zdempprm.h:7
subroutine yield(Z, massm, rfm, Lzm, Kin, eta, T, Yw, Ym)
Definition: yield.f:1
subroutine user(timestep, time, p1, p2, p3, p4, v1, v2, v3)
Definition: usrfunc.f:1
c *****************************************************************************c Various format statements for read_screamer_data output c To get these into made format to be characters c for each line corrected spelling errors in format added statement for Zflow Plasma Loss Model added format for CSV output type fixed more lines longer than characters added format for Measure Zflow Block and forward c reverse current directions in Zflow plasma loss c and Zflow POS models added format for SFC output type c removed from all code calls c c c c c a80 c i10 c No grids on plots c Do not write files containing the plotted points c Execute only one cycle c Do not echo the setup parameters and indicies c c &exitting c a13 c c c c c c c c102 c &described as a function of time c c c &described as a function of time c C1
Definition: zdemfmt.h:72
c This is a Fortran header file
Definition: sfc.h:3
c *****************************************************************************c Parameters for output selections c Added MFI CB parameters c Added callouts for the radiation yield in the c cylindrical foil model c Added Added keywords and indices for Zflow Plasma c current loss model outputs Also added a new c output for MITLs c Added keywords and indices for CSV output types c Added keywords and indices for Zflow Block outputs c Added keywords and indices for SFC output types c & k_ufopts
Definition: zdempprm.h:7