aboutsummaryrefslogtreecommitdiff
path: root/Examples/WaveHost/schedule.ccl
blob: d57c66fdd1b0f8e8671a3ebb50c01da3ae10326f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
# File produced by Kranc


if (other_timelevels == 1)
{
  STORAGE: xCopy_g[1]
}

if (timelevels == 1)
{
  STORAGE: phi_g[1]
}
if (timelevels == 2)
{
  STORAGE: phi_g[2]
}

if (timelevels == 1)
{
  STORAGE: pi_g[1]
}
if (timelevels == 2)
{
  STORAGE: pi_g[2]
}

if (rhs_timelevels == 1)
{
  STORAGE: phi_grhs[1]
}
if (rhs_timelevels == 2)
{
  STORAGE: phi_grhs[2]
}

if (rhs_timelevels == 1)
{
  STORAGE: pi_grhs[1]
}
if (rhs_timelevels == 2)
{
  STORAGE: pi_grhs[2]
}

schedule WaveHost_Startup at STARTUP
{
  LANG: C
  OPTIONS: meta
} "create banner"

schedule WaveHost_RegisterSymmetries in SymmetryRegister
{
  LANG: C
  OPTIONS: meta
} "register symmetries"

schedule initial_gaussian AT INITIAL
{
  LANG: C
  READS:    grid::coordinates
  WRITES:   WaveHost::phi_g
  WRITES:   WaveHost::pi_g
  WRITES:   WaveHost::xCopy_g
} "initial_gaussian"


if (fdOrder == 2)
{
  schedule calc_rhs_2 in MoL_CalcRHS
  {
    LANG: C
    READS:    WaveHost::phi_g
    READS:    WaveHost::pi_g
    WRITES:   WaveHost::phi_grhs
    WRITES:   WaveHost::pi_grhs
  } "calc_rhs_2"
}


if (fdOrder == 2)
{
  schedule calc_rhs_2 at ANALYSIS
  {
    LANG: C
    SYNC: phi_grhs
    SYNC: pi_grhs
    READS:    WaveHost::phi_g
    READS:    WaveHost::pi_g
    WRITES:   WaveHost::phi_grhs
    WRITES:   WaveHost::pi_grhs
  } "calc_rhs_2"
}


if (fdOrder == 4)
{
  schedule calc_rhs_4 in MoL_CalcRHS
  {
    LANG: C
    READS:    WaveHost::phi_g
    READS:    WaveHost::pi_g
    WRITES:   WaveHost::phi_grhs
    WRITES:   WaveHost::pi_grhs
  } "calc_rhs_4"
}


if (fdOrder == 4)
{
  schedule calc_rhs_4 at ANALYSIS
  {
    LANG: C
    SYNC: phi_grhs
    SYNC: pi_grhs
    READS:    WaveHost::phi_g
    READS:    WaveHost::pi_g
    WRITES:   WaveHost::phi_grhs
    WRITES:   WaveHost::pi_grhs
  } "calc_rhs_4"
}

schedule calc_bound_rhs in MoL_RHSBoundaries
{
  LANG: C
  READS:    WaveHost::xCopy_g
  WRITES:   WaveHost::phi_grhs
  WRITES:   WaveHost::pi_grhs
} "calc_bound_rhs"

schedule calc_bound_rhs at ANALYSIS
{
  LANG: C
  SYNC: phi_grhs
  SYNC: pi_grhs
  READS:    WaveHost::xCopy_g
  WRITES:   WaveHost::phi_grhs
  WRITES:   WaveHost::pi_grhs
} "calc_bound_rhs"

schedule WaveHost_SelectBoundConds in MoL_PostStep
{
  LANG: C
  OPTIONS: level
  SYNC: phi_g
  SYNC: pi_g
} "select boundary conditions"

schedule WaveHost_CheckBoundaries at BASEGRID
{
  LANG: C
  OPTIONS: meta
} "check boundaries treatment"

schedule WaveHost_RegisterVars in MoL_Register
{
  LANG: C
  OPTIONS: meta
} "Register Variables for MoL"

schedule group ApplyBCs as WaveHost_ApplyBCs in MoL_PostStep after WaveHost_SelectBoundConds
{
  # no language specified
} "Apply boundary conditions controlled by thorn Boundary"