blob: 910f7872d49ae3afd6fae8cfd395088d4a353ae0 (
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
|
# Schedule definitions for thorn CarpetReduce
schedule CarpetReduceStartup at STARTUP
{
LANG: C
} "Startup routine"
# Should this move to a new thorn MaskBase?
STORAGE: weight
STORAGE: excised_cells
SCHEDULE GROUP MaskBase_SetupMask AT basegrid AFTER (SpatialCoordinates SphericalSurface_Setup)
{
} "Set up the weight function"
SCHEDULE GROUP MaskBase_SetupMask AT postregridinitial AFTER SpatialCoordinates
{
} "Set up the weight function"
SCHEDULE GROUP MaskBase_SetupMask AT postregrid AFTER SpatialCoordinates
{
} "Set up the weight function"
SCHEDULE GROUP MaskBase_SetupMask AT post_recover_variables
{
} "Set up the weight function"
SCHEDULE GROUP MaskBase_SetupMaskAll IN MaskBase_SetupMask
{
STORAGE: iweight
STORAGE: one
} "Set up the weight function"
SCHEDULE MaskBase_AllocateMask IN MaskBase_SetupMaskAll
{
LANG: C
OPTIONS: global
} "Allocate the weight function"
SCHEDULE MaskBase_InitMask IN MaskBase_SetupMaskAll AFTER MaskBase_AllocateMask
{
LANG: C
OPTIONS: global loop-local
} "Initialise the weight function"
SCHEDULE GROUP SetupIMaskInternal IN MaskBase_SetupMaskAll AFTER MaskBase_InitMask
{
} "Set up the integer weight function (schedule other routines in here)"
SCHEDULE GROUP SetupIMask IN MaskBase_SetupMaskAll AFTER SetupIMaskInternal
{
} "Set up the integer weight function (schedule other routines in here)"
SCHEDULE MaskBase_SetMask IN MaskBase_SetupMaskAll AFTER SetupIMask
{
LANG: C
OPTIONS: global loop-local
} "Set the weight function"
SCHEDULE GROUP SetupMask IN MaskBase_SetupMaskAll AFTER MaskBase_SetMask
{
} "Set up the real weight function (schedule other routines in here)"
SCHEDULE MaskBase_TestMask IN MaskBase_SetupMaskAll AFTER SetupMask
{
LANG: C
OPTIONS: global
} "Test the weight function"
# Should this move to CoordBase?
SCHEDULE CoordBase_SetupMask IN SetupIMaskInternal
{
LANG: C
OPTIONS: global loop-local
} "Set up the outer boundaries of the weight function"
# Should this move to CarpetMask?
SCHEDULE CarpetMaskSetup IN SetupIMaskInternal
{
LANG: C
OPTIONS: global loop-singlemap
} "Set up the weight function for the restriction regions"
|
