blob: e929eff776c3757a6a83ce8b5e3d1153c952b88c (
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
|
if (constraints_persist)
{
STORAGE: ADMconstraints
schedule ADMConstraints at CCTK_POSTSTEP
{
LANG: Fortran
COMMUNICATION: ADMconstraints
} "Evaluate constraints for use in other routines"
}
else
{
schedule ADMConstraints at CCTK_ANALYSIS
{
LANG: Fortran
STORAGE: ADMconstraints
COMMUNICATION: ADMconstraints
}"Evaluate Constraints"
}
|