aboutsummaryrefslogtreecommitdiff
path: root/CarpetExtra/FOWaveToyF77/schedule.ccl
blob: e4b6b56fd85263811c3af7c2ca537c8e2ca48ba2 (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
# Schedule definitions for thorn FOWaveToy77
# $Header:$

STORAGE: scalarevolve[3] scalarevolve_derivs[3]

schedule FOWaveToyF77_Startup at STARTUP
{
  LANG: Fortran
} "Register banner"

schedule FOWaveToyF77_InitSymBound at BASEGRID
{
  LANG: Fortran
  OPTIONS: GLOBAL
} "Schedule symmetries"



schedule FOWaveToyF77_Boundaries as FOWaveToy_Boundaries at INITIAL after FOWaveToy_InitialData
{
  LANG: Fortran
  SYNC: scalarevolve scalarevolve_derivs
} "Select boundary conditions of 3D wave equation"

schedule group ApplyBCs as FOWaveToy_ApplyBCs at INITIAL after FOWaveToy_Boundaries
{
} "Apply boundary conditions of 3D wave equation"



schedule FOWaveToyF77_Evolution as FOWaveToy_Evolution at EVOL
{
  LANG: Fortran
} "Evolution of 3D wave equation"

schedule FOWaveToyF77_Boundaries as FOWaveToy_Boundaries at EVOL after FOWaveToy_Evolution
{
  LANG: Fortran
  SYNC: scalarevolve scalarevolve_derivs
} "Select boundary conditions of 3D wave equation"

schedule group ApplyBCs as FOWaveToy_ApplyBCs at EVOL after FOWaveToy_Boundaries
{
} "Apply boundary conditions of 3D wave equation"



schedule FOWaveToyF77_Boundaries as FOWaveToy_Boundaries at POSTRESTRICT
{
  LANG: Fortran
  SYNC: scalarevolve scalarevolve_derivs
} "Select boundary conditions of 3D wave equation"

schedule group ApplyBCs as FOWaveToy_ApplyBCs at POSTRESTRICT after FOWaveToy_Boundaries
{
} "Apply boundary conditions of 3D wave equation"