source: CIVL/examples/fortran/flash/eos_getData/Flash.h@ bb03188

main test-branch
Last change on this file since bb03188 was ea777aa, checked in by Alex Wilton <awilton@…>, 3 years ago

Moved examples, include, build_default.properties, common.xml, and README out from dev.civl.com into the root of the repo.

git-svn-id: svn://vsl.cis.udel.edu/civl/trunk@5704 fb995dde-84ed-4084-dfe6-e5aef3e2452c

  • Property mode set to 100644
File size: 1.3 KB
Line 
1#define CONSTANT_ZERO (0)
2#define CONSTANT_ONE (1)
3#define CONSTANT_TWO (2)
4
5#define NDIM 1
6#define MAXBLOCKS 1000
7#define NGUARD 4
8
9
10#define K1D CONSTANT_ONE
11#define K2D CONSTANT_ZERO
12#define K3D CONSTANT_ZERO
13
14
15#define FIXEDBLOCKSIZE 1
16
17#ifdef FIXEDBLOCKSIZE
18
19#define NXB 8
20#define NYB 1
21#define NZB 1
22
23#define GRID_ILO_GC CONSTANT_ONE
24#define GRID_JLO_GC CONSTANT_ONE
25#define GRID_KLO_GC CONSTANT_ONE
26
27#define GRID_IHI_GC (NXB + CONSTANT_TWO*NGUARD)
28#define GRID_JHI_GC (NYB)
29#define GRID_KHI_GC (NZB)
30
31#define GRID_ILO (NGUARD + CONSTANT_ONE)
32#define GRID_JLO (CONSTANT_ONE)
33#define GRID_KLO (CONSTANT_ONE)
34
35#define GRID_IHI (NGUARD + NXB)
36#define GRID_JHI (NYB)
37#define GRID_KHI (NZB)
38
39
40#if 0
41 ************************************************************************
42 !!!DEV: MAXCELLS pertains to all simulations but someone else needs to
43 decide how this works with non fixed block size!
44
45 It is the maxmimum of GRID_{IJK}HI_GC. We compute the maximum using
46 preprocessor stuff
47 ************************************************************************
48#endif
49
50#if GRID_IHI_GC > GRID_JHI_GC
51#define FLASHPP_MAX_IJ_TEMP GRID_IHI_GC
52#else
53#define FLASHPP_MAX_IJ_TEMP GRID_JHI_GC
54#endif
55
56#if FLASHPP_MAX_IJ_TEMP > GRID_KHI_GC
57#define MAXCELLS FLASHPP_MAX_IJ_TEMP
58#else
59#define MAXCELLS GRID_KHI_GC
60#endif
61
62#endif
63
Note: See TracBrowser for help on using the repository browser.