blob: 2cb6371f8630873ad0d44190afcafffd576514ce (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
# Schedule definitions for thorn DistortedBHIVP
# $Header$
if (CCTK_Equals(initial_data,"distortedbh"))
{
STORAGE: sph_to_car_coord, sph_to_car_psi
schedule DistortedBHIVP at CCTK_INITIAL
{
LANG: Fortran
} "Construct DistortedBHIVP"
}
|