blob: f657effd766a37ab71a7381fca874a047aaa8246 (
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
|
# Schedule definitions for thorn IDAnalyticBH
# $Header$
if (CCTK_Equals(initial_data,"schwarzschild") ||
CCTK_Equals(initial_data,"bl_bh") ||
CCTK_Equals(initial_data,"misner_bh") ||
CCTK_Equals(initial_data,"multiple_misner"))
{
schedule ParamChecker at CACTUS_PARAMCHECK
{
LANG: Fortran
} "Construct parameters for analytic black hole solutions"
}
if (CCTK_Equals(initial_data,"schwarzschild"))
{
schedule Schwarzschild at CACTUS_INITIAL
{
LANG: Fortran
} "Construct initial data for a single Schwarzschild black hole"
}
if (CCTK_Equals(initial_data,"bl_bh"))
{
STORAGE: confac
schedule BrillLindquist at CACTUS_INITIAL
{
LANG: Fortran
} "Construct initial data for Brill Lindquist black holes"
}
if (CCTK_Equals(initial_data,"misner_bh"))
{
STORAGE: confac
schedule Misner_standard at CACTUS_INITIAL
{
LANG: Fortran
} "Construct initial data for multiple Misner black holes"
}
if (CCTK_Equals(initial_data,"multiple_misner_bh"))
{
STORAGE: confac
schedule Misner_multiple at CACTUS_INITIAL
{
LANG: Fortran
} "Construct initial data for two Misner black holes"
}
|