Blockstructured Adaptive Mesh Refinement in object-oriented C++
00001 #ifndef _included_DAGH_h 00002 #define _included_DAGH_h 00003 00009 #include "DAGHParams.h" 00010 #include "DAGHDefaults.h" 00011 00012 #include "GridHierarchy.h" 00013 #include "GridHierarchyCalls.h" 00014 #include "GridHierarchyIndex.h" 00015 00016 #include "GridFunction.h" 00017 #include "GridFunctionCalls.h" 00018 #include "GridFunctionIndex.h" 00019 00020 #include "GridData.h" 00021 00022 #include "CommServer.h" 00023 00024 #include "Coords.h" 00025 #include "DCoords.h" 00026 #include "BBox.h" 00027 #include "BBoxList.h" 00028 00029 #include "AllocError.h" 00030 00031 /*$inline static void DAGHCommInit(void) 00032 { comm_service::init(MPI_COMM_WORLD); }$*/ 00033 00034 /*$inline static void DAGHIOEnable(void) 00035 { comm_service::set_io_enable(); }$*/ 00036 00037 inline static void DAGHMPI_Finalize(void) 00038 { comm_service::clean(); MPI_Finalize(); } 00039 00040 #ifndef MY_PROC 00041 #define MY_PROC(GH) (comm_service::proc_me()) 00042 #endif 00043 00044 #ifndef NUM_PROC 00045 #define NUM_PROC(GH) (comm_service::proc_num()) 00046 #endif 00047 00048 #ifndef BEGIN_COMPUTE 00049 #define BEGIN_COMPUTE if ( (comm_service::proc_world() == 1) || \ 00050 (comm_service::proc_me() != comm_service::proc_io()) ) { 00051 #endif 00052 00053 /*$#ifndef BEGIN_COMPUTE 00054 #define BEGIN_COMPUTE if ( (!comm_service::io_enabled()) || \ 00055 (comm_service::proc_world() == 1) || \ 00056 (comm_service::proc_me() != comm_service::proc_io()) ) { 00057 #endif$*/ 00058 00059 #ifndef END_COMPUTE 00060 #define END_COMPUTE } 00061 #endif 00062 00063 #ifndef BEGIN_IO 00064 #define BEGIN_IO if ( (comm_service::io_enabled()) && \ 00065 (comm_service::proc_me() == comm_service::proc_io()) ) { 00066 #endif 00067 00068 #ifndef END_IO 00069 #define END_IO } 00070 #endif 00071 00072 #ifndef NUM_PROC 00073 #define NUM_PROC(GH) (comm_service::proc_num()) 00074 #endif 00075 00076 #endif
Quickstart Users Guide Programmers Reference Installation Examples Download
AMROC Main Home Contactlast update: 06/01/04