blob: 7e2669370f6e7ed0a2db081a4f97bf66225a87ec (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
# Schedule definitions for thorn RotatingDBHIVP
# $Header$
if (CCTK_Equals(initial_data,"rotatingdbh"))
{
STORAGE: sph_to_car_coord, sph_to_car_psi
schedule RotatingDBHIVP_ParamCheck at PARAMCHECK
{
LANG: C
} "Check Parameters"
schedule RotatingDBHIVP at CCTK_INITIAL
{
LANG: Fortran
} "Construct RotatingDBHIVP"
}
|