Screamer Project  V3.3.1
Screamer Structure
 All Files Functions Variables
zdemvars.h
Go to the documentation of this file.
1 c----------------------------------------------------------------------
2 c @(#)zdemvars.h version 1.2.1 created 11/19/04 17:50:07
3 c Last modified: 19-Nov-2004 17:50:07 MB
4 C_Groups @(#)
5 c----------------------------------------------------------------------
6 c *****************************************************************************
7 c This is the common block used for sharing data between zdem.f and models.f
8 c *****************************************************************************
9 c
10 c file zdemvars.h
11 c
12 c ----------------------------------------------------------------------
13 c Modified:
14 c
15 c 2004-11-19 MB: Created by MB when separated from zdemcomm.
16 c 2012-04-13 RBS: zdemvars was mislabeled in the first line. Corrected.
17 c 2014-02-06 RBS: Change real*4 to real
18 c Define real for variables in misc_for_models
19 c Reorder misc_for_models 64-bit first
20 c 2014-04-04 RBS: Added mdl common drdt variable and real definition
21 c 2014-04-11 RBS: Noticed that htd2 had not been defined real - added
22 c 2014-04-11 RBS: Defined reals and integer in last common blocks
23 c ----------------------------------------------------------------------
24 c
25  integer ibranch, itab_counter
26  common /circuit_vars/ ibranch, itab_counter
27 
28  real rht, timehalf, htd2
29  common /time_vars/ rht, timehalf, htd2
30 
31 c
32 c Common block for user variables, user must also include in his
33 c user subroutine(s) if he wishes to use the user variable feature
34 c
35  real u1, u2, u3, u4, u5, u6, u7, u8, u9, u10
36  common /uservar/ u1, u2, u3, u4, u5, u6, u7, u8, u9, u10
37 
38  real lvar, cvar, rvar, gvar, drdt
39  common /mdl_vars/ lvar, cvar, rvar, gvar, drdt
40 
41  real
42  & anodecurrent, blockvoltage, ccath, cplas,
43  & currentbr, currentin, currentl2, currentout, currentr2,
44  & dcdt, dcvdv, dldt, dlidi,
45  & dummyp1, dummyp2, dummyp3, dummyp4,
46  & dvoltage, fcurrent,
47  & pscurrent, psvoltage,
48  & swcurrent, zmeas, zvac,
49  & voltagec1, voltagec3, voltager1, voltager2, voltager3,
50  & voltagein, voltageout
51 
52  integer
53  & iblock, iblock_num, ielement, imodel, inode,
54  & ivar, jnode
55 
56  common /misc_for_models/
57  & anodecurrent, blockvoltage, ccath, cplas,
58  & currentbr, currentin, currentl2, currentout, currentr2,
59  & dcdt, dcvdv, dldt, dlidi,
60  & dummyp1, dummyp2, dummyp3, dummyp4,
61  & dvoltage, fcurrent,
62  & pscurrent, psvoltage,
63  & swcurrent, zmeas, zvac,
64  & voltagec1, voltagec3, voltager1, voltager2, voltager3,
65  & voltagein, voltageout,
66  & iblock, iblock_num, ielement, imodel, inode,
67  & ivar, jnode
68 
69 c
70 c variables needed for the energy check
71 c
72  real
73  & econ, eres, esour, elosscap, elossind, error
74  common /for_energy_checks/
75  & econ, eres, esour, elosscap, elossind, error
76 
77  real
78  & decon, deres, dlosscap, dlossind, ecap, eind,
79  & esource, esum,
80  & halfi, halfi2, halfv, halfv2,
81  & psource
82 
83  integer
84  & i, ib, node, node1, node2, nrx
85 
86  common /misc_energy_checks/
87  & decon, deres, dlosscap, dlossind, ecap, eind,
88  & esource, esum,
89  & halfi, halfi2, halfv, halfv2,
90  & i, ib, node, node1, node2, nrx,
91  & psource
92 
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 Various format statements for read_screamer_data output c To get these into use
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 RBS
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 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
subroutine zdem(ifile, clen)
Definition: zdem.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 c
Definition: zdemfmt.h:7
subroutine user(timestep, time, p1, p2, p3, p4, v1, v2, v3)
Definition: usrfunc.f:1
c This is a Fortran header file
Definition: sfc.h:3