blob: 0dbd38d4088d2761bc1b8536ecbabf7c4313a4b0 (
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
|
/* $Header$ */
#include <assert.h>
#include <stdlib.h>
#include "cctk.h"
#include "cctk_Arguments.h"
#include "cctk_Parameters.h"
/** Initialise the conformal_state. */
void IDFileADM_Init (CCTK_ARGUMENTS)
{
DECLARE_CCTK_ARGUMENTS;
DECLARE_CCTK_PARAMETERS;
if (CCTK_EQUALS(initial_data, "read from file")) {
if (CCTK_EQUALS (metric_type, "physical")) {
*conformal_state = 0;
} else if (CCTK_EQUALS (metric_type, "static conformal")) {
if (CCTK_EQUALS (conformal_storage, "factor")) {
*conformal_state = 1;
} else if (CCTK_EQUALS (conformal_storage, "factor+derivs")) {
*conformal_state = 2;
} else if (CCTK_EQUALS (conformal_storage, "factor+derivs+2nd derivs")) {
*conformal_state = 3;
} else {
CCTK_WARN (0, "Unknown conformal_storage type");
}
} else {
CCTK_WARN (0, "Unknown metric type");
}
}
}
|