diff --git a/.gitlab-ci.yml b/.gitlab-ci.yml
index 6511277c7b355c8a3fe992330963ebb9dbf1a4b6..708b18b5e69c2cdb131e8a2e666b471f38ca88a4 100755
--- a/.gitlab-ci.yml
+++ b/.gitlab-ci.yml
@@ -226,28 +226,27 @@ regression_test_4gpu:
allow_failure: true
before_script:
- - pip install hpc-rocket
+ - pip install hpc-rocket==0.6.0
- pip install "fieldcompare[all]"
script:
- - hpc-rocket launch regression-tests/multigpu_test/rocket4GPU.yml |& tee hpcrocket4GPU.log
- - hpc-rocket watch regression-tests/multigpu_test/rocket4GPU.yml $(python regression-tests/multigpu_test/utilities/parsejobid.py hpcrocket4GPU.log)
- - hpc-rocket finalize regression-tests/multigpu_test/rocket4GPU.yml
+ - hpc-rocket launch regression-tests/multigpu_test/rocket4GPU.yml --watch --save-jobid hpcrocket4GPU.log
- cat output/4GPU/slurm4GPU.out
- git clone --depth 1 --filter=blob:none --sparse https://github.com/irmb/test_data
- cd test_data
- - git sparse-checkout set regression_tests/gpu/DrivenCavity_4GPU_2Levels regression_tests/gpu/SphereScaling_4GPU_2Levels
+ - git sparse-checkout set regression_tests/gpu/DrivenCavity_4GPU_2Levels regression_tests/gpu/SphereMultiGPU_4GPU_2Levels
- cd ..
- fieldcompare dir output/4GPU test_data/regression_tests/gpu/DrivenCavity_4GPU_2Levels --include-files "DrivenCavityMultiGPU*.vtu"
- - fieldcompare dir output/4GPU test_data/regression_tests/gpu/SphereScaling_4GPU_2Levels --include-files "SphereScaling*.vtu"
+ - fieldcompare dir output/4GPU test_data/regression_tests/gpu/SphereMultiGPU_4GPU_2Levels --include-files "SphereMultiGPU*.vtu"
after_script:
- - hpc-rocket cancel regression-tests/multigpu_test/rocket4GPU.yml $(python regression-tests/multigpu_test/utilities/parsejobid.py hpcrocket4GPU.log)
+ - hpc-rocket cancel regression-tests/multigpu_test/rocket4GPU.yml --read-jobid-from hpcrocket4GPU.log
artifacts:
when: always
paths:
- - output/4GPU/slurm4GPU.out
+ - output/4GPU/*
+ - hpcrocket4GPU.log
expire_in: 1 week
###############################################################################
regression_test_8gpu:
@@ -262,28 +261,27 @@ regression_test_8gpu:
allow_failure: true
before_script:
- - pip install hpc-rocket
+ - pip install hpc-rocket==0.6.0
- pip install "fieldcompare[all]"
script:
- - hpc-rocket launch regression-tests/multigpu_test/rocket8GPU.yml |& tee hpcrocket8GPU.log
- - hpc-rocket watch regression-tests/multigpu_test/rocket8GPU.yml $(python regression-tests/multigpu_test/utilities/parsejobid.py hpcrocket8GPU.log)
- - hpc-rocket finalize regression-tests/multigpu_test/rocket8GPU.yml
+ - hpc-rocket launch regression-tests/multigpu_test/rocket8GPU.yml --watch --save-jobid hpcrocket8GPU.log
- cat output/8GPU/slurm8GPU.out
- git clone --depth 1 --filter=blob:none --sparse https://github.com/irmb/test_data
- cd test_data
- - git sparse-checkout set regression_tests/gpu/DrivenCavity_8GPU_2Levels regression_tests/gpu/SphereScaling_8GPU_2Levels
+ - git sparse-checkout set regression_tests/gpu/DrivenCavity_8GPU_2Levels regression_tests/gpu/SphereMultiGPU_8GPU_2Levels
- cd ..
- fieldcompare dir output/8GPU test_data/regression_tests/gpu/DrivenCavity_8GPU_2Levels --include-files "DrivenCavityMultiGPU*.vtu"
- - fieldcompare dir output/8GPU test_data/regression_tests/gpu/SphereScaling_8GPU_2Levels --include-files "SphereScaling*.vtu"
+ - fieldcompare dir output/8GPU test_data/regression_tests/gpu/SphereMultiGPU_8GPU_2Levels --include-files "SphereMultiGPU*.vtu"
after_script:
- - hpc-rocket cancel regression-tests/multigpu_test/rocket8GPU.yml $(python regression-tests/multigpu_test/utilities/parsejobid.py hpcrocket8GPU.log)
+ - hpc-rocket cancel regression-tests/multigpu_test/rocket8GPU.yml --read-jobid-from hpcrocket8GPU.log
artifacts:
when: always
paths:
- - output/8GPU/slurm8GPU.out
+ - output/8GPU/*
+ - hpcrocket8GPU.log
expire_in: 1 week
###############################################################################
diff --git a/CMake/cmake_config_files/ARAGORN.config.cmake b/CMake/cmake_config_files/ARAGORN.config.cmake
index 7643d267aabce7914000face6553fb38135b7a63..438e697b08ddf37399a2e5fafb7909dab2c1ffea 100644
--- a/CMake/cmake_config_files/ARAGORN.config.cmake
+++ b/CMake/cmake_config_files/ARAGORN.config.cmake
@@ -10,6 +10,7 @@ set(CMAKE_CUDA_ARCHITECTURES 86) # Nvidia GeForce RTX 3060
set(GPU_APP "apps/gpu/")
list(APPEND USER_APPS
"${GPU_APP}DrivenCavityMultiGPU"
- "${GPU_APP}SphereScaling"
+ "${GPU_APP}SphereMultiGPU"
+ # "${GPU_APP}ChannelFlow"
# "${GPU_APP}MusselOyster"
)
diff --git a/CMake/cmake_config_files/ARAGORNUBUNTU.config.cmake b/CMake/cmake_config_files/ARAGORNUBUNTU.config.cmake
deleted file mode 100644
index 25224f9a8e6f25cad0b1d90c4d3035ebff3a75c4..0000000000000000000000000000000000000000
--- a/CMake/cmake_config_files/ARAGORNUBUNTU.config.cmake
+++ /dev/null
@@ -1,22 +0,0 @@
-#################################################################################
-# VirtualFluids MACHINE FILE
-# Responsible: Anna Wellmann
-# OS: Ubuntu 20.04 (Docker container)
-#################################################################################
-
-set(CMAKE_CUDA_ARCHITECTURES 86) # Nvidia GeForce RTX 3060
-
-set(PATH_NUMERICAL_TESTS "D:/out/numericalTests/")
-list(APPEND VF_COMPILER_DEFINITION "PATH_NUMERICAL_TESTS=${PATH_NUMERICAL_TESTS}")
-
-set(GPU_APP "apps/gpu/")
-list(APPEND USER_APPS
- "${GPU_APP}DrivenCavityMultiGPU"
- "${GPU_APP}SphereScaling"
- # "${GPU_APP}MusselOyster"
- )
-
-# add_compile_options(-fsanitize=address)
-# add_link_options(-fsanitize=address)
-# add_compile_options(-fsanitize=undefined)
-# add_link_options(-fsanitize=undefined)
diff --git a/CMake/cmake_config_files/ELDARION.config.cmake b/CMake/cmake_config_files/ELDARION.config.cmake
index 13abc819e862f9275fa2cd77ee6bb1f2d31375bf..ad4606918cdf644849f3f449347f3ca9a68a0eeb 100644
--- a/CMake/cmake_config_files/ELDARION.config.cmake
+++ b/CMake/cmake_config_files/ELDARION.config.cmake
@@ -12,7 +12,7 @@ list(APPEND VF_COMPILER_DEFINITION "PATH_NUMERICAL_TESTS=${PATH_NUMERICAL_TESTS}
set(GPU_APP "apps/gpu/")
list(APPEND USER_APPS
- # "${GPU_APP}DrivenCavityMultiGPU"
- # "${GPU_APP}SphereScaling"
+ "${GPU_APP}DrivenCavityMultiGPU"
+ "${GPU_APP}SphereMultiGPU"
# "${GPU_APP}MusselOyster"
)
\ No newline at end of file
diff --git a/CMake/cmake_config_files/KI4ALLGPU.config.cmake b/CMake/cmake_config_files/KI4ALLGPU.config.cmake
index 7e55f21f5549d10b2f5e93daf51a2b0bcb7f8bc1..d53f2a772f0f31188098f4e65589b79f0fc9cb4c 100644
--- a/CMake/cmake_config_files/KI4ALLGPU.config.cmake
+++ b/CMake/cmake_config_files/KI4ALLGPU.config.cmake
@@ -9,7 +9,7 @@ set(CMAKE_CUDA_ARCHITECTURES 80) # Nvidia Tesla A100
set(GPU_APP "apps/gpu/")
list(APPEND USER_APPS
"${GPU_APP}ChannelFlow"
- "${GPU_APP}SphereScaling"
+ "${GPU_APP}SphereMultiGPU"
)
# run docker container with:
diff --git a/CMake/cmake_config_files/MOLLOK.config.cmake b/CMake/cmake_config_files/MOLLOK.config.cmake
index fac7be0cffc5ff09b8f0b46dbb21af7afb938a66..8192f4fafd0752557fdb60d100549baa422b2dd9 100644
--- a/CMake/cmake_config_files/MOLLOK.config.cmake
+++ b/CMake/cmake_config_files/MOLLOK.config.cmake
@@ -14,4 +14,3 @@ list(APPEND VF_COMPILER_DEFINITION "PATH_NUMERICAL_TESTS=${PATH_NUMERICAL_TESTS}
# add invidual apps here
list(APPEND USER_APPS "apps/gpu/WTG_RUB")
list(APPEND USER_APPS "apps/gpu/TGV_3D_GridRef")
-list(APPEND USER_APPS "apps/gpu/SphereRefined")
diff --git a/CMake/cmake_config_files/MULE.config.cmake b/CMake/cmake_config_files/MULE.config.cmake
index abe277026891774030c9bb6338b94616f54f6f4c..e2538029b14ffea1d400da8ed8152a87c4dbea67 100644
--- a/CMake/cmake_config_files/MULE.config.cmake
+++ b/CMake/cmake_config_files/MULE.config.cmake
@@ -1,4 +1,4 @@
SET(CMAKE_CUDA_ARCHITECTURES "75")
list(APPEND USER_APPS "apps/gpu/ActuatorLine")
-list(APPEND USER_APPS "apps/gpu/SphereScaling")
+list(APPEND USER_APPS "apps/gpu/SphereMultiGPU")
diff --git a/CMake/cmake_config_files/PHOENIX.config.cmake b/CMake/cmake_config_files/PHOENIX.config.cmake
index 7d0e1d6b6ba2790a2ab24e20d4ab6199ee75d0cf..fe9d70f6cd38fe487b38a69d8d85e570fb6f31df 100644
--- a/CMake/cmake_config_files/PHOENIX.config.cmake
+++ b/CMake/cmake_config_files/PHOENIX.config.cmake
@@ -11,6 +11,6 @@ set(CMAKE_CUDA_ARCHITECTURES 60) # NVIDIA Tesla P100
set(GPU_APP "apps/gpu/")
list(APPEND USER_APPS
# "${GPU_APP}DrivenCavityMultiGPU"
- # "${GPU_APP}SphereScaling"
+ # "${GPU_APP}SphereMultiGPU"
# "${GPU_APP}MusselOyster"
)
diff --git a/apps/cpu/GyroidsRow/CMakeLists.txt b/apps/cpu/GyroidsRow/CMakeLists.txt
new file mode 100644
index 0000000000000000000000000000000000000000..a7f945d67f665083cb58c9224a6e2cad2b1bdd20
--- /dev/null
+++ b/apps/cpu/GyroidsRow/CMakeLists.txt
@@ -0,0 +1,7 @@
+PROJECT(GyroidsRow)
+
+vf_add_library(BUILDTYPE binary PRIVATE_LINK cpu_core muparser basics ${MPI_CXX_LIBRARIES} FILES GyroidsRow.cpp )
+
+vf_get_library_name (library_name)
+target_include_directories(${library_name} PRIVATE ${APPS_ROOT_CPU})
+
diff --git a/apps/cpu/TPMSRow/TPMSRow.cfg b/apps/cpu/GyroidsRow/GyroidsRow.cfg
similarity index 72%
rename from apps/cpu/TPMSRow/TPMSRow.cfg
rename to apps/cpu/GyroidsRow/GyroidsRow.cfg
index 095b0bb32836969bca0ff86b4a31b20e70c72f2a..377efd1c0a995a26f2a12cfd5ab623a9374202a3 100644
--- a/apps/cpu/TPMSRow/TPMSRow.cfg
+++ b/apps/cpu/GyroidsRow/GyroidsRow.cfg
@@ -1,6 +1,6 @@
-pathname = E:\SimulationsResults\TPMSRow
-#pathname = C:\temp\TPMSRow
-#pathname = /mnt/c/temp/TPMSRow
+pathname = E:\SimulationsResults\GyroidsRow
+#pathname = C:\temp\GyroidsRow
+#pathname = /mnt/c/temp/GyroidsRow
numOfThreads = 1
availMem = 15e10
refineLevel = 0
@@ -8,7 +8,6 @@ refineLevel = 0
#Grid
length =0.025 0.01 0.01
blocknx = 25 50 50
-#dx =0.000050000000000000000000000000000000
dx=0.0001
#Geometry
UnitEdgeLength=0.01
@@ -19,7 +18,7 @@ gridCubeOrigin = -0.005 0 0
#Simulation
nu = 0.0001523579766536965
Re = 6563.489631218715
-Re0 = 6563.489631218715
+vx = 0.01
timeAvStart = 300
timeAvStop = 1500
diff --git a/apps/cpu/TPMSRow/TPMSRow.cpp b/apps/cpu/GyroidsRow/GyroidsRow.cpp
similarity index 50%
rename from apps/cpu/TPMSRow/TPMSRow.cpp
rename to apps/cpu/GyroidsRow/GyroidsRow.cpp
index a1f2b9ba6a21242ebc110e72437c6cb575311d56..94390e3af1806bbce59ec7bd1d18768180c42ddf 100644
--- a/apps/cpu/TPMSRow/TPMSRow.cpp
+++ b/apps/cpu/GyroidsRow/GyroidsRow.cpp
@@ -18,7 +18,6 @@ void run(string configname)
string pathname = config.getValue<string>("pathname");
int numOfThreads = config.getValue<int>("numOfThreads");
vector<int> blocknx = config.getVector<int>("blocknx");
- double beginTime = config.getValue<double>("beginTime");
double endTime = config.getValue<double>("endTime");
double outTime = config.getValue<double>("outTime");
double availMem = config.getValue<double>("availMem");
@@ -26,16 +25,10 @@ void run(string configname)
double dx = config.getValue<double>("dx");
double UnitEdgeLength = config.getValue<double>("UnitEdgeLength");
double Re = config.getValue<double>("Re");
- double Re0 = config.getValue<double>("Re0");
- //double rhoIn = config.getValue<double>("rhoIn");
- //string geometry = config.getValue<string>("geometry");
- vector<double> length = config.getVector<double>("length");
- //vector<double> FunnelL = config.getVector<double>("FunnelL");
- //vector<double> FunnelOrigin = config.getVector<double>("FunnelOrigin");
-
- double timeAvStart = config.getValue<double>("timeAvStart");
- double timeAvStop = config.getValue<double>("timeAvStop");
-
+ double vx = config.getValue<double>("vx");
+ vector<double> length = config.getVector<double>("length");
+ //double timeAvStart = config.getValue<double>("timeAvStart");
+ //double timeAvStop = config.getValue<double>("timeAvStop");
vector<double> TPMSL = config.getVector<double>("TPMSL");
vector<double> TPMSOrigin = config.getVector<double>("TPMSOrigin");
vector<double> gridCubeOrigin = config.getVector<double>("gridCubeOrigin");
@@ -46,10 +39,8 @@ void run(string configname)
double cpStep = config.getValue<double>("cpStep");
bool newStart = config.getValue<bool>("newStart");
- //SPtr<Communicator> comm = MPICommunicator::getInstance();
SPtr<vf::parallel::Communicator> comm = vf::parallel::MPICommunicator::getInstance();
int myid = comm->getProcessID();
- //int numOfProcesses = comm->getNumberOfProcesses();
if (logToFile) {
#if defined(__unix__)
@@ -65,107 +56,37 @@ void run(string configname)
UbLog::output_policy::setStream(logFilename.str());
}
}
- //dx = 1. / 100. / 112.;
- double vx = Re * nu / (UnitEdgeLength / dx);
+
SPtr<LBMUnitConverter> conv = SPtr<LBMUnitConverter>(new LBMUnitConverter());
- //UbSystem::makeDirectory(pathname);
- //UbSystem::makeDirectory(pathname+ "/mig");
- //UbSystem::makeDirectory(pathname+ "/geo");
- //UbSystem::makeDirectory(pathname+ "/blocks/blocks_");
-
+
////////////////////////////////////////////////////////////////////////
// BC Adapter
- // BCPtr gradientAdapter(new VelocityBC(true, true, true, pdxC, pdyC, pdzC, 0.0,
- // BCFunction::INFCONST));
- // gradientAdapter->setBcAlgorithm(BCStrategyPtr(new FluxBCStrategy()));
- // BCPtr cubeNoslipAdapter(new NoSlipBC(1));
SPtr<BC> tpmsNoslipAdapter(new NoSlipBC());
- //SPtr<BC> funnelNoslipAdapter(new NoSlipBC(1));
-
- // SPtr<BC> xMinApr(new DensityBC(0.0000001));
- SPtr<BC> xMinApr(new DensityBC());
- // SPtr<BC> xMinApr(new VelocityBC(vx, 0., BCFunction::INFCONST, 0., 0., BCFunction::INFCONST,
- // 0.,0., BCFunction::INFCONST));
-
- SPtr<BC> xMaxApr(new DensityBC(0.));
- //SPtr<BC> yMinApr(new NoSlipBC(1));
- //SPtr<BC> yMaxApr(new NoSlipBC(1));
+ SPtr<BC> xMinApr(new VelocityBC(vx, 0., BCFunction::INFCONST, 0., 0., BCFunction::INFCONST, 0.,0., BCFunction::INFCONST));
+ SPtr<BC> xMaxApr(new PressureBC(0.));
SPtr<BC> zMinApr(new NoSlipBC());
SPtr<BC> zMaxApr(new NoSlipBC());
- //SPtr<BC> zMinFunnelApr(new NoSlipBC(1));
- //SPtr<BC> zMaxFunnelApr(new NoSlipBC(1));
+ tpmsNoslipAdapter->setBCStrategy(SPtr<BCStrategy>(new NoSlipInterpolated()));
+ xMinApr->setBCStrategy(SPtr<BCStrategy>(new VelocityNonReflecting(c1o2)));
+ xMaxApr->setBCStrategy(SPtr<BCStrategy>(new OutflowNonReflectingWithPressure(c1o100)));
+ zMinApr->setBCStrategy(SPtr<BCStrategy>(new NoSlipInterpolated()));
+ zMaxApr->setBCStrategy(SPtr<BCStrategy>(new NoSlipInterpolated()));
- //tpmsNoslipAdapter->setBcAlgorithm(BCStrategyPtr(new NoSlipBCStrategy()));
- //tpmsNoslipAdapter->setBcAlgorithm(SPtr<BCStrategy>(new ThinWallNoSlipBCStrategy()));
-
- tpmsNoslipAdapter->setBCStrategy(SPtr<BCStrategy>(new NoSlipBCStrategy()));
- //funnelNoslipAdapter->setBcAlgorithm(SPtr<BCStrategy>(new NoSlipBCStrategy()));
-
- //xMinApr->setBcAlgorithm(SPtr<BCStrategy>(new NonEqDensityBCStrategy()));
- // xMinApr->setBcAlgorithm(SPtr<BCStrategy>(new VelocityBCStrategy()));
- xMinApr->setBCStrategy(SPtr<BCStrategy>(new NonReflectingInflowBCStrategy()));
- // xMinApr->setBcAlgorithm(SPtr<BCStrategy>(new VelocityWithDensityBCStrategy()));
- //xMaxApr->setBcAlgorithm(SPtr<BCStrategy>(new NonEqDensityBCStrategy()));
- xMaxApr->setBCStrategy(SPtr<BCStrategy>(new NonReflectingOutflowWithRelaxationBCStrategy()));
- //yMinApr->setBcAlgorithm(SPtr<BCStrategy>(new NoSlipBCStrategy()));
- //yMaxApr->setBcAlgorithm(SPtr<BCStrategy>(new NoSlipBCStrategy()));
- zMinApr->setBCStrategy(SPtr<BCStrategy>(new NoSlipBCStrategy()));
- zMaxApr->setBCStrategy(SPtr<BCStrategy>(new NoSlipBCStrategy()));
-
- //zMinFunnelApr->setBcAlgorithm(SPtr<BCStrategy>(new NoSlipBCStrategy()));
- //zMaxFunnelApr->setBcAlgorithm(SPtr<BCStrategy>(new NoSlipBCStrategy()));
-
- ////////////////////////////////////////////////////////////////////////
+ ////////////////////////////////////////////////////////////////////////234
// BC visitor
BoundaryConditionsBlockVisitor bcVisitor;
- // bcVisitor.addBC(cubeNoslipAdapter);
- bcVisitor.addBC(tpmsNoslipAdapter);
- //bcVisitor.addBC(funnelNoslipAdapter);
- bcVisitor.addBC(xMinApr);
- bcVisitor.addBC(xMaxApr);
- //bcVisitor.addBC(yMinApr);
- //bcVisitor.addBC(yMaxApr);
- bcVisitor.addBC(zMinApr);
- bcVisitor.addBC(zMaxApr);
- //bcVisitor.addBC(zMinFunnelApr);
- //bcVisitor.addBC(zMaxFunnelApr);
-
- ////////////////////////////////////////////////////////////////////////
- //spnonge layer
- //mu::Parser spongeLayer;
- //spongeLayer.SetExpr("x1>=(sizeX-sizeSP)/dx ? (sizeX/dx-(x1+1))/sizeSP/dx/2.0 + 0.5 : 1.0");
- //spongeLayer.DefineConst("sizeX", length[0]);
- //spongeLayer.DefineConst("sizeSP", 0.005);
- //spongeLayer.DefineConst("dx", dx);
-
////////////////////////////////////////////////////////////////////////
// grid, kernel and BCProcessor
SPtr<Grid3D> grid(new Grid3D(comm));
SPtr<LBMKernel> kernel;
- //kernel = SPtr<LBMKernel>(new InK15CompressibleNavierStokes());
- kernel = SPtr<LBMKernel>(new K15CompressibleNavierStokes());
- //kernel = SPtr<LBMKernel>(new IncompressibleCumulantWithSpongeLayerLBMKernel());
- //kernel->setWithSpongeLayer(true);
- //kernel->setSpongeLayer(spongeLayer);
- // kernel = ;
- // kernel = SPtr<LBMKernel>(new CumulantK17LBMKernel());
- // mu::Parser fctForcingX1;
- // fctForcingX1.SetExpr("Fx2");
- // fctForcingX1.DefineConst("Fx2", 5e-4);
- // kernel->setForcingX1(fctForcingX1);
- // kernel->setWithForcing(true);
- //
- // SPtr<ThinWallBCProcessor> bcProc(new ThinWallBCProcessor());
+ kernel = SPtr<LBMKernel>(new K15CompressibleNavierStokes());;
SPtr<BCSet> bcProc(new BCSet());
kernel->setBCSet(bcProc);
-
-
- SPtr<Grid3DVisitor> metisVisitor(new MetisPartitioningGridVisitor(
- comm, MetisPartitioningGridVisitor::LevelIntersected, DIR_00M, MetisPartitioner::RECURSIVE));
+ SPtr<Grid3DVisitor> metisVisitor(new MetisPartitioningGridVisitor(comm, MetisPartitioningGridVisitor::LevelIntersected, d00M, MetisPartitioner::RECURSIVE));
//////////////////////////////////////////////////////////////////////////
// restart
@@ -177,39 +98,19 @@ void run(string configname)
//////////////////////////////////////////////////////////////////////////
if (newStart) {
- GbImplicitSurfacePtr tpms;
- // tpms = GbImplicitSurfacePtr(new GbImplicitSurface(0, 0, 0, TPMSL[0], TPMSL[1], TPMSL[2], UnitEdgeLength,
- // dx));
- tpms = GbImplicitSurfacePtr(new GbImplicitSurface(TPMSOrigin[0], TPMSOrigin[1], TPMSOrigin[2],
+ //GbGyroidThirdOrderPtr tpms;
+ // tpms = GbGyroidThirdOrderPtr(new GbGyroidThirdOrder(TPMSOrigin[0], TPMSOrigin[1], TPMSOrigin[2],
+ // TPMSOrigin[0] + TPMSL[0],
+ // TPMSOrigin[1] + TPMSL[1],
+ // TPMSOrigin[2] + TPMSL[2],
+ // UnitEdgeLength, dx, 2.5e-4));
+ GbGyroidThirdOrderLongPtr tpms;
+ tpms = GbGyroidThirdOrderLongPtr(new GbGyroidThirdOrderLong(TPMSOrigin[0], TPMSOrigin[1], TPMSOrigin[2],
TPMSOrigin[0] + TPMSL[0],
TPMSOrigin[1] + TPMSL[1],
TPMSOrigin[2] + TPMSL[2],
UnitEdgeLength, dx, 2.5e-4));
- // for (int i = 0; i < 12; i++)
- // {
- // cout << tpms->evaluateImplicitFunction(0.002, 0.002, i/1000., 1.)<<endl;
- // }
-
- if (myid == 0)
- GbSystem3D::writeGeoObject(tpms.get(), pathname + "/geo/tpms", WbWriterVtkXmlBinary::getInstance());
-
-
- //SPtr<GbTriFaceMesh3D> funnel;
- //SPtr<GbTriFaceMesh3D> funnel(new GbTriFaceMesh3D());
- //funnel->readMeshFromSTLFileBinary(geometry, true);
-
-
-
- //funnel = SPtr<GbTriFaceMesh3D>(GbTriFaceMesh3DCreator::getInstance()->readMeshFromSTLFile2(geometry, "tpmsMeshBody", GbTriFaceMesh3D::KDTREE_SAHPLIT, false));
- // funnel->rotate(0.,180,0.);
-
- //funnel->translate(-funnel->getX1Minimum() - funnel->getLengthX1(),
- //tpms->getX2Centroid() - funnel->getX2Centroid(),
- //tpms->getX3Centroid() - funnel->getX3Centroid());
- //if (myid == 0)
- //GbSystem3D::writeGeoObject(funnel.get(), pathname + "/geo/funnel", WbWriterVtkXmlBinary::getInstance());
-
double g_minX1 = gridCubeOrigin[0];
double g_minX2 = gridCubeOrigin[1];
double g_minX3 = gridCubeOrigin[2];
@@ -223,7 +124,7 @@ void run(string configname)
GbSystem3D::writeGeoObject(gridCube.get(), pathname + "/geo/gridCube",
WbWriterVtkXmlBinary::getInstance());
-
+
SPtr<GbCuboid3D> spongecube(new GbCuboid3D(TPMSOrigin[0] + TPMSL[0], g_minX2 - dx, g_minX3 - dx,
g_maxX1 + dx, g_maxX2 + dx, g_maxX3 + dx));
if (myid == 0)
@@ -252,39 +153,9 @@ void run(string configname)
ppblocks->update(0);
- // GbObject3DPtr solidcube(new GbCuboid3D(0, g_minX2, g_minX3, TPMSL[0], g_maxX2, g_maxX3));
- // if (myid == 0) GbSystem3D::writeGeoObject(solidcube.get(), pathname + "/geo/solidcube",
- // WbWriterVtkXmlBinary::getInstance());
-
- GbCuboid3DPtr xMin(
- new GbCuboid3D(g_minX1 - dx, g_minX2 - dx, g_minX3 - dx, g_minX1, g_maxX2 + dx, g_maxX3 + dx));
-
- /*GbCuboid3DPtr yMin(
- new GbCuboid3D(g_minX1 - dx, g_minX2 - dx, g_minX3 - dx, g_maxX1, g_minX2, g_maxX3 + dx));
- GbCuboid3DPtr yMax(
- new GbCuboid3D(g_minX1 - dx, g_maxX2, g_minX3 - dx, g_maxX1 + dx, g_maxX2 + dx, g_maxX3 + dx));*/
-
- /* GbCuboid3DPtr zMinFunnel(
- new GbCuboid3D(g_minX1 - dx, g_minX2 - dx, g_minX3 - dx, g_maxX1, g_maxX2 + dx, g_minX3));
- GbCuboid3DPtr zMaxFunnel(
- new GbCuboid3D(g_minX1 - dx, g_minX2 - dx, g_maxX3, g_maxX1 + dx, g_maxX2 + dx, g_maxX3 + dx));*/
-
- //g_minX1 = 0.;
- // g_minX2 = -length[1] / 2.0;
- // g_minX3 = -length[2] / 2.0;
-
- //g_maxX1 = TPMSL[0];
- // g_maxX2 = length[1] / 2.0;
- // g_maxX3 -= TPMSL[2] / 2.0;
-
- GbCuboid3DPtr xMax(new GbCuboid3D(g_maxX1 , g_minX2 - dx, g_minX3 - dx, g_maxX1 + dx, g_maxX2 + dx,
- g_maxX3 + dx));
-
- //GbCuboid3DPtr zMin(new GbCuboid3D(g_minX1 - dx, g_minX2 - dx, g_minX3 - dx, 1.1 * g_maxX1, g_maxX2 + dx,
- // g_minX3 + 0.5 * (length[2] - TPMSL[2])));
- //GbCuboid3DPtr zMax(new GbCuboid3D(g_minX1 - dx, g_minX2 - dx, g_maxX3 - 0.5 * (length[2] - TPMSL[2]),
- // 1.1 * g_maxX1, g_maxX2 + dx, g_maxX3));
+ GbCuboid3DPtr xMin( new GbCuboid3D(g_minX1 - dx, g_minX2 - dx, g_minX3 - dx, g_minX1, g_maxX2 + dx, g_maxX3 + dx));
+ GbCuboid3DPtr xMax(new GbCuboid3D(g_maxX1 , g_minX2 - dx, g_minX3 - dx, g_maxX1 + dx, g_maxX2 + dx, g_maxX3 + dx));
GbCuboid3DPtr zMin(new GbCuboid3D(g_minX1 - dx, g_minX2 - dx, g_minX3 - dx, g_maxX1 + dx, g_maxX2 + dx, g_minX3));
GbCuboid3DPtr zMax(new GbCuboid3D(g_minX1 - dx, g_minX2 - dx, g_maxX3, g_maxX1 + dx, g_maxX2 + dx, g_maxX3 + dx));
@@ -292,76 +163,33 @@ void run(string configname)
GbSystem3D::writeGeoObject(xMin.get(), pathname + "/geo/xMin", WbWriterVtkXmlBinary::getInstance());
if (myid == 0)
GbSystem3D::writeGeoObject(xMax.get(), pathname + "/geo/xMax", WbWriterVtkXmlBinary::getInstance());
- /* if (myid == 0)
- GbSystem3D::writeGeoObject(yMin.get(), pathname + "/geo/yMin", WbWriterVtkXmlBinary::getInstance());
- if (myid == 0)
- GbSystem3D::writeGeoObject(yMax.get(), pathname + "/geo/yMax", WbWriterVtkXmlBinary::getInstance());*/
if (myid == 0)
GbSystem3D::writeGeoObject(zMin.get(), pathname + "/geo/zMin", WbWriterVtkXmlBinary::getInstance());
if (myid == 0)
GbSystem3D::writeGeoObject(zMax.get(), pathname + "/geo/zMax", WbWriterVtkXmlBinary::getInstance());
- /* if (myid == 0)
- GbSystem3D::writeGeoObject(zMinFunnel.get(), pathname + "/geo/zMinFunnel",
- WbWriterVtkXmlBinary::getInstance());
- if (myid == 0)
- GbSystem3D::writeGeoObject(zMaxFunnel.get(), pathname + "/geo/zMaxFunnel",
- WbWriterVtkXmlBinary::getInstance());*/
-
- // D3Q27InteractorPtr cubeInt = D3Q27InteractorPtr(new D3Q27Interactor(solidcube, grid, cubeNoslipAdapter,
- // Interactor3D::SOLID));
- SPtr<D3Q27Interactor> tpmsInt = SPtr<D3Q27Interactor>(
- new D3Q27Interactor(tpms, grid, tpmsNoslipAdapter, Interactor3D::SOLID, Interactor3D::POINTS));
- //SPtr<Interactor3D> funnelInt = SPtr<D3Q27TriFaceMeshInteractor>(
- //new D3Q27TriFaceMeshInteractor(funnel, grid, funnelNoslipAdapter, Interactor3D::SOLID));
- // D3Q27TriFaceMeshInteractorPtr tpmsInt = D3Q27TriFaceMeshInteractorPtr(new
- // D3Q27TriFaceMeshInteractor(tpms, grid, tpmsNoslipAdapter, Interactor3D::SOLID));
- // tpmsInt->setQs2(0);
-
- SPtr<D3Q27Interactor> xMinInt = SPtr<D3Q27Interactor>(
- new D3Q27Interactor(xMin, grid, xMinApr, Interactor3D::SOLID, Interactor3D::POINTS));
- SPtr<D3Q27Interactor> xMaxInt = SPtr<D3Q27Interactor>(
- new D3Q27Interactor(xMax, grid, xMaxApr, Interactor3D::SOLID, Interactor3D::POINTS));
- /* SPtr<D3Q27Interactor> yMinInt =
- SPtr<D3Q27Interactor>(new D3Q27Interactor(yMin, grid, yMinApr, Interactor3D::SOLID));
- SPtr<D3Q27Interactor> yMaxInt =
- SPtr<D3Q27Interactor>(new D3Q27Interactor(yMax, grid, yMaxApr, Interactor3D::SOLID));*/
- SPtr<D3Q27Interactor> zMinInt = SPtr<D3Q27Interactor>(
- new D3Q27Interactor(zMin, grid, zMinApr, Interactor3D::SOLID, Interactor3D::POINTS));
- SPtr<D3Q27Interactor> zMaxInt = SPtr<D3Q27Interactor>(
- new D3Q27Interactor(zMax, grid, zMaxApr, Interactor3D::SOLID, Interactor3D::POINTS));
-
- /*SPtr<D3Q27Interactor> zMinFunnelInt =
- SPtr<D3Q27Interactor>(new D3Q27Interactor(zMinFunnel, grid, zMinFunnelApr, Interactor3D::SOLID));
- SPtr<D3Q27Interactor> zMaxFunnelInt =
- SPtr<D3Q27Interactor>(new D3Q27Interactor(zMaxFunnel, grid, zMaxFunnelApr, Interactor3D::SOLID));*/
-
- // return;
+ SPtr<D3Q27Interactor> tpmsInt = SPtr<D3Q27Interactor>(new D3Q27Interactor(tpms, grid, tpmsNoslipAdapter, Interactor3D::SOLID, Interactor3D::POINTS));
+ SPtr<D3Q27Interactor> xMinInt = SPtr<D3Q27Interactor>(new D3Q27Interactor(xMin, grid, xMinApr, Interactor3D::SOLID, Interactor3D::POINTS));
+ SPtr<D3Q27Interactor> xMaxInt = SPtr<D3Q27Interactor>(new D3Q27Interactor(xMax, grid, xMaxApr, Interactor3D::SOLID, Interactor3D::POINTS));
+ SPtr<D3Q27Interactor> zMinInt = SPtr<D3Q27Interactor>(new D3Q27Interactor(zMin, grid, zMinApr, Interactor3D::SOLID, Interactor3D::POINTS));
+ SPtr<D3Q27Interactor> zMaxInt = SPtr<D3Q27Interactor>(new D3Q27Interactor(zMax, grid, zMaxApr, Interactor3D::SOLID, Interactor3D::POINTS));
InteractorsHelper intHelper(grid, metisVisitor,false);
- //intHelper.addInteractor(cubeInt);
- //intHelper.addInteractor(zMinFunnelInt);
- //intHelper.addInteractor(zMaxFunnelInt);
- //intHelper.addInteractor(funnelInt);
-
intHelper.addInteractor(tpmsInt);
intHelper.addInteractor(zMinInt);
intHelper.addInteractor(zMaxInt);
intHelper.addInteractor(xMinInt);
intHelper.addInteractor(xMaxInt);
- //intHelper.addInteractor(yMinInt);
- //intHelper.addInteractor(yMaxInt);
- intHelper.selectBlocks();
- // intHelper.selectBlocks2();
+ intHelper.selectBlocks();
// domain decomposition for threads
- PQueuePartitioningGridVisitor pqPartVisitor(numOfThreads);
- grid->accept(pqPartVisitor);
+ //PQueuePartitioningGridVisitor pqPartVisitor(numOfThreads);
+ //grid->accept(pqPartVisitor);
ppblocks->update(0);
ppblocks.reset();
@@ -397,12 +225,6 @@ void run(string configname)
SetKernelBlockVisitor kernelVisitor(kernel, nu, availMem, needMem);
grid->accept(kernelVisitor);
- // if (refineLevel > 0)
- // {
- // SetUndefinedNodesBlockVisitor undefNodesVisitor;
- // grid->accept(undefNodesVisitor);
- // }
-
intHelper.setBC();
SpongeLayerBlockVisitor spongeLayerVisitor(spongecube, kernel, nu, dP00);
@@ -412,8 +234,6 @@ void run(string configname)
// initialization of distributions
InitDistributionsBlockVisitor initVisitor;
- //initVisitor.setVx1(0.001);
- // initVisitor.setVx1(uLB);
grid->accept(initVisitor);
// boundary conditions grid
@@ -447,37 +267,24 @@ void run(string configname)
UBLOG(logINFO, "Restart - end");
}
// set connectors
- SPtr<Interpolator> iProcessor(new CompressibleOffsetInterpolator());
- //SetConnectorsBlockVisitor setConnsVisitor(comm, true, D3Q27System::ENDDIR, nu, iProcessor);
+ SPtr<Interpolator> iProcessor(new CompressibleOffsetMomentsInterpolator());
OneDistributionSetConnectorsBlockVisitor setConnsVisitor(comm);
grid->accept(setConnsVisitor);
-
-
-
+
SPtr<UbScheduler> visSch(new UbScheduler(outTime/*,beginTime,endTime*/));
SPtr<SimulationObserver> pp(new WriteMacroscopicQuantitiesSimulationObserver(grid, visSch, pathname, WbWriterVtkXmlBinary::getInstance(), conv, comm));
- SPtr<UbScheduler> tavSch(new UbScheduler(100, timeAvStart, timeAvStop));
- SPtr<TimeAveragedValuesSimulationObserver> tav(new TimeAveragedValuesSimulationObserver(grid, pathname, WbWriterVtkXmlBinary::getInstance(), tavSch, comm,
- TimeAveragedValuesSimulationObserver::Density | TimeAveragedValuesSimulationObserver::Velocity | TimeAveragedValuesSimulationObserver::Fluctuations));
- tav->setWithGhostLayer(true);
+ //SPtr<UbScheduler> tavSch(new UbScheduler(100, timeAvStart, timeAvStop));
+ //SPtr<TimeAveragedValuesSimulationObserver> tav(new TimeAveragedValuesSimulationObserver(grid, pathname, WbWriterVtkXmlBinary::getInstance(), tavSch, comm,
+ //TimeAveragedValuesSimulationObserver::Density | TimeAveragedValuesSimulationObserver::Velocity | TimeAveragedValuesSimulationObserver::Fluctuations));
+ //tav->setWithGhostLayer(true);
- SPtr<UbScheduler> nuSch(new UbScheduler(100, 0, endTime / 2));
- mu::Parser fnu;
- fnu.SetExpr("(L*u/T)*(((T-2*t)/Re0)+(2*t/Re))");
- fnu.DefineConst("Re0", Re0);
- fnu.DefineConst("Re", Re);
- fnu.DefineConst("T", endTime);
- fnu.DefineConst("L", (UnitEdgeLength / dx));
- fnu.DefineConst("u", vx);
- SPtr<SimulationObserver> nupr(new DecreaseViscositySimulationObserver(grid, nuSch, &fnu, comm));
-
- SPtr<UbScheduler> nupsSch(new UbScheduler(100, 100, 100000000));
+
+ SPtr<UbScheduler> nupsSch(new UbScheduler(500, 1000, 3000));
SPtr<SimulationObserver> npr(new NUPSCounterSimulationObserver(grid, nupsSch, numOfThreads, comm));
- //omp_set_num_threads(numOfThreads);
- numOfThreads = 1;
+
SPtr<UbScheduler> stepGhostLayer(visSch);
SPtr<Simulation> calculator(new Simulation(grid, stepGhostLayer, int(endTime)));
@@ -485,7 +292,7 @@ void run(string configname)
calculator->addSimulationObserver(npr);
calculator->addSimulationObserver(pp);
calculator->addSimulationObserver(migSimulationObserver);
- calculator->addSimulationObserver(tav);
+ //calculator->addSimulationObserver(tav);
if (myid == 0)
UBLOG(logINFO, "Simulation-start");
@@ -502,7 +309,6 @@ void run(string configname)
}
int main(int argc, char *argv[])
{
- //Sleep(25000);
if (argv != NULL) {
if (argv[1] != NULL) {
run(string(argv[1]));
diff --git a/apps/cpu/TPMSRow/CMakeLists.txt b/apps/cpu/TPMSRow/CMakeLists.txt
deleted file mode 100644
index f8c696c38152e73deb74a057360f9640ffc58983..0000000000000000000000000000000000000000
--- a/apps/cpu/TPMSRow/CMakeLists.txt
+++ /dev/null
@@ -1,10 +0,0 @@
-PROJECT(TPMSRow)
-
-vf_add_library(BUILDTYPE binary PRIVATE_LINK cpu_core muparser basics ${MPI_CXX_LIBRARIES} FILES TPMSRow.cpp )
-
-vf_get_library_name (library_name)
-#target_include_dires(${library_name} PRIVATE ${APPS_ROOT_CPU})
-#target_include_dires(${library_name} PRIVATE "/cluster/lib/boost/1.63.0/gcc")
-target_include_directories(${library_name} PRIVATE ${APPS_ROOT_CPU})
-#target_include_directories(${library_name} PRIVATE "/cluster/lib/boost/1.63.0/gcc/include/")
-
diff --git a/apps/gpu/ActuatorLine/ActuatorLine.cpp b/apps/gpu/ActuatorLine/ActuatorLine.cpp
index f1da073fe2ad6ac80020fb4f4be69bfd60709034..9e8af64ee40a2e93318eefb1c8ea8177a762fe62 100644
--- a/apps/gpu/ActuatorLine/ActuatorLine.cpp
+++ b/apps/gpu/ActuatorLine/ActuatorLine.cpp
@@ -26,26 +26,19 @@
// You should have received a copy of the GNU General Public License along
// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
//
-//! \file ActuatorLine.cpp
-//! \ingroup ActuatorLine
-//! \author Henry Korb, Henrik Asmuth
+//! \author Henry Korb, Henrik Asmuth, Anna Wellmann
//=======================================================================================
#define _USE_MATH_DEFINES
#include <cmath>
-#include <exception>
-#include <fstream>
#include <iostream>
-#include <memory>
-#include <sstream>
-#include <stdexcept>
#include <string>
-
+#include <vector>
//////////////////////////////////////////////////////////////////////////
#include <basics/DataTypes.h>
#include <basics/PointerDefinitions.h>
-#include <basics/StringUtilities/StringUtil.h>
#include <basics/config/ConfigurationFile.h>
+#include <basics/constants/NumericConstants.h>
#include <logger/Logger.h>
@@ -53,238 +46,278 @@
//////////////////////////////////////////////////////////////////////////
+#include "GridGenerator/grid/BoundaryConditions/BoundaryCondition.h"
+#include "GridGenerator/grid/BoundaryConditions/Side.h"
#include "GridGenerator/grid/GridBuilder/LevelGridBuilder.h"
#include "GridGenerator/grid/GridBuilder/MultipleGridBuilder.h"
-#include "GridGenerator/grid/BoundaryConditions/Side.h"
-#include "GridGenerator/grid/BoundaryConditions/BoundaryCondition.h"
-
-#include "GridGenerator/io/SimulationFileWriter/SimulationFileWriter.h"
-#include "GridGenerator/io/GridVTKWriter/GridVTKWriter.h"
-#include "GridGenerator/TransientBCSetter/TransientBCSetter.h"
-
//////////////////////////////////////////////////////////////////////////
+#include "gpu/core/BoundaryConditions/BoundaryConditionFactory.h"
#include "gpu/core/DataStructureInitializer/GridProvider.h"
-#include "gpu/core/DataStructureInitializer/GridReaderGenerator/GridGenerator.h"
#include "gpu/core/DataStructureInitializer/GridReaderFiles/GridReader.h"
-#include "gpu/core/BoundaryConditions/BoundaryConditionFactory.h"
+#include "gpu/core/DataStructureInitializer/GridReaderGenerator/GridGenerator.h"
#include "gpu/core/GPU/CudaMemoryManager.h"
#include "gpu/core/GridScaling/GridScalingFactory.h"
-#include "gpu/core/LBM/Simulation.h"
#include "gpu/core/Kernel/KernelTypes.h"
-#include "gpu/core/Parameter/Parameter.h"
+#include "gpu/core/LBM/Simulation.h"
#include "gpu/core/Output/FileWriter.h"
+#include "gpu/core/Parameter/Parameter.h"
#include "gpu/core/PreCollisionInteractor/Actuator/ActuatorFarmStandalone.h"
-#include "gpu/core/PreCollisionInteractor/Probes/PointProbe.h"
#include "gpu/core/PreCollisionInteractor/Probes/PlaneProbe.h"
+#include "gpu/core/PreCollisionInteractor/Probes/PointProbe.h"
+#include "gpu/core/PreCollisionInteractor/Probes/Probe.h"
#include "gpu/core/TurbulenceModels/TurbulenceModelFactory.h"
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-//
-// U s e r s e t t i n g s
-//
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-std::string path(".");
-
-std::string simulationName("ActuatorLine");
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+//////////////////////////////////////////////////////////////////////////
-void multipleLevel(const std::string& configPath)
+void run(vf::basics::ConfigurationFile& config)
{
- vf::parallel::Communicator &communicator = *vf::parallel::MPICommunicator::getInstance();
+ vf::logging::Logger::initializeLogger();
- vf::basics::ConfigurationFile config;
- config.load(configPath);
+ //////////////////////////////////////////////////////////////////////////
+ // Simulation parameters
+ //////////////////////////////////////////////////////////////////////////
- const real referenceDiameter = config.getValue<real>("ReferenceDiameter");
- const uint nodesPerDiameter = config.getValue<uint>("NodesPerDiameter");
- const real velocity = config.getValue<real>("Velocity");
-
-
- const real lengthX = 24*referenceDiameter;
- const real lengthY = 6*referenceDiameter;
- const real lengthZ = 6*referenceDiameter;
+ const std::string simulationName("ActuatorLine");
const real viscosity = 1.56e-5;
+ const real machNumber = 0.1;
+ const uint timeStepAverageTimeSeriesProbe = 1; //
- const real mach = 0.1;
+ const real rotorDiameter = config.getValue<real>("RotorDiameter");
+ const uint nodesPerDiameter = config.getValue<uint>("NodesPerDiameter");
+ const real velocity = config.getValue<real>("Velocity");
+ const float timeStartOut = config.getValue<real>("tStartOut");
+ const float timeOut = config.getValue<real>("tOut");
+ const float timeEnd = config.getValue<real>("tEnd");
+
+ const float timeStartAveraging = config.getValue<real>("tStartAveraging");
+ const float timeStartTemporalAveraging = config.getValue<real>("tStartTmpAveraging");
+ const float timeAveraging = config.getValue<real>("tAveraging");
+ const float timeStartOutProbe = config.getValue<real>("tStartOutProbe");
+ const float timeOutProbe = config.getValue<real>("tOutProbe");
+
+ const real lengthX = config.getValue<real>("LengthXinDiameter") * rotorDiameter;
+ const real lengthY = config.getValue<real>("LengthYinDiameter") * rotorDiameter;
+ const real lengthZ = config.getValue<real>("LengthZinDiameter") * rotorDiameter;
+
+ const std::vector<real> turbinePositionsX = config.getVector<real>("TurbinePositionsX");
+ const std::vector<real> turbinePositionsY = config.getVector<real>("TurbinePositionsY");
+ const std::vector<real> turbinePositionsZ = config.getVector<real>("TurbinePositionsZ");
+
+ std::vector<real> probePositionsX {}, probePositionsY {}, probePositionsZ {};
+ if (config.contains("probePositionsX")) {
+ probePositionsX = config.getVector<real>("ProbePositionsX");
+ probePositionsY = config.getVector<real>("ProbePositionsY");
+ probePositionsZ = config.getVector<real>("ProbePositionsZ");
+ }
- const float tStartOut = config.getValue<real>("tStartOut");
- const float tOut = config.getValue<real>("tOut");
- const float tEnd = config.getValue<real>("tEnd"); // total time of simulation
+ //////////////////////////////////////////////////////////////////////////
+ // compute parameters in lattice units
+ //////////////////////////////////////////////////////////////////////////
- const float tStartAveraging = config.getValue<real>("tStartAveraging");
- const float tStartTmpAveraging = config.getValue<real>("tStartTmpAveraging");
- const float tAveraging = config.getValue<real>("tAveraging");
- const float tStartOutProbe = config.getValue<real>("tStartOutProbe");
- const float tOutProbe = config.getValue<real>("tOutProbe");
-
- SPtr<Parameter> para = std::make_shared<Parameter>(communicator.getNumberOfProcesses(), communicator.getProcessID(), &config);
- BoundaryConditionFactory bcFactory = BoundaryConditionFactory();
- GridScalingFactory scalingFactory = GridScalingFactory();
+ const real deltaX = rotorDiameter / real(nodesPerDiameter);
+ const real deltaT = deltaX * machNumber / (sqrt(3) * velocity);
+ const real velocityLB = velocity * deltaT / deltaX; // LB units
+ const real viscosityLB = viscosity * deltaT / (deltaX * deltaX); // LB units
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+ const uint timeStepStartOut = timeStartOut / deltaT;
+ const uint timeStepOut = timeOut / deltaT;
+ const uint timeStepEnd = timeEnd / deltaT;
- const real dx = referenceDiameter/real(nodesPerDiameter);
+ const uint timeStepStartOutProbe = timeStartOutProbe / deltaT;
+ const uint timeStepStartTemporalAveraging = timeStartTemporalAveraging / deltaT;
+ const uint numberOfAvergingTimeSteps = timeAveraging / deltaT;
+ const uint timeStepOutProbe = timeOutProbe / deltaT;
- std::vector<real>turbinePositionsX{3.f*referenceDiameter};
- std::vector<real>turbinePositionsY{0.5f*lengthY};
- std::vector<real>turbinePositionsZ{0.5f*lengthY};
+ //////////////////////////////////////////////////////////////////////////
+ // create grid
+ //////////////////////////////////////////////////////////////////////////
auto gridBuilder = std::make_shared<MultipleGridBuilder>();
- gridBuilder->addCoarseGrid(0.0, 0.0, 0.0,
- lengthX, lengthY, lengthZ, dx);
-
- gridBuilder->setNumberOfLayers(4,0);
- gridBuilder->addGrid( std::make_shared<Cuboid>( turbinePositionsX[0]-1.5*referenceDiameter, turbinePositionsY[0]-1.5*referenceDiameter, turbinePositionsZ[0]-1.5*referenceDiameter,
- turbinePositionsX[0]+10.0*referenceDiameter, turbinePositionsY[0]+1.5*referenceDiameter, turbinePositionsZ[0]+1.5*referenceDiameter) , 1 );
- para->setMaxLevel(2);
- scalingFactory.setScalingFactory(GridScalingFactory::GridScaling::ScaleCompressible);
-
- gridBuilder->setPeriodicBoundaryCondition(false, false, false);
-
- gridBuilder->buildGrids(false); // buildGrids() has to be called before setting the BCs!!!!
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- const real dt = dx * mach / (sqrt(3) * velocity);
-
- const real velocityLB = velocity * dt / dx; // LB units
+ gridBuilder->addCoarseGrid(0.0, -0.5 * lengthY, -0.5 * lengthZ, lengthX, 0.5 * lengthY, 0.5 * lengthZ, deltaX);
+ gridBuilder->setPeriodicBoundaryCondition(false, false, false);
+ gridBuilder->buildGrids(false);
- const real viscosityLB = viscosity * dt / (dx * dx); // LB units
+ //////////////////////////////////////////////////////////////////////////
+ // set parameters
+ //////////////////////////////////////////////////////////////////////////
- VF_LOG_INFO("velocity [dx/dt] = {}", velocityLB);
- VF_LOG_INFO("viscosity [10^8 dx^2/dt] = {}", viscosityLB*1e8);
+ auto para = std::make_shared<Parameter>(&config);
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- para->setDevices(std::vector<uint>{(uint)0});
-
- para->setOutputPrefix( simulationName );
+ para->setOutputPrefix(simulationName);
para->setPrintFiles(true);
para->setVelocityLB(velocityLB);
para->setViscosityLB(viscosityLB);
- para->setVelocityRatio( dx / dt );
- para->setViscosityRatio( dx*dx/dt );
+ para->setVelocityRatio(deltaX / deltaT);
+ para->setViscosityRatio(deltaX * deltaX / deltaT);
para->configureMainKernel(vf::collisionKernel::compressible::K17CompressibleNavierStokes);
- para->setInitialCondition([&](real coordX, real coordY, real coordZ, real &rho, real &vx, real &vy, real &vz) {
+ para->setInitialCondition([&](real coordX, real coordY, real coordZ, real& rho, real& vx, real& vy, real& vz) {
rho = (real)0.0;
- vx = velocityLB;
- vy = (real)0.0;
- vz = (real)0.0;
+ vx = velocityLB;
+ vy = (real)0.0;
+ vz = (real)0.0;
});
- para->setTimestepStartOut( uint(tStartOut/dt) );
- para->setTimestepOut( uint(tOut/dt) );
- para->setTimestepEnd( uint(tEnd/dt) );
-
- para->setIsBodyForce( true );
- para->setUseStreams( true );
+ para->setTimestepStartOut(timeStepStartOut);
+ para->setTimestepOut(timeStepOut);
+ para->setTimestepEnd(timeStepEnd);
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+ para->setIsBodyForce(true);
+ para->setUseStreams(true);
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, velocityLB, 0.0, 0.0);
+ //////////////////////////////////////////////////////////////////////////
+ // set boundary conditions
+ //////////////////////////////////////////////////////////////////////////
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, velocityLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, velocityLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, velocityLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, velocityLB, 0.0, 0.0);
+ gridBuilder->setVelocityBoundaryCondition(SideType::MX, velocityLB, 0.0, 0.0);
+ gridBuilder->setVelocityBoundaryCondition(SideType::MY, velocityLB, 0.0, 0.0);
+ gridBuilder->setVelocityBoundaryCondition(SideType::PY, velocityLB, 0.0, 0.0);
+ gridBuilder->setVelocityBoundaryCondition(SideType::MZ, velocityLB, 0.0, 0.0);
+ gridBuilder->setVelocityBoundaryCondition(SideType::PZ, velocityLB, 0.0, 0.0);
gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.0);
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityAndPressureCompressible);
+ BoundaryConditionFactory bcFactory = BoundaryConditionFactory();
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityWithPressureInterpolatedCompressible);
bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::OutflowNonReflective);
SPtr<TurbulenceModelFactory> tmFactory = std::make_shared<TurbulenceModelFactory>(para);
tmFactory->readConfigFile(config);
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+ //////////////////////////////////////////////////////////////////////////
+ // add turbine
+ //////////////////////////////////////////////////////////////////////////
- int level = 1; // grid level at which the turbine samples velocities and distributes forces
- const real smearingWidth = dx*exp2(-level)*1.5; // width of gaussian smearing
+ const int level = 0; // grid level at which the turbine samples velocities and distributes forces
+ const real smearingWidth = deltaX * exp2(-level) * 2; // width of gaussian smearing
const real density = 1.225f;
- const uint nBladeNodes = 32;
- const real tipspeedRatio = 7.5f; // tipspeed ratio = angular vel * radius / inflow vel
- const std::vector<real> rotorSpeeds = {2*tipspeedRatio*velocity/referenceDiameter};
-
- SPtr<ActuatorFarmStandalone> actuatorFarm = std::make_shared<ActuatorFarmStandalone>(referenceDiameter, nBladeNodes, turbinePositionsX, turbinePositionsZ, turbinePositionsZ, rotorSpeeds, density, smearingWidth, level, dt, dx);
- actuatorFarm->enableOutput("ALM", uint(tStartOutProbe/dt), uint(tOutProbe/dt));
- para->addActuator( actuatorFarm );
-
-
- SPtr<PointProbe> pointProbe = std::make_shared<PointProbe>("pointProbe", para->getOutputPath(), 100, 1, 500, 100, false);
- std::vector<real> probeCoordsX = {referenceDiameter,2*referenceDiameter,5*referenceDiameter};
- std::vector<real> probeCoordsY = {3*referenceDiameter,3*referenceDiameter,3*referenceDiameter};
- std::vector<real> probeCoordsZ = {3*referenceDiameter,3*referenceDiameter,3*referenceDiameter};
-
- pointProbe->addProbePointsFromList(probeCoordsX, probeCoordsY, probeCoordsZ);
- // pointProbe->addProbePointsFromXNormalPlane(2*D, 0.0, 0.0, lengthY, lengthZ, (uint)lengthY/dx, (uint)lengthZ/dx);
-
- pointProbe->addStatistic(Statistic::Means);
- pointProbe->addStatistic(Statistic::Variances);
- para->addProbe( pointProbe );
-
- SPtr<PointProbe> timeseriesProbe = std::make_shared<PointProbe>("timeProbe", para->getOutputPath(), 100, 1, 500, 100, true);
- timeseriesProbe->addProbePointsFromList(probeCoordsX, probeCoordsY, probeCoordsZ);
- timeseriesProbe->addStatistic(Statistic::Instantaneous);
- timeseriesProbe->addStatistic(Statistic::Means);
- para->addProbe( timeseriesProbe );
+ const uint actuatorNodesPerBlade = 32;
+ const real tipSpeedRatio = 7.5f; // tipspeed ratio = angular vel * radius / inflow vel
+ const std::vector<real> rotorSpeeds { 2 * tipSpeedRatio * velocity / rotorDiameter };
+
+ SPtr<ActuatorFarmStandalone> actuatorFarm = std::make_shared<ActuatorFarmStandalone>(
+ rotorDiameter, actuatorNodesPerBlade, turbinePositionsX, turbinePositionsY, turbinePositionsZ, rotorSpeeds, density,
+ smearingWidth, level, deltaT, deltaX);
+ para->addActuator(actuatorFarm);
+
+ actuatorFarm->enableOutput("ActuatorLineForcesAndVelocities", timeStepStartOutProbe, timeStepOutProbe);
+
+ //////////////////////////////////////////////////////////////////////////
+ // add probes
+ //////////////////////////////////////////////////////////////////////////
+
+ std::vector<real> planePositions = { -1 * rotorDiameter, 1 * rotorDiameter, 3 * rotorDiameter };
+
+ for (int i = 0; i < planePositions.size(); i++) {
+ const std::string name = "planeProbe_" + std::to_string(i);
+ SPtr<PlaneProbe> planeProbe =
+ std::make_shared<PlaneProbe>(name, para->getOutputPath(), timeStepStartTemporalAveraging,
+ numberOfAvergingTimeSteps, timeStepStartOutProbe, timeStepOutProbe);
+ planeProbe->setProbePlane(turbinePositionsX[0] + planePositions[i], -0.5 * lengthY, -0.5 * lengthZ, deltaX, lengthY, lengthZ);
+ planeProbe->addStatistic(Statistic::Means);
+ planeProbe->addStatistic(Statistic::Variances);
+ planeProbe->addStatistic(Statistic::Instantaneous);
+ para->addProbe(planeProbe);
+ }
- SPtr<PlaneProbe> planeProbe = std::make_shared<PlaneProbe>("planeProbe", para->getOutputPath(), 100, 500, 100, 100);
- planeProbe->setProbePlane(5*referenceDiameter, 0, 0, dx, lengthY, lengthZ);
- planeProbe->addStatistic(Statistic::Means);
- para->addProbe( planeProbe );
+ SPtr<PlaneProbe> planeProbeVertical =
+ std::make_shared<PlaneProbe>("planeProbeVertical", para->getOutputPath(), timeStepStartTemporalAveraging,
+ numberOfAvergingTimeSteps, timeStepStartOutProbe, timeStepOutProbe);
+ planeProbeVertical->setProbePlane(0, turbinePositionsY[0], -0.5 * lengthZ, lengthX, deltaX, lengthZ);
+ planeProbeVertical->addStatistic(Statistic::Means);
+ planeProbeVertical->addStatistic(Statistic::Variances);
+ planeProbeVertical->addStatistic(Statistic::Instantaneous);
+ para->addProbe(planeProbeVertical);
+
+ SPtr<PlaneProbe> planeProbeHorizontal =
+ std::make_shared<PlaneProbe>("planeProbeHorizontal", para->getOutputPath(), timeStepStartTemporalAveraging,
+ numberOfAvergingTimeSteps, timeStepStartOutProbe, timeStepOutProbe);
+ planeProbeHorizontal->setProbePlane(0, -0.5 * lengthY, turbinePositionsZ[0], lengthX, lengthY, deltaX);
+ planeProbeHorizontal->addStatistic(Statistic::Means);
+ planeProbeHorizontal->addStatistic(Statistic::Variances);
+ planeProbeHorizontal->addStatistic(Statistic::Instantaneous);
+ para->addProbe(planeProbeHorizontal);
+
+ if (probePositionsX.size() > 0) {
+ SPtr<PointProbe> timeseriesProbe =
+ std::make_shared<PointProbe>("timeProbe", para->getOutputPath(), timeStepStartTemporalAveraging,
+ timeStepAverageTimeSeriesProbe, timeStepStartOutProbe, timeStepOutProbe, true);
+ timeseriesProbe->addProbePointsFromList(probePositionsX, probePositionsY, probePositionsZ);
+ timeseriesProbe->addStatistic(Statistic::Instantaneous);
+ timeseriesProbe->addStatistic(Statistic::Means);
+ para->addProbe(timeseriesProbe);
+ }
+ //////////////////////////////////////////////////////////////////////////
+ // set copy mesh to simulation
+ //////////////////////////////////////////////////////////////////////////
+ vf::parallel::Communicator& communicator = *vf::parallel::MPICommunicator::getInstance();
auto cudaMemoryManager = std::make_shared<CudaMemoryManager>(para);
auto gridGenerator = GridProvider::makeGridGenerator(gridBuilder, para, cudaMemoryManager, communicator);
- Simulation sim(para, cudaMemoryManager, communicator, *gridGenerator, &bcFactory, tmFactory, &scalingFactory);
+ //////////////////////////////////////////////////////////////////////////
+ // run simulation
+ //////////////////////////////////////////////////////////////////////////
+
+ VF_LOG_INFO("Start Running ActuatorLine Showcase...\n");
+
+ VF_LOG_INFO("world parameter:");
+ VF_LOG_INFO("--------------");
+ VF_LOG_INFO("dt [s] = {}", deltaT);
+ VF_LOG_INFO("world_domain [m] = {},{},{}", lengthX, lengthY, lengthZ);
+ VF_LOG_INFO("world_velocity [m/s] = {}", velocity);
+ VF_LOG_INFO("dx [m] = {}", deltaX);
+ VF_LOG_INFO("");
+
+ VF_LOG_INFO("LB parameter:");
+ VF_LOG_INFO("--------------");
+ VF_LOG_INFO("lb_velocity [dx/dt] = {}", velocityLB);
+ VF_LOG_INFO("lb_viscosity [dx^2/dt] = {}", viscosityLB);
+ VF_LOG_INFO("");
+
+ VF_LOG_INFO("simulation parameter:");
+ VF_LOG_INFO("--------------");
+ VF_LOG_INFO("n timesteps = {}", timeStepOut);
+ VF_LOG_INFO("write_nth_timestep = {}", timeStepEnd);
+ VF_LOG_INFO("output_path = {}", para->getOutputPath());
+ VF_LOG_INFO("");
+
+ VF_LOG_INFO("turbine parameters:");
+ VF_LOG_INFO("--------------");
+ VF_LOG_INFO("rotorDiameter [m] = {}", rotorDiameter);
+ VF_LOG_INFO("nodesPerDiameter = {}", nodesPerDiameter);
+ VF_LOG_INFO("actuatorNodesPerBlade = {}", actuatorNodesPerBlade);
+ VF_LOG_INFO("smearingWidth [m] = {}", smearingWidth);
+ VF_LOG_INFO("tipSpeedRatio = {}", tipSpeedRatio);
+
+ Simulation sim(para, cudaMemoryManager, communicator, *gridGenerator, &bcFactory, tmFactory);
sim.run();
}
-int main( int argc, char* argv[])
+int main(int argc, char* argv[])
{
- if ( argv != NULL )
- {
- try
- {
- vf::logging::Logger::initializeLogger();
-
- if( argc > 1){ path = argv[1]; }
-
- multipleLevel(path + "/configActuatorLine.txt");
- }
- catch (const spdlog::spdlog_ex &ex) {
- std::cout << "Log initialization failed: " << ex.what() << std::endl;
- }
-
- catch (const std::bad_alloc& e)
- {
- VF_LOG_CRITICAL("Bad Alloc: {}", e.what());
- }
- catch (const std::exception& e)
- {
- VF_LOG_CRITICAL("exception: {}", e.what());
- }
- catch (...)
- {
- VF_LOG_CRITICAL("Unknown exception!");
- }
+ if (argv == NULL)
+ return 0;
+
+ try {
+ auto config = vf::basics::loadConfig(argc, argv, "./configActuatorLine.txt");
+ run(config);
+ } catch (const spdlog::spdlog_ex& ex) {
+ std::cout << "Log initialization failed: " << ex.what() << std::endl;
+ } catch (const std::bad_alloc& e) {
+ VF_LOG_CRITICAL("Bad Alloc: {}", e.what());
+ } catch (const std::exception& e) {
+ VF_LOG_CRITICAL("exception: {}", e.what());
+ } catch (...) {
+ VF_LOG_CRITICAL("Unknown exception!");
}
return 0;
}
diff --git a/apps/gpu/ActuatorLine/configActuatorLine.txt b/apps/gpu/ActuatorLine/configActuatorLine.txt
index fbba0b89c689957831ce6ce7625da1441d8909a6..7f15bf3e81b2d6d00428a268dd0045c33148d422 100644
--- a/apps/gpu/ActuatorLine/configActuatorLine.txt
+++ b/apps/gpu/ActuatorLine/configActuatorLine.txt
@@ -1,16 +1,25 @@
##################################################
#informations for Writing
##################################################
-Path = .
+Path = ./output/
##################################################
#informations for reading
##################################################
GridPath=.
##################################################
-ReferenceDiameter=126
+RotorDiameter=126
NodesPerDiameter=32
Velocity=9
+LengthXinDiameter = 24
+LengthYinDiameter = 8
+LengthZinDiameter = 8
+
+##################################################
+TurbinePositionsX = 378
+TurbinePositionsY = 0
+TurbinePositionsZ = 0
##################################################
+
tStartOut=100
tOut=100
tEnd=1000
diff --git a/apps/gpu/ActuatorLineRegression/configActuatorLine.txt b/apps/gpu/ActuatorLine/configActuatorLineRegression.txt
similarity index 75%
rename from apps/gpu/ActuatorLineRegression/configActuatorLine.txt
rename to apps/gpu/ActuatorLine/configActuatorLineRegression.txt
index 06080d82f97ce44abfa56fcf7711b0280e8ceefa..881bc22f794f24a39a9ea4b9ec17073373a7477d 100644
--- a/apps/gpu/ActuatorLineRegression/configActuatorLine.txt
+++ b/apps/gpu/ActuatorLine/configActuatorLineRegression.txt
@@ -1,15 +1,25 @@
##################################################
-#informations for Writing
+#information for Writing
##################################################
Path = ./output/ActuatorLine/
+
##################################################
-#informations for reading
+#information for reading
##################################################
GridPath=.
+
##################################################
-ReferenceDiameter = 126
+RotorDiameter = 126
NodesPerDiameter = 24
Velocity = 9
+LengthXinDiameter = 10
+LengthYinDiameter = 4
+LengthZinDiameter = 4
+
+##################################################
+TurbinePositionsX = 378
+TurbinePositionsY = 0
+TurbinePositionsZ = 0
##################################################
tStartOut=1000000
@@ -31,5 +41,6 @@ SGSconstant = 0.3333333
QuadricLimiterP = 1.0
QuadricLimiterM = 1.0
QuadricLimiterD = 1.0
+
##################################################
diff --git a/apps/gpu/ActuatorLineRegression/ActuatorLineRegression.cpp b/apps/gpu/ActuatorLineRegression/ActuatorLineRegression.cpp
deleted file mode 100644
index 6b815a6a4257b74d699df338c620f925e9235cae..0000000000000000000000000000000000000000
--- a/apps/gpu/ActuatorLineRegression/ActuatorLineRegression.cpp
+++ /dev/null
@@ -1,287 +0,0 @@
-//=======================================================================================
-// ____ ____ __ ______ __________ __ __ __ __
-// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
-// \ \ | | | | | |_) | | | | | | | / \ | |
-// \ \ | | | | | _ / | | | | | | / /\ \ | |
-// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
-// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
-// \ \ | | ________________________________________________________________
-// \ \ | | | ______________________________________________________________|
-// \ \| | | | __ __ __ __ ______ _______
-// \ | | |_____ | | | | | | | | | _ \ / _____)
-// \ | | _____| | | | | | | | | | | \ \ \_______
-// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
-// \ _____| |__| |________| \_______/ |__| |______/ (_______/
-//
-// This file is part of VirtualFluids. VirtualFluids is free software: you can
-// redistribute it and/or modify it under the terms of the GNU General Public
-// License as published by the Free Software Foundation, either version 3 of
-// the License, or (at your option) any later version.
-//
-// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
-// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
-// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
-// for more details.
-//
-// You should have received a copy of the GNU General Public License along
-// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
-//
-//! \file ActuatorLine.cpp
-//! \ingroup ActuatorLine
-//! \author Henry Korb, Henrik Asmuth
-//=======================================================================================
-#define _USE_MATH_DEFINES
-#include <cmath>
-#include <exception>
-#include <fstream>
-#include <iostream>
-#include <memory>
-#include <sstream>
-#include <stdexcept>
-#include <string>
-
-//////////////////////////////////////////////////////////////////////////
-
-#include <basics/DataTypes.h>
-#include <basics/PointerDefinitions.h>
-#include <basics/StringUtilities/StringUtil.h>
-#include <basics/config/ConfigurationFile.h>
-
-#include <logger/Logger.h>
-
-#include <parallel/MPICommunicator.h>
-
-//////////////////////////////////////////////////////////////////////////
-
-#include "GridGenerator/grid/GridBuilder/LevelGridBuilder.h"
-#include "GridGenerator/grid/GridBuilder/MultipleGridBuilder.h"
-#include "GridGenerator/grid/BoundaryConditions/Side.h"
-#include "GridGenerator/grid/BoundaryConditions/BoundaryCondition.h"
-
-#include "GridGenerator/io/SimulationFileWriter/SimulationFileWriter.h"
-#include "GridGenerator/io/GridVTKWriter/GridVTKWriter.h"
-#include "GridGenerator/TransientBCSetter/TransientBCSetter.h"
-
-
-//////////////////////////////////////////////////////////////////////////
-
-#include "gpu/core/LBM/Simulation.h"
-#include "gpu/core/DataStructureInitializer/GridReaderGenerator/GridGenerator.h"
-#include "gpu/core/DataStructureInitializer/GridProvider.h"
-#include "gpu/core/DataStructureInitializer/GridReaderFiles/GridReader.h"
-#include "gpu/core/Parameter/Parameter.h"
-#include "gpu/core/Output/FileWriter.h"
-#include "gpu/core/PreCollisionInteractor/Actuator/ActuatorFarmStandalone.h"
-#include "gpu/core/PreCollisionInteractor/Probes/PointProbe.h"
-#include "gpu/core/PreCollisionInteractor/Probes/PlaneProbe.h"
-#include "gpu/core/PreCollisionInteractor/Probes/Probe.h"
-#include "gpu/core/BoundaryConditions/BoundaryConditionFactory.h"
-#include "gpu/core/TurbulenceModels/TurbulenceModelFactory.h"
-#include "gpu/core/GridScaling/GridScalingFactory.h"
-#include "gpu/core/Kernel/KernelTypes.h"
-
-#include "gpu/core/GPU/CudaMemoryManager.h"
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-//
-// Actuator Line app for regression tests
-//
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-std::string path(".");
-
-std::string simulationName("ActuatorLine");
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-void multipleLevel(const std::string& configPath)
-{
- vf::parallel::Communicator &communicator = *vf::parallel::MPICommunicator::getInstance();
-
- vf::basics::ConfigurationFile config;
- config.load(configPath);
-
- const real referenceDiameter = config.getValue<real>("ReferenceDiameter");
- const uint nodesPerDiameter = config.getValue<uint>("NodesPerDiameter");
- const real velocity = config.getValue<real>("Velocity");
-
- const real L_x = 10 * referenceDiameter;
- const real L_y = 4 * referenceDiameter;
- const real L_z = 4 * referenceDiameter;
-
- const real viscosity = 1.56e-5;
-
- const real mach = 0.1;
-
-
- const float tStartOut = config.getValue<real>("tStartOut");
- const float tOut = config.getValue<real>("tOut");
- const float tEnd = config.getValue<real>("tEnd"); // total time of simulation
-
- const float tStartAveraging = config.getValue<real>("tStartAveraging");
- const float tStartTmpAveraging = config.getValue<real>("tStartTmpAveraging");
- const float tAveraging = config.getValue<real>("tAveraging");
- const float tStartOutProbe = config.getValue<real>("tStartOutProbe");
- const float tOutProbe = config.getValue<real>("tOutProbe");
-
- SPtr<Parameter> para = std::make_shared<Parameter>(communicator.getNumberOfProcesses(), communicator.getProcessID(), &config);
- BoundaryConditionFactory bcFactory = BoundaryConditionFactory();
- GridScalingFactory scalingFactory = GridScalingFactory();
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- const real dx = referenceDiameter/real(nodesPerDiameter);
-
- std::vector<real>turbinePositionsX{3.f*referenceDiameter};
- std::vector<real>turbinePositionsY{0.0};
- std::vector<real>turbinePositionsZ{0.0};
-
- auto gridBuilder = std::make_shared<MultipleGridBuilder>();
-
- gridBuilder->addCoarseGrid(0.0, -0.5*L_y, -0.5*L_z,
- L_x, 0.5*L_y, 0.5*L_z, dx);
-
- gridBuilder->setPeriodicBoundaryCondition(false, false, false);
-
- gridBuilder->buildGrids(false); // buildGrids() has to be called before setting the BCs!!!!
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- const real dt = dx * mach / (sqrt(3) * velocity);
-
- const real velocityLB = velocity * dt / dx; // LB units
-
- const real viscosityLB = viscosity * dt / (dx * dx); // LB units
-
- VF_LOG_INFO("dx = {}m", dx);
- VF_LOG_INFO("velocity [dx/dt] = {}", velocityLB);
- VF_LOG_INFO("viscosity [10^8 dx^2/dt] = {}", viscosityLB*1e8);
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- para->setDevices(std::vector<uint>{(uint)0});
-
- para->setOutputPrefix( simulationName );
-
- para->setPrintFiles(true);
-
- para->setVelocityLB(velocityLB);
- para->setViscosityLB(viscosityLB);
- para->setVelocityRatio( dx / dt );
- para->setViscosityRatio( dx*dx/dt );
- para->configureMainKernel(vf::collisionKernel::compressible::K17CompressibleNavierStokes);
-
- para->setInitialCondition([&](real coordX, real coordY, real coordZ, real &rho, real &vx, real &vy, real &vz) {
- rho = (real)0.0;
- vx = velocityLB;
- vy = (real)0.0;
- vz = (real)0.0;
- });
-
- para->setTimestepStartOut( uint(tStartOut/dt) );
- para->setTimestepOut( uint(tOut/dt) );
- para->setTimestepEnd( uint(tEnd/dt) );
-
- para->setIsBodyForce( true );
- para->setUseStreams( true );
-
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, velocityLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, velocityLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, velocityLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, velocityLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, velocityLB, 0.0, 0.0);
- gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.0);
-
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityAndPressureCompressible);
- bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::OutflowNonReflective);
-
- SPtr<TurbulenceModelFactory> tmFactory = std::make_shared<TurbulenceModelFactory>(para);
- tmFactory->readConfigFile(config);
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- int level = 0; // grid level at which the turbine samples velocities and distributes forces
- const real smearingWidth = dx*exp2(-level)*2; // width of gaussian smearing
- VF_LOG_INFO("smearingWidth = {}m", smearingWidth);
- const real density = 1.225f;
- const uint nBladeNodes = 32;
- const real tipspeedRatio = 7.5f; // tipspeed ratio = angular vel * radius / inflow vel
- const std::vector<real> rotorSpeeds{2*tipspeedRatio*velocity/referenceDiameter};
-
-
- SPtr<ActuatorFarmStandalone> actuatorFarm = std::make_shared<ActuatorFarmStandalone>(referenceDiameter, nBladeNodes, turbinePositionsX, turbinePositionsY, turbinePositionsZ, rotorSpeeds, density, smearingWidth, level, dt, dx);
- para->addActuator( actuatorFarm );
-
- std::vector<real> planePositions = {-1*referenceDiameter, 1*referenceDiameter, 3*referenceDiameter};
-
- for(int i=0; i < planePositions.size(); i++)
- {
- SPtr<PlaneProbe> planeProbe = std::make_shared<PlaneProbe>("planeProbe_" + std::to_string(i), para->getOutputPath(), tStartTmpAveraging/dt, tAveraging/dt, tStartOutProbe/dt, tOutProbe/dt);
- planeProbe->setProbePlane(turbinePositionsX[0]+planePositions[i], -0.5 * L_y, -0.5 * L_z, dx, L_y, L_z);
- planeProbe->addStatistic(Statistic::Means);
- planeProbe->addStatistic(Statistic::Variances);
- planeProbe->addStatistic(Statistic::Instantaneous);
- para->addProbe( planeProbe );
- }
- SPtr<PlaneProbe> planeProbeVert = std::make_shared<PlaneProbe>("planeProbeVertical", para->getOutputPath(), tStartTmpAveraging/dt, tAveraging/dt, tStartOutProbe/dt, tOutProbe/dt);
- planeProbeVert->setProbePlane(0, turbinePositionsY[0], -0.5 * L_z, L_x, dx, L_z);
- planeProbeVert->addStatistic(Statistic::Means);
- planeProbeVert->addStatistic(Statistic::Variances);
- planeProbeVert->addStatistic(Statistic::Instantaneous);
- para->addProbe( planeProbeVert );
-
- SPtr<PlaneProbe> planeProbeHorz = std::make_shared<PlaneProbe>("planeProbeHorizontal", para->getOutputPath(), tStartTmpAveraging/dt, tAveraging/dt, tStartOutProbe/dt, tOutProbe/dt);
- planeProbeHorz->setProbePlane(0, -0.5 * L_y, turbinePositionsZ[0], L_x, L_y, dx);
- planeProbeHorz->addStatistic(Statistic::Means);
- planeProbeHorz->addStatistic(Statistic::Variances);
- planeProbeHorz->addStatistic(Statistic::Instantaneous);
- para->addProbe( planeProbeHorz );
-
-
- auto cudaMemoryManager = std::make_shared<CudaMemoryManager>(para);
-
- auto gridGenerator = GridProvider::makeGridGenerator(gridBuilder, para, cudaMemoryManager, communicator);
-
- Simulation sim(para, cudaMemoryManager, communicator, *gridGenerator, &bcFactory, tmFactory, &scalingFactory);
- sim.run();
-}
-
-int main( int argc, char* argv[])
-{
- if ( argv != NULL )
- {
- try
- {
- vf::logging::Logger::initializeLogger();
-
- if( argc > 1){ path = argv[1]; }
-
- multipleLevel(path + "/apps/gpu/ActuatorLineRegression/configActuatorLine.txt");
- }
- catch (const spdlog::spdlog_ex &ex) {
- std::cout << "Log initialization failed: " << ex.what() << std::endl;
- }
-
- catch (const std::bad_alloc& e)
- {
- VF_LOG_CRITICAL("Bad Alloc: {}", e.what());
- }
- catch (const std::exception& e)
- {
- VF_LOG_CRITICAL("exception: {}", e.what());
- }
- catch (...)
- {
- VF_LOG_CRITICAL("Unknown exception!");
- }
- }
- return 0;
-}
diff --git a/apps/gpu/ActuatorLineRegression/CMakeLists.txt b/apps/gpu/ActuatorLineRegression/CMakeLists.txt
deleted file mode 100644
index d22ef9c7263899a83ccecaffdbc7c59ffea20d4a..0000000000000000000000000000000000000000
--- a/apps/gpu/ActuatorLineRegression/CMakeLists.txt
+++ /dev/null
@@ -1,7 +0,0 @@
-PROJECT(ActuatorLineRegression LANGUAGES CUDA CXX)
-
-vf_add_library(BUILDTYPE binary PRIVATE_LINK basics gpu_core GridGenerator FILES ActuatorLineRegression.cpp)
-
-set_source_files_properties(ActuatorLineRegression.cpp PROPERTIES LANGUAGE CUDA)
-
-set_target_properties(ActuatorLineRegression PROPERTIES CUDA_SEPARABLE_COMPILATION ON)
diff --git a/apps/gpu/AtmosphericBoundaryLayer/AtmosphericBoundaryLayer.cpp b/apps/gpu/AtmosphericBoundaryLayer/AtmosphericBoundaryLayer.cpp
new file mode 100644
index 0000000000000000000000000000000000000000..0ec4dd18b10f31fa2bea8872ac2ad6582c6c06f8
--- /dev/null
+++ b/apps/gpu/AtmosphericBoundaryLayer/AtmosphericBoundaryLayer.cpp
@@ -0,0 +1,466 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Henry Korb, Henrik Asmuth
+//=======================================================================================
+#define _USE_MATH_DEFINES
+#include <cmath>
+#include <exception>
+#include <iostream>
+#include <memory>
+#include <numeric>
+#include <string>
+#include <vector>
+
+//////////////////////////////////////////////////////////////////////////
+
+#include <basics/DataTypes.h>
+#include <basics/PointerDefinitions.h>
+#include <basics/config/ConfigurationFile.h>
+#include <basics/constants/NumericConstants.h>
+
+#include <logger/Logger.h>
+
+#include <parallel/MPICommunicator.h>
+
+//////////////////////////////////////////////////////////////////////////
+
+#include "GridGenerator/geometries/Cuboid/Cuboid.h"
+#include "GridGenerator/grid/BoundaryConditions/BoundaryCondition.h"
+#include "GridGenerator/grid/BoundaryConditions/Side.h"
+#include "GridGenerator/grid/GridBuilder/LevelGridBuilder.h"
+#include "GridGenerator/grid/GridBuilder/MultipleGridBuilder.h"
+#include "GridGenerator/TransientBCSetter/TransientBCSetter.h"
+#include "GridGenerator/geometries/BoundingBox/BoundingBox.h"
+#include "GridGenerator/utilities/communication.h"
+
+//////////////////////////////////////////////////////////////////////////
+
+#include "gpu/core/BoundaryConditions/BoundaryConditionFactory.h"
+#include "gpu/core/DataStructureInitializer/GridProvider.h"
+#include "gpu/core/DataStructureInitializer/GridReaderFiles/GridReader.h"
+#include "gpu/core/DataStructureInitializer/GridReaderGenerator/GridGenerator.h"
+#include "gpu/core/GPU/CudaMemoryManager.h"
+#include "gpu/core/GridScaling/GridScalingFactory.h"
+#include "gpu/core/Kernel/KernelTypes.h"
+#include "gpu/core/LBM/Simulation.h"
+#include "gpu/core/Output/FileWriter.h"
+#include "gpu/core/Parameter/Parameter.h"
+#include "gpu/core/PreCollisionInteractor/PrecursorWriter.h"
+#include "gpu/core/PreCollisionInteractor/Probes/PlanarAverageProbe.h"
+#include "gpu/core/PreCollisionInteractor/Probes/PlaneProbe.h"
+#include "gpu/core/PreCollisionInteractor/Probes/WallModelProbe.h"
+#include "gpu/core/TurbulenceModels/TurbulenceModelFactory.h"
+
+////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+
+using namespace vf::basics::constant;
+
+void run(const vf::basics::ConfigurationFile& config)
+{
+ const std::string simulationName("AtmosphericBoundaryLayer");
+
+ const uint samplingOffsetWallModel = 2;
+ const uint averagingTimestepsPlaneProbes = 10;
+ const uint maximumNumberOfTimestepsPerPrecursorFile = 1000;
+ const real viscosity = 1.56e-5;
+ const real machNumber = 0.1;
+
+ const real boundaryLayerHeight = config.getValue("boundaryLayerHeight", 1000.0);
+
+ const real lengthX = 6 * boundaryLayerHeight;
+ const real lengthY = 4 * boundaryLayerHeight;
+ const real lengthZ = boundaryLayerHeight;
+
+ const real roughnessLength = config.getValue("z0", c1o10);
+ const real frictionVelocity = config.getValue("u_star", c4o10);
+ const real vonKarmanConstant = config.getValue("vonKarmanConstant", c4o10);
+
+ const uint nodesPerBoundaryLyerHeight = config.getValue<uint>("NodesPerBoundaryLayerHeight", 64);
+
+ const float periodicShift = config.getValue<float>("PeriodicShift", c0o1);
+
+ const bool writePrecursor = config.getValue("WritePrecursor", false);
+
+ const bool useDistributionsForPrecursor = config.getValue<bool>("UseDistributions", false);
+ std::string precursorDirectory = config.getValue<std::string>("PrecursorDirectory", "precursor/");
+ if(precursorDirectory.back() != '/')
+ precursorDirectory += '/';
+ const int timeStepsWritePrecursor = config.getValue<int>("nTimestepsWritePrecursor", 10);
+ const real timeStartPrecursor = config.getValue<real>("tStartPrecursor", 36000.);
+ const real positionXPrecursorSamplingPlane = config.getValue<real>("posXPrecursor", c1o2 * lengthX);
+
+ const bool usePrecursorInflow = config.getValue("ReadPrecursor", false);
+ const int timestepsBetweenReadsPrecursor = config.getValue<int>("nTimestepsReadPrecursor", 10);
+
+ const bool useRefinement = config.getValue<bool>("Refinement", false);
+
+ // all in s
+ const float timeStartOut = config.getValue<real>("tStartOut");
+ const float timeOut = config.getValue<real>("tOut");
+ const float timeEnd = config.getValue<real>("tEnd");
+
+ const float timeStartAveraging = config.getValue<real>("tStartAveraging");
+ const float timeStartTemporalAveraging = config.getValue<real>("tStartTmpAveraging");
+ const float timeAveraging = config.getValue<real>("tAveraging");
+ const float timeStartOutProbe = config.getValue<real>("tStartOutProbe");
+ const float timeOutProbe = config.getValue<real>("tOutProbe");
+
+ //////////////////////////////////////////////////////////////////////////
+ // compute parameters in lattice units
+ //////////////////////////////////////////////////////////////////////////
+ const auto velocityProfile = [&](real coordZ) {
+ return frictionVelocity / vonKarmanConstant * log(coordZ / roughnessLength + c1o1);
+ };
+ const real velocity = c1o2 * velocityProfile(boundaryLayerHeight);
+
+ const real deltaX = boundaryLayerHeight / real(nodesPerBoundaryLyerHeight);
+
+ const real deltaT = c1oSqrt3 * deltaX * machNumber / velocity;
+
+ const real velocityLB = velocity * deltaT / deltaX;
+
+ const real viscosityLB = viscosity * deltaT / (deltaX * deltaX);
+
+ const real pressureGradient = frictionVelocity * frictionVelocity / boundaryLayerHeight;
+ const real pressureGradientLB = pressureGradient * (deltaT * deltaT) / deltaX;
+
+ const uint timeStepStartOut = uint(timeStartOut / deltaT);
+ const uint timeStepOut = uint(timeOut / deltaT);
+ const uint timeStepEnd = uint(timeEnd / deltaT);
+
+ const uint timeStepStartAveraging = uint(timeStartAveraging / deltaT);
+ const uint timeStepStartTemporalAveraging = uint(timeStartTemporalAveraging / deltaT);
+ const uint timeStepAveraging = uint(timeAveraging / deltaT);
+ const uint timeStepStartOutProbe = uint(timeStartOutProbe / deltaT);
+ const uint timeStepOutProbe = uint(timeOutProbe / deltaT);
+
+ const uint timeStepStartPrecursor = uint(timeStartPrecursor / deltaT);
+
+ //////////////////////////////////////////////////////////////////////////
+ // create grid
+ //////////////////////////////////////////////////////////////////////////
+
+ vf::parallel::Communicator& communicator = *vf::parallel::MPICommunicator::getInstance();
+
+ const int numberOfProcesses = communicator.getNumberOfProcesses();
+ const int processID = communicator.getProcessID();
+ const bool isMultiGPU = numberOfProcesses > 1;
+
+ const real lengthXPerProcess = lengthX / numberOfProcesses;
+ const real overlap = 8.0 * deltaX;
+
+ const real xMin = processID * lengthXPerProcess;
+ const real xMax = (processID + 1) * lengthXPerProcess;
+ real xGridMin = processID * lengthXPerProcess;
+ real xGridMax = (processID + 1) * lengthXPerProcess;
+
+ const real yMin = c0o1;
+ const real yMax = lengthY;
+ const real zMin = c0o1;
+ const real zMax = lengthZ;
+
+ const bool isFirstSubDomain = isMultiGPU && (processID == 0);
+ const bool isLastSubDomain = isMultiGPU && (processID == numberOfProcesses - 1);
+ const bool isMidSubDomain = isMultiGPU && !(isFirstSubDomain || isLastSubDomain);
+
+ if (isFirstSubDomain){
+ xGridMax += overlap;
+ }
+ if (isFirstSubDomain && !usePrecursorInflow){
+ xGridMin -= overlap;
+ }
+
+ if (isLastSubDomain){
+ xGridMin -= overlap;
+ }
+
+ if (isLastSubDomain && !usePrecursorInflow){
+ xGridMax += overlap;
+ }
+
+ if (isMidSubDomain) {
+ xGridMax += overlap;
+ xGridMin -= overlap;
+ }
+
+ auto gridBuilder = std::make_shared<MultipleGridBuilder>();
+ auto scalingFactory = GridScalingFactory();
+
+ gridBuilder->addCoarseGrid(xGridMin, c0o1, c0o1, xGridMax, lengthY, lengthZ, deltaX);
+
+ if (useRefinement) {
+ gridBuilder->setNumberOfLayers(4, 0);
+ real xMaxRefinement = xGridMax;
+ if (usePrecursorInflow) {
+ xMaxRefinement = xGridMax - boundaryLayerHeight;
+ }
+ gridBuilder->addGrid(std::make_shared<Cuboid>(xGridMin, c0o1, c0o1, xMaxRefinement, lengthY, c1o2 * lengthZ), 1);
+ scalingFactory.setScalingFactory(GridScalingFactory::GridScaling::ScaleCompressible);
+ }
+
+ if (numberOfProcesses > 1) {
+ gridBuilder->setSubDomainBox(std::make_shared<BoundingBox>(xMin, xMax, yMin, yMax, zMin, zMax));
+ gridBuilder->setPeriodicBoundaryCondition(false, true, false);
+ } else {
+ gridBuilder->setPeriodicBoundaryCondition(!usePrecursorInflow, true, false);
+ }
+
+ if (!usePrecursorInflow) {
+ gridBuilder->setPeriodicShiftOnXBoundaryInYDirection(periodicShift);
+ }
+
+ gridBuilder->buildGrids(true); // buildGrids() has to be called before setting the BCs!!!!
+
+ //////////////////////////////////////////////////////////////////////////
+ // set parameters
+ //////////////////////////////////////////////////////////////////////////
+ auto para = std::make_shared<Parameter>(numberOfProcesses, communicator.getProcessID(), &config);
+
+ para->setOutputPrefix(simulationName);
+
+ para->setPrintFiles(true);
+
+ if (!usePrecursorInflow)
+ para->setForcing(pressureGradientLB, 0, 0);
+ para->setVelocityLB(velocityLB);
+ para->setViscosityLB(viscosityLB);
+ para->setVelocityRatio(deltaX / deltaT);
+ para->setViscosityRatio(deltaX * deltaX / deltaT);
+ para->setDensityRatio(c1o1);
+
+ para->setUseStreams(numberOfProcesses > 1);
+ para->configureMainKernel(vf::collisionKernel::compressible::K17CompressibleNavierStokes);
+
+ para->setTimestepStartOut(uint(timeStartOut / deltaT));
+ para->setTimestepOut(uint(timeOut / deltaT));
+ para->setTimestepEnd(uint(timeEnd / deltaT));
+
+ std::vector<uint> devices(10);
+ std::iota(devices.begin(), devices.end(), 0);
+ para->setDevices(devices);
+ para->setMaxDev(numberOfProcesses);
+ if (usePrecursorInflow) {
+ para->setInitialCondition([&](real coordX, real coordY, real coordZ, real& rho, real& vx, real& vy, real& vz) {
+ rho = c0o1;
+ vx = velocityProfile(coordZ) * deltaT / deltaX;
+ vy = c0o1;
+ vz = c0o1;
+ });
+ } else {
+ para->setInitialCondition([&](real coordX, real coordY, real coordZ, real& rho, real& vx, real& vy, real& vz) {
+ const real relativeX = coordX / lengthX;
+ const real relativeY = coordY / lengthY;
+ const real relativeZ = coordZ / lengthZ;
+
+ const real horizontalPerturbation = sin(cPi * c16o1 * relativeX);
+ const real verticalPerturbation = sin(cPi * c8o1 * relativeZ) / (pow(relativeZ, c2o1) + c1o1);
+ const real perturbation = c2o1 * horizontalPerturbation * verticalPerturbation;
+
+ rho = c0o1;
+ vx = (velocityProfile(coordZ) + perturbation) * (c1o1 - c1o10 * abs(relativeY - c1o2)) * deltaT / deltaX;
+ vy = perturbation * deltaT / deltaX;
+ vz = c8o1 * frictionVelocity / vonKarmanConstant *
+ (sin(cPi * c8o1 * coordY / boundaryLayerHeight) * sin(cPi * c8o1 * relativeZ) +
+ sin(cPi * c8o1 * relativeX)) /
+ (pow(c1o2 * lengthZ - coordZ, c2o1) + c1o1) * deltaT / deltaX;
+ });
+ }
+
+ /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+
+ if (numberOfProcesses > 1) {
+ if (isFirstSubDomain || isMidSubDomain) {
+ gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::PX, processID + 1);
+ }
+
+ if (isLastSubDomain || isMidSubDomain) {
+ gridBuilder->findCommunicationIndices(CommunicationDirections::MX, true);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::MX, processID - 1);
+ }
+
+ if (isFirstSubDomain && !usePrecursorInflow) {
+ gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::MX, numberOfProcesses - 1);
+ }
+
+ if (isLastSubDomain && !usePrecursorInflow) {
+ gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 0);
+ }
+ }
+
+ if (usePrecursorInflow) {
+ if (!isMultiGPU || isFirstSubDomain) {
+ auto precursor = createFileCollection(precursorDirectory + "precursor", TransientBCFileType::VTK);
+ gridBuilder->setPrecursorBoundaryCondition(SideType::MX, precursor, timestepsBetweenReadsPrecursor);
+ }
+
+ if (!isMultiGPU || isLastSubDomain) {
+ gridBuilder->setPressureBoundaryCondition(SideType::PX, c0o1);
+ }
+ }
+
+ gridBuilder->setStressBoundaryCondition(SideType::MZ, c0o1, c0o1, c1o1, samplingOffsetWallModel, roughnessLength,
+ deltaX);
+
+ gridBuilder->setSlipBoundaryCondition(SideType::PZ, c0o1, c0o1, -c1o1);
+
+ BoundaryConditionFactory bcFactory = BoundaryConditionFactory();
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
+ bcFactory.setStressBoundaryCondition(BoundaryConditionFactory::StressBC::StressPressureBounceBack);
+ bcFactory.setSlipBoundaryCondition(BoundaryConditionFactory::SlipBC::SlipCompressibleTurbulentViscosity);
+ bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::OutflowNonReflective);
+ if (useDistributionsForPrecursor) {
+ bcFactory.setPrecursorBoundaryCondition(BoundaryConditionFactory::PrecursorBC::DistributionsPrecursor);
+ } else {
+ bcFactory.setPrecursorBoundaryCondition(BoundaryConditionFactory::PrecursorBC::VelocityPrecursor);
+ }
+
+ //////////////////////////////////////////////////////////////////////////
+ // add probes
+ //////////////////////////////////////////////////////////////////////////
+ if (!usePrecursorInflow && (isFirstSubDomain || !isMultiGPU)) {
+ const auto planarAverageProbe = std::make_shared<PlanarAverageProbe>(
+ "planarAverageProbe", para->getOutputPath(), timeStepStartAveraging, timeStepStartTemporalAveraging, timeStepAveraging,
+ timeStepStartOutProbe, timeStepOutProbe, 'z');
+ planarAverageProbe->addAllAvailableStatistics();
+ planarAverageProbe->setFileNameToNOut();
+ para->addProbe(planarAverageProbe);
+
+ const auto wallModelProbe = std::make_shared<WallModelProbe>(
+ "wallModelProbe", para->getOutputPath(), timeStepStartAveraging, timeStepStartTemporalAveraging,
+ timeStepAveraging / 4, timeStepStartOutProbe, timeStepOutProbe);
+
+ wallModelProbe->addAllAvailableStatistics();
+ wallModelProbe->setFileNameToNOut();
+ wallModelProbe->setForceOutputToStress(true);
+ if (para->getIsBodyForce())
+ wallModelProbe->setEvaluatePressureGradient(true);
+ para->addProbe(wallModelProbe);
+
+ para->setHasWallModelMonitor(true);
+ }
+
+ for (int iPlane = 0; iPlane < 3; iPlane++) {
+ const std::string name = "planeProbe" + std::to_string(iPlane);
+ const auto horizontalProbe =
+ std::make_shared<PlaneProbe>(name, para->getOutputPath(), timeStepStartAveraging, averagingTimestepsPlaneProbes,
+ timeStepStartOutProbe, timeStepOutProbe);
+ horizontalProbe->setProbePlane(c0o1, c0o1, iPlane * lengthZ / c4o1, lengthX, lengthY, deltaX);
+ horizontalProbe->addAllAvailableStatistics();
+ para->addProbe(horizontalProbe);
+ }
+
+ auto crossStreamPlane =
+ std::make_shared<PlaneProbe>("crossStreamPlane", para->getOutputPath(), timeStartAveraging / deltaT,
+ averagingTimestepsPlaneProbes, timeStepStartOutProbe, timeOutProbe / deltaT);
+ crossStreamPlane->setProbePlane(c1o2 * lengthX, c0o1, c0o1, deltaX, lengthY, lengthZ);
+ crossStreamPlane->addAllAvailableStatistics();
+ para->addProbe(crossStreamPlane);
+
+ if (usePrecursorInflow) {
+ auto streamwisePlane =
+ std::make_shared<PlaneProbe>("streamwisePlane", para->getOutputPath(), timeStartAveraging / deltaT,
+ averagingTimestepsPlaneProbes, timeStepStartOutProbe, timeOutProbe / deltaT);
+ streamwisePlane->setProbePlane(c0o1, c1o2 * lengthY, c0o1, lengthX, deltaX, lengthZ);
+ streamwisePlane->addAllAvailableStatistics();
+ para->addProbe(streamwisePlane);
+ }
+
+ if (writePrecursor) {
+ const std::string fullPrecursorDirectory = para->getOutputPath() + precursorDirectory;
+ const auto outputVariable =
+ useDistributionsForPrecursor ? OutputVariable::Distributions : OutputVariable::Velocities;
+ auto precursorWriter = std::make_shared<PrecursorWriter>(
+ "precursor", fullPrecursorDirectory, positionXPrecursorSamplingPlane, c0o1, lengthY, c0o1, lengthZ,
+ timeStepStartPrecursor, timeStepsWritePrecursor, outputVariable, maximumNumberOfTimestepsPerPrecursorFile);
+ para->addProbe(precursorWriter);
+ }
+
+ auto cudaMemoryManager = std::make_shared<CudaMemoryManager>(para);
+ auto gridGenerator = GridProvider::makeGridGenerator(gridBuilder, para, cudaMemoryManager, communicator);
+ auto tmFactory = std::make_shared<TurbulenceModelFactory>(para);
+ tmFactory->readConfigFile(config);
+
+ VF_LOG_INFO("Start Running ActuatorLine Showcase...\n");
+
+ VF_LOG_INFO("world parameter:");
+ VF_LOG_INFO("--------------");
+ VF_LOG_INFO("dt [s] = {}", deltaT);
+ VF_LOG_INFO("world_domain [m] = {},{},{}", lengthX, lengthY, lengthZ);
+ VF_LOG_INFO("geostrophic wind [m/s] = {}", velocityProfile(boundaryLayerHeight));
+ VF_LOG_INFO("dx [m] = {}", deltaX);
+ VF_LOG_INFO("");
+
+ VF_LOG_INFO("LB parameter:");
+ VF_LOG_INFO("--------------");
+ VF_LOG_INFO("lb_velocity [dx/dt] = {}", velocityLB);
+ VF_LOG_INFO("lb_viscosity [dx^2/dt] = {}", viscosityLB);
+ VF_LOG_INFO("");
+
+ VF_LOG_INFO("simulation parameter:");
+ VF_LOG_INFO("--------------");
+ VF_LOG_INFO("n timesteps = {}", timeStepOut);
+ VF_LOG_INFO("write_nth_timestep = {}", timeStepEnd);
+ VF_LOG_INFO("output_path = {}", para->getOutputPath());
+ VF_LOG_INFO("");
+
+ VF_LOG_INFO("process parameter:");
+ VF_LOG_INFO("Number of Processes {} process ID {}", numberOfProcesses, processID);
+ if (isFirstSubDomain)
+ VF_LOG_INFO("Process ID {} is the first subdomain");
+ if (isLastSubDomain)
+ VF_LOG_INFO("Process ID {} is the last subdomain");
+ if (isMidSubDomain)
+ VF_LOG_INFO("Process ID {} is a mid subdomain");
+ printf("\n");
+
+ Simulation sim(para, cudaMemoryManager, communicator, *gridGenerator, &bcFactory, tmFactory, &scalingFactory);
+ sim.run();
+}
+
+int main(int argc, char* argv[])
+{
+ try {
+ vf::logging::Logger::initializeLogger();
+ auto config = vf::basics::loadConfig(argc, argv, "./configBoundaryLayer.txt");
+ run(config);
+ } catch (const spdlog::spdlog_ex& ex) {
+ std::cout << "Log initialization failed: " << ex.what() << '\n';
+ } catch (const std::bad_alloc& e) {
+ VF_LOG_CRITICAL("Bad Alloc: {}", e.what());
+ } catch (const std::exception& e) {
+ VF_LOG_CRITICAL("exception: {}", e.what());
+ } catch (...) {
+ VF_LOG_CRITICAL("Unknown exception!");
+ }
+
+ return 0;
+}
diff --git a/apps/gpu/AtmosphericBoundaryLayer/CMakeLists.txt b/apps/gpu/AtmosphericBoundaryLayer/CMakeLists.txt
new file mode 100644
index 0000000000000000000000000000000000000000..e6af6d03837f13dd8e22d148231d4c4de61018fb
--- /dev/null
+++ b/apps/gpu/AtmosphericBoundaryLayer/CMakeLists.txt
@@ -0,0 +1,7 @@
+PROJECT(AtmosphericBoundaryLayer LANGUAGES CUDA CXX)
+
+vf_add_library(BUILDTYPE binary PRIVATE_LINK basics gpu_core GridGenerator FILES AtmosphericBoundaryLayer.cpp)
+
+set_source_files_properties(AtmosphericBoundaryLayer.cpp PROPERTIES LANGUAGE CUDA)
+
+set_target_properties(AtmosphericBoundaryLayer PROPERTIES CUDA_SEPARABLE_COMPILATION ON)
diff --git a/apps/gpu/BoundaryLayer/configBoundaryLayer.txt b/apps/gpu/AtmosphericBoundaryLayer/configAtmosphericBoundaryLayer.txt
similarity index 80%
rename from apps/gpu/BoundaryLayer/configBoundaryLayer.txt
rename to apps/gpu/AtmosphericBoundaryLayer/configAtmosphericBoundaryLayer.txt
index 6f2c05739ea435848d62105650238aa391aff808..a5de43ce3cb423e70c19ad05797f23364b33d3e7 100644
--- a/apps/gpu/BoundaryLayer/configBoundaryLayer.txt
+++ b/apps/gpu/AtmosphericBoundaryLayer/configAtmosphericBoundaryLayer.txt
@@ -1,7 +1,7 @@
##################################################
#informations for Writing
##################################################
-Path = .
+Path = ./output/
##################################################
#informations for reading
##################################################
@@ -15,17 +15,16 @@ tEnd = 300000
##################################################
tStartAveraging = 0
tStartTmpAveraging = 100000
-tAveraging = 200
+tAveraging = 1000
tStartOutProbe = 0
tOutProbe = 1000
##################################################
-Ma = 0.1
-nz = 96
+NodesPerBoundaryLayerHeight = 96
-periodicShift = 1100
-refinement = false
+PeriodicShift = 1100
+Refinement = false
-bodyForce = true
+##################################################
TurbulenceModel = QR
SGSconstant = 0.333333
QuadricLimiterP = 100000.0
@@ -33,12 +32,12 @@ QuadricLimiterM = 100000.0
QuadricLimiterD = 100000.0
##################################################
-readPrecursor = false
+ReadPrecursor = false
nTimestepsReadPrecursor = 10
-precursorFile = precursor/Precursor
+PrecursorFile = precursor/Precursor
##################################################
-writePrecursor = false
+WritePrecursor = false
nTimestepsWritePrecursor = 10
tStartPrecursor = 100
diff --git a/apps/gpu/SphereGPU/config.txt b/apps/gpu/AtmosphericBoundaryLayer/configAtmosphericBoundaryLayerRegression.txt
similarity index 55%
rename from apps/gpu/SphereGPU/config.txt
rename to apps/gpu/AtmosphericBoundaryLayer/configAtmosphericBoundaryLayerRegression.txt
index 5688820be22d3400349cbe610bf1399d3fea8761..940428c8c8bbb648bb78d837290e0962e5fc9984 100644
--- a/apps/gpu/SphereGPU/config.txt
+++ b/apps/gpu/AtmosphericBoundaryLayer/configAtmosphericBoundaryLayerRegression.txt
@@ -1,35 +1,32 @@
-##################################################
-#GPU Mapping
-##################################################
-#Devices="0 1 2 3"
-#NumberOfDevices=4
-
##################################################
#informations for Writing
##################################################
-Path=output/Sphere/
-Prefix=Sphere01
-#WriteGrid=true
+Path = ./output/AtmosphericBoundaryLayer/
##################################################
#informations for reading
##################################################
-GridPath="grid/"
-#STLPath=./stl/Sphere/sphere02.stl
-
+GridPath = .
##################################################
-#number of grid levels
+Devices = 0
##################################################
-#NOGL=1
-
+tStartOut = 0
+tOut = 100000
+tEnd = 7802
##################################################
-#LBM Version
+tStartAveraging = 7200
+tStartTmpAveraging = 7200
+tAveraging = 600
+tStartOutProbe = 7200
+tOutProbe = 600
##################################################
-#D3Qxx=27
-#MainKernelName=CumulantAA2016CompSP27
+NodesPerBoundaryLayerHeight = 48
##################################################
-#simulation parameter
+PeriodicShift = 1100
+
##################################################
-#TimeEnd=100000
-#TimeOut=1000
-#TimeStartOut=0
\ No newline at end of file
+TurbulenceModel = QR
+SGSconstant = 0.333333
+QuadricLimiterP = 100000.0
+QuadricLimiterM = 100000.0
+QuadricLimiterD = 100000.0
diff --git a/apps/gpu/BoundaryLayer/BoundaryLayer.cpp b/apps/gpu/BoundaryLayer/BoundaryLayer.cpp
deleted file mode 100644
index a5bc05310d17af7d943b1db921b7eb908cc6b96c..0000000000000000000000000000000000000000
--- a/apps/gpu/BoundaryLayer/BoundaryLayer.cpp
+++ /dev/null
@@ -1,477 +0,0 @@
-//=======================================================================================
-// ____ ____ __ ______ __________ __ __ __ __
-// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
-// \ \ | | | | | |_) | | | | | | | / \ | |
-// \ \ | | | | | _ / | | | | | | / /\ \ | |
-// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
-// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
-// \ \ | | ________________________________________________________________
-// \ \ | | | ______________________________________________________________|
-// \ \| | | | __ __ __ __ ______ _______
-// \ | | |_____ | | | | | | | | | _ \ / _____)
-// \ | | _____| | | | | | | | | | | \ \ \_______
-// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
-// \ _____| |__| |________| \_______/ |__| |______/ (_______/
-//
-// This file is part of VirtualFluids. VirtualFluids is free software: you can
-// redistribute it and/or modify it under the terms of the GNU General Public
-// License as published by the Free Software Foundation, either version 3 of
-// the License, or (at your option) any later version.
-//
-// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
-// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
-// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
-// for more details.
-//
-// You should have received a copy of the GNU General Public License along
-// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
-//
-//! \file BoundaryLayer.cpp
-//! \ingroup BoundaryLayer
-//! \author Henry Korb, Henrik Asmuth
-//=======================================================================================
-#define _USE_MATH_DEFINES
-#include <cmath>
-#include <exception>
-#include <fstream>
-#include <iostream>
-#include <memory>
-#include <numeric>
-#include <sstream>
-#include <stdexcept>
-#include <string>
-
-//////////////////////////////////////////////////////////////////////////
-
-#include <basics/DataTypes.h>
-#include <basics/PointerDefinitions.h>
-#include <basics/StringUtilities/StringUtil.h>
-#include <basics/config/ConfigurationFile.h>
-#include <basics/constants/NumericConstants.h>
-
-#include <logger/Logger.h>
-
-#include <parallel/MPICommunicator.h>
-
-//////////////////////////////////////////////////////////////////////////
-
-#include "GridGenerator/grid/GridBuilder/LevelGridBuilder.h"
-#include "GridGenerator/grid/GridBuilder/MultipleGridBuilder.h"
-#include "GridGenerator/grid/BoundaryConditions/Side.h"
-#include "GridGenerator/grid/BoundaryConditions/BoundaryCondition.h"
-
-#include "geometries/Cuboid/Cuboid.h"
-#include "geometries/TriangularMesh/TriangularMesh.h"
-
-#include "GridGenerator/io/SimulationFileWriter/SimulationFileWriter.h"
-#include "GridGenerator/io/GridVTKWriter/GridVTKWriter.h"
-#include "GridGenerator/TransientBCSetter/TransientBCSetter.h"
-
-//////////////////////////////////////////////////////////////////////////
-
-#include "gpu/core/LBM/Simulation.h"
-#include "gpu/core/DataStructureInitializer/GridReaderGenerator/GridGenerator.h"
-#include "gpu/core/DataStructureInitializer/GridProvider.h"
-#include "gpu/core/DataStructureInitializer/GridReaderFiles/GridReader.h"
-#include "gpu/core/Parameter/Parameter.h"
-#include "gpu/core/Output/FileWriter.h"
-#include "gpu/core/PreCollisionInteractor/Probes/PointProbe.h"
-#include "gpu/core/PreCollisionInteractor/Probes/PlaneProbe.h"
-#include "gpu/core/PreCollisionInteractor/Probes/PlanarAverageProbe.h"
-#include "gpu/core/PreCollisionInteractor/Probes/WallModelProbe.h"
-#include "gpu/core/PreCollisionInteractor/PrecursorWriter.h"
-#include "gpu/core/GridScaling/GridScalingFactory.h"
-#include "gpu/core/BoundaryConditions/BoundaryConditionFactory.h"
-#include "gpu/core/TurbulenceModels/TurbulenceModelFactory.h"
-#include "gpu/core/Kernel/KernelTypes.h"
-
-#include "gpu/core/GPU/CudaMemoryManager.h"
-
-#include "utilities/communication.h"
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-std::string path(".");
-
-std::string simulationName("BoundaryLayer");
-
-using namespace vf::basics::constant;
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-void multipleLevel(const std::string& configPath)
-{
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- vf::parallel::Communicator &communicator = *vf::parallel::MPICommunicator::getInstance();
-
- vf::basics::ConfigurationFile config;
- config.load(configPath);
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////^
- SPtr<Parameter> para = std::make_shared<Parameter>(communicator.getNumberOfProcesses(), communicator.getProcessID(), &config);
- BoundaryConditionFactory bcFactory = BoundaryConditionFactory();
- GridScalingFactory scalingFactory = GridScalingFactory();
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- const int nProcs = communicator.getNumberOfProcesses();
- const uint procID = communicator.getProcessID();
- std::vector<uint> devices(10);
- std::iota(devices.begin(), devices.end(), 0);
- para->setDevices(devices);
- para->setMaxDev(nProcs);
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //
- // U s e r s e t t i n g s
- //
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- const real H = config.getValue("boundaryLayerHeight", 1000.0); // boundary layer height in m
-
- const real L_x = 6*H;
- const real L_y = 4*H;
-
- const real L_z = H;
-
- const real z0 = config.getValue("z0", 0.1f); // roughness length in m
- const real u_star = config.getValue("u_star", 0.4f); //friction velocity in m/s
- const real kappa = config.getValue("vonKarmanConstant", 0.4f); // von Karman constant
-
- const real viscosity = config.getValue("viscosity", 1.56e-5f);
-
- const real velocity = 0.5f*u_star/kappa*log(H/z0+1.f); //0.5 times max mean velocity at the top in m/s
-
- const real mach = config.getValue<real>("Ma", 0.1);
-
- const uint nodes_per_H = config.getValue<uint>("nz", 64);
-
- const float periodicShift = config.getValue<float>("periodicShift", 0.0f);
-
- const bool writePrecursor = config.getValue("writePrecursor", false);
- bool useDistributions;
- std::string precursorDirectory;
- int nTWritePrecursor; real tStartPrecursor, posXPrecursor;
- if(writePrecursor)
- {
- nTWritePrecursor = config.getValue<int>("nTimestepsWritePrecursor");
- tStartPrecursor = config.getValue<real>("tStartPrecursor");
- posXPrecursor = config.getValue<real>("posXPrecursor");
- useDistributions = config.getValue<bool>("useDistributions", false);
- precursorDirectory = config.getValue<std::string>("precursorDirectory");
- }
-
- const bool readPrecursor = config.getValue("readPrecursor", false);
- int timestepsBetweenReadsPrecursor;
- if(readPrecursor)
- {
- timestepsBetweenReadsPrecursor = config.getValue<int>("nTimestepsReadPrecursor");
- precursorDirectory = config.getValue<std::string>("precursorDirectory");
- useDistributions = config.getValue<bool>("useDistributions", false);
- }
-
- const bool useRefinement = config.getValue<bool>("refinement", false);
-
- // all in s
- const float tStartOut = config.getValue<real>("tStartOut");
- const float tOut = config.getValue<real>("tOut");
- const float tEnd = config.getValue<real>("tEnd"); // total time of simulation
-
- const float tStartAveraging = config.getValue<real>("tStartAveraging");
- const float tStartTmpAveraging = config.getValue<real>("tStartTmpAveraging");
- const float tAveraging = config.getValue<real>("tAveraging");
- const float tStartOutProbe = config.getValue<real>("tStartOutProbe");
- const float tOutProbe = config.getValue<real>("tOutProbe");
-
-
- const real dx = H/real(nodes_per_H);
-
- const real dt = dx * mach / (sqrt(3) * velocity);
-
- const real velocityLB = velocity * dt / dx; // LB units
-
- const real viscosityLB = viscosity * dt / (dx * dx); // LB units
-
- const real pressureGradient = u_star * u_star / H ;
- const real pressureGradientLB = pressureGradient * (dt*dt)/dx; // LB units
-
- VF_LOG_INFO("velocity [dx/dt] = {}", velocityLB);
- VF_LOG_INFO("dt = {}", dt);
- VF_LOG_INFO("dx = {}", dx);
- VF_LOG_INFO("viscosity [10^8 dx^2/dt] = {}", viscosityLB*1e8);
- VF_LOG_INFO("u* /(dx/dt) = {}", u_star*dt/dx);
- VF_LOG_INFO("dpdx = {}", pressureGradient);
- VF_LOG_INFO("dpdx /(dx/dt^2) = {}", pressureGradientLB);
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- para->setOutputPrefix( simulationName );
-
- para->setPrintFiles(true);
-
- if(!readPrecursor) para->setForcing(pressureGradientLB, 0, 0);
- para->setVelocityLB(velocityLB);
- para->setViscosityLB(viscosityLB);
- para->setVelocityRatio( dx / dt );
- para->setViscosityRatio( dx*dx/dt );
- para->setDensityRatio( 1.0 );
-
- bool useStreams = (nProcs > 1 ? true: false);
- // useStreams=false;
- para->setUseStreams(useStreams);
- para->configureMainKernel(vf::collisionKernel::compressible::K17CompressibleNavierStokes);
- para->setIsBodyForce( config.getValue<bool>("bodyForce") );
-
- para->setTimestepStartOut(uint(tStartOut/dt) );
- para->setTimestepOut( uint(tOut/dt) );
- para->setTimestepEnd( uint(tEnd/dt) );
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- SPtr<TurbulenceModelFactory> tmFactory = std::make_shared<TurbulenceModelFactory>(para);
- tmFactory->readConfigFile( config );
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- const real xSplit = L_x/nProcs;
- const real overlap = 8.0*dx;
-
- real xMin = procID * xSplit;
- real xMax = (procID+1) * xSplit;
- real xGridMin = procID * xSplit;
- real xGridMax = (procID+1) * xSplit;
-
- real yMin = 0.0;
- real yMax = L_y;
- real zMin = 0.0;
- real zMax = L_z;
-
- bool isFirstSubDomain = (procID == 0 && nProcs > 1)? true: false;
- bool isLastSubDomain = (procID == nProcs-1 && nProcs > 1)? true: false;
- bool isMidSubDomain = (!isFirstSubDomain && !isLastSubDomain && nProcs > 1)? true: false;
-
- if(isFirstSubDomain)
- {
- xGridMax += overlap;
- if(!readPrecursor) xGridMin -= overlap;
- }
- if(isLastSubDomain)
- {
- xGridMin -= overlap;
- if(!readPrecursor) xGridMax += overlap;
- }
- if(isMidSubDomain)
- {
- xGridMax += overlap;
- xGridMin -= overlap;
- }
- auto gridBuilder = std::make_shared<MultipleGridBuilder>();
-
- gridBuilder->addCoarseGrid( xGridMin, 0.0, 0.0,
- xGridMax, L_y, L_z, dx);
-
-
- if(useRefinement)// Add refinement
- {
- gridBuilder->setNumberOfLayers(4,0);
- real xMaxRefinement = readPrecursor? xGridMax-H: xGridMax; //Stop refinement some distance before outlet if domain ist not periodic
- gridBuilder->addGrid( std::make_shared<Cuboid>( xGridMin, 0.f, 0.f, xMaxRefinement, L_y, 0.5*L_z) , 1 );
- para->setMaxLevel(2);
- scalingFactory.setScalingFactory(GridScalingFactory::GridScaling::ScaleCompressible);
- }
-
- if(nProcs > 1)
- {
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xMin, xMax, yMin, yMax, zMin, zMax));
- gridBuilder->setPeriodicBoundaryCondition(false, true, false);
- }
- else
- {
- gridBuilder->setPeriodicBoundaryCondition(!readPrecursor, true, false);
- }
-
- if(!readPrecursor)
- {
- gridBuilder->setPeriodicShiftOnXBoundaryInYDirection(periodicShift);
- }
-
- gridBuilder->buildGrids(true); // buildGrids() has to be called before setting the BCs!!!!
-
- VF_LOG_INFO("Number of Processes {}, Process ID {} is first subdomain {}, is last subdomain {}, is mid subdomain {}", nProcs, procID, isFirstSubDomain, isLastSubDomain, isMidSubDomain);
-
- if(nProcs > 1){
- if (isFirstSubDomain || isMidSubDomain) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, procID+1);
- }
-
- if (isLastSubDomain || isMidSubDomain) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX, true);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, procID-1);
- }
-
- if (isFirstSubDomain && !readPrecursor) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, nProcs-1);
- }
-
- if (isLastSubDomain && !readPrecursor) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 0);
- }
- }
-
-
-
- if(readPrecursor)
- {
- VF_LOG_INFO("Precursor directory {}", precursorDirectory);
- if(isFirstSubDomain || nProcs == 1)
- {
- auto precursor = createFileCollection(precursorDirectory + "/precursor", FileType::VTK);
- gridBuilder->setPrecursorBoundaryCondition(SideType::MX, precursor, timestepsBetweenReadsPrecursor);
- }
-
- if(isLastSubDomain || nProcs == 1)
- {
- gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.f);
- }
- }
-
- uint samplingOffset = 2;
- gridBuilder->setStressBoundaryCondition(SideType::MZ,
- 0.0, 0.0, 1.0, // wall normals
- samplingOffset, z0, dx); // wall model settinng
-
- para->setHasWallModelMonitor(true);
- gridBuilder->setSlipBoundaryCondition(SideType::PZ, 0.0f, 0.0f, -1.0f);
-
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
- bcFactory.setStressBoundaryCondition(BoundaryConditionFactory::StressBC::StressPressureBounceBack);
- bcFactory.setSlipBoundaryCondition(BoundaryConditionFactory::SlipBC::SlipCompressibleTurbulentViscosity);
- bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::OutflowNonReflective);
- bcFactory.setPrecursorBoundaryCondition(useDistributions ? BoundaryConditionFactory::PrecursorBC::DistributionsPrecursor : BoundaryConditionFactory::PrecursorBC::VelocityPrecursor);
- para->setOutflowPressureCorrectionFactor(0.0);
-
- if(readPrecursor)
- {
- para->setInitialCondition([&](real coordX, real coordY, real coordZ, real &rho, real &vx, real &vy, real &vz) {
- rho = c0o1;
- vx = (u_star/c4o10 * log(coordZ/z0+c1o1)) * dt/dx;
- vy = c0o1;
- vz = c0o1;
- });
- }
- else
- {
- para->setInitialCondition([&](real coordX, real coordY, real coordZ, real &rho, real &vx, real &vy, real &vz) {
- rho = c0o1;
- vx = (u_star/c4o10 * log(coordZ/z0+c1o1) + c2o1*sin(cPi*c16o1*coordX/L_x)*sin(cPi*c8o1*coordZ/H)/(pow(coordZ/H,c2o1)+c1o1))*(c1o1-0.1f*abs(coordY/L_y-0.5)) * dt/dx;
- vy = c2o1*sin(cPi*c16o1*coordX/L_x)*sin(cPi*c8o1*coordZ/H)/(pow(coordZ/H,c2o1)+c1o1) * dt/dx;
- vz = c8o1*u_star/c4o10*(sin(cPi*c8o1*coordY/H)*sin(cPi*c8o1*coordZ/H)+sin(cPi*c8o1*coordX/L_x))/(pow(c1o2*L_z-coordZ, c2o1)+c1o1) * dt/dx;
- });
- }
-
-
-
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- if(!readPrecursor && (isFirstSubDomain || nProcs == 1))
- {
- SPtr<PlanarAverageProbe> planarAverageProbe = SPtr<PlanarAverageProbe>( new PlanarAverageProbe("planeProbe", para->getOutputPath(), tStartAveraging/dt, tStartTmpAveraging/dt, tAveraging/dt , tStartOutProbe/dt, tOutProbe/dt, 'z') );
- planarAverageProbe->addAllAvailableStatistics();
- planarAverageProbe->setFileNameToNOut();
- para->addProbe( planarAverageProbe );
-
- para->setHasWallModelMonitor(true);
- SPtr<WallModelProbe> wallModelProbe = SPtr<WallModelProbe>( new WallModelProbe("wallModelProbe", para->getOutputPath(), tStartAveraging/dt, tStartTmpAveraging/dt, tAveraging/dt/4.0 , tStartOutProbe/dt, tOutProbe/dt) );
- wallModelProbe->addAllAvailableStatistics();
- wallModelProbe->setFileNameToNOut();
- wallModelProbe->setForceOutputToStress(true);
- if(para->getIsBodyForce())
- wallModelProbe->setEvaluatePressureGradient(true);
- para->addProbe( wallModelProbe );
- }
-
- for(int i=0; i<3; i++)
- {
- SPtr<PlaneProbe> planeProbe = SPtr<PlaneProbe>( new PlaneProbe("horizontalProbe"+std::to_string(i), para->getOutputPath(), tStartAveraging/dt, 10, tStartOutProbe/dt, tOutProbe/dt) );
- planeProbe->setProbePlane(0, 0, i*L_z/4., L_x, L_y, dx);
- planeProbe->addAllAvailableStatistics();
- para->addProbe( planeProbe );
- }
-
- SPtr<PlaneProbe> planeProbe1 = SPtr<PlaneProbe>( new PlaneProbe("planeProbe_1", para->getOutputPath(), tStartAveraging/dt, 10, tStartOutProbe/dt, tOutProbe/dt) );
- planeProbe1->setProbePlane(c1o2*L_x, 0.0, 0, dx, L_y, L_z);
- planeProbe1->addAllAvailableStatistics();
- para->addProbe( planeProbe1 );
-
- if(readPrecursor)
- {
- SPtr<PlaneProbe> planeProbe2 = SPtr<PlaneProbe>( new PlaneProbe("planeProbe_2", para->getOutputPath(), tStartAveraging/dt, 10, tStartOutProbe/dt, tOutProbe/dt) );
- planeProbe2->setProbePlane(1000.0, 0.0, 0, dx, L_y, L_z);
- planeProbe2->addAllAvailableStatistics();
- para->addProbe( planeProbe2 );
-
- SPtr<PlaneProbe> planeProbe3 = SPtr<PlaneProbe>( new PlaneProbe("planeProbe_3", para->getOutputPath(), tStartAveraging/dt, 10, tStartOutProbe/dt, tOutProbe/dt) );
- planeProbe3->setProbePlane(1500.0, 0.0, 0, dx, L_y, L_z);
- planeProbe3->addAllAvailableStatistics();
- para->addProbe( planeProbe3 );
-
- SPtr<PlaneProbe> planeProbe4 = SPtr<PlaneProbe>( new PlaneProbe("planeProbe_4", para->getOutputPath(), tStartAveraging/dt, 10, tStartOutProbe/dt, tOutProbe/dt) );
- planeProbe4->setProbePlane(2000.0, 0.0, 0, dx, L_y, L_z);
- planeProbe4->addAllAvailableStatistics();
- para->addProbe( planeProbe4 );
-
- SPtr<PlaneProbe> planeProbe5 = SPtr<PlaneProbe>( new PlaneProbe("planeProbe_5", para->getOutputPath(), tStartAveraging/dt, 10, tStartOutProbe/dt, tOutProbe/dt) );
- planeProbe5->setProbePlane(2500.0, 0.0, 0, dx, L_y, L_z);
- planeProbe5->addAllAvailableStatistics();
- para->addProbe( planeProbe5 );
-
- SPtr<PlaneProbe> planeProbe6 = SPtr<PlaneProbe>( new PlaneProbe("planeProbe_6", para->getOutputPath(), tStartAveraging/dt, 10, tStartOutProbe/dt, tOutProbe/dt) );
- planeProbe6->setProbePlane(0.0, L_y/2.0, 0, L_x, dx, L_z);
- planeProbe6->addAllAvailableStatistics();
- para->addProbe( planeProbe6 );
- }
-
- if(writePrecursor)
- {
- SPtr<PrecursorWriter> precursorWriter = std::make_shared<PrecursorWriter>("precursor", para->getOutputPath()+precursorDirectory, posXPrecursor, 0, L_y, 0, L_z, tStartPrecursor/dt, nTWritePrecursor, useDistributions? OutputVariable::Distributions: OutputVariable::Velocities, 1000);
- para->addProbe(precursorWriter);
- }
- auto cudaMemoryManager = std::make_shared<CudaMemoryManager>(para);
- auto gridGenerator = GridProvider::makeGridGenerator(gridBuilder, para, cudaMemoryManager, communicator);
-
- Simulation sim(para, cudaMemoryManager, communicator, *gridGenerator, &bcFactory, tmFactory, &scalingFactory);
- sim.run();
-}
-
-int main( int argc, char* argv[])
-{
- if ( argv != NULL )
- {
- try
- {
- vf::logging::Logger::initializeLogger();
-
- if( argc > 1){ path = argv[1]; }
-
- multipleLevel(path + "/configBoundaryLayer.txt");
- }
- catch (const spdlog::spdlog_ex &ex) {
- std::cout << "Log initialization failed: " << ex.what() << std::endl;
- }
-
- catch (const std::bad_alloc& e)
- {
- VF_LOG_CRITICAL("Bad Alloc: {}", e.what());
- }
- catch (const std::exception& e)
- {
- VF_LOG_CRITICAL("exception: {}", e.what());
- }
- catch (...)
- {
- VF_LOG_CRITICAL("Unknown exception!");
- }
- }
- return 0;
-}
diff --git a/apps/gpu/BoundaryLayer/CMakeLists.txt b/apps/gpu/BoundaryLayer/CMakeLists.txt
deleted file mode 100644
index 30efeb6bf4fe9b24f9857f348e21bcaaa1e7f555..0000000000000000000000000000000000000000
--- a/apps/gpu/BoundaryLayer/CMakeLists.txt
+++ /dev/null
@@ -1,7 +0,0 @@
-PROJECT(BoundaryLayer LANGUAGES CUDA CXX)
-
-vf_add_library(BUILDTYPE binary PRIVATE_LINK basics gpu_core GridGenerator FILES BoundaryLayer.cpp)
-
-set_source_files_properties(BoundaryLayer.cpp PROPERTIES LANGUAGE CUDA)
-
-set_target_properties(BoundaryLayer PROPERTIES CUDA_SEPARABLE_COMPILATION ON)
diff --git a/apps/gpu/ChannelFlow/ChannelFlow.cpp b/apps/gpu/ChannelFlow/ChannelFlow.cpp
index 3b19a67e6e6228a2f56b8dbedfbe901984902671..1d79a27493b1b6a2409e89ecd06e5970c98d54bf 100644
--- a/apps/gpu/ChannelFlow/ChannelFlow.cpp
+++ b/apps/gpu/ChannelFlow/ChannelFlow.cpp
@@ -95,7 +95,7 @@ int main(int argc, char *argv[])
vf::parallel::Communicator &communicator = *vf::parallel::MPICommunicator::getInstance();
const int numberOfProcesses = communicator.getNumberOfProcesses();
const auto processID = communicator.getProcessID();
- SPtr<Parameter> para = std::make_shared<Parameter>(numberOfProcesses, processId);
+ SPtr<Parameter> para = std::make_shared<Parameter>(numberOfProcesses, processID);
std::vector<uint> devices(10);
std::iota(devices.begin(), devices.end(), 0);
para->setDevices(devices);
@@ -106,7 +106,7 @@ int main(int argc, char *argv[])
// setup logger
//////////////////////////////////////////////////////////////////////////
vf::logging::Logger::changeLogPath("output/vflog_process" +
- std::to_string(processId) + ".txt");
+ std::to_string(processID) + ".txt");
vf::logging::Logger::initializeLogger();
//////////////////////////////////////////////////////////////////////////
@@ -156,7 +156,7 @@ int main(int argc, char *argv[])
// add coarse grids
//////////////////////////////////////////////////////////////////////////
- real subdomainMinX = channelWidth * processId;
+ real subdomainMinX = channelWidth * processID;
real subdomainMinXoverlap = subdomainMinX;
real subdomainMaxX = subdomainMinX + channelWidth;
real subdomainMaxXoverlap = subdomainMaxX;
@@ -190,13 +190,13 @@ int main(int argc, char *argv[])
//////////////////////////////////////////////////////////////////////////
if (processID != 0) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX, LBM);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, processId - 1);
+ gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::MX, processID - 1);
}
if (processID != numberOfProcesses - 1) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX, LBM);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, processId + 1);
+ gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::PX, processID + 1);
}
//////////////////////////////////////////////////////////////////////////
diff --git a/apps/gpu/DrivenCavity/DrivenCavity.cpp b/apps/gpu/DrivenCavity/DrivenCavity.cpp
index e1c2d93de3e5e673a721f1901fabb94a0c5067c2..6413a68dac9044dcf3833f2cf0c54072aa291fa8 100644
--- a/apps/gpu/DrivenCavity/DrivenCavity.cpp
+++ b/apps/gpu/DrivenCavity/DrivenCavity.cpp
@@ -157,7 +157,7 @@ int main(int argc, char* argv[])
BoundaryConditionFactory bcFactory;
bcFactory.setNoSlipBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipBounceBack);
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocitySimpleBounceBackCompressible);
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityBounceBack);
//////////////////////////////////////////////////////////////////////////
// set copy mesh to simulation
@@ -177,10 +177,10 @@ int main(int argc, char* argv[])
printf("\n");
VF_LOG_INFO("world parameter:");
VF_LOG_INFO("--------------");
- VF_LOG_INFO("dt [s] = {}", deltaT);
+ VF_LOG_INFO("delta t [s] = {}", deltaT);
VF_LOG_INFO("world_length [m] = {}", length);
VF_LOG_INFO("world_velocity [m/s] = {}", velocity);
- VF_LOG_INFO("dx [m] = {}", deltaX);
+ VF_LOG_INFO("delta x [m] = {}", deltaX);
printf("\n");
VF_LOG_INFO("LB parameter:");
VF_LOG_INFO("--------------");
@@ -192,12 +192,10 @@ int main(int argc, char* argv[])
printf("\n");
VF_LOG_INFO("simulation parameter:");
VF_LOG_INFO("--------------");
- VF_LOG_INFO("nx = {}", numberOfNodesX);
- VF_LOG_INFO("ny = {}", numberOfNodesX);
- VF_LOG_INFO("nz = {}", numberOfNodesX);
+ VF_LOG_INFO("number of nodes in x = {}", numberOfNodesX);
VF_LOG_INFO("number of nodes = {}", numberOfNodesX * numberOfNodesX * numberOfNodesX);
- VF_LOG_INFO("n timesteps = {}", timeStepOut);
- VF_LOG_INFO("write_nth_timestep = {}", timeStepEnd);
+ VF_LOG_INFO("write_nth_timestep = {}", timeStepOut);
+ VF_LOG_INFO("last timestep = {}", timeStepEnd);
VF_LOG_INFO("output_path = {}", path);
Simulation sim(para, cudaMemoryManager, communicator, *gridGenerator, &bcFactory, &scalingFactory);
diff --git a/apps/gpu/DrivenCavityMultiGPU/DrivenCavityMultiGPU.cpp b/apps/gpu/DrivenCavityMultiGPU/DrivenCavityMultiGPU.cpp
index ecfbc67f6786562090665de8aedaabd8e642cb27..a353f97a990f9456b1a43b44ffa6d2f72e93821f 100755
--- a/apps/gpu/DrivenCavityMultiGPU/DrivenCavityMultiGPU.cpp
+++ b/apps/gpu/DrivenCavityMultiGPU/DrivenCavityMultiGPU.cpp
@@ -10,496 +10,168 @@
//////////////////////////////////////////////////////////////////////////
-#include "basics/DataTypes.h"
-#include "basics/PointerDefinitions.h"
-
-#include "basics/StringUtilities/StringUtil.h"
-#include "basics/config/ConfigurationFile.h"
+#include <basics/DataTypes.h>
+#include <basics/PointerDefinitions.h>
+#include <basics/StringUtilities/StringUtil.h>
+#include <basics/config/ConfigurationFile.h>
#include <logger/Logger.h>
+#include <parallel/MPICommunicator.h>
//////////////////////////////////////////////////////////////////////////
+#include "GridGenerator/geometries/Cuboid/Cuboid.h"
+#include "GridGenerator/geometries/TriangularMesh/TriangularMesh.h"
#include "GridGenerator/grid/BoundaryConditions/Side.h"
#include "GridGenerator/grid/GridBuilder/LevelGridBuilder.h"
#include "GridGenerator/grid/GridBuilder/MultipleGridBuilder.h"
-
-#include "geometries/Cuboid/Cuboid.h"
-#include "geometries/TriangularMesh/TriangularMesh.h"
-
+#include "GridGenerator/grid/MultipleGridBuilderFacade.h"
#include "GridGenerator/io/GridVTKWriter/GridVTKWriter.h"
#include "GridGenerator/io/STLReaderWriter/STLReader.h"
#include "GridGenerator/io/STLReaderWriter/STLWriter.h"
#include "GridGenerator/io/SimulationFileWriter/SimulationFileWriter.h"
+#include "GridGenerator/utilities/communication.h"
//////////////////////////////////////////////////////////////////////////
+#include "gpu/core/BoundaryConditions/BoundaryConditionFactory.h"
#include "gpu/core/DataStructureInitializer/GridProvider.h"
#include "gpu/core/DataStructureInitializer/GridReaderFiles/GridReader.h"
#include "gpu/core/DataStructureInitializer/GridReaderGenerator/GridGenerator.h"
+#include "gpu/core/GPU/CudaMemoryManager.h"
+#include "gpu/core/GridScaling/GridScalingFactory.h"
+#include "gpu/core/Kernel/KernelFactory/KernelFactoryImp.h"
+#include "gpu/core/Kernel/KernelTypes.h"
#include "gpu/core/LBM/Simulation.h"
#include "gpu/core/Output/FileWriter.h"
#include "gpu/core/Parameter/Parameter.h"
-
-#include "gpu/core/Kernel/KernelFactory/KernelFactoryImp.h"
#include "gpu/core/PreProcessor/PreProcessorFactory/PreProcessorFactoryImp.h"
-#include "gpu/core/GridScaling/GridScalingFactory.h"
-#include "gpu/core/BoundaryConditions/BoundaryConditionFactory.h"
-#include "gpu/core/Kernel/KernelTypes.h"
-
-#include "gpu/core/GPU/CudaMemoryManager.h"
-//////////////////////////////////////////////////////////////////////////
-#include <parallel/MPICommunicator.h>
-#include "utilities/communication.h"
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-void runVirtualFluids(const vf::basics::ConfigurationFile& config)
+void runVirtualFluids(const vf::basics::ConfigurationFile &config)
{
- vf::parallel::Communicator &communicator = *vf::parallel::MPICommunicator::getInstance();
-
- auto gridBuilder = std::make_shared<MultipleGridBuilder>();
-
- SPtr<Parameter> para = std::make_shared<Parameter>(communicator.getNumberOfProcesses(), communicator.getProcessID(), &config);
+ vf::parallel::Communicator& communicator = *vf::parallel::MPICommunicator::getInstance();
+ const auto numberOfProcesses = communicator.getNumberOfProcesses();
+ const auto processID = communicator.getProcessID();
+ SPtr<Parameter> para = std::make_shared<Parameter>(numberOfProcesses, processID, &config);
BoundaryConditionFactory bcFactory = BoundaryConditionFactory();
GridScalingFactory scalingFactory = GridScalingFactory();
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+ // configure simulation parameters
- bool useGridGenerator = true;
- bool useLevels = true;
-
- if (para->getNumprocs() == 1) {
- para->useReducedCommunicationAfterFtoC = false;
- }
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+ const bool useLevels = true;
const std::string outPath("output/" + std::to_string(para->getNumprocs()) + "GPU/");
const std::string gridPath = "output/";
std::string simulationName("DrivenCavityMultiGPU");
- const real L = 1.0;
- const real Re = 1000.0;
+ para->useReducedCommunicationAfterFtoC = para->getNumprocs() != 1;
+
+ const real length = 1.0;
+ const real reynoldsNumber = 1000.0;
const real velocity = 1.0;
- const real velocityLB = 0.05; // LB units
- const uint nx = 64;
+ const real velocityLB = 0.05;
+ const uint numberOfNodesX = 64;
- // para->setTimestepOut(10000); // set in config
- // para->setTimestepEnd(10000); // set in config
+ // compute parameters in lattcie units
- const real dxGrid = L / real(nx);
- const real dt = velocityLB / velocity * dxGrid;
- const real vxLB = velocityLB / (real)sqrt(2.0); // LB units
- const real vyLB = velocityLB / (real)sqrt(2.0); // LB units
- const real viscosityLB = nx * velocityLB / Re; // LB units
+ const real dxGrid = length / real(numberOfNodesX);
+ const real deltaT = velocityLB / velocity * dxGrid;
+ const real velocityLBinXandY = velocityLB / (real)sqrt(2.0);
+ const real viscosityLB = numberOfNodesX * velocityLB / reynoldsNumber;
+
+ // set parameters
para->setVelocityLB(velocityLB);
para->setViscosityLB(viscosityLB);
para->setVelocityRatio(velocity / velocityLB);
para->setDensityRatio((real)1.0);
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- if (para->getOutputPath() == "output/") {para->setOutputPath(outPath);}
+ para->setOutputPath(outPath);
para->setOutputPrefix(simulationName);
-
para->setPrintFiles(true);
- std::cout << "Write result files to " << para->getFName() << std::endl;
para->configureMainKernel(vf::collisionKernel::compressible::K17CompressibleNavierStokes);
scalingFactory.setScalingFactory(GridScalingFactory::GridScaling::ScaleCompressible);
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+ vf::logging::Logger::changeLogPath(outPath + "vflog_process" + std::to_string(processID) );
+ vf::logging::Logger::initializeLogger();
+
+ // log simulation parameters
- vf::logging::Logger::changeLogPath(para->getOutputPath());
VF_LOG_INFO("LB parameters:");
- VF_LOG_INFO("velocity LB [dx/dt] = {}", vxLB);
- VF_LOG_INFO("viscosity LB [dx/dt] = {}", viscosityLB);
- VF_LOG_INFO("dxGrid [-] = {}\n", dxGrid);
- VF_LOG_INFO("dt [s] = {}", dt);
+ VF_LOG_INFO("total velocity LB [dx/dt] = {}", velocityLB);
+ VF_LOG_INFO("velocityLB in x and y direction [dx/dt] = {}", velocityLBinXandY);
+ VF_LOG_INFO("viscosity LB [dx/dt] = {}", viscosityLB);
+ VF_LOG_INFO("dxGrid [-] = {}\n", dxGrid);
+ VF_LOG_INFO("deltaT [s] = {}", deltaT);
VF_LOG_INFO("simulation parameters:");
- VF_LOG_INFO("mainKernel = {}\n", para->getMainKernel());
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- if (useGridGenerator) {
- const real xGridMin = -0.5 * L;
- const real xGridMax = 0.5 * L;
- const real yGridMin = -0.5 * L;
- const real yGridMax = 0.5 * L;
- const real zGridMin = -0.5 * L;
- const real zGridMax = 0.5 * L;
-
- SPtr<Cuboid> level1 = nullptr;
- if (useLevels)
- level1 = std::make_shared<Cuboid>(-0.25 * L, -0.25 * L, -0.25 * L, 0.25 * L, 0.25 * L, 0.25 * L);
-
- if (para->getNumprocs() > 1) {
-
- const uint generatePart = communicator.getProcessID();
- real overlap = (real)8.0 * dxGrid;
- gridBuilder->setNumberOfLayers(10, 8);
-
- const real xSplit = 0.0;
- const real ySplit = 0.0;
- const real zSplit = 0.0;
-
- if (communicator.getNumberOfProcesses() == 2) {
-
- if (generatePart == 0) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zGridMin, xGridMax, yGridMax, zSplit + overlap,
- dxGrid);
- }
- if (generatePart == 1) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zSplit - overlap, xGridMax, yGridMax, zGridMax,
- dxGrid);
- }
-
- if (useLevels) {
- gridBuilder->addGrid(level1, 1);
- }
-
- if (generatePart == 0) {
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xGridMax, yGridMin, yGridMax, zGridMin, zSplit));
- }
- if (generatePart == 1) {
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xGridMax, yGridMin, yGridMax, zSplit, zGridMax));
- }
-
- gridBuilder->buildGrids(true); // buildGrids() has to be called before setting the BCs!!!!
-
- if (generatePart == 0) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 1);
- }
-
- if (generatePart == 1) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 0);
- }
-
- gridBuilder->setPeriodicBoundaryCondition(false, false, false);
- //////////////////////////////////////////////////////////////////////////
- if (generatePart == 0)
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, 0.0, 0.0, 0.0);
- if (generatePart == 1)
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, vyLB, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, 0.0, 0.0, 0.0);
- //////////////////////////////////////////////////////////////////////////
- } else if (communicator.getNumberOfProcesses() == 4) {
-
- if (generatePart == 0) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zGridMin, xSplit + overlap, yGridMax,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 1) {
- gridBuilder->addCoarseGrid(xSplit - overlap, yGridMin, zGridMin, xGridMax, yGridMax,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 2) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zSplit - overlap, xSplit + overlap, yGridMax,
- zGridMax, dxGrid);
- }
- if (generatePart == 3) {
- gridBuilder->addCoarseGrid(xSplit - overlap, yGridMin, zSplit - overlap, xGridMax, yGridMax,
- zGridMax, dxGrid);
- }
-
- if (useLevels) {
- gridBuilder->addGrid(level1, 1);
- }
-
- if (generatePart == 0)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xSplit, yGridMin, yGridMax, zGridMin, zSplit));
- if (generatePart == 1)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xSplit, xGridMax, yGridMin, yGridMax, zGridMin, zSplit));
- if (generatePart == 2)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xSplit, yGridMin, yGridMax, zSplit, zGridMax));
- if (generatePart == 3)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xSplit, xGridMax, yGridMin, yGridMax, zSplit, zGridMax));
-
- gridBuilder->buildGrids(true); // buildGrids() has to be called before setting the BCs!!!!
-
- if (generatePart == 0) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 1);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 2);
- }
- if (generatePart == 1) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, 0);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 3);
- }
- if (generatePart == 2) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 3);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 0);
- }
- if (generatePart == 3) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, 2);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 1);
- }
-
- gridBuilder->setPeriodicBoundaryCondition(false, false, false);
- //////////////////////////////////////////////////////////////////////////
- if (generatePart == 0) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, 0.0, 0.0, 0.0);
- }
- if (generatePart == 2) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, vyLB, 0.0);
- }
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, 0.0, 0.0, 0.0);
- if (generatePart == 3) {
- gridBuilder->setVelocityBoundaryCondition(SideType::PX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, vyLB, 0.0);
- }
- if (generatePart == 1) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PX, 0.0, 0.0, 0.0);
- }
- //////////////////////////////////////////////////////////////////////////
- } else if (communicator.getNumberOfProcesses() == 8) {
-
- if (generatePart == 0) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zGridMin, xSplit + overlap, ySplit + overlap,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 1) {
- gridBuilder->addCoarseGrid(xGridMin, ySplit - overlap, zGridMin, xSplit + overlap, yGridMax,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 2) {
- gridBuilder->addCoarseGrid(xSplit - overlap, yGridMin, zGridMin, xGridMax, ySplit + overlap,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 3) {
- gridBuilder->addCoarseGrid(xSplit - overlap, ySplit - overlap, zGridMin, xGridMax, yGridMax,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 4) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zSplit - overlap, xSplit + overlap, ySplit + overlap,
- zGridMax, dxGrid);
- }
- if (generatePart == 5) {
- gridBuilder->addCoarseGrid(xGridMin, ySplit - overlap, zSplit - overlap, xSplit + overlap, yGridMax,
- zGridMax, dxGrid);
- }
- if (generatePart == 6) {
- gridBuilder->addCoarseGrid(xSplit - overlap, yGridMin, zSplit - overlap, xGridMax, ySplit + overlap,
- zGridMax, dxGrid);
- }
- if (generatePart == 7) {
- gridBuilder->addCoarseGrid(xSplit - overlap, ySplit - overlap, zSplit - overlap, xGridMax, yGridMax,
- zGridMax, dxGrid);
- }
-
- if (useLevels) {
- gridBuilder->addGrid(level1, 1);
- }
-
- if (generatePart == 0)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xSplit, yGridMin, ySplit, zGridMin, zSplit));
- if (generatePart == 1)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xSplit, ySplit, yGridMax, zGridMin, zSplit));
- if (generatePart == 2)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xSplit, xGridMax, yGridMin, ySplit, zGridMin, zSplit));
- if (generatePart == 3)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xSplit, xGridMax, ySplit, yGridMax, zGridMin, zSplit));
- if (generatePart == 4)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xSplit, yGridMin, ySplit, zSplit, zGridMax));
- if (generatePart == 5)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xSplit, ySplit, yGridMax, zSplit, zGridMax));
- if (generatePart == 6)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xSplit, xGridMax, yGridMin, ySplit, zSplit, zGridMax));
- if (generatePart == 7)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xSplit, xGridMax, ySplit, yGridMax, zSplit, zGridMax));
-
- gridBuilder->buildGrids(true); // buildGrids() has to be called before setting the BCs!!!!
- gridBuilder->setPeriodicBoundaryCondition(false, false, false);
-
- if (generatePart == 0) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PY, 1);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 2);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 4);
- }
- if (generatePart == 1) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MY, 0);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 3);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 5);
- }
- if (generatePart == 2) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PY, 3);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, 0);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 6);
- }
- if (generatePart == 3) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MY, 2);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, 1);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 7);
- }
- if (generatePart == 4) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PY, 5);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 6);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 0);
- }
- if (generatePart == 5) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MY, 4);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 7);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 1);
- }
- if (generatePart == 6) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PY, 7);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, 4);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 2);
- }
- if (generatePart == 7) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MY, 6);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, 5);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 3);
- }
-
- //////////////////////////////////////////////////////////////////////////
- if (generatePart == 0) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, 0.0, 0.0, 0.0);
- }
- if (generatePart == 1) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, 0.0, 0.0, 0.0);
- }
- if (generatePart == 2) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PX, 0.0, 0.0, 0.0);
- }
- if (generatePart == 3) {
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PX, 0.0, 0.0, 0.0);
- }
- if (generatePart == 4) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, vyLB, 0.0);
- }
- if (generatePart == 5) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, vyLB, 0.0);
- }
- if (generatePart == 6) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, vyLB, 0.0);
- }
- if (generatePart == 7) {
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, vyLB, 0.0);
- }
- //////////////////////////////////////////////////////////////////////////
- }
-
- // gridBuilder->writeGridsToVtk(outPath + "/grid/part" + std::to_string(generatePart) + "_");
- // gridBuilder->writeArrows(outPath + "/" + std::to_string(generatePart) + " /arrow");
-
- SimulationFileWriter::write(gridPath + std::to_string(generatePart) + "/", gridBuilder, FILEFORMAT::BINARY);
- } else {
-
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zGridMin, xGridMax, yGridMax, zGridMax, dxGrid);
-
- if (useLevels) {
- gridBuilder->setNumberOfLayers(10, 8);
- gridBuilder->addGrid(level1, 1);
- }
-
- gridBuilder->buildGrids(true); // buildGrids() has to be called before setting the BCs!!!!
- gridBuilder->setPeriodicBoundaryCondition(false, false, false);
- //////////////////////////////////////////////////////////////////////////
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PX, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, 0.0, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, vyLB, 0.0);
+ VF_LOG_INFO("mainKernel = {}\n", para->getMainKernel());
- //////////////////////////////////////////////////////////////////////////
- gridBuilder->writeGridsToVtk(outPath + "/grid/");
- // gridBuilder->writeArrows(outPath + "/arrow");
+ // configure simulation grid
- SimulationFileWriter::write(gridPath, gridBuilder, FILEFORMAT::BINARY);
- }
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+ UPtr<MultipleGridBuilderFacade> gridBuilderFacade;
- auto cudaMemoryManager = std::make_shared<CudaMemoryManager>(para);
+ auto domainDimensions = std::make_shared<GridDimensions>();
+ domainDimensions->minX = -0.5 * length;
+ domainDimensions->maxX = 0.5 * length;
+ domainDimensions->minY = -0.5 * length;
+ domainDimensions->maxY = 0.5 * length;
+ domainDimensions->minZ = -0.5 * length;
+ domainDimensions->maxZ = 0.5 * length;
+ domainDimensions->delta = dxGrid;
- SPtr<GridProvider> gridGenerator;
- if (useGridGenerator)
- gridGenerator = GridProvider::makeGridGenerator(gridBuilder, para, cudaMemoryManager, communicator);
- else {
- gridGenerator = GridProvider::makeGridReader(FILEFORMAT::BINARY, para, cudaMemoryManager);
+ gridBuilderFacade = std::make_unique<MultipleGridBuilderFacade>(std::move(domainDimensions), 8. * dxGrid);
+
+ std::shared_ptr<Object> level1 = nullptr;
+ if (useLevels) {
+ gridBuilderFacade->setNumberOfLayersForRefinement(10, 8);
+ level1 = std::make_shared<Cuboid>(-0.25 * length, -0.25 * length, -0.25 * length, 0.25 * length, 0.25 * length, 0.25 * length);
+ gridBuilderFacade->addFineGrid(level1, 1);
+ }
+
+ // configure subdomains for simulation on multiple gpus
+
+ const real xSplit = 0.0;
+ const real ySplit = 0.0;
+ const real zSplit = 0.0;
+
+ if (numberOfProcesses == 2) {
+ gridBuilderFacade->addDomainSplit(zSplit, MultipleGridBuilderFacade::CoordDirection::z);
+ } else if (numberOfProcesses == 4) {
+ gridBuilderFacade->addDomainSplit(xSplit, MultipleGridBuilderFacade::CoordDirection::x);
+ gridBuilderFacade->addDomainSplit(zSplit, MultipleGridBuilderFacade::CoordDirection::z);
+ } else if (numberOfProcesses == 8) {
+ gridBuilderFacade->addDomainSplit(xSplit, MultipleGridBuilderFacade::CoordDirection::x);
+ gridBuilderFacade->addDomainSplit(ySplit, MultipleGridBuilderFacade::CoordDirection::y);
+ gridBuilderFacade->addDomainSplit(zSplit, MultipleGridBuilderFacade::CoordDirection::z);
}
+ // create grids
+ gridBuilderFacade->createGrids(processID);
+
+ // configure boundary conditions
+
+ // call after createGrids()
+ gridBuilderFacade->setPeriodicBoundaryCondition(false, false, false);
+ gridBuilderFacade->setVelocityBoundaryCondition(SideType::MX, 0.0, 0.0, 0.0);
+ gridBuilderFacade->setVelocityBoundaryCondition(SideType::MY, 0.0, 0.0, 0.0);
+ gridBuilderFacade->setVelocityBoundaryCondition(SideType::PX, 0.0, 0.0, 0.0);
+ gridBuilderFacade->setVelocityBoundaryCondition(SideType::PY, 0.0, 0.0, 0.0);
+ gridBuilderFacade->setVelocityBoundaryCondition(SideType::MZ, 0.0, 0.0, 0.0);
+ gridBuilderFacade->setVelocityBoundaryCondition(SideType::PZ, velocityLBinXandY, velocityLBinXandY, 0.0);
+
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
+
+ // gridBuilder->writeGridsToVtk(outPath + "/grid/part" + std::to_string(generatePart) + "_");
+ // SimulationFileWriter::write(gridPath + std::to_string(processID) + "/", gridBuilderFacade->getGridBuilder(), FILEFORMAT::BINARY);
+
+ // move grid from grid generator to simulation
+
+ auto cudaMemoryManager = std::make_shared<CudaMemoryManager>(para);
+ SPtr<GridProvider> gridGenerator = GridProvider::makeGridGenerator(gridBuilderFacade->getGridBuilder(), para, cudaMemoryManager, communicator);
Simulation sim(para, cudaMemoryManager, communicator, *gridGenerator, &bcFactory, &scalingFactory);
- sim.run();
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+ // run simulation
+ sim.run();
}
int main(int argc, char *argv[])
@@ -511,7 +183,7 @@ int main(int argc, char *argv[])
try {
VF_LOG_TRACE("For the default config path to work, execute the app from the project root.");
- vf::basics::ConfigurationFile config = vf::basics::loadConfig(argc, argv, "./apps/gpu/DrivenCavityMultiGPU/configDrivenCavityMultiGPU.txt");
+ vf::basics::ConfigurationFile config = vf::basics::loadConfig(argc, argv, "./apps/gpu/DrivenCavityMultiGPU/drivencavity_1gpu.cfg");
runVirtualFluids(config);
//////////////////////////////////////////////////////////////////////////
diff --git a/apps/gpu/DrivenCavityMultiGPU/configDrivenCavityMultiGPU.txt b/apps/gpu/DrivenCavityMultiGPU/configDrivenCavityMultiGPU.txt
deleted file mode 100644
index 5e6c31efa177ef510ae8db66da5f4aafbe0da771..0000000000000000000000000000000000000000
--- a/apps/gpu/DrivenCavityMultiGPU/configDrivenCavityMultiGPU.txt
+++ /dev/null
@@ -1,36 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0"
-NumberOfDevices=1
-
-##################################################
-#informations for Writing
-##################################################
-Path=/workspaces/VirtualFluids_dev/output/DrivenCavity_Results/ # Aragorn
-#Prefix="DrivenCavity"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/workspaces/VirtualFluids_dev/output/DrivenCavity_Results/grid/ # Aragorn
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=10000
-TimeOut=1000
-#TimeStartOut=0
\ No newline at end of file
diff --git a/apps/gpu/DrivenCavityMultiGPU/configPhoenix1GPU.txt b/apps/gpu/DrivenCavityMultiGPU/configPhoenix1GPU.txt
deleted file mode 100644
index 64c083d726d88a6331d503ea4683020ed8212394..0000000000000000000000000000000000000000
--- a/apps/gpu/DrivenCavityMultiGPU/configPhoenix1GPU.txt
+++ /dev/null
@@ -1,35 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0"
-NumberOfDevices=1
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/DrivenCavityMultiGPUResults/1GPU/
-#Prefix="DrivenCavityMultiGPU"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridDrivenCavityMultiGPU/1GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=1000
-TimeOut=1000
-#TimeStartOut=0
\ No newline at end of file
diff --git a/apps/gpu/DrivenCavityMultiGPU/configPhoenix2GPU.txt b/apps/gpu/DrivenCavityMultiGPU/configPhoenix2GPU.txt
deleted file mode 100644
index c88e125fbcc9e956b74094d8e608131c21369588..0000000000000000000000000000000000000000
--- a/apps/gpu/DrivenCavityMultiGPU/configPhoenix2GPU.txt
+++ /dev/null
@@ -1,41 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1"
-NumberOfDevices=2
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/DrivenCavityMultiGPUResults/2GPU/
-#Prefix="DrivenCavityMultiGPU"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridDrivenCavityMultiGPU/2GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=1
-TimeOut=1
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = true
-useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/DrivenCavityMultiGPU/configPhoenix8GPU.txt b/apps/gpu/DrivenCavityMultiGPU/configPhoenix8GPU.txt
deleted file mode 100644
index 78c95032a9c7a49d760a58e77112ee7fb774758d..0000000000000000000000000000000000000000
--- a/apps/gpu/DrivenCavityMultiGPU/configPhoenix8GPU.txt
+++ /dev/null
@@ -1,41 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=4
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/DrivenCavityMultiGPUResults/8GPU/
-#Prefix="DrivenCavityMultiGPU"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridDrivenCavityMultiGPU/8GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=1000
-TimeOut=1000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = true
-useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/DrivenCavityMultiGPU/drivencavity_1gpu.cfg b/apps/gpu/DrivenCavityMultiGPU/drivencavity_1gpu.cfg
new file mode 100644
index 0000000000000000000000000000000000000000..8be42dde606948075393964b04c87f3691e8680b
--- /dev/null
+++ b/apps/gpu/DrivenCavityMultiGPU/drivencavity_1gpu.cfg
@@ -0,0 +1,17 @@
+##################################################
+#GPU Mapping
+##################################################
+Devices=0
+NumberOfDevices=1
+
+##################################################
+#simulation parameter
+##################################################
+TimeEnd=10000
+TimeOut=10000
+
+##################################################
+# CUDA Streams and optimized communication (only used for multiple GPUs)
+##################################################
+useStreams = true
+useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/DrivenCavityMultiGPU/configPhoenix4GPU_regressionTest.txt b/apps/gpu/DrivenCavityMultiGPU/drivencavity_regressiontest_4gpu.cfg
similarity index 100%
rename from apps/gpu/DrivenCavityMultiGPU/configPhoenix4GPU_regressionTest.txt
rename to apps/gpu/DrivenCavityMultiGPU/drivencavity_regressiontest_4gpu.cfg
diff --git a/apps/gpu/DrivenCavityMultiGPU/configPhoenix8GPU_regressionTest.txt b/apps/gpu/DrivenCavityMultiGPU/drivencavity_regressiontest_8gpu.cfg
similarity index 100%
rename from apps/gpu/DrivenCavityMultiGPU/configPhoenix8GPU_regressionTest.txt
rename to apps/gpu/DrivenCavityMultiGPU/drivencavity_regressiontest_8gpu.cfg
diff --git a/apps/gpu/MusselOyster/configMusselOyster.txt b/apps/gpu/MusselOyster/configMusselOyster.txt
index f3536cebd4b669a854b9ad640501f119e3020ceb..ac4208ab273bbcfdf545c1bbfa258817d82cbbee 100644
--- a/apps/gpu/MusselOyster/configMusselOyster.txt
+++ b/apps/gpu/MusselOyster/configMusselOyster.txt
@@ -4,9 +4,9 @@
# mpirun -np 2 "./VirtualFluids_dev/build/bin/MusselOyster" "./VirtualFluids_dev/apps/gpu/MusselOyster/configMusselOyster.txt"
# Phoenix mpich
-# mpirun -np 4 nvprof -f -o MusselOyster.%q{PMI_RANK}.nvprof "./VirtualFluids_dev/build/bin/MusselOyster" "./VirtualFluids_dev/apps/gpu/SphereScaling/configPhoenix4GPU.txt"
+# mpirun -np 4 nvprof -f -o MusselOyster.%q{PMI_RANK}.nvprof "./VirtualFluids_dev/build/bin/MusselOyster" "./VirtualFluids_dev/apps/gpu/SphereMultiGPU/configPhoenix4GPU.txt"
# Phoenix openmpi
-# mpirun -np 4 nvprof -f -o MusselOyster.%q{OMPI_COMM_WORLD_RANK}.nvprof "./VirtualFluids_dev/build/bin/MusselOyster" "./VirtualFluids_dev/apps/gpu/SphereScaling/configPhoenix4GPU.txt"
+# mpirun -np 4 nvprof -f -o MusselOyster.%q{OMPI_COMM_WORLD_RANK}.nvprof "./VirtualFluids_dev/build/bin/MusselOyster" "./VirtualFluids_dev/apps/gpu/SphereMultiGPU/configPhoenix4GPU.txt"
# Aragorn
./bin/MusselOyster "../apps/gpu/MusselOyster/configMusselOyster.txt"
diff --git a/apps/gpu/SphereGPU/CMakeLists.txt b/apps/gpu/SphereGPU/CMakeLists.txt
deleted file mode 100644
index df9f6b57197f594461805375238bab534ee6cdb5..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereGPU/CMakeLists.txt
+++ /dev/null
@@ -1,3 +0,0 @@
-PROJECT(SphereGPU LANGUAGES CXX)
-
-vf_add_library(BUILDTYPE binary PRIVATE_LINK basics gpu_core GridGenerator FILES Sphere.cpp)
diff --git a/apps/gpu/SphereGPU/Sphere.cpp b/apps/gpu/SphereGPU/Sphere.cpp
deleted file mode 100644
index 03931b346450265434900dc36b5e7dbe2f7475bc..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereGPU/Sphere.cpp
+++ /dev/null
@@ -1,244 +0,0 @@
-//=======================================================================================
-// ____ ____ __ ______ __________ __ __ __ __
-// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
-// \ \ | | | | | |_) | | | | | | | / \ | |
-// \ \ | | | | | _ / | | | | | | / /\ \ | |
-// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
-// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
-// \ \ | | ________________________________________________________________
-// \ \ | | | ______________________________________________________________|
-// \ \| | | | __ __ __ __ ______ _______
-// \ | | |_____ | | | | | | | | | _ \ / _____)
-// \ | | _____| | | | | | | | | | | \ \ \_______
-// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
-// \ _____| |__| |________| \_______/ |__| |______/ (_______/
-//
-// This file is part of VirtualFluids. VirtualFluids is free software: you can
-// redistribute it and/or modify it under the terms of the GNU General Public
-// License as published by the Free Software Foundation, either version 3 of
-// the License, or (at your option) any later version.
-//
-// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
-// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
-// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
-// for more details.
-//
-// You should have received a copy of the GNU General Public License along
-// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
-//
-//! \file LidDrivenCavity.cpp
-//! \ingroup Applications
-//! \author Martin Schoenherr, Stephan Lenz, Anna Wellmann
-//=======================================================================================
-#define _USE_MATH_DEFINES
-#include <exception>
-#include <filesystem>
-#include <fstream>
-#include <iostream>
-#include <memory>
-#include <sstream>
-#include <stdexcept>
-#include <string>
-
-//////////////////////////////////////////////////////////////////////////
-#include <basics/DataTypes.h>
-#include <basics/PointerDefinitions.h>
-#include <basics/config/ConfigurationFile.h>
-
-#include <logger/Logger.h>
-
-#include <parallel/MPICommunicator.h>
-
-//////////////////////////////////////////////////////////////////////////
-
-#include "GridGenerator/grid/BoundaryConditions/Side.h"
-#include "GridGenerator/grid/GridBuilder/LevelGridBuilder.h"
-#include "GridGenerator/grid/GridBuilder/MultipleGridBuilder.h"
-
-#include "GridGenerator/geometries/Sphere/Sphere.h"
-#include "GridGenerator/geometries/TriangularMesh/TriangularMesh.h"
-
-//////////////////////////////////////////////////////////////////////////
-
-#include "gpu/core/DataStructureInitializer/GridProvider.h"
-#include "gpu/core/DataStructureInitializer/GridReaderGenerator/GridGenerator.h"
-#include "gpu/core/GPU/CudaMemoryManager.h"
-#include "gpu/core/LBM/Simulation.h"
-#include "gpu/core/Output/FileWriter.h"
-#include "gpu/core/Parameter/Parameter.h"
-#include "gpu/core/GridScaling/GridScalingFactory.h"
-#include "gpu/core/BoundaryConditions/BoundaryConditionFactory.h"
-#include "gpu/core/PreCollisionInteractor/Probes/PointProbe.h"
-#include "gpu/core/PreCollisionInteractor/Probes/PlaneProbe.h"
-#include "gpu/core/Kernel/KernelTypes.h"
-
-int main(int argc, char *argv[])
-{
- try {
- //////////////////////////////////////////////////////////////////////////
- // Simulation parameters
- //////////////////////////////////////////////////////////////////////////
- const bool useConfigFile = true;
-
- const real L = 1.0;
- const real dSphere = 0.2;
- const real Re = 300.0; // related to the sphere's diameter
- const real velocity = 1.0;
- const real dt = (real)0.5e-3;
- const uint nx = 50;
-
- const uint timeStepOut = 10000;
- const uint timeStepEnd = 10000;
-
- //////////////////////////////////////////////////////////////////////////
- // setup simulation parameters (with or without config file)
- //////////////////////////////////////////////////////////////////////////
-
- SPtr<Parameter> para;
- BoundaryConditionFactory bcFactory = BoundaryConditionFactory();
- GridScalingFactory scalingFactory = GridScalingFactory();
- vf::basics::ConfigurationFile config;
- if (useConfigFile) {
- VF_LOG_TRACE("For the default config path to work, execute the app from the project root.");
- config = vf::basics::loadConfig(argc, argv, "./apps/gpu/SphereGPU/config.txt");
- para = std::make_shared<Parameter>(&config);
- } else {
- para = std::make_shared<Parameter>();
- }
-
- vf::parallel::Communicator& communicator = *vf::parallel::MPICommunicator::getInstance();
-
- //////////////////////////////////////////////////////////////////////////
- // create grid
- //////////////////////////////////////////////////////////////////////////
- auto gridBuilder = std::make_shared<MultipleGridBuilder>();
-
- real dx = L / real(nx);
- gridBuilder->addCoarseGrid(-1.0 * L, -0.6 * L, -0.6 * L,
- 3.0 * L, 0.6 * L, 0.6 * L, dx);
-
- // use primitive
- // auto sphere = std::make_shared<Sphere>(0.0, 0.0, 0.0, dSphere / 2.0);
-
- // use stl
- std::string stlPath = "./apps/gpu/SphereGPU/sphere02.stl";
- if (useConfigFile && config.contains("STLPath")) {
- stlPath = config.getValue<std::string>("STLPath");
- }
- std::cout << "Reading stl from " << stlPath << "." << std::endl;
- auto sphere = std::make_shared<TriangularMesh>(stlPath);
-
- gridBuilder->addGeometry(sphere);
- gridBuilder->setPeriodicBoundaryCondition(false, false, false);
-
- //////////////////////////////////////////////////////////////////////////
- // add grid refinement
- //////////////////////////////////////////////////////////////////////////
-
- // gridBuilder->setNumberOfLayers(10, 8);
- // gridBuilder->addGrid(std::make_shared<Sphere>(0.0, 0.0, 0.0, 2.0 * dSphere), 1);
- // para->setMaxLevel(2);
- // scalingFactory.setScalingFactory(GridScalingFactory::GridScaling::ScaleK17);
-
- //////////////////////////////////////////////////////////////////////////
- // build grid
- //////////////////////////////////////////////////////////////////////////
-
- gridBuilder->buildGrids(false); // buildGrids() has to be called before setting the BCs!!!!
-
- //////////////////////////////////////////////////////////////////////////
- // compute parameters in lattice units
- //////////////////////////////////////////////////////////////////////////
-
- const real velocityLB = velocity * dt / dx; // LB units
- const real viscosityLB = (dSphere / dx) * velocityLB / Re; // LB units
-
- VF_LOG_INFO("LB parameters:");
- VF_LOG_INFO("velocity LB [dx/dt] = {}", velocityLB);
- VF_LOG_INFO("viscosity LB [dx/dt] = {}", viscosityLB);
-
- //////////////////////////////////////////////////////////////////////////
- // set parameters
- //////////////////////////////////////////////////////////////////////////
-
- para->setPrintFiles(true);
-
- para->setVelocityLB(velocityLB);
- para->setViscosityLB(viscosityLB);
-
- para->setVelocityRatio(velocity / velocityLB);
- para->setDensityRatio((real)1.0);
-
- para->setTimestepOut(timeStepOut);
- para->setTimestepEnd(timeStepEnd);
-
- para->configureMainKernel(vf::collisionKernel::compressible::K17CompressibleNavierStokes);
-
- //////////////////////////////////////////////////////////////////////////
- // set boundary conditions
- //////////////////////////////////////////////////////////////////////////
-
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, velocityLB, 0.0, 0.0);
-
- gridBuilder->setSlipBoundaryCondition(SideType::PY, 0.0, 0.0, 0.0);
- gridBuilder->setSlipBoundaryCondition(SideType::MY, 0.0, 0.0, 0.0);
- gridBuilder->setSlipBoundaryCondition(SideType::PZ, 0.0, 0.0, 0.0);
- gridBuilder->setSlipBoundaryCondition(SideType::MZ, 0.0, 0.0, 0.0);
-
- gridBuilder->setVelocityBoundaryCondition(SideType::GEOMETRY, 0.0, 0.0, 0.0);
- gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.0); // set pressure boundary condition last
-
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
- bcFactory.setSlipBoundaryCondition(BoundaryConditionFactory::SlipBC::SlipCompressible);
- bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::PressureNonEquilibriumCompressible);
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipCompressible);
-
- //////////////////////////////////////////////////////////////////////////
- // setup probe(s)
- //////////////////////////////////////////////////////////////////////////
-
- const uint tStartAveraging = 0;
- const uint tAveraging = 100;
- const uint tStartOutProbe = 0;
- const uint tOutProbe = para->getTimestepOut();
- SPtr<PointProbe> pointProbe = std::make_shared<PointProbe>("pointProbe", para->getOutputPath(), tStartAveraging, tAveraging, tStartOutProbe, tOutProbe);
- std::vector<real> probeCoordsX = {0.3, 0.5};
- std::vector<real> probeCoordsY = {0.0, 0.0};
- std::vector<real> probeCoordsZ = {0.0, 0.0};
- pointProbe->addProbePointsFromList(probeCoordsX, probeCoordsY, probeCoordsZ);
-
- pointProbe->addStatistic(Statistic::Instantaneous);
- pointProbe->addStatistic(Statistic::Means);
- pointProbe->addStatistic(Statistic::Variances);
- para->addProbe( pointProbe );
-
- SPtr<PlaneProbe> planeProbe = std::make_shared<PlaneProbe>("planeProbe", para->getOutputPath(), tStartAveraging, tAveraging, tStartOutProbe, tOutProbe);
- planeProbe->setProbePlane(dSphere, 0, 0, 0.5, 0.1, 0.1);
- planeProbe->addStatistic(Statistic::Means);
- para->addProbe( planeProbe );
-
- //////////////////////////////////////////////////////////////////////////
- // setup to copy mesh to simulation
- //////////////////////////////////////////////////////////////////////////
- auto cudaMemoryManager = std::make_shared<CudaMemoryManager>(para);
- SPtr<GridProvider> gridGenerator = GridProvider::makeGridGenerator(gridBuilder, para, cudaMemoryManager, communicator);
-
- //////////////////////////////////////////////////////////////////////////
- // run simulation
- //////////////////////////////////////////////////////////////////////////
-
- Simulation sim(para, cudaMemoryManager, communicator, *gridGenerator, &bcFactory, &scalingFactory);
- sim.run();
-
- } catch (const spdlog::spdlog_ex &ex) {
- std::cout << "Log initialization failed: " << ex.what() << std::endl;
- } catch (const std::bad_alloc &e) {
- VF_LOG_CRITICAL("Bad Alloc: {}", e.what());
- } catch (const std::exception &e) {
- VF_LOG_CRITICAL("exception: {}", e.what());
- } catch (...) {
- VF_LOG_CRITICAL("Unknown exception!");
- }
-
- return 0;
-}
diff --git a/apps/gpu/SphereInChannel/CMakeLists.txt b/apps/gpu/SphereInChannel/CMakeLists.txt
new file mode 100644
index 0000000000000000000000000000000000000000..960e0add59e4de6ae2392f90626a339f0bd9662d
--- /dev/null
+++ b/apps/gpu/SphereInChannel/CMakeLists.txt
@@ -0,0 +1,7 @@
+PROJECT(SphereInChannel LANGUAGES CUDA CXX)
+
+vf_add_library(BUILDTYPE binary PRIVATE_LINK basics gpu_core GridGenerator FILES SphereInChannel.cpp)
+
+set_source_files_properties(SphereInChannel.cpp PROPERTIES LANGUAGE CUDA)
+
+set_target_properties(SphereInChannel PROPERTIES CUDA_SEPARABLE_COMPILATION ON)
diff --git a/apps/gpu/SphereRefined/SphereRefined.cpp b/apps/gpu/SphereInChannel/SphereInChannel.cpp
similarity index 66%
rename from apps/gpu/SphereRefined/SphereRefined.cpp
rename to apps/gpu/SphereInChannel/SphereInChannel.cpp
index 6e3670c7a3c5b7696a9a8e805523f468c132d132..2f60eeb081edf52121ab81521149fee828827d51 100644
--- a/apps/gpu/SphereRefined/SphereRefined.cpp
+++ b/apps/gpu/SphereInChannel/SphereInChannel.cpp
@@ -26,9 +26,7 @@
// You should have received a copy of the GNU General Public License along
// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
//
-//! \file SphereRefined.cpp
-//! \ingroup Applications
-//! \author Martin Schoenherr
+//! \author Martin Schoenherr, Stephan Lenz, Anna Wellmann
//=======================================================================================
#define _USE_MATH_DEFINES
#include <exception>
@@ -41,89 +39,109 @@
//////////////////////////////////////////////////////////////////////////
-#include "DataTypes.h"
-#include "PointerDefinitions.h"
-
+#include <basics/DataTypes.h>
+#include <basics/PointerDefinitions.h>
+#include <basics/config/ConfigurationFile.h>
#include <logger/Logger.h>
+#include <parallel/MPICommunicator.h>
//////////////////////////////////////////////////////////////////////////
+#include "GridGenerator/geometries/Cuboid/Cuboid.h"
+#include "GridGenerator/geometries/Sphere/Sphere.h"
+#include "GridGenerator/geometries/TriangularMesh/TriangularMesh.h"
#include "GridGenerator/grid/BoundaryConditions/Side.h"
#include "GridGenerator/grid/GridBuilder/LevelGridBuilder.h"
#include "GridGenerator/grid/GridBuilder/MultipleGridBuilder.h"
#include "GridGenerator/grid/GridFactory.h"
-#include "GridGenerator/geometries/Cuboid/Cuboid.h"
-#include "GridGenerator/geometries/Sphere/Sphere.h"
-#include "GridGenerator/geometries/TriangularMesh/TriangularMesh.h"
//////////////////////////////////////////////////////////////////////////
#include "gpu/core/BoundaryConditions/BoundaryConditionFactory.h"
-#include "gpu/core/GridScaling/GridScalingFactory.h"
#include "gpu/core/DataStructureInitializer/GridProvider.h"
#include "gpu/core/DataStructureInitializer/GridReaderGenerator/GridGenerator.h"
#include "gpu/core/GPU/CudaMemoryManager.h"
+#include "gpu/core/GridScaling/GridScalingFactory.h"
+#include "gpu/core/Kernel/KernelTypes.h"
#include "gpu/core/LBM/Simulation.h"
#include "gpu/core/Output/FileWriter.h"
#include "gpu/core/Parameter/Parameter.h"
-#include "gpu/core/GridScaling/GridScalingFactory.h"
-#include "gpu/core/Kernel/KernelTypes.h"
-
-#include <parallel/MPICommunicator.h>
+#include "gpu/core/PreCollisionInteractor/Probes/PlaneProbe.h"
+#include "gpu/core/PreCollisionInteractor/Probes/PointProbe.h"
//////////////////////////////////////////////////////////////////////////
-int main()
+int main(int argc, char* argv[])
{
try {
- vf::parallel::Communicator &communicator = *vf::parallel::MPICommunicator::getInstance();
vf::logging::Logger::initializeLogger();
+ vf::parallel::Communicator& communicator = *vf::parallel::MPICommunicator::getInstance();
+
//////////////////////////////////////////////////////////////////////////
// Simulation parameters
//////////////////////////////////////////////////////////////////////////
- std::string path("output/SphereRefined");
- std::string simulationName("SphereRefined");
+ std::string path("output/Sphere");
+ std::string simulationName("SphereInChannel");
- const real L = 1.0;
- const real dSphere = 0.2;
- const real Re = 300.0;
+ const real length = 1.0;
+ const real reynoldsNumber = 300.0;
const real velocity = 1.0;
const real velocityLB = (real)0.5e-2; // LB units
- const uint nx = 50;
+ const uint numberOfNodesX = 50;
+ const real dSphere = 0.2;
const uint timeStepOut = 10000;
const uint timeStepEnd = 10000;
+ vf::basics::ConfigurationFile config = vf::basics::loadConfig(argc, argv);
+
+ bool refine = false;
+ if (config.contains("refine"))
+ refine = config.getValue<bool>("refine");
+
+ if (config.contains("output_path"))
+ path = config.getValue<std::string>("output_path");
+
//////////////////////////////////////////////////////////////////////////
// compute parameters in lattice units
//////////////////////////////////////////////////////////////////////////
- const real dx = L / real(nx);
- const real dt = velocityLB / velocity * dx;
+ const real deltaX = length / real(numberOfNodesX);
+ const real deltaT = velocityLB / velocity * deltaX;
- const real viscosityLB = nx * velocityLB / Re; // LB units
+ const real vxLB = velocityLB / sqrt(2.0); // LB units
+ const real vyLB = velocityLB / sqrt(2.0); // LB units
+
+ const real viscosityLB = numberOfNodesX * velocityLB / reynoldsNumber; // LB units
//////////////////////////////////////////////////////////////////////////
// create grid
//////////////////////////////////////////////////////////////////////////
- auto gridBuilder = std::make_shared<MultipleGridBuilder>();
- gridBuilder->addCoarseGrid(-1.0 * L, -0.6 * L, -0.6 * L,
- 2.0 * L, 0.6 * L, 0.6 * L, dx);
+ auto gridBuilder = std::make_shared<MultipleGridBuilder>();
- // add fine grid
- gridBuilder->addGrid(std::make_shared<Sphere>(0., 0., 0., 0.22), 2);
+ gridBuilder->addCoarseGrid(-0.6 * length, -0.6 * length, -0.6 * length,
+ 2.0 * length, 0.6 * length, 0.6 * length, deltaX);
- GridScalingFactory scalingFactory = GridScalingFactory();
- scalingFactory.setScalingFactory(GridScalingFactory::GridScaling::ScaleCompressible);
+ // add geometry: use primitive
+ // auto sphere = std::make_shared<Sphere>(0.0, 0.0, 0.0, dSphere / 2.0);
- // use primitive
- auto sphere = std::make_shared<Sphere>(0.0, 0.0, 0.0, dSphere / 2.0);
+ // add geometry: use stl
+ std::string stlPath = "./apps/gpu/SphereInChannel/sphere02.stl";
+ std::cout << "Reading stl from " << stlPath << "." << std::endl;
+ auto sphere = std::make_shared<TriangularMesh>(stlPath);
gridBuilder->addGeometry(sphere);
-
gridBuilder->setPeriodicBoundaryCondition(false, false, false);
+ // add two fine grids
+ if (refine) {
+ gridBuilder->addGrid(std::make_shared<Sphere>(0., 0., 0., dSphere), 2);
+ }
+
+ GridScalingFactory scalingFactory = GridScalingFactory();
+ scalingFactory.setScalingFactory(GridScalingFactory::GridScaling::ScaleCompressible);
+
gridBuilder->buildGrids(false);
//////////////////////////////////////////////////////////////////////////
@@ -163,20 +181,43 @@ int main()
BoundaryConditionFactory bcFactory;
bcFactory.setSlipBoundaryCondition(BoundaryConditionFactory::SlipBC::SlipCompressible);
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::PressureNonEquilibriumCompressible);
+ //////////////////////////////////////////////////////////////////////////
+ // setup probe(s)
+ //////////////////////////////////////////////////////////////////////////
+
+ const uint tStartAveraging = 0;
+ const uint tAveraging = 100;
+ const uint tStartOutProbe = 0;
+ const uint tOutProbe = para->getTimestepOut();
+ SPtr<PointProbe> pointProbe = std::make_shared<PointProbe>("pointProbe", para->getOutputPath(), tStartAveraging,
+ tAveraging, tStartOutProbe, tOutProbe);
+ std::vector<real> probeCoordsX = { 0.3, 0.5 };
+ std::vector<real> probeCoordsY = { 0.0, 0.0 };
+ std::vector<real> probeCoordsZ = { 0.0, 0.0 };
+ pointProbe->addProbePointsFromList(probeCoordsX, probeCoordsY, probeCoordsZ);
+
+ pointProbe->addStatistic(Statistic::Instantaneous);
+ pointProbe->addStatistic(Statistic::Means);
+ pointProbe->addStatistic(Statistic::Variances);
+ para->addProbe(pointProbe);
+
+ SPtr<PlaneProbe> planeProbe = std::make_shared<PlaneProbe>("planeProbe", para->getOutputPath(), tStartAveraging,
+ tAveraging, tStartOutProbe, tOutProbe);
+ planeProbe->setProbePlane(0.4, 0, 0, 0.3, 0.01, 0.1);
+ planeProbe->addStatistic(Statistic::Instantaneous);
+ para->addProbe(planeProbe);
//////////////////////////////////////////////////////////////////////////
// set copy mesh to simulation
//////////////////////////////////////////////////////////////////////////
-
auto cudaMemoryManager = std::make_shared<CudaMemoryManager>(para);
SPtr<GridProvider> gridGenerator =
GridProvider::makeGridGenerator(gridBuilder, para, cudaMemoryManager, communicator);
-
//////////////////////////////////////////////////////////////////////////
// run simulation
//////////////////////////////////////////////////////////////////////////
@@ -185,35 +226,33 @@ int main()
printf("\n");
VF_LOG_INFO("world parameter:");
VF_LOG_INFO("--------------");
- VF_LOG_INFO("dt [s] = {}", dt);
- VF_LOG_INFO("world_length [m] = {}", L);
+ VF_LOG_INFO("delta t [s] = {}", deltaT);
+ VF_LOG_INFO("world_length [m] = {}", length);
VF_LOG_INFO("world_velocity [m/s] = {}", velocity);
- VF_LOG_INFO("dx [m] = {}", dx);
+ VF_LOG_INFO("delta x [m] = {}", deltaX);
printf("\n");
VF_LOG_INFO("LB parameter:");
VF_LOG_INFO("--------------");
- VF_LOG_INFO("Re = {}", Re);
+ VF_LOG_INFO("Re = {}", reynoldsNumber);
VF_LOG_INFO("lb_velocity [dx/dt] = {}", velocityLB);
VF_LOG_INFO("lb_viscosity [dx^2/dt] = {}", viscosityLB);
printf("\n");
VF_LOG_INFO("simulation parameter:");
VF_LOG_INFO("--------------");
- VF_LOG_INFO("nx = {}", nx);
- VF_LOG_INFO("ny = {}", nx);
- VF_LOG_INFO("nz = {}", nx);
- VF_LOG_INFO("number of nodes = {}", nx * nx * nx);
- VF_LOG_INFO("n timesteps = {}", timeStepOut);
- VF_LOG_INFO("write_nth_timestep = {}", timeStepEnd);
+ VF_LOG_INFO("number of nodes in x = {}", numberOfNodesX);
+ VF_LOG_INFO("number of nodes = {}", numberOfNodesX * numberOfNodesX * numberOfNodesX);
+ VF_LOG_INFO("write_nth_timestep = {}", timeStepOut);
+ VF_LOG_INFO("last timestep = {}", timeStepEnd);
VF_LOG_INFO("output_path = {}", path);
Simulation sim(para, cudaMemoryManager, communicator, *gridGenerator, &bcFactory, &scalingFactory);
sim.run();
- } catch (const spdlog::spdlog_ex &ex) {
+ } catch (const spdlog::spdlog_ex& ex) {
std::cout << "Log initialization failed: " << ex.what() << std::endl;
- } catch (const std::bad_alloc &e) {
+ } catch (const std::bad_alloc& e) {
VF_LOG_CRITICAL("Bad Alloc: {}", e.what());
- } catch (const std::exception &e) {
+ } catch (const std::exception& e) {
VF_LOG_CRITICAL("exception: {}", e.what());
} catch (...) {
VF_LOG_CRITICAL("Unknown exception!");
diff --git a/apps/gpu/SphereGPU/sphere02.stl b/apps/gpu/SphereInChannel/sphere02.stl
similarity index 100%
rename from apps/gpu/SphereGPU/sphere02.stl
rename to apps/gpu/SphereInChannel/sphere02.stl
diff --git a/apps/gpu/SphereInChannel/sphere_1level.cfg b/apps/gpu/SphereInChannel/sphere_1level.cfg
new file mode 100644
index 0000000000000000000000000000000000000000..c9d185929d848fcf445074fe870f586681c9badd
--- /dev/null
+++ b/apps/gpu/SphereInChannel/sphere_1level.cfg
@@ -0,0 +1,5 @@
+refine = false
+
+output_path = ./output/SphereInChannel_1Level
+
+velocityLB = 0.032
\ No newline at end of file
diff --git a/apps/gpu/SphereInChannel/sphere_3level.cfg b/apps/gpu/SphereInChannel/sphere_3level.cfg
new file mode 100644
index 0000000000000000000000000000000000000000..6cf2abf5ceb145406fae7cfb522211802ad4c5ca
--- /dev/null
+++ b/apps/gpu/SphereInChannel/sphere_3level.cfg
@@ -0,0 +1,5 @@
+refine = true
+
+output_path = ./output/SphereInChannel_3Level
+
+velocityLB = 0.05
\ No newline at end of file
diff --git a/apps/gpu/SphereMultiGPU/CMakeLists.txt b/apps/gpu/SphereMultiGPU/CMakeLists.txt
new file mode 100644
index 0000000000000000000000000000000000000000..9c267cdb7766c70804806411fdd071d81bf433e7
--- /dev/null
+++ b/apps/gpu/SphereMultiGPU/CMakeLists.txt
@@ -0,0 +1,3 @@
+PROJECT(SphereMultiGPU LANGUAGES CXX)
+
+vf_add_library(BUILDTYPE binary PRIVATE_LINK basics gpu_core GridGenerator FILES SphereMultiGPU.cpp)
diff --git a/apps/gpu/SphereMultiGPU/SphereMultiGPU.cpp b/apps/gpu/SphereMultiGPU/SphereMultiGPU.cpp
new file mode 100755
index 0000000000000000000000000000000000000000..d6b6e0f68ab79ae30e326f88bac687302e78cec7
--- /dev/null
+++ b/apps/gpu/SphereMultiGPU/SphereMultiGPU.cpp
@@ -0,0 +1,202 @@
+#define _USE_MATH_DEFINES
+#include <exception>
+#include <filesystem>
+#include <fstream>
+#include <iostream>
+#include <memory>
+#include <sstream>
+#include <stdexcept>
+#include <string>
+
+//////////////////////////////////////////////////////////////////////////
+
+#include <basics/DataTypes.h>
+#include <basics/PointerDefinitions.h>
+#include <basics/StringUtilities/StringUtil.h>
+#include <basics/config/ConfigurationFile.h>
+#include <logger/Logger.h>
+#include <parallel/MPICommunicator.h>
+
+//////////////////////////////////////////////////////////////////////////
+
+#include "GridGenerator/geometries/Cuboid/Cuboid.h"
+#include "GridGenerator/geometries/Sphere/Sphere.h"
+#include "GridGenerator/geometries/TriangularMesh/TriangularMesh.h"
+#include "GridGenerator/grid/BoundaryConditions/Side.h"
+#include "GridGenerator/grid/GridBuilder/LevelGridBuilder.h"
+#include "GridGenerator/grid/GridBuilder/MultipleGridBuilder.h"
+#include "GridGenerator/grid/MultipleGridBuilderFacade.h"
+#include "GridGenerator/io/GridVTKWriter/GridVTKWriter.h"
+#include "GridGenerator/io/STLReaderWriter/STLReader.h"
+#include "GridGenerator/io/STLReaderWriter/STLWriter.h"
+#include "GridGenerator/io/SimulationFileWriter/SimulationFileWriter.h"
+#include "GridGenerator/utilities/communication.h"
+
+//////////////////////////////////////////////////////////////////////////
+
+#include "gpu/core/BoundaryConditions/BoundaryConditionFactory.h"
+#include "gpu/core/DataStructureInitializer/GridProvider.h"
+#include "gpu/core/DataStructureInitializer/GridReaderFiles/GridReader.h"
+#include "gpu/core/DataStructureInitializer/GridReaderGenerator/GridGenerator.h"
+#include "gpu/core/GPU/CudaMemoryManager.h"
+#include "gpu/core/GridScaling/GridScalingFactory.h"
+#include "gpu/core/Kernel/KernelFactory/KernelFactoryImp.h"
+#include "gpu/core/Kernel/KernelTypes.h"
+#include "gpu/core/LBM/Simulation.h"
+#include "gpu/core/Output/FileWriter.h"
+#include "gpu/core/Parameter/Parameter.h"
+#include "gpu/core/PreProcessor/PreProcessorFactory/PreProcessorFactoryImp.h"
+
+void runVirtualFluids(const vf::basics::ConfigurationFile& config)
+{
+ vf::parallel::Communicator& communicator = *vf::parallel::MPICommunicator::getInstance();
+ const auto numberOfProcesses = communicator.getNumberOfProcesses();
+ const auto processID = communicator.getProcessID();
+ SPtr<Parameter> para = std::make_shared<Parameter>(numberOfProcesses, processID, &config);
+ BoundaryConditionFactory bcFactory = BoundaryConditionFactory();
+ GridScalingFactory scalingFactory = GridScalingFactory();
+
+ // configure simulation parameters
+
+ const bool useLevels = true;
+
+ const std::string outPath("output/" + std::to_string(para->getNumprocs()) + "GPU/");
+ const std::string gridPath = "output/";
+ std::string simulationName("SphereMultiGPU");
+
+ para->useReducedCommunicationAfterFtoC = para->getNumprocs() != 1;
+
+ const real length = 1.0;
+ const real reynoldsNumber = 1000.0;
+ const real velocity = 1.0;
+ const real velocityLB = 0.05;
+ const uint numberOfNodesX = 80;
+
+ // compute parameters in lattcie units
+
+ const real dxGrid = length / real(numberOfNodesX);
+ const real deltaT = velocityLB / velocity * dxGrid;
+ const real viscosityLB = numberOfNodesX * velocityLB / reynoldsNumber;
+
+ // set parameters
+
+ para->setVelocityLB(velocityLB);
+ para->setViscosityLB(viscosityLB);
+ para->setVelocityRatio(velocity / velocityLB);
+ para->setDensityRatio((real)1.0);
+
+ para->setOutputPath(outPath);
+ para->setOutputPrefix(simulationName);
+ para->setPrintFiles(true);
+
+ para->configureMainKernel(vf::collisionKernel::compressible::K17CompressibleNavierStokes);
+ scalingFactory.setScalingFactory(GridScalingFactory::GridScaling::ScaleCompressible);
+
+ vf::logging::Logger::changeLogPath(outPath + "vflog_process" + std::to_string(processID) );
+ vf::logging::Logger::initializeLogger();
+
+ // log simulation parameters
+
+ VF_LOG_INFO("LB parameters:");
+ VF_LOG_INFO("velocity LB [dx/dt] = {}", velocityLB);
+ VF_LOG_INFO("viscosity LB [dx/dt] = {}", viscosityLB);
+ VF_LOG_INFO("dxGrid [-] = {}\n", dxGrid);
+ VF_LOG_INFO("deltaT [s] = {}", deltaT);
+ VF_LOG_INFO("simulation parameters:");
+ VF_LOG_INFO("mainKernel = {}\n", para->getMainKernel());
+
+ // configure simulation grid
+
+ UPtr<MultipleGridBuilderFacade> gridBuilderFacade;
+
+ auto domainDimensions = std::make_shared<GridDimensions>();
+ domainDimensions->minX = -0.5 * length;
+ domainDimensions->maxX = 0.5 * length;
+ domainDimensions->minY = -0.5 * length;
+ domainDimensions->maxY = 0.5 * length;
+ domainDimensions->minZ = -0.5 * length;
+ domainDimensions->maxZ = 0.5 * length;
+ domainDimensions->delta = dxGrid;
+
+ gridBuilderFacade = std::make_unique<MultipleGridBuilderFacade>(std::move(domainDimensions), 8. * dxGrid);
+
+ gridBuilderFacade->addGeometry(std::make_shared<Sphere>(0.0, 0.0, 0.0, 0.1 * length));
+
+ std::shared_ptr<Object> level1 = nullptr;
+ if (useLevels) {
+ gridBuilderFacade->setNumberOfLayersForRefinement(10, 8);
+ level1 = std::make_shared<Sphere>(0.0, 0.0, 0.0, 0.25 * length);
+ gridBuilderFacade->addFineGrid(level1, 1);
+ }
+
+ // configure subdomains for simulation on multiple gpus
+
+ const real xSplit = 0.0;
+ const real ySplit = 0.0;
+ const real zSplit = 0.0;
+
+ if (numberOfProcesses == 2) {
+ gridBuilderFacade->addDomainSplit(zSplit, MultipleGridBuilderFacade::CoordDirection::z);
+ } else if (numberOfProcesses == 4) {
+ gridBuilderFacade->addDomainSplit(xSplit, MultipleGridBuilderFacade::CoordDirection::y);
+ gridBuilderFacade->addDomainSplit(zSplit, MultipleGridBuilderFacade::CoordDirection::z);
+ } else if (numberOfProcesses == 8) {
+ gridBuilderFacade->addDomainSplit(xSplit, MultipleGridBuilderFacade::CoordDirection::x);
+ gridBuilderFacade->addDomainSplit(ySplit, MultipleGridBuilderFacade::CoordDirection::y);
+ gridBuilderFacade->addDomainSplit(zSplit, MultipleGridBuilderFacade::CoordDirection::z);
+ }
+
+ // create grids
+ gridBuilderFacade->createGrids(processID);
+
+ // configure boundary conditions
+
+ // call after createGrids()
+ gridBuilderFacade->setPeriodicBoundaryCondition(false, false, false);
+ gridBuilderFacade->setVelocityBoundaryCondition(SideType::MX, velocityLB, 0.0, 0.0);
+ gridBuilderFacade->setVelocityBoundaryCondition(SideType::MY, velocityLB, 0.0, 0.0);
+ gridBuilderFacade->setVelocityBoundaryCondition(SideType::PY, velocityLB, 0.0, 0.0);
+ gridBuilderFacade->setVelocityBoundaryCondition(SideType::MZ, velocityLB, 0.0, 0.0);
+ gridBuilderFacade->setVelocityBoundaryCondition(SideType::PZ, velocityLB, 0.0, 0.0);
+ gridBuilderFacade->setPressureBoundaryCondition(SideType::PX, 0.0);
+
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
+ bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::PressureNonEquilibriumCompressible);
+
+ // move grid from grid generator to simulation
+
+ auto cudaMemoryManager = std::make_shared<CudaMemoryManager>(para);
+ SPtr<GridProvider> gridGenerator = GridProvider::makeGridGenerator(gridBuilderFacade->getGridBuilder(), para, cudaMemoryManager, communicator);
+ Simulation sim(para, cudaMemoryManager, communicator, *gridGenerator, &bcFactory, &scalingFactory);
+
+ // run simulation
+ sim.run();
+}
+
+int main(int argc, char *argv[])
+{
+ MPI_Init(&argc, &argv);
+ std::string str, str2, configFile;
+
+ if (argv != NULL) {
+
+ try {
+ VF_LOG_TRACE("For the default config path to work, execute the app from the project root.");
+ vf::basics::ConfigurationFile config = vf::basics::loadConfig(argc, argv, "./apps/gpu/SphereMultiGPU/sphere_1gpu.cfg");
+ runVirtualFluids(config);
+
+ //////////////////////////////////////////////////////////////////////////
+ } catch (const spdlog::spdlog_ex &ex) {
+ std::cout << "Log initialization failed: " << ex.what() << std::endl;
+ } catch (const std::bad_alloc &e) {
+ VF_LOG_CRITICAL("Bad Alloc: {}", e.what());
+ } catch (const std::exception &e) {
+ VF_LOG_CRITICAL("exception: {}", e.what());
+ } catch (...) {
+ VF_LOG_CRITICAL("Unknown exception!");
+ }
+ }
+
+ MPI_Finalize();
+ return 0;
+}
diff --git a/apps/gpu/SphereMultiGPU/sphere_1gpu.cfg b/apps/gpu/SphereMultiGPU/sphere_1gpu.cfg
new file mode 100644
index 0000000000000000000000000000000000000000..8be42dde606948075393964b04c87f3691e8680b
--- /dev/null
+++ b/apps/gpu/SphereMultiGPU/sphere_1gpu.cfg
@@ -0,0 +1,17 @@
+##################################################
+#GPU Mapping
+##################################################
+Devices=0
+NumberOfDevices=1
+
+##################################################
+#simulation parameter
+##################################################
+TimeEnd=10000
+TimeOut=10000
+
+##################################################
+# CUDA Streams and optimized communication (only used for multiple GPUs)
+##################################################
+useStreams = true
+useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix4GPU_regressionTest.txt b/apps/gpu/SphereMultiGPU/sphere_regressiontest_4gpu.cfg
similarity index 100%
rename from apps/gpu/SphereScaling/configPhoenix4GPU_regressionTest.txt
rename to apps/gpu/SphereMultiGPU/sphere_regressiontest_4gpu.cfg
diff --git a/apps/gpu/SphereScaling/configPhoenix8GPU_regressionTest.txt b/apps/gpu/SphereMultiGPU/sphere_regressiontest_8gpu.cfg
similarity index 100%
rename from apps/gpu/SphereScaling/configPhoenix8GPU_regressionTest.txt
rename to apps/gpu/SphereMultiGPU/sphere_regressiontest_8gpu.cfg
diff --git a/apps/gpu/SphereRefined/CMakeLists.txt b/apps/gpu/SphereRefined/CMakeLists.txt
deleted file mode 100644
index f7bb5716f44d424f834b38e2ce5ff27423ff3265..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereRefined/CMakeLists.txt
+++ /dev/null
@@ -1,9 +0,0 @@
-PROJECT(SphereRefined LANGUAGES CUDA CXX)
-
-#LIST(APPEND CS_COMPILER_FLAGS_CXX "-DOMPI_SKIP_MPICXX" )
-
-vf_add_library(BUILDTYPE binary PRIVATE_LINK basics gpu_core GridGenerator FILES SphereRefined.cpp)
-
-set_source_files_properties(SphereRefined.cpp PROPERTIES LANGUAGE CUDA)
-
-set_target_properties(SphereRefined PROPERTIES CUDA_SEPARABLE_COMPILATION ON)
diff --git a/apps/gpu/SphereRefined/configSphere.txt b/apps/gpu/SphereRefined/configSphere.txt
deleted file mode 100644
index 458346a67c7f001580494af1dc9262034613be68..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereRefined/configSphere.txt
+++ /dev/null
@@ -1,34 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-#Devices="0 1 2 3"
-#NumberOfDevices=4
-
-##################################################
-#informations for Writing
-##################################################
-#Path = "output/"
-#Prefix="DrivenCavity"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-#GridPath="grid/"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=CumulantAA2016CompSP27
-
-##################################################
-#simulation parameter
-##################################################
-#TimeEnd=100000
-#TimeOut=1000
-#TimeStartOut=0
\ No newline at end of file
diff --git a/apps/gpu/SphereRefined/sphere02.stl b/apps/gpu/SphereRefined/sphere02.stl
deleted file mode 100644
index 3ff142d1a343b2e1016b75e65dde821d7a1f8e5a..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereRefined/sphere02.stl
+++ /dev/null
@@ -1,3138 +0,0 @@
-solid Visualization Toolkit generated SLA File
- facet normal 0.10450589731384756 0.020787518098262223 0.9943069930951618
- outer loop
- vertex 0.020791169255971909 0 0.097814761102199554
- vertex 0.019208535552024841 0.0079564359039068222 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal 0.088595824750780858 0.059197831240794162 0.99430699314302085
- outer loop
- vertex 0.019208535552024841 0.0079564359039068222 0.097814761102199554
- vertex 0.01470157690346241 0.01470157690346241 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal 0.059197831240794162 0.088595824750780858 0.99430699314302085
- outer loop
- vertex 0.01470157690346241 0.01470157690346241 0.097814761102199554
- vertex 0.0079564359039068222 0.019208535552024841 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal 0.020787518098262226 0.10450589731384755 0.9943069930951618
- outer loop
- vertex 0.0079564359039068222 0.019208535552024841 0.097814761102199554
- vertex 1.2730919672892854e-18 0.020791169255971909 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal -0.020787518098262219 0.10450589731384756 0.9943069930951618
- outer loop
- vertex 1.2730919672892854e-18 0.020791169255971909 0.097814761102199554
- vertex -0.0079564359039068222 0.019208535552024841 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal -0.059197831240794162 0.088595824750780858 0.99430699314302085
- outer loop
- vertex -0.0079564359039068222 0.019208535552024841 0.097814761102199554
- vertex -0.01470157690346241 0.01470157690346241 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal -0.088595824750780858 0.059197831240794162 0.99430699314302085
- outer loop
- vertex -0.01470157690346241 0.01470157690346241 0.097814761102199554
- vertex -0.019208535552024841 0.0079564359039068222 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal -0.10450589731384755 0.020787518098262226 0.9943069930951618
- outer loop
- vertex -0.019208535552024841 0.0079564359039068222 0.097814761102199554
- vertex -0.020791169255971909 2.5461839345785708e-18 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal -0.10450589731384756 -0.020787518098262219 0.9943069930951618
- outer loop
- vertex -0.020791169255971909 2.5461839345785708e-18 0.097814761102199554
- vertex -0.019208535552024841 -0.0079564359039068222 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal -0.088595824750780858 -0.059197831240794162 0.99430699314302085
- outer loop
- vertex -0.019208535552024841 -0.0079564359039068222 0.097814761102199554
- vertex -0.01470157690346241 -0.01470157690346241 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal -0.059197831240794162 -0.088595824750780858 0.99430699314302085
- outer loop
- vertex -0.01470157690346241 -0.01470157690346241 0.097814761102199554
- vertex -0.0079564359039068222 -0.019208535552024841 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal -0.020787518098262233 -0.10450589731384756 0.9943069930951618
- outer loop
- vertex -0.0079564359039068222 -0.019208535552024841 0.097814761102199554
- vertex -3.819275695072703e-18 -0.020791169255971909 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal 0.020787518098262216 -0.10450589731384756 0.9943069930951618
- outer loop
- vertex -3.819275695072703e-18 -0.020791169255971909 0.097814761102199554
- vertex 0.0079564359039068222 -0.019208535552024841 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal 0.059197831240794162 -0.088595824750780858 0.99430699314302085
- outer loop
- vertex 0.0079564359039068222 -0.019208535552024841 0.097814761102199554
- vertex 0.01470157690346241 -0.01470157690346241 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal 0.088595824750780858 -0.059197831240794162 0.99430699314302085
- outer loop
- vertex 0.01470157690346241 -0.01470157690346241 0.097814761102199554
- vertex 0.019208535552024841 -0.0079564359039068222 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal 0.10450589731384756 -0.020787518098262223 0.9943069930951618
- outer loop
- vertex 0.019208535552024841 -0.0079564359039068222 0.097814761102199554
- vertex 0.020791169255971909 0 0.097814761102199554
- vertex 0 0 0.10000000149011612
- endloop
- endfacet
- facet normal 0.10450589731384756 0.020787518098262223 -0.9943069930951618
- outer loop
- vertex 0.020791169255971909 0 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex 0.019208535552024841 0.0079564359039068222 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.088595824750780858 0.059197831240794162 -0.99430699314302085
- outer loop
- vertex 0.019208535552024841 0.0079564359039068222 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex 0.01470157690346241 0.01470157690346241 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.059197831240794162 0.088595824750780858 -0.99430699314302085
- outer loop
- vertex 0.01470157690346241 0.01470157690346241 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex 0.0079564359039068222 0.019208535552024841 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.020787518098262226 0.10450589731384755 -0.9943069930951618
- outer loop
- vertex 0.0079564359039068222 0.019208535552024841 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex 1.2730919672892854e-18 0.020791169255971909 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.020787518098262219 0.10450589731384756 -0.9943069930951618
- outer loop
- vertex 1.2730919672892854e-18 0.020791169255971909 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex -0.0079564359039068222 0.019208535552024841 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.059197831240794162 0.088595824750780858 -0.99430699314302085
- outer loop
- vertex -0.0079564359039068222 0.019208535552024841 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex -0.01470157690346241 0.01470157690346241 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.088595824750780858 0.059197831240794162 -0.99430699314302085
- outer loop
- vertex -0.01470157690346241 0.01470157690346241 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex -0.019208535552024841 0.0079564359039068222 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.10450589731384755 0.02078751809826223 -0.9943069930951618
- outer loop
- vertex -0.019208535552024841 0.0079564359039068222 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex -0.020791169255971909 2.5461839345785708e-18 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.10450589731384756 -0.020787518098262216 -0.9943069930951618
- outer loop
- vertex -0.020791169255971909 2.5461839345785708e-18 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex -0.019208535552024841 -0.0079564359039068222 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.088595824750780858 -0.059197831240794162 -0.99430699314302085
- outer loop
- vertex -0.019208535552024841 -0.0079564359039068222 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex -0.01470157690346241 -0.01470157690346241 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.059197831240794162 -0.088595824750780858 -0.99430699314302085
- outer loop
- vertex -0.01470157690346241 -0.01470157690346241 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex -0.0079564359039068222 -0.019208535552024841 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.020787518098262233 -0.10450589731384756 -0.9943069930951618
- outer loop
- vertex -0.0079564359039068222 -0.019208535552024841 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex -3.819275695072703e-18 -0.020791169255971909 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.020787518098262212 -0.10450589731384755 -0.9943069930951618
- outer loop
- vertex -3.819275695072703e-18 -0.020791169255971909 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex 0.0079564359039068222 -0.019208535552024841 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.059197831240794162 -0.088595824750780858 -0.99430699314302085
- outer loop
- vertex 0.0079564359039068222 -0.019208535552024841 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex 0.01470157690346241 -0.01470157690346241 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.088595824750780858 -0.059197831240794162 -0.99430699314302085
- outer loop
- vertex 0.01470157690346241 -0.01470157690346241 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex 0.019208535552024841 -0.0079564359039068222 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.10450589731384756 -0.020787518098262223 -0.9943069930951618
- outer loop
- vertex 0.019208535552024841 -0.0079564359039068222 -0.097814761102199554
- vertex 0 0 -0.10000000149011612
- vertex 0.020791169255971909 0 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.30843476522401231 0.061351521400747594 0.94926497166124379
- outer loop
- vertex 0.020791169255971909 0 0.097814761102199554
- vertex 0.040673665702342987 0 0.091354548931121826
- vertex 0.037577565759420395 0.015565137378871441 0.091354548931121826
- endloop
- endfacet
- facet normal 0.30843478276930947 0.061351500668862545 0.94926496730034626
- outer loop
- vertex 0.020791169255971909 0 0.097814761102199554
- vertex 0.037577565759420395 0.015565137378871441 0.091354548931121826
- vertex 0.019208535552024841 0.0079564359039068222 0.097814761102199554
- endloop
- endfacet
- facet normal 0.49754554609711599 0.098967962699230083 0.86177361987826373
- outer loop
- vertex 0.040673665702342987 0 0.091354548931121826
- vertex 0.058778524398803711 0 0.080901697278022766
- vertex 0.054304275661706924 0.022493567317724228 0.080901697278022766
- endloop
- endfacet
- facet normal 0.49754549605911413 0.098968004229828863 0.86177364399826861
- outer loop
- vertex 0.040673665702342987 0 0.091354548931121826
- vertex 0.054304275661706924 0.022493567317724228 0.080901697278022766
- vertex 0.037577565759420395 0.015565137378871441 0.091354548931121826
- endloop
- endfacet
- facet normal 0.6632812473204962 0.13193484346784404 0.7366486163918875
- outer loop
- vertex 0.058778524398803711 0 0.080901697278022766
- vertex 0.074314482510089874 0 0.06691306084394455
- vertex 0.068657629191875458 0.028438922017812729 0.06691306084394455
- endloop
- endfacet
- facet normal 0.66328124731730775 0.13193484347015969 0.73664861639434354
- outer loop
- vertex 0.058778524398803711 0 0.080901697278022766
- vertex 0.068657629191875458 0.028438922017812729 0.06691306084394455
- vertex 0.054304275661706924 0.022493567317724228 0.080901697278022766
- endloop
- endfacet
- facet normal 0.79874089113149127 0.15887934482690994 0.58031917306068981
- outer loop
- vertex 0.074314482510089874 0 0.06691306084394455
- vertex 0.086602538824081421 0 0.05000000074505806
- vertex 0.080010317265987396 0.033141355961561203 0.05000000074505806
- endloop
- endfacet
- facet normal 0.79874079057134661 0.15887942196636892 0.58031929035065921
- outer loop
- vertex 0.074314482510089874 0 0.06691306084394455
- vertex 0.080010317265987396 0.033141355961561203 0.05000000074505806
- vertex 0.068657629191875458 0.028438922017812729 0.06691306084394455
- endloop
- endfacet
- facet normal 0.89882617438269374 0.17878756470117699 0.40018310178316374
- outer loop
- vertex 0.086602538824081421 0 0.05000000074505806
- vertex 0.095105648040771484 0 0.030901700258255005
- vertex 0.087866164743900299 0.036395356059074402 0.030901700258255005
- endloop
- endfacet
- facet normal 0.89882620092364052 0.17878753861432078 0.40018305382588132
- outer loop
- vertex 0.086602538824081421 0 0.05000000074505806
- vertex 0.087866164743900299 0.036395356059074402 0.030901700258255005
- vertex 0.080010317265987396 0.033141355961561203 0.05000000074505806
- endloop
- endfacet
- facet normal 0.96014288401665793 0.19098433051579031 0.20408485433664575
- outer loop
- vertex 0.095105648040771484 0 0.030901700258255005
- vertex 0.099452190101146698 0 0.010452846065163612
- vertex 0.091881841421127319 0.038058705627918243 0.010452846065163612
- endloop
- endfacet
- facet normal 0.96014294936226929 0.19098422428494741 0.20408464632156809
- outer loop
- vertex 0.095105648040771484 0 0.030901700258255005
- vertex 0.091881841421127319 0.038058705627918243 0.010452846065163612
- vertex 0.087866164743900299 0.036395356059074402 0.030901700258255005
- endloop
- endfacet
- facet normal 0.98078527328214282 0.19509035781625048 -0
- outer loop
- vertex 0.099452190101146698 0 0.010452846065163612
- vertex 0.099452190101146698 0 -0.010452846065163612
- vertex 0.091881841421127319 0.038058705627918243 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.98078527328214282 0.19509035781625048 -0
- outer loop
- vertex 0.099452190101146698 0 0.010452846065163612
- vertex 0.091881841421127319 0.038058705627918243 -0.010452846065163612
- vertex 0.091881841421127319 0.038058705627918243 0.010452846065163612
- endloop
- endfacet
- facet normal 0.96014290587992079 0.19098421563577428 -0.20408485898382991
- outer loop
- vertex 0.099452190101146698 0 -0.010452846065163612
- vertex 0.095105648040771484 0 -0.030901700258255005
- vertex 0.087866164743900299 0.036395356059074402 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.96014292559861558 0.1909843387869575 -0.2040846509687585
- outer loop
- vertex 0.099452190101146698 0 -0.010452846065163612
- vertex 0.087866164743900299 0.036395356059074402 -0.030901700258255005
- vertex 0.091881841421127319 0.038058705627918243 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.89882617942320453 0.17878753433762079 -0.40018310402734325
- outer loop
- vertex 0.095105648040771484 0 -0.030901700258255005
- vertex 0.086602538824081421 0 -0.05000000074505806
- vertex 0.080010317265987396 0.033141355961561203 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.89882619396083974 0.17878756859551068 -0.40018305607006494
- outer loop
- vertex 0.095105648040771484 0 -0.030901700258255005
- vertex 0.080010317265987396 0.033141355961561203 -0.05000000074505806
- vertex 0.087866164743900299 0.036395356059074402 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.79874087880382028 0.15887943951689917 -0.58031916410411333
- outer loop
- vertex 0.086602538824081421 0 -0.05000000074505806
- vertex 0.074314482510089874 0 -0.06691306084394455
- vertex 0.068657629191875458 0.028438922017812729 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.7987408154183383 0.1588793297666366 -0.58031928139408939
- outer loop
- vertex 0.086602538824081421 0 -0.05000000074505806
- vertex 0.068657629191875458 0.028438922017812729 -0.06691306084394455
- vertex 0.080010317265987396 0.033141355961561203 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.66328124732023808 0.13193484347074255 -0.73664861639160084
- outer loop
- vertex 0.074314482510089874 0 -0.06691306084394455
- vertex 0.058778524398803711 0 -0.080901697278022766
- vertex 0.054304275661706924 0.022493567317724228 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.66328124731817861 0.13193484346738305 -0.73664861639405699
- outer loop
- vertex 0.074314482510089874 0 -0.06691306084394455
- vertex 0.054304275661706924 0.022493567317724228 -0.080901697278022766
- vertex 0.068657629191875458 0.028438922017812729 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.49754554356199898 0.098968013678745081 -0.86177361548731513
- outer loop
- vertex 0.058778524398803711 0 -0.080901697278022766
- vertex 0.040673665702342987 0 -0.091354548931121826
- vertex 0.037577565759420395 0.015565137378871441 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.49754551322598684 0.098967956160755946 -0.86177363960732289
- outer loop
- vertex 0.058778524398803711 0 -0.080901697278022766
- vertex 0.037577565759420395 0.015565137378871441 -0.091354548931121826
- vertex 0.054304275661706924 0.022493567317724228 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.30843476568236111 0.061351497270056753 -0.94926497307189694
- outer loop
- vertex 0.040673665702342987 0 -0.091354548931121826
- vertex 0.020791169255971909 0 -0.097814761102199554
- vertex 0.019208535552024841 0.0079564359039068222 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.3084347739583525 0.061351523138116801 -0.94926496871099864
- outer loop
- vertex 0.040673665702342987 0 -0.091354548931121826
- vertex 0.019208535552024841 0.0079564359039068222 -0.097814761102199554
- vertex 0.037577565759420395 0.015565137378871441 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.26147837970812587 0.17471428421919066 0.9492649660842799
- outer loop
- vertex 0.019208535552024841 0.0079564359039068222 0.097814761102199554
- vertex 0.037577565759420395 0.015565137378871441 0.091354548931121826
- vertex 0.028760623186826706 0.028760623186826706 0.091354548931121826
- endloop
- endfacet
- facet normal 0.26147840938106925 0.17471426893077599 0.9492649607246284
- outer loop
- vertex 0.019208535552024841 0.0079564359039068222 0.097814761102199554
- vertex 0.028760623186826706 0.028760623186826706 0.091354548931121826
- vertex 0.01470157690346241 0.01470157690346241 0.097814761102199554
- endloop
- endfacet
- facet normal 0.42179874557711361 0.28183684066621417 0.86177364398829248
- outer loop
- vertex 0.037577565759420395 0.015565137378871441 0.091354548931121826
- vertex 0.054304275661706924 0.022493567317724228 0.080901697278022766
- vertex 0.041562695056200027 0.041562695056200027 0.080901697278022766
- endloop
- endfacet
- facet normal 0.42179864590164712 0.28183687150574754 0.86177368268901633
- outer loop
- vertex 0.037577565759420395 0.015565137378871441 0.091354548931121826
- vertex 0.041562695056200027 0.041562695056200027 0.080901697278022766
- vertex 0.028760623186826706 0.028760623186826706 0.091354548931121826
- endloop
- endfacet
- facet normal 0.56230267786378618 0.37571865044532143 0.73664862327622749
- outer loop
- vertex 0.054304275661706924 0.022493567317724228 0.080901697278022766
- vertex 0.068657629191875458 0.028438922017812729 0.06691306084394455
- vertex 0.052548274397850037 0.052548274397850037 0.06691306084394455
- endloop
- endfacet
- facet normal 0.56230279592432497 0.37571862212216495 0.73664854760347465
- outer loop
- vertex 0.054304275661706924 0.022493567317724228 0.080901697278022766
- vertex 0.052548274397850037 0.052548274397850037 0.06691306084394455
- vertex 0.041562695056200027 0.041562695056200027 0.080901697278022766
- endloop
- endfacet
- facet normal 0.67713972638750908 0.45245040321610314 0.5803192428116053
- outer loop
- vertex 0.068657629191875458 0.028438922017812729 0.06691306084394455
- vertex 0.080010317265987396 0.033141355961561203 0.05000000074505806
- vertex 0.061237242072820663 0.061237242072820663 0.05000000074505806
- endloop
- endfacet
- facet normal 0.67713981980897864 0.4524503781983546 0.58031915330896144
- outer loop
- vertex 0.068657629191875458 0.028438922017812729 0.06691306084394455
- vertex 0.061237242072820663 0.061237242072820663 0.05000000074505806
- vertex 0.052548274397850037 0.052548274397850037 0.06691306084394455
- endloop
- endfacet
- facet normal 0.76198801003014671 0.50914415869095786 0.40018308090319588
- outer loop
- vertex 0.080010317265987396 0.033141355961561203 0.05000000074505806
- vertex 0.087866164743900299 0.036395356059074402 0.030901700258255005
- vertex 0.067249849438667297 0.067249849438667297 0.030901700258255005
- endloop
- endfacet
- facet normal 0.76198794657394719 0.50914418433618069 0.40018316910218049
- outer loop
- vertex 0.080010317265987396 0.033141355961561203 0.05000000074505806
- vertex 0.067249849438667297 0.067249849438667297 0.030901700258255005
- vertex 0.061237242072820663 0.061237242072820663 0.05000000074505806
- endloop
- endfacet
- facet normal 0.81396988974665174 0.54387724854201425 0.20408468120903095
- outer loop
- vertex 0.087866164743900299 0.036395356059074402 0.030901700258255005
- vertex 0.091881841421127319 0.038058705627918243 0.010452846065163612
- vertex 0.070323318243026733 0.070323318243026733 0.010452846065163612
- endloop
- endfacet
- facet normal 0.81396982149820041 0.54387729795136042 0.20408482173673517
- outer loop
- vertex 0.087866164743900299 0.036395356059074402 0.030901700258255005
- vertex 0.070323318243026733 0.070323318243026733 0.010452846065163612
- vertex 0.067249849438667297 0.067249849438667297 0.030901700258255005
- endloop
- endfacet
- facet normal 0.83146963292153175 0.55557020216110709 -0
- outer loop
- vertex 0.091881841421127319 0.038058705627918243 0.010452846065163612
- vertex 0.091881841421127319 0.038058705627918243 -0.010452846065163612
- vertex 0.070323318243026733 0.070323318243026733 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.83146963292153175 0.55557020216110709 -0
- outer loop
- vertex 0.091881841421127319 0.038058705627918243 0.010452846065163612
- vertex 0.070323318243026733 0.070323318243026733 -0.010452846065163612
- vertex 0.070323318243026733 0.070323318243026733 0.010452846065163612
- endloop
- endfacet
- facet normal 0.81396984640124925 0.54387731459104727 -0.20408467806956454
- outer loop
- vertex 0.091881841421127319 0.038058705627918243 -0.010452846065163612
- vertex 0.087866164743900299 0.036395356059074402 -0.030901700258255005
- vertex 0.067249849438667297 0.067249849438667297 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.81396986593198373 0.54387723262956311 -0.20408481859726049
- outer loop
- vertex 0.091881841421127319 0.038058705627918243 -0.010452846065163612
- vertex 0.067249849438667297 0.067249849438667297 -0.030901700258255005
- vertex 0.070323318243026733 0.070323318243026733 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.76198798009585644 0.50914420673480953 -0.40018307677589038
- outer loop
- vertex 0.087866164743900299 0.036395356059074402 -0.030901700258255005
- vertex 0.080010317265987396 0.033141355961561203 -0.05000000074505806
- vertex 0.061237242072820663 0.061237242072820663 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.76198797950532793 0.509144138294924 -0.40018316497487411
- outer loop
- vertex 0.087866164743900299 0.036395356059074402 -0.030901700258255005
- vertex 0.061237242072820663 0.061237242072820663 -0.05000000074505806
- vertex 0.067249849438667297 0.067249849438667297 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.67713976273003673 0.45245034005942358 -0.58031924964628023
- outer loop
- vertex 0.080010317265987396 0.033141355961561203 -0.05000000074505806
- vertex 0.068657629191875458 0.028438922017812729 -0.06691306084394455
- vertex 0.052548274397850037 0.052548274397850037 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.67713977536749692 0.45245043594349216 -0.58031916014362273
- outer loop
- vertex 0.080010317265987396 0.033141355961561203 -0.05000000074505806
- vertex 0.052548274397850037 0.052548274397850037 -0.06691306084394455
- vertex 0.061237242072820663 0.061237242072820663 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.56230271938745569 0.37571857098187661 -0.7366486321095076
- outer loop
- vertex 0.068657629191875458 0.028438922017812729 -0.06691306084394455
- vertex 0.054304275661706924 0.022493567317724228 -0.080901697278022766
- vertex 0.041562695056200027 0.041562695056200027 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.56230273840009004 0.37571869089438792 -0.73664855643676341
- outer loop
- vertex 0.068657629191875458 0.028438922017812729 -0.06691306084394455
- vertex 0.041562695056200027 0.041562695056200027 -0.080901697278022766
- vertex 0.052548274397850037 0.052548274397850037 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.42179871051676798 0.28183691468019506 -0.86177363694298537
- outer loop
- vertex 0.054304275661706924 0.022493567317724228 -0.080901697278022766
- vertex 0.037577565759420395 0.015565137378871441 -0.091354548931121826
- vertex 0.028760623186826706 0.028760623186826706 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.42179870086462851 0.28183681079029427 -0.86177367564370844
- outer loop
- vertex 0.054304275661706924 0.022493567317724228 -0.080901697278022766
- vertex 0.028760623186826706 0.028760623186826706 -0.091354548931121826
- vertex 0.041562695056200027 0.041562695056200027 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.26147839157789088 0.17471425703507376 -0.94926496781800662
- outer loop
- vertex 0.037577565759420395 0.015565137378871441 -0.091354548931121826
- vertex 0.019208535552024841 0.0079564359039068222 -0.097814761102199554
- vertex 0.01470157690346241 0.01470157690346241 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.26147838880858149 0.17471429029992128 -0.94926496245835557
- outer loop
- vertex 0.037577565759420395 0.015565137378871441 -0.091354548931121826
- vertex 0.01470157690346241 0.01470157690346241 -0.097814761102199554
- vertex 0.028760623186826706 0.028760623186826706 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.17471429029992128 0.26147838880858149 0.94926496245835557
- outer loop
- vertex 0.01470157690346241 0.01470157690346241 0.097814761102199554
- vertex 0.028760623186826706 0.028760623186826706 0.091354548931121826
- vertex 0.015565137378871441 0.037577565759420395 0.091354548931121826
- endloop
- endfacet
- facet normal 0.17471425703507376 0.26147839157789088 0.94926496781800662
- outer loop
- vertex 0.01470157690346241 0.01470157690346241 0.097814761102199554
- vertex 0.015565137378871441 0.037577565759420395 0.091354548931121826
- vertex 0.0079564359039068222 0.019208535552024841 0.097814761102199554
- endloop
- endfacet
- facet normal 0.28183681079029427 0.42179870086462851 0.86177367564370844
- outer loop
- vertex 0.028760623186826706 0.028760623186826706 0.091354548931121826
- vertex 0.041562695056200027 0.041562695056200027 0.080901697278022766
- vertex 0.022493567317724228 0.054304275661706924 0.080901697278022766
- endloop
- endfacet
- facet normal 0.28183691468019506 0.42179871051676798 0.86177363694298537
- outer loop
- vertex 0.028760623186826706 0.028760623186826706 0.091354548931121826
- vertex 0.022493567317724228 0.054304275661706924 0.080901697278022766
- vertex 0.015565137378871441 0.037577565759420395 0.091354548931121826
- endloop
- endfacet
- facet normal 0.37571869089438792 0.56230273840009004 0.73664855643676341
- outer loop
- vertex 0.041562695056200027 0.041562695056200027 0.080901697278022766
- vertex 0.052548274397850037 0.052548274397850037 0.06691306084394455
- vertex 0.028438922017812729 0.068657629191875458 0.06691306084394455
- endloop
- endfacet
- facet normal 0.37571857098187661 0.56230271938745569 0.7366486321095076
- outer loop
- vertex 0.041562695056200027 0.041562695056200027 0.080901697278022766
- vertex 0.028438922017812729 0.068657629191875458 0.06691306084394455
- vertex 0.022493567317724228 0.054304275661706924 0.080901697278022766
- endloop
- endfacet
- facet normal 0.45245043594349216 0.67713977536749692 0.58031916014362273
- outer loop
- vertex 0.052548274397850037 0.052548274397850037 0.06691306084394455
- vertex 0.061237242072820663 0.061237242072820663 0.05000000074505806
- vertex 0.033141355961561203 0.080010317265987396 0.05000000074505806
- endloop
- endfacet
- facet normal 0.45245034005942358 0.67713976273003673 0.58031924964628023
- outer loop
- vertex 0.052548274397850037 0.052548274397850037 0.06691306084394455
- vertex 0.033141355961561203 0.080010317265987396 0.05000000074505806
- vertex 0.028438922017812729 0.068657629191875458 0.06691306084394455
- endloop
- endfacet
- facet normal 0.509144138294924 0.76198797950532793 0.40018316497487411
- outer loop
- vertex 0.061237242072820663 0.061237242072820663 0.05000000074505806
- vertex 0.067249849438667297 0.067249849438667297 0.030901700258255005
- vertex 0.036395356059074402 0.087866164743900299 0.030901700258255005
- endloop
- endfacet
- facet normal 0.50914420673480953 0.76198798009585644 0.40018307677589038
- outer loop
- vertex 0.061237242072820663 0.061237242072820663 0.05000000074505806
- vertex 0.036395356059074402 0.087866164743900299 0.030901700258255005
- vertex 0.033141355961561203 0.080010317265987396 0.05000000074505806
- endloop
- endfacet
- facet normal 0.54387723262956311 0.81396986593198373 0.20408481859726049
- outer loop
- vertex 0.067249849438667297 0.067249849438667297 0.030901700258255005
- vertex 0.070323318243026733 0.070323318243026733 0.010452846065163612
- vertex 0.038058705627918243 0.091881841421127319 0.010452846065163612
- endloop
- endfacet
- facet normal 0.54387731459104727 0.81396984640124925 0.20408467806956454
- outer loop
- vertex 0.067249849438667297 0.067249849438667297 0.030901700258255005
- vertex 0.038058705627918243 0.091881841421127319 0.010452846065163612
- vertex 0.036395356059074402 0.087866164743900299 0.030901700258255005
- endloop
- endfacet
- facet normal 0.55557020216110709 0.83146963292153175 -0
- outer loop
- vertex 0.070323318243026733 0.070323318243026733 0.010452846065163612
- vertex 0.070323318243026733 0.070323318243026733 -0.010452846065163612
- vertex 0.038058705627918243 0.091881841421127319 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.55557020216110709 0.83146963292153175 -0
- outer loop
- vertex 0.070323318243026733 0.070323318243026733 0.010452846065163612
- vertex 0.038058705627918243 0.091881841421127319 -0.010452846065163612
- vertex 0.038058705627918243 0.091881841421127319 0.010452846065163612
- endloop
- endfacet
- facet normal 0.54387729795136042 0.81396982149820041 -0.20408482173673517
- outer loop
- vertex 0.070323318243026733 0.070323318243026733 -0.010452846065163612
- vertex 0.067249849438667297 0.067249849438667297 -0.030901700258255005
- vertex 0.036395356059074402 0.087866164743900299 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.54387724854201425 0.81396988974665174 -0.20408468120903095
- outer loop
- vertex 0.070323318243026733 0.070323318243026733 -0.010452846065163612
- vertex 0.036395356059074402 0.087866164743900299 -0.030901700258255005
- vertex 0.038058705627918243 0.091881841421127319 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.50914418433618069 0.76198794657394719 -0.40018316910218049
- outer loop
- vertex 0.067249849438667297 0.067249849438667297 -0.030901700258255005
- vertex 0.061237242072820663 0.061237242072820663 -0.05000000074505806
- vertex 0.033141355961561203 0.080010317265987396 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.50914415869095786 0.76198801003014671 -0.40018308090319588
- outer loop
- vertex 0.067249849438667297 0.067249849438667297 -0.030901700258255005
- vertex 0.033141355961561203 0.080010317265987396 -0.05000000074505806
- vertex 0.036395356059074402 0.087866164743900299 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.4524503781983546 0.67713981980897864 -0.58031915330896144
- outer loop
- vertex 0.061237242072820663 0.061237242072820663 -0.05000000074505806
- vertex 0.052548274397850037 0.052548274397850037 -0.06691306084394455
- vertex 0.028438922017812729 0.068657629191875458 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.45245040321610314 0.67713972638750908 -0.5803192428116053
- outer loop
- vertex 0.061237242072820663 0.061237242072820663 -0.05000000074505806
- vertex 0.028438922017812729 0.068657629191875458 -0.06691306084394455
- vertex 0.033141355961561203 0.080010317265987396 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.37571862212216495 0.56230279592432497 -0.73664854760347465
- outer loop
- vertex 0.052548274397850037 0.052548274397850037 -0.06691306084394455
- vertex 0.041562695056200027 0.041562695056200027 -0.080901697278022766
- vertex 0.022493567317724228 0.054304275661706924 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.37571865044532143 0.56230267786378618 -0.73664862327622749
- outer loop
- vertex 0.052548274397850037 0.052548274397850037 -0.06691306084394455
- vertex 0.022493567317724228 0.054304275661706924 -0.080901697278022766
- vertex 0.028438922017812729 0.068657629191875458 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.28183687150574754 0.42179864590164712 -0.86177368268901633
- outer loop
- vertex 0.041562695056200027 0.041562695056200027 -0.080901697278022766
- vertex 0.028760623186826706 0.028760623186826706 -0.091354548931121826
- vertex 0.015565137378871441 0.037577565759420395 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.28183684066621417 0.42179874557711361 -0.86177364398829248
- outer loop
- vertex 0.041562695056200027 0.041562695056200027 -0.080901697278022766
- vertex 0.015565137378871441 0.037577565759420395 -0.091354548931121826
- vertex 0.022493567317724228 0.054304275661706924 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.17471426893077599 0.26147840938106925 -0.9492649607246284
- outer loop
- vertex 0.028760623186826706 0.028760623186826706 -0.091354548931121826
- vertex 0.01470157690346241 0.01470157690346241 -0.097814761102199554
- vertex 0.0079564359039068222 0.019208535552024841 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.17471428421919066 0.26147837970812587 -0.9492649660842799
- outer loop
- vertex 0.028760623186826706 0.028760623186826706 -0.091354548931121826
- vertex 0.0079564359039068222 0.019208535552024841 -0.097814761102199554
- vertex 0.015565137378871441 0.037577565759420395 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.061351523138116808 0.3084347739583525 0.94926496871099864
- outer loop
- vertex 0.0079564359039068222 0.019208535552024841 0.097814761102199554
- vertex 0.015565137378871441 0.037577565759420395 0.091354548931121826
- vertex 2.4905436306751913e-18 0.040673665702342987 0.091354548931121826
- endloop
- endfacet
- facet normal 0.061351497270056753 0.30843476568236106 0.94926497307189694
- outer loop
- vertex 0.0079564359039068222 0.019208535552024841 0.097814761102199554
- vertex 2.4905436306751913e-18 0.040673665702342987 0.091354548931121826
- vertex 1.2730919672892854e-18 0.020791169255971909 0.097814761102199554
- endloop
- endfacet
- facet normal 0.09896795616075596 0.49754551322598684 0.86177363960732289
- outer loop
- vertex 0.015565137378871441 0.037577565759420395 0.091354548931121826
- vertex 0.022493567317724228 0.054304275661706924 0.080901697278022766
- vertex 3.5991468040503975e-18 0.058778524398803711 0.080901697278022766
- endloop
- endfacet
- facet normal 0.098968013678745095 0.49754554356199898 0.86177361548731501
- outer loop
- vertex 0.015565137378871441 0.037577565759420395 0.091354548931121826
- vertex 3.5991468040503975e-18 0.058778524398803711 0.080901697278022766
- vertex 2.4905436306751913e-18 0.040673665702342987 0.091354548931121826
- endloop
- endfacet
- facet normal 0.13193484346738305 0.6632812473181785 0.73664861639405688
- outer loop
- vertex 0.022493567317724228 0.054304275661706924 0.080901697278022766
- vertex 0.028438922017812729 0.068657629191875458 0.06691306084394455
- vertex 4.5504495898297635e-18 0.074314482510089874 0.06691306084394455
- endloop
- endfacet
- facet normal 0.13193484347074255 0.66328124732023797 0.73664861639160084
- outer loop
- vertex 0.022493567317724228 0.054304275661706924 0.080901697278022766
- vertex 4.5504495898297635e-18 0.074314482510089874 0.06691306084394455
- vertex 3.5991468040503975e-18 0.058778524398803711 0.080901697278022766
- endloop
- endfacet
- facet normal 0.15887932976663663 0.79874081541833841 0.5803192813940895
- outer loop
- vertex 0.028438922017812729 0.068657629191875458 0.06691306084394455
- vertex 0.033141355961561203 0.080010317265987396 0.05000000074505806
- vertex 5.302876236065149e-18 0.086602538824081421 0.05000000074505806
- endloop
- endfacet
- facet normal 0.15887943951689923 0.79874087880382039 0.58031916410411333
- outer loop
- vertex 0.028438922017812729 0.068657629191875458 0.06691306084394455
- vertex 5.302876236065149e-18 0.086602538824081421 0.05000000074505806
- vertex 4.5504495898297635e-18 0.074314482510089874 0.06691306084394455
- endloop
- endfacet
- facet normal 0.17878756859551068 0.89882619396083951 0.40018305607006488
- outer loop
- vertex 0.033141355961561203 0.080010317265987396 0.05000000074505806
- vertex 0.036395356059074402 0.087866164743900299 0.030901700258255005
- vertex 5.823541763914202e-18 0.095105648040771484 0.030901700258255005
- endloop
- endfacet
- facet normal 0.17878753433762079 0.89882617942320442 0.40018310402734319
- outer loop
- vertex 0.033141355961561203 0.080010317265987396 0.05000000074505806
- vertex 5.823541763914202e-18 0.095105648040771484 0.030901700258255005
- vertex 5.302876236065149e-18 0.086602538824081421 0.05000000074505806
- endloop
- endfacet
- facet normal 0.19098433878695753 0.96014292559861558 0.2040846509687585
- outer loop
- vertex 0.036395356059074402 0.087866164743900299 0.030901700258255005
- vertex 0.038058705627918243 0.091881841421127319 0.010452846065163612
- vertex 6.0896904347255889e-18 0.099452190101146698 0.010452846065163612
- endloop
- endfacet
- facet normal 0.19098421563577431 0.96014290587992079 0.20408485898382991
- outer loop
- vertex 0.036395356059074402 0.087866164743900299 0.030901700258255005
- vertex 6.0896904347255889e-18 0.099452190101146698 0.010452846065163612
- vertex 5.823541763914202e-18 0.095105648040771484 0.030901700258255005
- endloop
- endfacet
- facet normal 0.19509035781625048 0.98078527328214271 -0
- outer loop
- vertex 0.038058705627918243 0.091881841421127319 0.010452846065163612
- vertex 0.038058705627918243 0.091881841421127319 -0.010452846065163612
- vertex 6.0896904347255889e-18 0.099452190101146698 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.19509035781625048 0.98078527328214271 -0
- outer loop
- vertex 0.038058705627918243 0.091881841421127319 0.010452846065163612
- vertex 6.0896904347255889e-18 0.099452190101146698 -0.010452846065163612
- vertex 6.0896904347255889e-18 0.099452190101146698 0.010452846065163612
- endloop
- endfacet
- facet normal 0.19098422428494746 0.9601429493622694 -0.20408464632156811
- outer loop
- vertex 0.038058705627918243 0.091881841421127319 -0.010452846065163612
- vertex 0.036395356059074402 0.087866164743900299 -0.030901700258255005
- vertex 5.823541763914202e-18 0.095105648040771484 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.19098433051579031 0.96014288401665793 -0.20408485433664572
- outer loop
- vertex 0.038058705627918243 0.091881841421127319 -0.010452846065163612
- vertex 5.823541763914202e-18 0.095105648040771484 -0.030901700258255005
- vertex 6.0896904347255889e-18 0.099452190101146698 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.17878753861432081 0.89882620092364052 -0.40018305382588126
- outer loop
- vertex 0.036395356059074402 0.087866164743900299 -0.030901700258255005
- vertex 0.033141355961561203 0.080010317265987396 -0.05000000074505806
- vertex 5.302876236065149e-18 0.086602538824081421 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.17878756470117702 0.89882617438269363 -0.40018310178316374
- outer loop
- vertex 0.036395356059074402 0.087866164743900299 -0.030901700258255005
- vertex 5.302876236065149e-18 0.086602538824081421 -0.05000000074505806
- vertex 5.823541763914202e-18 0.095105648040771484 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.15887942196636895 0.79874079057134661 -0.58031929035065921
- outer loop
- vertex 0.033141355961561203 0.080010317265987396 -0.05000000074505806
- vertex 0.028438922017812729 0.068657629191875458 -0.06691306084394455
- vertex 4.5504495898297635e-18 0.074314482510089874 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.15887934482690999 0.79874089113149138 -0.58031917306068981
- outer loop
- vertex 0.033141355961561203 0.080010317265987396 -0.05000000074505806
- vertex 4.5504495898297635e-18 0.074314482510089874 -0.06691306084394455
- vertex 5.302876236065149e-18 0.086602538824081421 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.13193484347015971 0.66328124731730786 -0.73664861639434365
- outer loop
- vertex 0.028438922017812729 0.068657629191875458 -0.06691306084394455
- vertex 0.022493567317724228 0.054304275661706924 -0.080901697278022766
- vertex 3.5991468040503975e-18 0.058778524398803711 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.13193484346784407 0.6632812473204962 -0.73664861639188761
- outer loop
- vertex 0.028438922017812729 0.068657629191875458 -0.06691306084394455
- vertex 3.5991468040503975e-18 0.058778524398803711 -0.080901697278022766
- vertex 4.5504495898297635e-18 0.074314482510089874 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.098968004229828876 0.49754549605911413 -0.86177364399826861
- outer loop
- vertex 0.022493567317724228 0.054304275661706924 -0.080901697278022766
- vertex 0.015565137378871441 0.037577565759420395 -0.091354548931121826
- vertex 2.4905436306751913e-18 0.040673665702342987 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.098967962699230097 0.49754554609711604 -0.86177361987826384
- outer loop
- vertex 0.022493567317724228 0.054304275661706924 -0.080901697278022766
- vertex 2.4905436306751913e-18 0.040673665702342987 -0.091354548931121826
- vertex 3.5991468040503975e-18 0.058778524398803711 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.061351500668862552 0.30843478276930947 -0.94926496730034626
- outer loop
- vertex 0.015565137378871441 0.037577565759420395 -0.091354548931121826
- vertex 0.0079564359039068222 0.019208535552024841 -0.097814761102199554
- vertex 1.2730919672892854e-18 0.020791169255971909 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.061351521400747608 0.30843476522401225 -0.94926497166124379
- outer loop
- vertex 0.015565137378871441 0.037577565759420395 -0.091354548931121826
- vertex 1.2730919672892854e-18 0.020791169255971909 -0.097814761102199554
- vertex 2.4905436306751913e-18 0.040673665702342987 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.061351521400747587 0.30843476522401225 0.94926497166124379
- outer loop
- vertex 1.2730919672892854e-18 0.020791169255971909 0.097814761102199554
- vertex 2.4905436306751913e-18 0.040673665702342987 0.091354548931121826
- vertex -0.015565137378871441 0.037577565759420395 0.091354548931121826
- endloop
- endfacet
- facet normal -0.061351500668862524 0.30843478276930947 0.94926496730034626
- outer loop
- vertex 1.2730919672892854e-18 0.020791169255971909 0.097814761102199554
- vertex -0.015565137378871441 0.037577565759420395 0.091354548931121826
- vertex -0.0079564359039068222 0.019208535552024841 0.097814761102199554
- endloop
- endfacet
- facet normal -0.098967962699230083 0.49754554609711604 0.86177361987826384
- outer loop
- vertex 2.4905436306751913e-18 0.040673665702342987 0.091354548931121826
- vertex 3.5991468040503975e-18 0.058778524398803711 0.080901697278022766
- vertex -0.022493567317724228 0.054304275661706924 0.080901697278022766
- endloop
- endfacet
- facet normal -0.098968004229828835 0.49754549605911413 0.86177364399826861
- outer loop
- vertex 2.4905436306751913e-18 0.040673665702342987 0.091354548931121826
- vertex -0.022493567317724228 0.054304275661706924 0.080901697278022766
- vertex -0.015565137378871441 0.037577565759420395 0.091354548931121826
- endloop
- endfacet
- facet normal -0.13193484346784401 0.66328124732049609 0.7366486163918875
- outer loop
- vertex 3.5991468040503975e-18 0.058778524398803711 0.080901697278022766
- vertex 4.5504495898297635e-18 0.074314482510089874 0.06691306084394455
- vertex -0.028438922017812729 0.068657629191875458 0.06691306084394455
- endloop
- endfacet
- facet normal -0.13193484347015969 0.66328124731730786 0.73664861639434365
- outer loop
- vertex 3.5991468040503975e-18 0.058778524398803711 0.080901697278022766
- vertex -0.028438922017812729 0.068657629191875458 0.06691306084394455
- vertex -0.022493567317724228 0.054304275661706924 0.080901697278022766
- endloop
- endfacet
- facet normal -0.15887934482690991 0.79874089113149138 0.58031917306068992
- outer loop
- vertex 4.5504495898297635e-18 0.074314482510089874 0.06691306084394455
- vertex 5.302876236065149e-18 0.086602538824081421 0.05000000074505806
- vertex -0.033141355961561203 0.080010317265987396 0.05000000074505806
- endloop
- endfacet
- facet normal -0.15887942196636889 0.79874079057134661 0.58031929035065921
- outer loop
- vertex 4.5504495898297635e-18 0.074314482510089874 0.06691306084394455
- vertex -0.033141355961561203 0.080010317265987396 0.05000000074505806
- vertex -0.028438922017812729 0.068657629191875458 0.06691306084394455
- endloop
- endfacet
- facet normal -0.17878756470117696 0.89882617438269374 0.4001831017831638
- outer loop
- vertex 5.302876236065149e-18 0.086602538824081421 0.05000000074505806
- vertex 5.823541763914202e-18 0.095105648040771484 0.030901700258255005
- vertex -0.036395356059074402 0.087866164743900299 0.030901700258255005
- endloop
- endfacet
- facet normal -0.17878753861432076 0.89882620092364052 0.40018305382588132
- outer loop
- vertex 5.302876236065149e-18 0.086602538824081421 0.05000000074505806
- vertex -0.036395356059074402 0.087866164743900299 0.030901700258255005
- vertex -0.033141355961561203 0.080010317265987396 0.05000000074505806
- endloop
- endfacet
- facet normal -0.19098433051579028 0.96014288401665793 0.20408485433664575
- outer loop
- vertex 5.823541763914202e-18 0.095105648040771484 0.030901700258255005
- vertex 6.0896904347255889e-18 0.099452190101146698 0.010452846065163612
- vertex -0.038058705627918243 0.091881841421127319 0.010452846065163612
- endloop
- endfacet
- facet normal -0.19098422428494741 0.9601429493622694 0.20408464632156811
- outer loop
- vertex 5.823541763914202e-18 0.095105648040771484 0.030901700258255005
- vertex -0.038058705627918243 0.091881841421127319 0.010452846065163612
- vertex -0.036395356059074402 0.087866164743900299 0.030901700258255005
- endloop
- endfacet
- facet normal -0.19509035781625042 0.98078527328214271 0
- outer loop
- vertex 6.0896904347255889e-18 0.099452190101146698 0.010452846065163612
- vertex 6.0896904347255889e-18 0.099452190101146698 -0.010452846065163612
- vertex -0.038058705627918243 0.091881841421127319 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.19509035781625042 0.98078527328214271 0
- outer loop
- vertex 6.0896904347255889e-18 0.099452190101146698 0.010452846065163612
- vertex -0.038058705627918243 0.091881841421127319 -0.010452846065163612
- vertex -0.038058705627918243 0.091881841421127319 0.010452846065163612
- endloop
- endfacet
- facet normal -0.19098421563577425 0.96014290587992079 -0.20408485898382991
- outer loop
- vertex 6.0896904347255889e-18 0.099452190101146698 -0.010452846065163612
- vertex 5.823541763914202e-18 0.095105648040771484 -0.030901700258255005
- vertex -0.036395356059074402 0.087866164743900299 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.19098433878695747 0.96014292559861558 -0.20408465096875852
- outer loop
- vertex 6.0896904347255889e-18 0.099452190101146698 -0.010452846065163612
- vertex -0.036395356059074402 0.087866164743900299 -0.030901700258255005
- vertex -0.038058705627918243 0.091881841421127319 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.17878753433762073 0.89882617942320442 -0.40018310402734325
- outer loop
- vertex 5.823541763914202e-18 0.095105648040771484 -0.030901700258255005
- vertex 5.302876236065149e-18 0.086602538824081421 -0.05000000074505806
- vertex -0.033141355961561203 0.080010317265987396 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.17878756859551062 0.89882619396083963 -0.40018305607006494
- outer loop
- vertex 5.823541763914202e-18 0.095105648040771484 -0.030901700258255005
- vertex -0.033141355961561203 0.080010317265987396 -0.05000000074505806
- vertex -0.036395356059074402 0.087866164743900299 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.15887943951689915 0.79874087880382016 -0.58031916410411333
- outer loop
- vertex 5.302876236065149e-18 0.086602538824081421 -0.05000000074505806
- vertex 4.5504495898297635e-18 0.074314482510089874 -0.06691306084394455
- vertex -0.028438922017812729 0.068657629191875458 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.15887932976663657 0.7987408154183383 -0.58031928139408939
- outer loop
- vertex 5.302876236065149e-18 0.086602538824081421 -0.05000000074505806
- vertex -0.028438922017812729 0.068657629191875458 -0.06691306084394455
- vertex -0.033141355961561203 0.080010317265987396 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.13193484347074252 0.66328124732023797 -0.73664861639160084
- outer loop
- vertex 4.5504495898297635e-18 0.074314482510089874 -0.06691306084394455
- vertex 3.5991468040503975e-18 0.058778524398803711 -0.080901697278022766
- vertex -0.022493567317724228 0.054304275661706924 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.13193484346738302 0.66328124731817861 -0.73664861639405699
- outer loop
- vertex 4.5504495898297635e-18 0.074314482510089874 -0.06691306084394455
- vertex -0.022493567317724228 0.054304275661706924 -0.080901697278022766
- vertex -0.028438922017812729 0.068657629191875458 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.098968013678745068 0.49754554356199898 -0.86177361548731513
- outer loop
- vertex 3.5991468040503975e-18 0.058778524398803711 -0.080901697278022766
- vertex 2.4905436306751913e-18 0.040673665702342987 -0.091354548931121826
- vertex -0.015565137378871441 0.037577565759420395 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.098967956160755932 0.49754551322598684 -0.86177363960732289
- outer loop
- vertex 3.5991468040503975e-18 0.058778524398803711 -0.080901697278022766
- vertex -0.015565137378871441 0.037577565759420395 -0.091354548931121826
- vertex -0.022493567317724228 0.054304275661706924 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.061351497270056739 0.30843476568236111 -0.94926497307189694
- outer loop
- vertex 2.4905436306751913e-18 0.040673665702342987 -0.091354548931121826
- vertex 1.2730919672892854e-18 0.020791169255971909 -0.097814761102199554
- vertex -0.0079564359039068222 0.019208535552024841 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.061351523138116801 0.30843477395835256 -0.94926496871099864
- outer loop
- vertex 2.4905436306751913e-18 0.040673665702342987 -0.091354548931121826
- vertex -0.0079564359039068222 0.019208535552024841 -0.097814761102199554
- vertex -0.015565137378871441 0.037577565759420395 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.17471428421919066 0.26147837970812587 0.9492649660842799
- outer loop
- vertex -0.0079564359039068222 0.019208535552024841 0.097814761102199554
- vertex -0.015565137378871441 0.037577565759420395 0.091354548931121826
- vertex -0.028760623186826706 0.028760623186826706 0.091354548931121826
- endloop
- endfacet
- facet normal -0.17471426893077599 0.26147840938106925 0.9492649607246284
- outer loop
- vertex -0.0079564359039068222 0.019208535552024841 0.097814761102199554
- vertex -0.028760623186826706 0.028760623186826706 0.091354548931121826
- vertex -0.01470157690346241 0.01470157690346241 0.097814761102199554
- endloop
- endfacet
- facet normal -0.28183684066621417 0.42179874557711361 0.86177364398829248
- outer loop
- vertex -0.015565137378871441 0.037577565759420395 0.091354548931121826
- vertex -0.022493567317724228 0.054304275661706924 0.080901697278022766
- vertex -0.041562695056200027 0.041562695056200027 0.080901697278022766
- endloop
- endfacet
- facet normal -0.28183687150574754 0.42179864590164712 0.86177368268901633
- outer loop
- vertex -0.015565137378871441 0.037577565759420395 0.091354548931121826
- vertex -0.041562695056200027 0.041562695056200027 0.080901697278022766
- vertex -0.028760623186826706 0.028760623186826706 0.091354548931121826
- endloop
- endfacet
- facet normal -0.37571865044532143 0.56230267786378618 0.73664862327622749
- outer loop
- vertex -0.022493567317724228 0.054304275661706924 0.080901697278022766
- vertex -0.028438922017812729 0.068657629191875458 0.06691306084394455
- vertex -0.052548274397850037 0.052548274397850037 0.06691306084394455
- endloop
- endfacet
- facet normal -0.37571862212216495 0.56230279592432497 0.73664854760347465
- outer loop
- vertex -0.022493567317724228 0.054304275661706924 0.080901697278022766
- vertex -0.052548274397850037 0.052548274397850037 0.06691306084394455
- vertex -0.041562695056200027 0.041562695056200027 0.080901697278022766
- endloop
- endfacet
- facet normal -0.45245040321610314 0.67713972638750908 0.5803192428116053
- outer loop
- vertex -0.028438922017812729 0.068657629191875458 0.06691306084394455
- vertex -0.033141355961561203 0.080010317265987396 0.05000000074505806
- vertex -0.061237242072820663 0.061237242072820663 0.05000000074505806
- endloop
- endfacet
- facet normal -0.4524503781983546 0.67713981980897864 0.58031915330896144
- outer loop
- vertex -0.028438922017812729 0.068657629191875458 0.06691306084394455
- vertex -0.061237242072820663 0.061237242072820663 0.05000000074505806
- vertex -0.052548274397850037 0.052548274397850037 0.06691306084394455
- endloop
- endfacet
- facet normal -0.50914415869095786 0.76198801003014671 0.40018308090319588
- outer loop
- vertex -0.033141355961561203 0.080010317265987396 0.05000000074505806
- vertex -0.036395356059074402 0.087866164743900299 0.030901700258255005
- vertex -0.067249849438667297 0.067249849438667297 0.030901700258255005
- endloop
- endfacet
- facet normal -0.50914418433618069 0.76198794657394719 0.40018316910218049
- outer loop
- vertex -0.033141355961561203 0.080010317265987396 0.05000000074505806
- vertex -0.067249849438667297 0.067249849438667297 0.030901700258255005
- vertex -0.061237242072820663 0.061237242072820663 0.05000000074505806
- endloop
- endfacet
- facet normal -0.54387724854201425 0.81396988974665174 0.20408468120903095
- outer loop
- vertex -0.036395356059074402 0.087866164743900299 0.030901700258255005
- vertex -0.038058705627918243 0.091881841421127319 0.010452846065163612
- vertex -0.070323318243026733 0.070323318243026733 0.010452846065163612
- endloop
- endfacet
- facet normal -0.54387729795136042 0.81396982149820041 0.20408482173673517
- outer loop
- vertex -0.036395356059074402 0.087866164743900299 0.030901700258255005
- vertex -0.070323318243026733 0.070323318243026733 0.010452846065163612
- vertex -0.067249849438667297 0.067249849438667297 0.030901700258255005
- endloop
- endfacet
- facet normal -0.55557020216110709 0.83146963292153175 0
- outer loop
- vertex -0.038058705627918243 0.091881841421127319 0.010452846065163612
- vertex -0.038058705627918243 0.091881841421127319 -0.010452846065163612
- vertex -0.070323318243026733 0.070323318243026733 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.55557020216110709 0.83146963292153175 0
- outer loop
- vertex -0.038058705627918243 0.091881841421127319 0.010452846065163612
- vertex -0.070323318243026733 0.070323318243026733 -0.010452846065163612
- vertex -0.070323318243026733 0.070323318243026733 0.010452846065163612
- endloop
- endfacet
- facet normal -0.54387731459104727 0.81396984640124925 -0.20408467806956454
- outer loop
- vertex -0.038058705627918243 0.091881841421127319 -0.010452846065163612
- vertex -0.036395356059074402 0.087866164743900299 -0.030901700258255005
- vertex -0.067249849438667297 0.067249849438667297 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.54387723262956311 0.81396986593198373 -0.20408481859726049
- outer loop
- vertex -0.038058705627918243 0.091881841421127319 -0.010452846065163612
- vertex -0.067249849438667297 0.067249849438667297 -0.030901700258255005
- vertex -0.070323318243026733 0.070323318243026733 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.50914420673480953 0.76198798009585644 -0.40018307677589038
- outer loop
- vertex -0.036395356059074402 0.087866164743900299 -0.030901700258255005
- vertex -0.033141355961561203 0.080010317265987396 -0.05000000074505806
- vertex -0.061237242072820663 0.061237242072820663 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.509144138294924 0.76198797950532793 -0.40018316497487411
- outer loop
- vertex -0.036395356059074402 0.087866164743900299 -0.030901700258255005
- vertex -0.061237242072820663 0.061237242072820663 -0.05000000074505806
- vertex -0.067249849438667297 0.067249849438667297 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.45245034005942358 0.67713976273003673 -0.58031924964628023
- outer loop
- vertex -0.033141355961561203 0.080010317265987396 -0.05000000074505806
- vertex -0.028438922017812729 0.068657629191875458 -0.06691306084394455
- vertex -0.052548274397850037 0.052548274397850037 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.45245043594349216 0.67713977536749692 -0.58031916014362273
- outer loop
- vertex -0.033141355961561203 0.080010317265987396 -0.05000000074505806
- vertex -0.052548274397850037 0.052548274397850037 -0.06691306084394455
- vertex -0.061237242072820663 0.061237242072820663 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.37571857098187661 0.56230271938745569 -0.7366486321095076
- outer loop
- vertex -0.028438922017812729 0.068657629191875458 -0.06691306084394455
- vertex -0.022493567317724228 0.054304275661706924 -0.080901697278022766
- vertex -0.041562695056200027 0.041562695056200027 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.37571869089438792 0.56230273840009004 -0.73664855643676341
- outer loop
- vertex -0.028438922017812729 0.068657629191875458 -0.06691306084394455
- vertex -0.041562695056200027 0.041562695056200027 -0.080901697278022766
- vertex -0.052548274397850037 0.052548274397850037 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.28183691468019506 0.42179871051676798 -0.86177363694298537
- outer loop
- vertex -0.022493567317724228 0.054304275661706924 -0.080901697278022766
- vertex -0.015565137378871441 0.037577565759420395 -0.091354548931121826
- vertex -0.028760623186826706 0.028760623186826706 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.28183681079029427 0.42179870086462851 -0.86177367564370844
- outer loop
- vertex -0.022493567317724228 0.054304275661706924 -0.080901697278022766
- vertex -0.028760623186826706 0.028760623186826706 -0.091354548931121826
- vertex -0.041562695056200027 0.041562695056200027 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.17471425703507376 0.26147839157789088 -0.94926496781800662
- outer loop
- vertex -0.015565137378871441 0.037577565759420395 -0.091354548931121826
- vertex -0.0079564359039068222 0.019208535552024841 -0.097814761102199554
- vertex -0.01470157690346241 0.01470157690346241 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.17471429029992128 0.26147838880858149 -0.94926496245835557
- outer loop
- vertex -0.015565137378871441 0.037577565759420395 -0.091354548931121826
- vertex -0.01470157690346241 0.01470157690346241 -0.097814761102199554
- vertex -0.028760623186826706 0.028760623186826706 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.26147838880858149 0.17471429029992128 0.94926496245835557
- outer loop
- vertex -0.01470157690346241 0.01470157690346241 0.097814761102199554
- vertex -0.028760623186826706 0.028760623186826706 0.091354548931121826
- vertex -0.037577565759420395 0.015565137378871441 0.091354548931121826
- endloop
- endfacet
- facet normal -0.26147839157789088 0.17471425703507376 0.94926496781800662
- outer loop
- vertex -0.01470157690346241 0.01470157690346241 0.097814761102199554
- vertex -0.037577565759420395 0.015565137378871441 0.091354548931121826
- vertex -0.019208535552024841 0.0079564359039068222 0.097814761102199554
- endloop
- endfacet
- facet normal -0.42179870086462851 0.28183681079029427 0.86177367564370844
- outer loop
- vertex -0.028760623186826706 0.028760623186826706 0.091354548931121826
- vertex -0.041562695056200027 0.041562695056200027 0.080901697278022766
- vertex -0.054304275661706924 0.022493567317724228 0.080901697278022766
- endloop
- endfacet
- facet normal -0.42179871051676798 0.28183691468019506 0.86177363694298537
- outer loop
- vertex -0.028760623186826706 0.028760623186826706 0.091354548931121826
- vertex -0.054304275661706924 0.022493567317724228 0.080901697278022766
- vertex -0.037577565759420395 0.015565137378871441 0.091354548931121826
- endloop
- endfacet
- facet normal -0.56230273840009004 0.37571869089438792 0.73664855643676341
- outer loop
- vertex -0.041562695056200027 0.041562695056200027 0.080901697278022766
- vertex -0.052548274397850037 0.052548274397850037 0.06691306084394455
- vertex -0.068657629191875458 0.028438922017812729 0.06691306084394455
- endloop
- endfacet
- facet normal -0.56230271938745569 0.37571857098187661 0.7366486321095076
- outer loop
- vertex -0.041562695056200027 0.041562695056200027 0.080901697278022766
- vertex -0.068657629191875458 0.028438922017812729 0.06691306084394455
- vertex -0.054304275661706924 0.022493567317724228 0.080901697278022766
- endloop
- endfacet
- facet normal -0.67713977536749692 0.45245043594349216 0.58031916014362273
- outer loop
- vertex -0.052548274397850037 0.052548274397850037 0.06691306084394455
- vertex -0.061237242072820663 0.061237242072820663 0.05000000074505806
- vertex -0.080010317265987396 0.033141355961561203 0.05000000074505806
- endloop
- endfacet
- facet normal -0.67713976273003673 0.45245034005942358 0.58031924964628023
- outer loop
- vertex -0.052548274397850037 0.052548274397850037 0.06691306084394455
- vertex -0.080010317265987396 0.033141355961561203 0.05000000074505806
- vertex -0.068657629191875458 0.028438922017812729 0.06691306084394455
- endloop
- endfacet
- facet normal -0.76198797950532793 0.509144138294924 0.40018316497487411
- outer loop
- vertex -0.061237242072820663 0.061237242072820663 0.05000000074505806
- vertex -0.067249849438667297 0.067249849438667297 0.030901700258255005
- vertex -0.087866164743900299 0.036395356059074402 0.030901700258255005
- endloop
- endfacet
- facet normal -0.76198798009585644 0.50914420673480953 0.40018307677589038
- outer loop
- vertex -0.061237242072820663 0.061237242072820663 0.05000000074505806
- vertex -0.087866164743900299 0.036395356059074402 0.030901700258255005
- vertex -0.080010317265987396 0.033141355961561203 0.05000000074505806
- endloop
- endfacet
- facet normal -0.81396986593198373 0.54387723262956311 0.20408481859726049
- outer loop
- vertex -0.067249849438667297 0.067249849438667297 0.030901700258255005
- vertex -0.070323318243026733 0.070323318243026733 0.010452846065163612
- vertex -0.091881841421127319 0.038058705627918243 0.010452846065163612
- endloop
- endfacet
- facet normal -0.81396984640124925 0.54387731459104727 0.20408467806956454
- outer loop
- vertex -0.067249849438667297 0.067249849438667297 0.030901700258255005
- vertex -0.091881841421127319 0.038058705627918243 0.010452846065163612
- vertex -0.087866164743900299 0.036395356059074402 0.030901700258255005
- endloop
- endfacet
- facet normal -0.83146963292153175 0.55557020216110709 0
- outer loop
- vertex -0.070323318243026733 0.070323318243026733 0.010452846065163612
- vertex -0.070323318243026733 0.070323318243026733 -0.010452846065163612
- vertex -0.091881841421127319 0.038058705627918243 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.83146963292153175 0.55557020216110709 0
- outer loop
- vertex -0.070323318243026733 0.070323318243026733 0.010452846065163612
- vertex -0.091881841421127319 0.038058705627918243 -0.010452846065163612
- vertex -0.091881841421127319 0.038058705627918243 0.010452846065163612
- endloop
- endfacet
- facet normal -0.81396982149820041 0.54387729795136042 -0.20408482173673517
- outer loop
- vertex -0.070323318243026733 0.070323318243026733 -0.010452846065163612
- vertex -0.067249849438667297 0.067249849438667297 -0.030901700258255005
- vertex -0.087866164743900299 0.036395356059074402 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.81396988974665174 0.54387724854201425 -0.20408468120903095
- outer loop
- vertex -0.070323318243026733 0.070323318243026733 -0.010452846065163612
- vertex -0.087866164743900299 0.036395356059074402 -0.030901700258255005
- vertex -0.091881841421127319 0.038058705627918243 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.76198794657394719 0.50914418433618069 -0.40018316910218049
- outer loop
- vertex -0.067249849438667297 0.067249849438667297 -0.030901700258255005
- vertex -0.061237242072820663 0.061237242072820663 -0.05000000074505806
- vertex -0.080010317265987396 0.033141355961561203 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.76198801003014671 0.50914415869095786 -0.40018308090319588
- outer loop
- vertex -0.067249849438667297 0.067249849438667297 -0.030901700258255005
- vertex -0.080010317265987396 0.033141355961561203 -0.05000000074505806
- vertex -0.087866164743900299 0.036395356059074402 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.67713981980897864 0.4524503781983546 -0.58031915330896144
- outer loop
- vertex -0.061237242072820663 0.061237242072820663 -0.05000000074505806
- vertex -0.052548274397850037 0.052548274397850037 -0.06691306084394455
- vertex -0.068657629191875458 0.028438922017812729 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.67713972638750908 0.45245040321610314 -0.5803192428116053
- outer loop
- vertex -0.061237242072820663 0.061237242072820663 -0.05000000074505806
- vertex -0.068657629191875458 0.028438922017812729 -0.06691306084394455
- vertex -0.080010317265987396 0.033141355961561203 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.56230279592432497 0.37571862212216495 -0.73664854760347465
- outer loop
- vertex -0.052548274397850037 0.052548274397850037 -0.06691306084394455
- vertex -0.041562695056200027 0.041562695056200027 -0.080901697278022766
- vertex -0.054304275661706924 0.022493567317724228 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.56230267786378618 0.37571865044532143 -0.73664862327622749
- outer loop
- vertex -0.052548274397850037 0.052548274397850037 -0.06691306084394455
- vertex -0.054304275661706924 0.022493567317724228 -0.080901697278022766
- vertex -0.068657629191875458 0.028438922017812729 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.42179864590164712 0.28183687150574754 -0.86177368268901633
- outer loop
- vertex -0.041562695056200027 0.041562695056200027 -0.080901697278022766
- vertex -0.028760623186826706 0.028760623186826706 -0.091354548931121826
- vertex -0.037577565759420395 0.015565137378871441 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.42179874557711361 0.28183684066621417 -0.86177364398829248
- outer loop
- vertex -0.041562695056200027 0.041562695056200027 -0.080901697278022766
- vertex -0.037577565759420395 0.015565137378871441 -0.091354548931121826
- vertex -0.054304275661706924 0.022493567317724228 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.26147840938106925 0.17471426893077599 -0.9492649607246284
- outer loop
- vertex -0.028760623186826706 0.028760623186826706 -0.091354548931121826
- vertex -0.01470157690346241 0.01470157690346241 -0.097814761102199554
- vertex -0.019208535552024841 0.0079564359039068222 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.26147837970812587 0.17471428421919066 -0.9492649660842799
- outer loop
- vertex -0.028760623186826706 0.028760623186826706 -0.091354548931121826
- vertex -0.019208535552024841 0.0079564359039068222 -0.097814761102199554
- vertex -0.037577565759420395 0.015565137378871441 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.30843477395835256 0.061351523138116815 0.94926496871099864
- outer loop
- vertex -0.019208535552024841 0.0079564359039068222 0.097814761102199554
- vertex -0.037577565759420395 0.015565137378871441 0.091354548931121826
- vertex -0.040673665702342987 4.9810872613503827e-18 0.091354548931121826
- endloop
- endfacet
- facet normal -0.30843476568236106 0.061351497270056773 0.94926497307189694
- outer loop
- vertex -0.019208535552024841 0.0079564359039068222 0.097814761102199554
- vertex -0.040673665702342987 4.9810872613503827e-18 0.091354548931121826
- vertex -0.020791169255971909 2.5461839345785708e-18 0.097814761102199554
- endloop
- endfacet
- facet normal -0.49754551322598684 0.098967956160755974 0.86177363960732301
- outer loop
- vertex -0.037577565759420395 0.015565137378871441 0.091354548931121826
- vertex -0.054304275661706924 0.022493567317724228 0.080901697278022766
- vertex -0.058778524398803711 7.1982936081007951e-18 0.080901697278022766
- endloop
- endfacet
- facet normal -0.49754554356199887 0.098968013678745095 0.86177361548731501
- outer loop
- vertex -0.037577565759420395 0.015565137378871441 0.091354548931121826
- vertex -0.058778524398803711 7.1982936081007951e-18 0.080901697278022766
- vertex -0.040673665702342987 4.9810872613503827e-18 0.091354548931121826
- endloop
- endfacet
- facet normal -0.6632812473181785 0.13193484346738307 0.73664861639405688
- outer loop
- vertex -0.054304275661706924 0.022493567317724228 0.080901697278022766
- vertex -0.068657629191875458 0.028438922017812729 0.06691306084394455
- vertex -0.074314482510089874 9.100899179659527e-18 0.06691306084394455
- endloop
- endfacet
- facet normal -0.66328124732023797 0.13193484347074261 0.73664861639160095
- outer loop
- vertex -0.054304275661706924 0.022493567317724228 0.080901697278022766
- vertex -0.074314482510089874 9.100899179659527e-18 0.06691306084394455
- vertex -0.058778524398803711 7.1982936081007951e-18 0.080901697278022766
- endloop
- endfacet
- facet normal -0.79874081541833841 0.15887932976663666 0.58031928139408939
- outer loop
- vertex -0.068657629191875458 0.028438922017812729 0.06691306084394455
- vertex -0.080010317265987396 0.033141355961561203 0.05000000074505806
- vertex -0.086602538824081421 1.0605752472130298e-17 0.05000000074505806
- endloop
- endfacet
- facet normal -0.79874087880382028 0.15887943951689923 0.58031916410411333
- outer loop
- vertex -0.068657629191875458 0.028438922017812729 0.06691306084394455
- vertex -0.086602538824081421 1.0605752472130298e-17 0.05000000074505806
- vertex -0.074314482510089874 9.100899179659527e-18 0.06691306084394455
- endloop
- endfacet
- facet normal -0.89882619396083963 0.1787875685955107 0.40018305607006494
- outer loop
- vertex -0.080010317265987396 0.033141355961561203 0.05000000074505806
- vertex -0.087866164743900299 0.036395356059074402 0.030901700258255005
- vertex -0.095105648040771484 1.1647083527828404e-17 0.030901700258255005
- endloop
- endfacet
- facet normal -0.89882617942320453 0.17878753433762085 0.40018310402734325
- outer loop
- vertex -0.080010317265987396 0.033141355961561203 0.05000000074505806
- vertex -0.095105648040771484 1.1647083527828404e-17 0.030901700258255005
- vertex -0.086602538824081421 1.0605752472130298e-17 0.05000000074505806
- endloop
- endfacet
- facet normal -0.96014292559861558 0.19098433878695759 0.20408465096875852
- outer loop
- vertex -0.087866164743900299 0.036395356059074402 0.030901700258255005
- vertex -0.091881841421127319 0.038058705627918243 0.010452846065163612
- vertex -0.099452190101146698 1.2179380869451178e-17 0.010452846065163612
- endloop
- endfacet
- facet normal -0.96014290587992079 0.19098421563577436 0.20408485898382991
- outer loop
- vertex -0.087866164743900299 0.036395356059074402 0.030901700258255005
- vertex -0.099452190101146698 1.2179380869451178e-17 0.010452846065163612
- vertex -0.095105648040771484 1.1647083527828404e-17 0.030901700258255005
- endloop
- endfacet
- facet normal -0.98078527328214271 0.19509035781625053 0
- outer loop
- vertex -0.091881841421127319 0.038058705627918243 0.010452846065163612
- vertex -0.091881841421127319 0.038058705627918243 -0.010452846065163612
- vertex -0.099452190101146698 1.2179380869451178e-17 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.98078527328214271 0.19509035781625053 0
- outer loop
- vertex -0.091881841421127319 0.038058705627918243 0.010452846065163612
- vertex -0.099452190101146698 1.2179380869451178e-17 -0.010452846065163612
- vertex -0.099452190101146698 1.2179380869451178e-17 0.010452846065163612
- endloop
- endfacet
- facet normal -0.9601429493622694 0.19098422428494752 -0.20408464632156814
- outer loop
- vertex -0.091881841421127319 0.038058705627918243 -0.010452846065163612
- vertex -0.087866164743900299 0.036395356059074402 -0.030901700258255005
- vertex -0.095105648040771484 1.1647083527828404e-17 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.96014288401665793 0.19098433051579036 -0.20408485433664575
- outer loop
- vertex -0.091881841421127319 0.038058705627918243 -0.010452846065163612
- vertex -0.095105648040771484 1.1647083527828404e-17 -0.030901700258255005
- vertex -0.099452190101146698 1.2179380869451178e-17 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.89882620092364052 0.17878753861432084 -0.40018305382588126
- outer loop
- vertex -0.087866164743900299 0.036395356059074402 -0.030901700258255005
- vertex -0.080010317265987396 0.033141355961561203 -0.05000000074505806
- vertex -0.086602538824081421 1.0605752472130298e-17 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.89882617438269374 0.17878756470117704 -0.4001831017831638
- outer loop
- vertex -0.087866164743900299 0.036395356059074402 -0.030901700258255005
- vertex -0.086602538824081421 1.0605752472130298e-17 -0.05000000074505806
- vertex -0.095105648040771484 1.1647083527828404e-17 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.79874079057134661 0.15887942196636898 -0.58031929035065921
- outer loop
- vertex -0.080010317265987396 0.033141355961561203 -0.05000000074505806
- vertex -0.068657629191875458 0.028438922017812729 -0.06691306084394455
- vertex -0.074314482510089874 9.100899179659527e-18 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.79874089113149138 0.15887934482690999 -0.58031917306068981
- outer loop
- vertex -0.080010317265987396 0.033141355961561203 -0.05000000074505806
- vertex -0.074314482510089874 9.100899179659527e-18 -0.06691306084394455
- vertex -0.086602538824081421 1.0605752472130298e-17 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.66328124731730775 0.13193484347015974 -0.73664861639434365
- outer loop
- vertex -0.068657629191875458 0.028438922017812729 -0.06691306084394455
- vertex -0.054304275661706924 0.022493567317724228 -0.080901697278022766
- vertex -0.058778524398803711 7.1982936081007951e-18 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.66328124732049609 0.13193484346784407 -0.7366486163918875
- outer loop
- vertex -0.068657629191875458 0.028438922017812729 -0.06691306084394455
- vertex -0.058778524398803711 7.1982936081007951e-18 -0.080901697278022766
- vertex -0.074314482510089874 9.100899179659527e-18 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.49754549605911413 0.09896800422982889 -0.86177364399826861
- outer loop
- vertex -0.054304275661706924 0.022493567317724228 -0.080901697278022766
- vertex -0.037577565759420395 0.015565137378871441 -0.091354548931121826
- vertex -0.040673665702342987 4.9810872613503827e-18 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.49754554609711604 0.098967962699230111 -0.86177361987826384
- outer loop
- vertex -0.054304275661706924 0.022493567317724228 -0.080901697278022766
- vertex -0.040673665702342987 4.9810872613503827e-18 -0.091354548931121826
- vertex -0.058778524398803711 7.1982936081007951e-18 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.30843478276930947 0.061351500668862552 -0.94926496730034626
- outer loop
- vertex -0.037577565759420395 0.015565137378871441 -0.091354548931121826
- vertex -0.019208535552024841 0.0079564359039068222 -0.097814761102199554
- vertex -0.020791169255971909 2.5461839345785708e-18 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.30843476522401231 0.061351521400747615 -0.94926497166124379
- outer loop
- vertex -0.037577565759420395 0.015565137378871441 -0.091354548931121826
- vertex -0.020791169255971909 2.5461839345785708e-18 -0.097814761102199554
- vertex -0.040673665702342987 4.9810872613503827e-18 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.30843476522401225 -0.061351521400747573 0.94926497166124379
- outer loop
- vertex -0.020791169255971909 2.5461839345785708e-18 0.097814761102199554
- vertex -0.040673665702342987 4.9810872613503827e-18 0.091354548931121826
- vertex -0.037577565759420395 -0.015565137378871441 0.091354548931121826
- endloop
- endfacet
- facet normal -0.30843478276930947 -0.061351500668862524 0.94926496730034626
- outer loop
- vertex -0.020791169255971909 2.5461839345785708e-18 0.097814761102199554
- vertex -0.037577565759420395 -0.015565137378871441 0.091354548931121826
- vertex -0.019208535552024841 -0.0079564359039068222 0.097814761102199554
- endloop
- endfacet
- facet normal -0.49754554609711604 -0.098967962699230055 0.86177361987826384
- outer loop
- vertex -0.040673665702342987 4.9810872613503827e-18 0.091354548931121826
- vertex -0.058778524398803711 7.1982936081007951e-18 0.080901697278022766
- vertex -0.054304275661706924 -0.022493567317724228 0.080901697278022766
- endloop
- endfacet
- facet normal -0.49754549605911413 -0.098968004229828835 0.86177364399826861
- outer loop
- vertex -0.040673665702342987 4.9810872613503827e-18 0.091354548931121826
- vertex -0.054304275661706924 -0.022493567317724228 0.080901697278022766
- vertex -0.037577565759420395 -0.015565137378871441 0.091354548931121826
- endloop
- endfacet
- facet normal -0.6632812473204962 -0.13193484346784398 0.7366486163918875
- outer loop
- vertex -0.058778524398803711 7.1982936081007951e-18 0.080901697278022766
- vertex -0.074314482510089874 9.100899179659527e-18 0.06691306084394455
- vertex -0.068657629191875458 -0.028438922017812729 0.06691306084394455
- endloop
- endfacet
- facet normal -0.66328124731730786 -0.13193484347015966 0.73664861639434365
- outer loop
- vertex -0.058778524398803711 7.1982936081007951e-18 0.080901697278022766
- vertex -0.068657629191875458 -0.028438922017812729 0.06691306084394455
- vertex -0.054304275661706924 -0.022493567317724228 0.080901697278022766
- endloop
- endfacet
- facet normal -0.79874089113149138 -0.15887934482690988 0.58031917306068992
- outer loop
- vertex -0.074314482510089874 9.100899179659527e-18 0.06691306084394455
- vertex -0.086602538824081421 1.0605752472130298e-17 0.05000000074505806
- vertex -0.080010317265987396 -0.033141355961561203 0.05000000074505806
- endloop
- endfacet
- facet normal -0.79874079057134661 -0.15887942196636889 0.58031929035065921
- outer loop
- vertex -0.074314482510089874 9.100899179659527e-18 0.06691306084394455
- vertex -0.080010317265987396 -0.033141355961561203 0.05000000074505806
- vertex -0.068657629191875458 -0.028438922017812729 0.06691306084394455
- endloop
- endfacet
- facet normal -0.89882617438269374 -0.17878756470117693 0.4001831017831638
- outer loop
- vertex -0.086602538824081421 1.0605752472130298e-17 0.05000000074505806
- vertex -0.095105648040771484 1.1647083527828404e-17 0.030901700258255005
- vertex -0.087866164743900299 -0.036395356059074402 0.030901700258255005
- endloop
- endfacet
- facet normal -0.89882620092364052 -0.17878753861432073 0.40018305382588132
- outer loop
- vertex -0.086602538824081421 1.0605752472130298e-17 0.05000000074505806
- vertex -0.087866164743900299 -0.036395356059074402 0.030901700258255005
- vertex -0.080010317265987396 -0.033141355961561203 0.05000000074505806
- endloop
- endfacet
- facet normal -0.96014288401665793 -0.19098433051579022 0.20408485433664572
- outer loop
- vertex -0.095105648040771484 1.1647083527828404e-17 0.030901700258255005
- vertex -0.099452190101146698 1.2179380869451178e-17 0.010452846065163612
- vertex -0.091881841421127319 -0.038058705627918243 0.010452846065163612
- endloop
- endfacet
- facet normal -0.9601429493622694 -0.19098422428494735 0.20408464632156811
- outer loop
- vertex -0.095105648040771484 1.1647083527828404e-17 0.030901700258255005
- vertex -0.091881841421127319 -0.038058705627918243 0.010452846065163612
- vertex -0.087866164743900299 -0.036395356059074402 0.030901700258255005
- endloop
- endfacet
- facet normal -0.98078527328214282 -0.19509035781625039 0
- outer loop
- vertex -0.099452190101146698 1.2179380869451178e-17 0.010452846065163612
- vertex -0.099452190101146698 1.2179380869451178e-17 -0.010452846065163612
- vertex -0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.98078527328214282 -0.19509035781625039 0
- outer loop
- vertex -0.099452190101146698 1.2179380869451178e-17 0.010452846065163612
- vertex -0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- vertex -0.091881841421127319 -0.038058705627918243 0.010452846065163612
- endloop
- endfacet
- facet normal -0.96014290587992079 -0.1909842156357742 -0.20408485898382989
- outer loop
- vertex -0.099452190101146698 1.2179380869451178e-17 -0.010452846065163612
- vertex -0.095105648040771484 1.1647083527828404e-17 -0.030901700258255005
- vertex -0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.96014292559861558 -0.19098433878695742 -0.2040846509687585
- outer loop
- vertex -0.099452190101146698 1.2179380869451178e-17 -0.010452846065163612
- vertex -0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- vertex -0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.89882617942320464 -0.17878753433762073 -0.40018310402734331
- outer loop
- vertex -0.095105648040771484 1.1647083527828404e-17 -0.030901700258255005
- vertex -0.086602538824081421 1.0605752472130298e-17 -0.05000000074505806
- vertex -0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.89882619396083963 -0.17878756859551059 -0.40018305607006494
- outer loop
- vertex -0.095105648040771484 1.1647083527828404e-17 -0.030901700258255005
- vertex -0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- vertex -0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.79874087880382028 -0.15887943951689912 -0.58031916410411333
- outer loop
- vertex -0.086602538824081421 1.0605752472130298e-17 -0.05000000074505806
- vertex -0.074314482510089874 9.100899179659527e-18 -0.06691306084394455
- vertex -0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.79874081541833841 -0.15887932976663655 -0.58031928139408928
- outer loop
- vertex -0.086602538824081421 1.0605752472130298e-17 -0.05000000074505806
- vertex -0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- vertex -0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.66328124732023808 -0.1319348434707425 -0.73664861639160084
- outer loop
- vertex -0.074314482510089874 9.100899179659527e-18 -0.06691306084394455
- vertex -0.058778524398803711 7.1982936081007951e-18 -0.080901697278022766
- vertex -0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.6632812473181785 -0.13193484346738299 -0.73664861639405688
- outer loop
- vertex -0.074314482510089874 9.100899179659527e-18 -0.06691306084394455
- vertex -0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- vertex -0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.49754554356199887 -0.098968013678745026 -0.86177361548731501
- outer loop
- vertex -0.058778524398803711 7.1982936081007951e-18 -0.080901697278022766
- vertex -0.040673665702342987 4.9810872613503827e-18 -0.091354548931121826
- vertex -0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.49754551322598689 -0.098967956160755918 -0.86177363960732289
- outer loop
- vertex -0.058778524398803711 7.1982936081007951e-18 -0.080901697278022766
- vertex -0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- vertex -0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.30843476568236111 -0.061351497270056739 -0.94926497307189694
- outer loop
- vertex -0.040673665702342987 4.9810872613503827e-18 -0.091354548931121826
- vertex -0.020791169255971909 2.5461839345785708e-18 -0.097814761102199554
- vertex -0.019208535552024841 -0.0079564359039068222 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.3084347739583525 -0.06135152313811678 -0.94926496871099864
- outer loop
- vertex -0.040673665702342987 4.9810872613503827e-18 -0.091354548931121826
- vertex -0.019208535552024841 -0.0079564359039068222 -0.097814761102199554
- vertex -0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.26147837970812587 -0.17471428421919066 0.9492649660842799
- outer loop
- vertex -0.019208535552024841 -0.0079564359039068222 0.097814761102199554
- vertex -0.037577565759420395 -0.015565137378871441 0.091354548931121826
- vertex -0.028760623186826706 -0.028760623186826706 0.091354548931121826
- endloop
- endfacet
- facet normal -0.26147840938106925 -0.17471426893077599 0.9492649607246284
- outer loop
- vertex -0.019208535552024841 -0.0079564359039068222 0.097814761102199554
- vertex -0.028760623186826706 -0.028760623186826706 0.091354548931121826
- vertex -0.01470157690346241 -0.01470157690346241 0.097814761102199554
- endloop
- endfacet
- facet normal -0.42179874557711361 -0.28183684066621417 0.86177364398829248
- outer loop
- vertex -0.037577565759420395 -0.015565137378871441 0.091354548931121826
- vertex -0.054304275661706924 -0.022493567317724228 0.080901697278022766
- vertex -0.041562695056200027 -0.041562695056200027 0.080901697278022766
- endloop
- endfacet
- facet normal -0.42179864590164712 -0.28183687150574754 0.86177368268901633
- outer loop
- vertex -0.037577565759420395 -0.015565137378871441 0.091354548931121826
- vertex -0.041562695056200027 -0.041562695056200027 0.080901697278022766
- vertex -0.028760623186826706 -0.028760623186826706 0.091354548931121826
- endloop
- endfacet
- facet normal -0.56230267786378618 -0.37571865044532143 0.73664862327622749
- outer loop
- vertex -0.054304275661706924 -0.022493567317724228 0.080901697278022766
- vertex -0.068657629191875458 -0.028438922017812729 0.06691306084394455
- vertex -0.052548274397850037 -0.052548274397850037 0.06691306084394455
- endloop
- endfacet
- facet normal -0.56230279592432497 -0.37571862212216495 0.73664854760347465
- outer loop
- vertex -0.054304275661706924 -0.022493567317724228 0.080901697278022766
- vertex -0.052548274397850037 -0.052548274397850037 0.06691306084394455
- vertex -0.041562695056200027 -0.041562695056200027 0.080901697278022766
- endloop
- endfacet
- facet normal -0.67713972638750908 -0.45245040321610314 0.5803192428116053
- outer loop
- vertex -0.068657629191875458 -0.028438922017812729 0.06691306084394455
- vertex -0.080010317265987396 -0.033141355961561203 0.05000000074505806
- vertex -0.061237242072820663 -0.061237242072820663 0.05000000074505806
- endloop
- endfacet
- facet normal -0.67713981980897864 -0.4524503781983546 0.58031915330896144
- outer loop
- vertex -0.068657629191875458 -0.028438922017812729 0.06691306084394455
- vertex -0.061237242072820663 -0.061237242072820663 0.05000000074505806
- vertex -0.052548274397850037 -0.052548274397850037 0.06691306084394455
- endloop
- endfacet
- facet normal -0.76198801003014671 -0.50914415869095786 0.40018308090319588
- outer loop
- vertex -0.080010317265987396 -0.033141355961561203 0.05000000074505806
- vertex -0.087866164743900299 -0.036395356059074402 0.030901700258255005
- vertex -0.067249849438667297 -0.067249849438667297 0.030901700258255005
- endloop
- endfacet
- facet normal -0.76198794657394719 -0.50914418433618069 0.40018316910218049
- outer loop
- vertex -0.080010317265987396 -0.033141355961561203 0.05000000074505806
- vertex -0.067249849438667297 -0.067249849438667297 0.030901700258255005
- vertex -0.061237242072820663 -0.061237242072820663 0.05000000074505806
- endloop
- endfacet
- facet normal -0.81396988974665174 -0.54387724854201425 0.20408468120903095
- outer loop
- vertex -0.087866164743900299 -0.036395356059074402 0.030901700258255005
- vertex -0.091881841421127319 -0.038058705627918243 0.010452846065163612
- vertex -0.070323318243026733 -0.070323318243026733 0.010452846065163612
- endloop
- endfacet
- facet normal -0.81396982149820041 -0.54387729795136042 0.20408482173673517
- outer loop
- vertex -0.087866164743900299 -0.036395356059074402 0.030901700258255005
- vertex -0.070323318243026733 -0.070323318243026733 0.010452846065163612
- vertex -0.067249849438667297 -0.067249849438667297 0.030901700258255005
- endloop
- endfacet
- facet normal -0.83146963292153175 -0.55557020216110709 0
- outer loop
- vertex -0.091881841421127319 -0.038058705627918243 0.010452846065163612
- vertex -0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- vertex -0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.83146963292153175 -0.55557020216110709 0
- outer loop
- vertex -0.091881841421127319 -0.038058705627918243 0.010452846065163612
- vertex -0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- vertex -0.070323318243026733 -0.070323318243026733 0.010452846065163612
- endloop
- endfacet
- facet normal -0.81396984640124925 -0.54387731459104727 -0.20408467806956454
- outer loop
- vertex -0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- vertex -0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- vertex -0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.81396986593198373 -0.54387723262956311 -0.20408481859726049
- outer loop
- vertex -0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- vertex -0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- vertex -0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.76198798009585644 -0.50914420673480953 -0.40018307677589038
- outer loop
- vertex -0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- vertex -0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- vertex -0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.76198797950532793 -0.509144138294924 -0.40018316497487411
- outer loop
- vertex -0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- vertex -0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- vertex -0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.67713976273003673 -0.45245034005942358 -0.58031924964628023
- outer loop
- vertex -0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- vertex -0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- vertex -0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.67713977536749692 -0.45245043594349216 -0.58031916014362273
- outer loop
- vertex -0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- vertex -0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- vertex -0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.56230271938745569 -0.37571857098187661 -0.7366486321095076
- outer loop
- vertex -0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- vertex -0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- vertex -0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.56230273840009004 -0.37571869089438792 -0.73664855643676341
- outer loop
- vertex -0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- vertex -0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- vertex -0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.42179871051676798 -0.28183691468019506 -0.86177363694298537
- outer loop
- vertex -0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- vertex -0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- vertex -0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.42179870086462851 -0.28183681079029427 -0.86177367564370844
- outer loop
- vertex -0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- vertex -0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- vertex -0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.26147839157789088 -0.17471425703507376 -0.94926496781800662
- outer loop
- vertex -0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- vertex -0.019208535552024841 -0.0079564359039068222 -0.097814761102199554
- vertex -0.01470157690346241 -0.01470157690346241 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.26147838880858149 -0.17471429029992128 -0.94926496245835557
- outer loop
- vertex -0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- vertex -0.01470157690346241 -0.01470157690346241 -0.097814761102199554
- vertex -0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.17471429029992128 -0.26147838880858149 0.94926496245835557
- outer loop
- vertex -0.01470157690346241 -0.01470157690346241 0.097814761102199554
- vertex -0.028760623186826706 -0.028760623186826706 0.091354548931121826
- vertex -0.015565137378871441 -0.037577565759420395 0.091354548931121826
- endloop
- endfacet
- facet normal -0.17471425703507376 -0.26147839157789088 0.94926496781800662
- outer loop
- vertex -0.01470157690346241 -0.01470157690346241 0.097814761102199554
- vertex -0.015565137378871441 -0.037577565759420395 0.091354548931121826
- vertex -0.0079564359039068222 -0.019208535552024841 0.097814761102199554
- endloop
- endfacet
- facet normal -0.28183681079029427 -0.42179870086462851 0.86177367564370844
- outer loop
- vertex -0.028760623186826706 -0.028760623186826706 0.091354548931121826
- vertex -0.041562695056200027 -0.041562695056200027 0.080901697278022766
- vertex -0.022493567317724228 -0.054304275661706924 0.080901697278022766
- endloop
- endfacet
- facet normal -0.28183691468019506 -0.42179871051676798 0.86177363694298537
- outer loop
- vertex -0.028760623186826706 -0.028760623186826706 0.091354548931121826
- vertex -0.022493567317724228 -0.054304275661706924 0.080901697278022766
- vertex -0.015565137378871441 -0.037577565759420395 0.091354548931121826
- endloop
- endfacet
- facet normal -0.37571869089438792 -0.56230273840009004 0.73664855643676341
- outer loop
- vertex -0.041562695056200027 -0.041562695056200027 0.080901697278022766
- vertex -0.052548274397850037 -0.052548274397850037 0.06691306084394455
- vertex -0.028438922017812729 -0.068657629191875458 0.06691306084394455
- endloop
- endfacet
- facet normal -0.37571857098187661 -0.56230271938745569 0.7366486321095076
- outer loop
- vertex -0.041562695056200027 -0.041562695056200027 0.080901697278022766
- vertex -0.028438922017812729 -0.068657629191875458 0.06691306084394455
- vertex -0.022493567317724228 -0.054304275661706924 0.080901697278022766
- endloop
- endfacet
- facet normal -0.45245043594349216 -0.67713977536749692 0.58031916014362273
- outer loop
- vertex -0.052548274397850037 -0.052548274397850037 0.06691306084394455
- vertex -0.061237242072820663 -0.061237242072820663 0.05000000074505806
- vertex -0.033141355961561203 -0.080010317265987396 0.05000000074505806
- endloop
- endfacet
- facet normal -0.45245034005942358 -0.67713976273003673 0.58031924964628023
- outer loop
- vertex -0.052548274397850037 -0.052548274397850037 0.06691306084394455
- vertex -0.033141355961561203 -0.080010317265987396 0.05000000074505806
- vertex -0.028438922017812729 -0.068657629191875458 0.06691306084394455
- endloop
- endfacet
- facet normal -0.509144138294924 -0.76198797950532793 0.40018316497487411
- outer loop
- vertex -0.061237242072820663 -0.061237242072820663 0.05000000074505806
- vertex -0.067249849438667297 -0.067249849438667297 0.030901700258255005
- vertex -0.036395356059074402 -0.087866164743900299 0.030901700258255005
- endloop
- endfacet
- facet normal -0.50914420673480953 -0.76198798009585644 0.40018307677589038
- outer loop
- vertex -0.061237242072820663 -0.061237242072820663 0.05000000074505806
- vertex -0.036395356059074402 -0.087866164743900299 0.030901700258255005
- vertex -0.033141355961561203 -0.080010317265987396 0.05000000074505806
- endloop
- endfacet
- facet normal -0.54387723262956311 -0.81396986593198373 0.20408481859726049
- outer loop
- vertex -0.067249849438667297 -0.067249849438667297 0.030901700258255005
- vertex -0.070323318243026733 -0.070323318243026733 0.010452846065163612
- vertex -0.038058705627918243 -0.091881841421127319 0.010452846065163612
- endloop
- endfacet
- facet normal -0.54387731459104727 -0.81396984640124925 0.20408467806956454
- outer loop
- vertex -0.067249849438667297 -0.067249849438667297 0.030901700258255005
- vertex -0.038058705627918243 -0.091881841421127319 0.010452846065163612
- vertex -0.036395356059074402 -0.087866164743900299 0.030901700258255005
- endloop
- endfacet
- facet normal -0.55557020216110709 -0.83146963292153175 0
- outer loop
- vertex -0.070323318243026733 -0.070323318243026733 0.010452846065163612
- vertex -0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- vertex -0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.55557020216110709 -0.83146963292153175 0
- outer loop
- vertex -0.070323318243026733 -0.070323318243026733 0.010452846065163612
- vertex -0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- vertex -0.038058705627918243 -0.091881841421127319 0.010452846065163612
- endloop
- endfacet
- facet normal -0.54387729795136042 -0.81396982149820041 -0.20408482173673517
- outer loop
- vertex -0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- vertex -0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- vertex -0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.54387724854201425 -0.81396988974665174 -0.20408468120903095
- outer loop
- vertex -0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- vertex -0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- vertex -0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.50914418433618069 -0.76198794657394719 -0.40018316910218049
- outer loop
- vertex -0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- vertex -0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- vertex -0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.50914415869095786 -0.76198801003014671 -0.40018308090319588
- outer loop
- vertex -0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- vertex -0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- vertex -0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.4524503781983546 -0.67713981980897864 -0.58031915330896144
- outer loop
- vertex -0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- vertex -0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- vertex -0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.45245040321610314 -0.67713972638750908 -0.5803192428116053
- outer loop
- vertex -0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- vertex -0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- vertex -0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.37571862212216495 -0.56230279592432497 -0.73664854760347465
- outer loop
- vertex -0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- vertex -0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- vertex -0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.37571865044532143 -0.56230267786378618 -0.73664862327622749
- outer loop
- vertex -0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- vertex -0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- vertex -0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.28183687150574754 -0.42179864590164712 -0.86177368268901633
- outer loop
- vertex -0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- vertex -0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- vertex -0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.28183684066621417 -0.42179874557711361 -0.86177364398829248
- outer loop
- vertex -0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- vertex -0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- vertex -0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.17471426893077599 -0.26147840938106925 -0.9492649607246284
- outer loop
- vertex -0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- vertex -0.01470157690346241 -0.01470157690346241 -0.097814761102199554
- vertex -0.0079564359039068222 -0.019208535552024841 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.17471428421919066 -0.26147837970812587 -0.9492649660842799
- outer loop
- vertex -0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- vertex -0.0079564359039068222 -0.019208535552024841 -0.097814761102199554
- vertex -0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.061351523138116815 -0.3084347739583525 0.94926496871099864
- outer loop
- vertex -0.0079564359039068222 -0.019208535552024841 0.097814761102199554
- vertex -0.015565137378871441 -0.037577565759420395 0.091354548931121826
- vertex -7.4716313056158803e-18 -0.040673665702342987 0.091354548931121826
- endloop
- endfacet
- facet normal -0.061351497270056773 -0.308434765682361 0.94926497307189694
- outer loop
- vertex -0.0079564359039068222 -0.019208535552024841 0.097814761102199554
- vertex -7.4716313056158803e-18 -0.040673665702342987 0.091354548931121826
- vertex -3.819275695072703e-18 -0.020791169255971909 0.097814761102199554
- endloop
- endfacet
- facet normal -0.098967956160755974 -0.49754551322598678 0.86177363960732289
- outer loop
- vertex -0.015565137378871441 -0.037577565759420395 0.091354548931121826
- vertex -0.022493567317724228 -0.054304275661706924 0.080901697278022766
- vertex -1.0797439998560886e-17 -0.058778524398803711 0.080901697278022766
- endloop
- endfacet
- facet normal -0.098968013678745109 -0.49754554356199887 0.86177361548731501
- outer loop
- vertex -0.015565137378871441 -0.037577565759420395 0.091354548931121826
- vertex -1.0797439998560886e-17 -0.058778524398803711 0.080901697278022766
- vertex -7.4716313056158803e-18 -0.040673665702342987 0.091354548931121826
- endloop
- endfacet
- facet normal -0.1319348434673831 -0.6632812473181785 0.73664861639405688
- outer loop
- vertex -0.022493567317724228 -0.054304275661706924 0.080901697278022766
- vertex -0.028438922017812729 -0.068657629191875458 0.06691306084394455
- vertex -1.3651348769489291e-17 -0.074314482510089874 0.06691306084394455
- endloop
- endfacet
- facet normal -0.13193484347074261 -0.66328124732023797 0.73664861639160084
- outer loop
- vertex -0.022493567317724228 -0.054304275661706924 0.080901697278022766
- vertex -1.3651348769489291e-17 -0.074314482510089874 0.06691306084394455
- vertex -1.0797439998560886e-17 -0.058778524398803711 0.080901697278022766
- endloop
- endfacet
- facet normal -0.15887932976663666 -0.79874081541833841 0.58031928139408939
- outer loop
- vertex -0.028438922017812729 -0.068657629191875458 0.06691306084394455
- vertex -0.033141355961561203 -0.080010317265987396 0.05000000074505806
- vertex -1.5908628708195447e-17 -0.086602538824081421 0.05000000074505806
- endloop
- endfacet
- facet normal -0.15887943951689926 -0.79874087880382028 0.58031916410411333
- outer loop
- vertex -0.028438922017812729 -0.068657629191875458 0.06691306084394455
- vertex -1.5908628708195447e-17 -0.086602538824081421 0.05000000074505806
- vertex -1.3651348769489291e-17 -0.074314482510089874 0.06691306084394455
- endloop
- endfacet
- facet normal -0.17878756859551073 -0.89882619396083951 0.40018305607006494
- outer loop
- vertex -0.033141355961561203 -0.080010317265987396 0.05000000074505806
- vertex -0.036395356059074402 -0.087866164743900299 0.030901700258255005
- vertex -1.7470625291742606e-17 -0.095105648040771484 0.030901700258255005
- endloop
- endfacet
- facet normal -0.1787875343376209 -0.89882617942320453 0.40018310402734331
- outer loop
- vertex -0.033141355961561203 -0.080010317265987396 0.05000000074505806
- vertex -1.7470625291742606e-17 -0.095105648040771484 0.030901700258255005
- vertex -1.5908628708195447e-17 -0.086602538824081421 0.05000000074505806
- endloop
- endfacet
- facet normal -0.19098433878695761 -0.96014292559861558 0.20408465096875852
- outer loop
- vertex -0.036395356059074402 -0.087866164743900299 0.030901700258255005
- vertex -0.038058705627918243 -0.091881841421127319 0.010452846065163612
- vertex -1.8269071304176767e-17 -0.099452190101146698 0.010452846065163612
- endloop
- endfacet
- facet normal -0.19098421563577436 -0.96014290587992068 0.20408485898382989
- outer loop
- vertex -0.036395356059074402 -0.087866164743900299 0.030901700258255005
- vertex -1.8269071304176767e-17 -0.099452190101146698 0.010452846065163612
- vertex -1.7470625291742606e-17 -0.095105648040771484 0.030901700258255005
- endloop
- endfacet
- facet normal -0.19509035781625056 -0.98078527328214271 0
- outer loop
- vertex -0.038058705627918243 -0.091881841421127319 0.010452846065163612
- vertex -0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- vertex -1.8269071304176767e-17 -0.099452190101146698 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.19509035781625056 -0.98078527328214271 0
- outer loop
- vertex -0.038058705627918243 -0.091881841421127319 0.010452846065163612
- vertex -1.8269071304176767e-17 -0.099452190101146698 -0.010452846065163612
- vertex -1.8269071304176767e-17 -0.099452190101146698 0.010452846065163612
- endloop
- endfacet
- facet normal -0.19098422428494752 -0.9601429493622694 -0.20408464632156814
- outer loop
- vertex -0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- vertex -0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- vertex -1.7470625291742606e-17 -0.095105648040771484 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.19098433051579039 -0.96014288401665793 -0.20408485433664575
- outer loop
- vertex -0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- vertex -1.7470625291742606e-17 -0.095105648040771484 -0.030901700258255005
- vertex -1.8269071304176767e-17 -0.099452190101146698 -0.010452846065163612
- endloop
- endfacet
- facet normal -0.17878753861432084 -0.89882620092364052 -0.40018305382588126
- outer loop
- vertex -0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- vertex -0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- vertex -1.5908628708195447e-17 -0.086602538824081421 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.17878756470117704 -0.89882617438269374 -0.4001831017831638
- outer loop
- vertex -0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- vertex -1.5908628708195447e-17 -0.086602538824081421 -0.05000000074505806
- vertex -1.7470625291742606e-17 -0.095105648040771484 -0.030901700258255005
- endloop
- endfacet
- facet normal -0.15887942196636901 -0.79874079057134661 -0.58031929035065921
- outer loop
- vertex -0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- vertex -0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- vertex -1.3651348769489291e-17 -0.074314482510089874 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.15887934482690999 -0.79874089113149138 -0.58031917306068981
- outer loop
- vertex -0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- vertex -1.3651348769489291e-17 -0.074314482510089874 -0.06691306084394455
- vertex -1.5908628708195447e-17 -0.086602538824081421 -0.05000000074505806
- endloop
- endfacet
- facet normal -0.13193484347015974 -0.66328124731730775 -0.73664861639434354
- outer loop
- vertex -0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- vertex -0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- vertex -1.0797439998560886e-17 -0.058778524398803711 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.13193484346784412 -0.66328124732049609 -0.73664861639188761
- outer loop
- vertex -0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- vertex -1.0797439998560886e-17 -0.058778524398803711 -0.080901697278022766
- vertex -1.3651348769489291e-17 -0.074314482510089874 -0.06691306084394455
- endloop
- endfacet
- facet normal -0.098968004229828904 -0.49754549605911413 -0.86177364399826872
- outer loop
- vertex -0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- vertex -0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- vertex -7.4716313056158803e-18 -0.040673665702342987 -0.091354548931121826
- endloop
- endfacet
- facet normal -0.098967962699230125 -0.49754554609711599 -0.86177361987826384
- outer loop
- vertex -0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- vertex -7.4716313056158803e-18 -0.040673665702342987 -0.091354548931121826
- vertex -1.0797439998560886e-17 -0.058778524398803711 -0.080901697278022766
- endloop
- endfacet
- facet normal -0.061351500668862566 -0.30843478276930947 -0.94926496730034626
- outer loop
- vertex -0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- vertex -0.0079564359039068222 -0.019208535552024841 -0.097814761102199554
- vertex -3.819275695072703e-18 -0.020791169255971909 -0.097814761102199554
- endloop
- endfacet
- facet normal -0.061351521400747615 -0.3084347652240122 -0.94926497166124379
- outer loop
- vertex -0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- vertex -3.819275695072703e-18 -0.020791169255971909 -0.097814761102199554
- vertex -7.4716313056158803e-18 -0.040673665702342987 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.061351521400747566 -0.30843476522401225 0.94926497166124391
- outer loop
- vertex -3.819275695072703e-18 -0.020791169255971909 0.097814761102199554
- vertex -7.4716313056158803e-18 -0.040673665702342987 0.091354548931121826
- vertex 0.015565137378871441 -0.037577565759420395 0.091354548931121826
- endloop
- endfacet
- facet normal 0.06135150066886251 -0.30843478276930952 0.94926496730034615
- outer loop
- vertex -3.819275695072703e-18 -0.020791169255971909 0.097814761102199554
- vertex 0.015565137378871441 -0.037577565759420395 0.091354548931121826
- vertex 0.0079564359039068222 -0.019208535552024841 0.097814761102199554
- endloop
- endfacet
- facet normal 0.098967962699230042 -0.49754554609711604 0.86177361987826384
- outer loop
- vertex -7.4716313056158803e-18 -0.040673665702342987 0.091354548931121826
- vertex -1.0797439998560886e-17 -0.058778524398803711 0.080901697278022766
- vertex 0.022493567317724228 -0.054304275661706924 0.080901697278022766
- endloop
- endfacet
- facet normal 0.098968004229828821 -0.49754549605911419 0.86177364399826872
- outer loop
- vertex -7.4716313056158803e-18 -0.040673665702342987 0.091354548931121826
- vertex 0.022493567317724228 -0.054304275661706924 0.080901697278022766
- vertex 0.015565137378871441 -0.037577565759420395 0.091354548931121826
- endloop
- endfacet
- facet normal 0.13193484346784395 -0.6632812473204962 0.7366486163918875
- outer loop
- vertex -1.0797439998560886e-17 -0.058778524398803711 0.080901697278022766
- vertex -1.3651348769489291e-17 -0.074314482510089874 0.06691306084394455
- vertex 0.028438922017812729 -0.068657629191875458 0.06691306084394455
- endloop
- endfacet
- facet normal 0.13193484347015963 -0.66328124731730786 0.73664861639434354
- outer loop
- vertex -1.0797439998560886e-17 -0.058778524398803711 0.080901697278022766
- vertex 0.028438922017812729 -0.068657629191875458 0.06691306084394455
- vertex 0.022493567317724228 -0.054304275661706924 0.080901697278022766
- endloop
- endfacet
- facet normal 0.15887934482690988 -0.79874089113149138 0.58031917306068992
- outer loop
- vertex -1.3651348769489291e-17 -0.074314482510089874 0.06691306084394455
- vertex -1.5908628708195447e-17 -0.086602538824081421 0.05000000074505806
- vertex 0.033141355961561203 -0.080010317265987396 0.05000000074505806
- endloop
- endfacet
- facet normal 0.15887942196636887 -0.79874079057134661 0.58031929035065932
- outer loop
- vertex -1.3651348769489291e-17 -0.074314482510089874 0.06691306084394455
- vertex 0.033141355961561203 -0.080010317265987396 0.05000000074505806
- vertex 0.028438922017812729 -0.068657629191875458 0.06691306084394455
- endloop
- endfacet
- facet normal 0.17878756470117688 -0.89882617438269374 0.40018310178316374
- outer loop
- vertex -1.5908628708195447e-17 -0.086602538824081421 0.05000000074505806
- vertex -1.7470625291742606e-17 -0.095105648040771484 0.030901700258255005
- vertex 0.036395356059074402 -0.087866164743900299 0.030901700258255005
- endloop
- endfacet
- facet normal 0.17878753861432073 -0.89882620092364052 0.40018305382588132
- outer loop
- vertex -1.5908628708195447e-17 -0.086602538824081421 0.05000000074505806
- vertex 0.036395356059074402 -0.087866164743900299 0.030901700258255005
- vertex 0.033141355961561203 -0.080010317265987396 0.05000000074505806
- endloop
- endfacet
- facet normal 0.1909843305157902 -0.96014288401665793 0.20408485433664572
- outer loop
- vertex -1.7470625291742606e-17 -0.095105648040771484 0.030901700258255005
- vertex -1.8269071304176767e-17 -0.099452190101146698 0.010452846065163612
- vertex 0.038058705627918243 -0.091881841421127319 0.010452846065163612
- endloop
- endfacet
- facet normal 0.19098422428494732 -0.9601429493622694 0.20408464632156811
- outer loop
- vertex -1.7470625291742606e-17 -0.095105648040771484 0.030901700258255005
- vertex 0.038058705627918243 -0.091881841421127319 0.010452846065163612
- vertex 0.036395356059074402 -0.087866164743900299 0.030901700258255005
- endloop
- endfacet
- facet normal 0.19509035781625034 -0.98078527328214271 0
- outer loop
- vertex -1.8269071304176767e-17 -0.099452190101146698 0.010452846065163612
- vertex -1.8269071304176767e-17 -0.099452190101146698 -0.010452846065163612
- vertex 0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.19509035781625034 -0.98078527328214271 0
- outer loop
- vertex -1.8269071304176767e-17 -0.099452190101146698 0.010452846065163612
- vertex 0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- vertex 0.038058705627918243 -0.091881841421127319 0.010452846065163612
- endloop
- endfacet
- facet normal 0.19098421563577417 -0.96014290587992079 -0.20408485898382989
- outer loop
- vertex -1.8269071304176767e-17 -0.099452190101146698 -0.010452846065163612
- vertex -1.7470625291742606e-17 -0.095105648040771484 -0.030901700258255005
- vertex 0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.19098433878695739 -0.96014292559861558 -0.2040846509687585
- outer loop
- vertex -1.8269071304176767e-17 -0.099452190101146698 -0.010452846065163612
- vertex 0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- vertex 0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.17878753433762073 -0.89882617942320464 -0.40018310402734331
- outer loop
- vertex -1.7470625291742606e-17 -0.095105648040771484 -0.030901700258255005
- vertex -1.5908628708195447e-17 -0.086602538824081421 -0.05000000074505806
- vertex 0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.17878756859551054 -0.89882619396083963 -0.40018305607006488
- outer loop
- vertex -1.7470625291742606e-17 -0.095105648040771484 -0.030901700258255005
- vertex 0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- vertex 0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.15887943951689912 -0.79874087880382028 -0.58031916410411344
- outer loop
- vertex -1.5908628708195447e-17 -0.086602538824081421 -0.05000000074505806
- vertex -1.3651348769489291e-17 -0.074314482510089874 -0.06691306084394455
- vertex 0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.15887932976663652 -0.7987408154183383 -0.58031928139408939
- outer loop
- vertex -1.5908628708195447e-17 -0.086602538824081421 -0.05000000074505806
- vertex 0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- vertex 0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.13193484347074247 -0.66328124732023797 -0.73664861639160084
- outer loop
- vertex -1.3651348769489291e-17 -0.074314482510089874 -0.06691306084394455
- vertex -1.0797439998560886e-17 -0.058778524398803711 -0.080901697278022766
- vertex 0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.13193484346738296 -0.6632812473181785 -0.73664861639405688
- outer loop
- vertex -1.3651348769489291e-17 -0.074314482510089874 -0.06691306084394455
- vertex 0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- vertex 0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.098968013678745026 -0.49754554356199898 -0.86177361548731501
- outer loop
- vertex -1.0797439998560886e-17 -0.058778524398803711 -0.080901697278022766
- vertex -7.4716313056158803e-18 -0.040673665702342987 -0.091354548931121826
- vertex 0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.098967956160755904 -0.49754551322598684 -0.86177363960732289
- outer loop
- vertex -1.0797439998560886e-17 -0.058778524398803711 -0.080901697278022766
- vertex 0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- vertex 0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.061351497270056718 -0.30843476568236106 -0.94926497307189694
- outer loop
- vertex -7.4716313056158803e-18 -0.040673665702342987 -0.091354548931121826
- vertex -3.819275695072703e-18 -0.020791169255971909 -0.097814761102199554
- vertex 0.0079564359039068222 -0.019208535552024841 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.06135152313811678 -0.30843477395835256 -0.94926496871099864
- outer loop
- vertex -7.4716313056158803e-18 -0.040673665702342987 -0.091354548931121826
- vertex 0.0079564359039068222 -0.019208535552024841 -0.097814761102199554
- vertex 0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.17471428421919066 -0.26147837970812587 0.9492649660842799
- outer loop
- vertex 0.0079564359039068222 -0.019208535552024841 0.097814761102199554
- vertex 0.015565137378871441 -0.037577565759420395 0.091354548931121826
- vertex 0.028760623186826706 -0.028760623186826706 0.091354548931121826
- endloop
- endfacet
- facet normal 0.17471426893077599 -0.26147840938106925 0.9492649607246284
- outer loop
- vertex 0.0079564359039068222 -0.019208535552024841 0.097814761102199554
- vertex 0.028760623186826706 -0.028760623186826706 0.091354548931121826
- vertex 0.01470157690346241 -0.01470157690346241 0.097814761102199554
- endloop
- endfacet
- facet normal 0.28183684066621417 -0.42179874557711361 0.86177364398829248
- outer loop
- vertex 0.015565137378871441 -0.037577565759420395 0.091354548931121826
- vertex 0.022493567317724228 -0.054304275661706924 0.080901697278022766
- vertex 0.041562695056200027 -0.041562695056200027 0.080901697278022766
- endloop
- endfacet
- facet normal 0.28183687150574754 -0.42179864590164712 0.86177368268901633
- outer loop
- vertex 0.015565137378871441 -0.037577565759420395 0.091354548931121826
- vertex 0.041562695056200027 -0.041562695056200027 0.080901697278022766
- vertex 0.028760623186826706 -0.028760623186826706 0.091354548931121826
- endloop
- endfacet
- facet normal 0.37571865044532143 -0.56230267786378618 0.73664862327622749
- outer loop
- vertex 0.022493567317724228 -0.054304275661706924 0.080901697278022766
- vertex 0.028438922017812729 -0.068657629191875458 0.06691306084394455
- vertex 0.052548274397850037 -0.052548274397850037 0.06691306084394455
- endloop
- endfacet
- facet normal 0.37571862212216495 -0.56230279592432497 0.73664854760347465
- outer loop
- vertex 0.022493567317724228 -0.054304275661706924 0.080901697278022766
- vertex 0.052548274397850037 -0.052548274397850037 0.06691306084394455
- vertex 0.041562695056200027 -0.041562695056200027 0.080901697278022766
- endloop
- endfacet
- facet normal 0.45245040321610314 -0.67713972638750908 0.5803192428116053
- outer loop
- vertex 0.028438922017812729 -0.068657629191875458 0.06691306084394455
- vertex 0.033141355961561203 -0.080010317265987396 0.05000000074505806
- vertex 0.061237242072820663 -0.061237242072820663 0.05000000074505806
- endloop
- endfacet
- facet normal 0.4524503781983546 -0.67713981980897864 0.58031915330896144
- outer loop
- vertex 0.028438922017812729 -0.068657629191875458 0.06691306084394455
- vertex 0.061237242072820663 -0.061237242072820663 0.05000000074505806
- vertex 0.052548274397850037 -0.052548274397850037 0.06691306084394455
- endloop
- endfacet
- facet normal 0.50914415869095786 -0.76198801003014671 0.40018308090319588
- outer loop
- vertex 0.033141355961561203 -0.080010317265987396 0.05000000074505806
- vertex 0.036395356059074402 -0.087866164743900299 0.030901700258255005
- vertex 0.067249849438667297 -0.067249849438667297 0.030901700258255005
- endloop
- endfacet
- facet normal 0.50914418433618069 -0.76198794657394719 0.40018316910218049
- outer loop
- vertex 0.033141355961561203 -0.080010317265987396 0.05000000074505806
- vertex 0.067249849438667297 -0.067249849438667297 0.030901700258255005
- vertex 0.061237242072820663 -0.061237242072820663 0.05000000074505806
- endloop
- endfacet
- facet normal 0.54387724854201425 -0.81396988974665174 0.20408468120903095
- outer loop
- vertex 0.036395356059074402 -0.087866164743900299 0.030901700258255005
- vertex 0.038058705627918243 -0.091881841421127319 0.010452846065163612
- vertex 0.070323318243026733 -0.070323318243026733 0.010452846065163612
- endloop
- endfacet
- facet normal 0.54387729795136042 -0.81396982149820041 0.20408482173673517
- outer loop
- vertex 0.036395356059074402 -0.087866164743900299 0.030901700258255005
- vertex 0.070323318243026733 -0.070323318243026733 0.010452846065163612
- vertex 0.067249849438667297 -0.067249849438667297 0.030901700258255005
- endloop
- endfacet
- facet normal 0.55557020216110709 -0.83146963292153175 0
- outer loop
- vertex 0.038058705627918243 -0.091881841421127319 0.010452846065163612
- vertex 0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- vertex 0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.55557020216110709 -0.83146963292153175 0
- outer loop
- vertex 0.038058705627918243 -0.091881841421127319 0.010452846065163612
- vertex 0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- vertex 0.070323318243026733 -0.070323318243026733 0.010452846065163612
- endloop
- endfacet
- facet normal 0.54387731459104727 -0.81396984640124925 -0.20408467806956454
- outer loop
- vertex 0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- vertex 0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- vertex 0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.54387723262956311 -0.81396986593198373 -0.20408481859726049
- outer loop
- vertex 0.038058705627918243 -0.091881841421127319 -0.010452846065163612
- vertex 0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- vertex 0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.50914420673480953 -0.76198798009585644 -0.40018307677589038
- outer loop
- vertex 0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- vertex 0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- vertex 0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.509144138294924 -0.76198797950532793 -0.40018316497487411
- outer loop
- vertex 0.036395356059074402 -0.087866164743900299 -0.030901700258255005
- vertex 0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- vertex 0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.45245034005942358 -0.67713976273003673 -0.58031924964628023
- outer loop
- vertex 0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- vertex 0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- vertex 0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.45245043594349216 -0.67713977536749692 -0.58031916014362273
- outer loop
- vertex 0.033141355961561203 -0.080010317265987396 -0.05000000074505806
- vertex 0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- vertex 0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.37571857098187661 -0.56230271938745569 -0.7366486321095076
- outer loop
- vertex 0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- vertex 0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- vertex 0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.37571869089438792 -0.56230273840009004 -0.73664855643676341
- outer loop
- vertex 0.028438922017812729 -0.068657629191875458 -0.06691306084394455
- vertex 0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- vertex 0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.28183691468019506 -0.42179871051676798 -0.86177363694298537
- outer loop
- vertex 0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- vertex 0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- vertex 0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.28183681079029427 -0.42179870086462851 -0.86177367564370844
- outer loop
- vertex 0.022493567317724228 -0.054304275661706924 -0.080901697278022766
- vertex 0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- vertex 0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.17471425703507376 -0.26147839157789088 -0.94926496781800662
- outer loop
- vertex 0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- vertex 0.0079564359039068222 -0.019208535552024841 -0.097814761102199554
- vertex 0.01470157690346241 -0.01470157690346241 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.17471429029992128 -0.26147838880858149 -0.94926496245835557
- outer loop
- vertex 0.015565137378871441 -0.037577565759420395 -0.091354548931121826
- vertex 0.01470157690346241 -0.01470157690346241 -0.097814761102199554
- vertex 0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.26147838880858149 -0.17471429029992128 0.94926496245835557
- outer loop
- vertex 0.01470157690346241 -0.01470157690346241 0.097814761102199554
- vertex 0.028760623186826706 -0.028760623186826706 0.091354548931121826
- vertex 0.037577565759420395 -0.015565137378871441 0.091354548931121826
- endloop
- endfacet
- facet normal 0.26147839157789088 -0.17471425703507376 0.94926496781800662
- outer loop
- vertex 0.01470157690346241 -0.01470157690346241 0.097814761102199554
- vertex 0.037577565759420395 -0.015565137378871441 0.091354548931121826
- vertex 0.019208535552024841 -0.0079564359039068222 0.097814761102199554
- endloop
- endfacet
- facet normal 0.42179870086462851 -0.28183681079029427 0.86177367564370844
- outer loop
- vertex 0.028760623186826706 -0.028760623186826706 0.091354548931121826
- vertex 0.041562695056200027 -0.041562695056200027 0.080901697278022766
- vertex 0.054304275661706924 -0.022493567317724228 0.080901697278022766
- endloop
- endfacet
- facet normal 0.42179871051676798 -0.28183691468019506 0.86177363694298537
- outer loop
- vertex 0.028760623186826706 -0.028760623186826706 0.091354548931121826
- vertex 0.054304275661706924 -0.022493567317724228 0.080901697278022766
- vertex 0.037577565759420395 -0.015565137378871441 0.091354548931121826
- endloop
- endfacet
- facet normal 0.56230273840009004 -0.37571869089438792 0.73664855643676341
- outer loop
- vertex 0.041562695056200027 -0.041562695056200027 0.080901697278022766
- vertex 0.052548274397850037 -0.052548274397850037 0.06691306084394455
- vertex 0.068657629191875458 -0.028438922017812729 0.06691306084394455
- endloop
- endfacet
- facet normal 0.56230271938745569 -0.37571857098187661 0.7366486321095076
- outer loop
- vertex 0.041562695056200027 -0.041562695056200027 0.080901697278022766
- vertex 0.068657629191875458 -0.028438922017812729 0.06691306084394455
- vertex 0.054304275661706924 -0.022493567317724228 0.080901697278022766
- endloop
- endfacet
- facet normal 0.67713977536749692 -0.45245043594349216 0.58031916014362273
- outer loop
- vertex 0.052548274397850037 -0.052548274397850037 0.06691306084394455
- vertex 0.061237242072820663 -0.061237242072820663 0.05000000074505806
- vertex 0.080010317265987396 -0.033141355961561203 0.05000000074505806
- endloop
- endfacet
- facet normal 0.67713976273003673 -0.45245034005942358 0.58031924964628023
- outer loop
- vertex 0.052548274397850037 -0.052548274397850037 0.06691306084394455
- vertex 0.080010317265987396 -0.033141355961561203 0.05000000074505806
- vertex 0.068657629191875458 -0.028438922017812729 0.06691306084394455
- endloop
- endfacet
- facet normal 0.76198797950532793 -0.509144138294924 0.40018316497487411
- outer loop
- vertex 0.061237242072820663 -0.061237242072820663 0.05000000074505806
- vertex 0.067249849438667297 -0.067249849438667297 0.030901700258255005
- vertex 0.087866164743900299 -0.036395356059074402 0.030901700258255005
- endloop
- endfacet
- facet normal 0.76198798009585644 -0.50914420673480953 0.40018307677589038
- outer loop
- vertex 0.061237242072820663 -0.061237242072820663 0.05000000074505806
- vertex 0.087866164743900299 -0.036395356059074402 0.030901700258255005
- vertex 0.080010317265987396 -0.033141355961561203 0.05000000074505806
- endloop
- endfacet
- facet normal 0.81396986593198373 -0.54387723262956311 0.20408481859726049
- outer loop
- vertex 0.067249849438667297 -0.067249849438667297 0.030901700258255005
- vertex 0.070323318243026733 -0.070323318243026733 0.010452846065163612
- vertex 0.091881841421127319 -0.038058705627918243 0.010452846065163612
- endloop
- endfacet
- facet normal 0.81396984640124925 -0.54387731459104727 0.20408467806956454
- outer loop
- vertex 0.067249849438667297 -0.067249849438667297 0.030901700258255005
- vertex 0.091881841421127319 -0.038058705627918243 0.010452846065163612
- vertex 0.087866164743900299 -0.036395356059074402 0.030901700258255005
- endloop
- endfacet
- facet normal 0.83146963292153175 -0.55557020216110709 0
- outer loop
- vertex 0.070323318243026733 -0.070323318243026733 0.010452846065163612
- vertex 0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- vertex 0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.83146963292153175 -0.55557020216110709 0
- outer loop
- vertex 0.070323318243026733 -0.070323318243026733 0.010452846065163612
- vertex 0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- vertex 0.091881841421127319 -0.038058705627918243 0.010452846065163612
- endloop
- endfacet
- facet normal 0.81396982149820041 -0.54387729795136042 -0.20408482173673517
- outer loop
- vertex 0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- vertex 0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- vertex 0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.81396988974665174 -0.54387724854201425 -0.20408468120903095
- outer loop
- vertex 0.070323318243026733 -0.070323318243026733 -0.010452846065163612
- vertex 0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- vertex 0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.76198794657394719 -0.50914418433618069 -0.40018316910218049
- outer loop
- vertex 0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- vertex 0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- vertex 0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.76198801003014671 -0.50914415869095786 -0.40018308090319588
- outer loop
- vertex 0.067249849438667297 -0.067249849438667297 -0.030901700258255005
- vertex 0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- vertex 0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.67713981980897864 -0.4524503781983546 -0.58031915330896144
- outer loop
- vertex 0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- vertex 0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- vertex 0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.67713972638750908 -0.45245040321610314 -0.5803192428116053
- outer loop
- vertex 0.061237242072820663 -0.061237242072820663 -0.05000000074505806
- vertex 0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- vertex 0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.56230279592432497 -0.37571862212216495 -0.73664854760347465
- outer loop
- vertex 0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- vertex 0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- vertex 0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.56230267786378618 -0.37571865044532143 -0.73664862327622749
- outer loop
- vertex 0.052548274397850037 -0.052548274397850037 -0.06691306084394455
- vertex 0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- vertex 0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.42179864590164712 -0.28183687150574754 -0.86177368268901633
- outer loop
- vertex 0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- vertex 0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- vertex 0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.42179874557711361 -0.28183684066621417 -0.86177364398829248
- outer loop
- vertex 0.041562695056200027 -0.041562695056200027 -0.080901697278022766
- vertex 0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- vertex 0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.26147840938106925 -0.17471426893077599 -0.9492649607246284
- outer loop
- vertex 0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- vertex 0.01470157690346241 -0.01470157690346241 -0.097814761102199554
- vertex 0.019208535552024841 -0.0079564359039068222 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.26147837970812587 -0.17471428421919066 -0.9492649660842799
- outer loop
- vertex 0.028760623186826706 -0.028760623186826706 -0.091354548931121826
- vertex 0.019208535552024841 -0.0079564359039068222 -0.097814761102199554
- vertex 0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.3084347739583525 -0.061351523138116801 0.94926496871099864
- outer loop
- vertex 0.019208535552024841 -0.0079564359039068222 0.097814761102199554
- vertex 0.037577565759420395 -0.015565137378871441 0.091354548931121826
- vertex 0.040673665702342987 0 0.091354548931121826
- endloop
- endfacet
- facet normal 0.30843476568236111 -0.061351497270056753 0.94926497307189694
- outer loop
- vertex 0.019208535552024841 -0.0079564359039068222 0.097814761102199554
- vertex 0.040673665702342987 0 0.091354548931121826
- vertex 0.020791169255971909 0 0.097814761102199554
- endloop
- endfacet
- facet normal 0.49754551322598684 -0.098967956160755946 0.86177363960732289
- outer loop
- vertex 0.037577565759420395 -0.015565137378871441 0.091354548931121826
- vertex 0.054304275661706924 -0.022493567317724228 0.080901697278022766
- vertex 0.058778524398803711 0 0.080901697278022766
- endloop
- endfacet
- facet normal 0.49754554356199898 -0.098968013678745081 0.86177361548731513
- outer loop
- vertex 0.037577565759420395 -0.015565137378871441 0.091354548931121826
- vertex 0.058778524398803711 0 0.080901697278022766
- vertex 0.040673665702342987 0 0.091354548931121826
- endloop
- endfacet
- facet normal 0.66328124731817861 -0.13193484346738305 0.73664861639405699
- outer loop
- vertex 0.054304275661706924 -0.022493567317724228 0.080901697278022766
- vertex 0.068657629191875458 -0.028438922017812729 0.06691306084394455
- vertex 0.074314482510089874 0 0.06691306084394455
- endloop
- endfacet
- facet normal 0.66328124732023808 -0.13193484347074255 0.73664861639160084
- outer loop
- vertex 0.054304275661706924 -0.022493567317724228 0.080901697278022766
- vertex 0.074314482510089874 0 0.06691306084394455
- vertex 0.058778524398803711 0 0.080901697278022766
- endloop
- endfacet
- facet normal 0.7987408154183383 -0.1588793297666366 0.58031928139408939
- outer loop
- vertex 0.068657629191875458 -0.028438922017812729 0.06691306084394455
- vertex 0.080010317265987396 -0.033141355961561203 0.05000000074505806
- vertex 0.086602538824081421 0 0.05000000074505806
- endloop
- endfacet
- facet normal 0.79874087880382028 -0.15887943951689917 0.58031916410411333
- outer loop
- vertex 0.068657629191875458 -0.028438922017812729 0.06691306084394455
- vertex 0.086602538824081421 0 0.05000000074505806
- vertex 0.074314482510089874 0 0.06691306084394455
- endloop
- endfacet
- facet normal 0.89882619396083974 -0.17878756859551068 0.40018305607006494
- outer loop
- vertex 0.080010317265987396 -0.033141355961561203 0.05000000074505806
- vertex 0.087866164743900299 -0.036395356059074402 0.030901700258255005
- vertex 0.095105648040771484 0 0.030901700258255005
- endloop
- endfacet
- facet normal 0.89882617942320453 -0.17878753433762079 0.40018310402734325
- outer loop
- vertex 0.080010317265987396 -0.033141355961561203 0.05000000074505806
- vertex 0.095105648040771484 0 0.030901700258255005
- vertex 0.086602538824081421 0 0.05000000074505806
- endloop
- endfacet
- facet normal 0.96014292559861558 -0.1909843387869575 0.2040846509687585
- outer loop
- vertex 0.087866164743900299 -0.036395356059074402 0.030901700258255005
- vertex 0.091881841421127319 -0.038058705627918243 0.010452846065163612
- vertex 0.099452190101146698 0 0.010452846065163612
- endloop
- endfacet
- facet normal 0.96014290587992079 -0.19098421563577428 0.20408485898382991
- outer loop
- vertex 0.087866164743900299 -0.036395356059074402 0.030901700258255005
- vertex 0.099452190101146698 0 0.010452846065163612
- vertex 0.095105648040771484 0 0.030901700258255005
- endloop
- endfacet
- facet normal 0.98078527328214282 -0.19509035781625048 0
- outer loop
- vertex 0.091881841421127319 -0.038058705627918243 0.010452846065163612
- vertex 0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- vertex 0.099452190101146698 0 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.98078527328214282 -0.19509035781625048 0
- outer loop
- vertex 0.091881841421127319 -0.038058705627918243 0.010452846065163612
- vertex 0.099452190101146698 0 -0.010452846065163612
- vertex 0.099452190101146698 0 0.010452846065163612
- endloop
- endfacet
- facet normal 0.96014294936226929 -0.19098422428494741 -0.20408464632156809
- outer loop
- vertex 0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- vertex 0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- vertex 0.095105648040771484 0 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.96014288401665793 -0.19098433051579031 -0.20408485433664575
- outer loop
- vertex 0.091881841421127319 -0.038058705627918243 -0.010452846065163612
- vertex 0.095105648040771484 0 -0.030901700258255005
- vertex 0.099452190101146698 0 -0.010452846065163612
- endloop
- endfacet
- facet normal 0.89882620092364052 -0.17878753861432078 -0.40018305382588132
- outer loop
- vertex 0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- vertex 0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- vertex 0.086602538824081421 0 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.89882617438269374 -0.17878756470117699 -0.40018310178316374
- outer loop
- vertex 0.087866164743900299 -0.036395356059074402 -0.030901700258255005
- vertex 0.086602538824081421 0 -0.05000000074505806
- vertex 0.095105648040771484 0 -0.030901700258255005
- endloop
- endfacet
- facet normal 0.79874079057134661 -0.15887942196636892 -0.58031929035065921
- outer loop
- vertex 0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- vertex 0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- vertex 0.074314482510089874 0 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.79874089113149127 -0.15887934482690994 -0.58031917306068981
- outer loop
- vertex 0.080010317265987396 -0.033141355961561203 -0.05000000074505806
- vertex 0.074314482510089874 0 -0.06691306084394455
- vertex 0.086602538824081421 0 -0.05000000074505806
- endloop
- endfacet
- facet normal 0.66328124731730775 -0.13193484347015969 -0.73664861639434354
- outer loop
- vertex 0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- vertex 0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- vertex 0.058778524398803711 0 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.6632812473204962 -0.13193484346784404 -0.7366486163918875
- outer loop
- vertex 0.068657629191875458 -0.028438922017812729 -0.06691306084394455
- vertex 0.058778524398803711 0 -0.080901697278022766
- vertex 0.074314482510089874 0 -0.06691306084394455
- endloop
- endfacet
- facet normal 0.49754549605911413 -0.098968004229828863 -0.86177364399826861
- outer loop
- vertex 0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- vertex 0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- vertex 0.040673665702342987 0 -0.091354548931121826
- endloop
- endfacet
- facet normal 0.49754554609711599 -0.098967962699230083 -0.86177361987826373
- outer loop
- vertex 0.054304275661706924 -0.022493567317724228 -0.080901697278022766
- vertex 0.040673665702342987 0 -0.091354548931121826
- vertex 0.058778524398803711 0 -0.080901697278022766
- endloop
- endfacet
- facet normal 0.30843478276930947 -0.061351500668862545 -0.94926496730034626
- outer loop
- vertex 0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- vertex 0.019208535552024841 -0.0079564359039068222 -0.097814761102199554
- vertex 0.020791169255971909 0 -0.097814761102199554
- endloop
- endfacet
- facet normal 0.30843476522401231 -0.061351521400747594 -0.94926497166124379
- outer loop
- vertex 0.037577565759420395 -0.015565137378871441 -0.091354548931121826
- vertex 0.020791169255971909 0 -0.097814761102199554
- vertex 0.040673665702342987 0 -0.091354548931121826
- endloop
- endfacet
-endsolid
diff --git a/apps/gpu/SphereScaling/CMakeLists.txt b/apps/gpu/SphereScaling/CMakeLists.txt
deleted file mode 100644
index 04b4e6defd8b3e5db96a83f165f4bc5999a4b1cd..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/CMakeLists.txt
+++ /dev/null
@@ -1,8 +0,0 @@
-PROJECT(SphereScaling LANGUAGES CUDA CXX)
-
-vf_add_library(BUILDTYPE binary PRIVATE_LINK basics gpu_core GridGenerator FILES SphereScaling.cpp)
-
-set_source_files_properties(SphereScaling.cpp PROPERTIES LANGUAGE CUDA)
-
-set_target_properties(SphereScaling PROPERTIES
- CUDA_SEPARABLE_COMPILATION ON)
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/SphereScaling.cpp b/apps/gpu/SphereScaling/SphereScaling.cpp
deleted file mode 100755
index f2350e14fe2221449b7eee21a0b02558b1a69b97..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/SphereScaling.cpp
+++ /dev/null
@@ -1,671 +0,0 @@
-#define _USE_MATH_DEFINES
-#include <cmath>
-#include <exception>
-#include <filesystem>
-#include <fstream>
-#include <iostream>
-#include <memory>
-#include <sstream>
-#include <stdexcept>
-#include <string>
-
-//////////////////////////////////////////////////////////////////////////
-
-#include "basics/DataTypes.h"
-#include "basics/PointerDefinitions.h"
-
-#include "basics/StringUtilities/StringUtil.h"
-#include "basics/config/ConfigurationFile.h"
-#include <logger/Logger.h>
-
-//////////////////////////////////////////////////////////////////////////
-
-#include "GridGenerator/grid/BoundaryConditions/Side.h"
-#include "GridGenerator/grid/GridBuilder/LevelGridBuilder.h"
-#include "GridGenerator/grid/GridBuilder/MultipleGridBuilder.h"
-
-#include "geometries/Conglomerate/Conglomerate.h"
-#include "geometries/Cuboid/Cuboid.h"
-#include "geometries/Sphere/Sphere.h"
-#include "geometries/TriangularMesh/TriangularMesh.h"
-
-#include "GridGenerator/io/GridVTKWriter/GridVTKWriter.h"
-#include "GridGenerator/io/STLReaderWriter/STLReader.h"
-#include "GridGenerator/io/STLReaderWriter/STLWriter.h"
-#include "GridGenerator/io/SimulationFileWriter/SimulationFileWriter.h"
-
-//////////////////////////////////////////////////////////////////////////
-
-#include "gpu/core/DataStructureInitializer/GridProvider.h"
-#include "gpu/core/DataStructureInitializer/GridReaderFiles/GridReader.h"
-#include "gpu/core/DataStructureInitializer/GridReaderGenerator/GridGenerator.h"
-#include "gpu/core/LBM/Simulation.h"
-#include "gpu/core/Output/FileWriter.h"
-#include "gpu/core/Parameter/Parameter.h"
-
-#include "gpu/core/Kernel/KernelFactory/KernelFactoryImp.h"
-#include "gpu/core/PreProcessor/PreProcessorFactory/PreProcessorFactoryImp.h"
-#include "gpu/core/GridScaling/GridScalingFactory.h"
-#include "gpu/core/BoundaryConditions/BoundaryConditionFactory.h"
-#include "gpu/core/Kernel/KernelTypes.h"
-
-#include "gpu/core/GPU/CudaMemoryManager.h"
-
-//////////////////////////////////////////////////////////////////////////
-
-#include "utilities/communication.h"
-#include <parallel/MPICommunicator.h>
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-void runVirtualFluids(const vf::basics::ConfigurationFile& config)
-{
- vf::parallel::Communicator &communicator = *vf::parallel::MPICommunicator::getInstance();
-
- SPtr<Parameter> para = std::make_shared<Parameter>(communicator.getNumberOfProcesses(), communicator.getProcessID(), &config);
- BoundaryConditionFactory bcFactory = BoundaryConditionFactory();
- GridScalingFactory scalingFactory = GridScalingFactory();
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- bool useGridGenerator = true;
- bool useLevels = true;
- std::string scalingType = "strong"; // "strong" // "weak"
-
- const std::string outPath("output/" + std::to_string(para->getNumprocs()) + "GPU/");
- const std::string simulationName("SphereScaling");
- const std::string gridPath = "./output/grids/";
- const std::string stlPath("./stl/SphereScaling/");
-
- if (para->getNumprocs() == 1) {
- para->useReducedCommunicationAfterFtoC = false;
- }
- if (scalingType != "weak" && scalingType != "strong")
- std::cerr << "unknown scaling type" << std::endl;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- real dxGrid = (real)1.0;
- real vxLB = (real)0.005; // LB units
- real viscosityLB = 0.001; //(vxLB * dxGrid) / Re;
-
- para->setVelocityLB(vxLB);
- para->setViscosityLB(viscosityLB);
- para->setVelocityRatio((real)58.82352941);
- para->setViscosityRatio((real)0.058823529);
- para->setDensityRatio((real)998.0);
-
- para->setCalcDragLift(false);
-
- para->setOutputPrefix(simulationName);
- if (para->getOutputPath() == "output/") {para->setOutputPath(outPath);}
- para->setPrintFiles(true);
-
- if (useLevels)
- para->setMaxLevel(2);
- else
- para->setMaxLevel(1);
-
- para->configureMainKernel(vf::collisionKernel::compressible::K17CompressibleNavierStokes);
- scalingFactory.setScalingFactory(GridScalingFactory::GridScaling::ScaleCompressible);
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- VF_LOG_INFO("Number of processes: {}", para->getNumprocs());
-
- VF_LOG_INFO("LB parameters:");
- VF_LOG_INFO("velocity LB [dx/dt] = {}", vxLB);
- VF_LOG_INFO("viscosity LB [dx/dt] = {}", viscosityLB);
- VF_LOG_INFO("dxGrid [-] = {}\n", dxGrid);
-
- VF_LOG_INFO("world parameters:");
- VF_LOG_INFO("velocity [m/s] = {}", vxLB * para->getVelocityRatio());
- VF_LOG_INFO("viscosity [m^2/s] = {}\n", viscosityLB * para->getViscosityRatio());
-
- VF_LOG_INFO("simulation parameters:");
- VF_LOG_INFO("useGridGenerator = {}", useGridGenerator);
- VF_LOG_INFO("useStreams = {}", para->getUseStreams());
- VF_LOG_INFO("number of processes = {}", para->getNumprocs());
- VF_LOG_INFO("useReducedCommunicationAfterFtoC = {}", para->useReducedCommunicationAfterFtoC);
- VF_LOG_INFO("scalingType = {}", scalingType);
- VF_LOG_INFO("mainKernel = {}\n", para->getMainKernel());
-
- //////////////////////////////////////////////////////////////////////////
- auto gridBuilder = std::make_shared<MultipleGridBuilder>();
-
- if (useGridGenerator) {
- real sideLengthCube;
- if (useLevels) {
- if (scalingType == "strong")
- sideLengthCube = 76.0; // Phoenix: strong scaling with two levels = 76.0
- else if (scalingType == "weak")
- sideLengthCube = 70.0; // Phoenix: weak scaling with two levels = 70.0
- } else
- sideLengthCube = 92.0; // Phoenix: 86.0
- real xGridMin = 0.0;
- real xGridMax = sideLengthCube;
- real yGridMin = 0.0;
- real yGridMax = sideLengthCube;
- real zGridMin = 0.0;
- real zGridMax = sideLengthCube;
- const real dSphere = 10.0;
- const real dSphereLev1 = 22.0; // Phoenix: 22.0
- const real dCubeLev1 = 72.0; // Phoenix: 72.0
-
- if (para->getNumprocs() > 1) {
- const uint generatePart = communicator.getProcessID();
-
- real overlap = (real)8.0 * dxGrid;
- gridBuilder->setNumberOfLayers(10, 8);
-
- if (communicator.getNumberOfProcesses() == 2) {
- real zSplit = 0.5 * sideLengthCube;
-
- if (scalingType == "weak") {
- zSplit = zGridMax;
- zGridMax = zGridMax + sideLengthCube;
- }
-
- if (generatePart == 0) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zGridMin, xGridMax, yGridMax, zSplit + overlap,
- dxGrid);
- }
- if (generatePart == 1) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zSplit - overlap, xGridMax, yGridMax, zGridMax,
- dxGrid);
- }
-
- if (useLevels) {
- if (scalingType == "strong") {
- gridBuilder->addGrid(
- std::make_shared<Sphere>(0.5 * sideLengthCube, 0.5 * sideLengthCube, 0.5 * sideLengthCube, dSphereLev1),
- 1);
- } else if (scalingType == "weak") {
- gridBuilder->addGrid(std::make_shared<Cuboid>(-0.5 * dCubeLev1, -0.5 * dCubeLev1,
- sideLengthCube - 0.5 * dCubeLev1, 0.5 * dCubeLev1,
- 0.5 * dCubeLev1, sideLengthCube + 0.5 * dCubeLev1),
- 1);
- }
- }
-
- if (scalingType == "weak") {
- if (useLevels) {
- gridBuilder->addGeometry(std::make_shared<Sphere>(0.0, 0.0, sideLengthCube, dSphere));
- } else {
- auto sphereSTL = std::make_shared<TriangularMesh>(stlPath + "Spheres_2GPU.stl");
- gridBuilder->addGeometry(sphereSTL);
- }
- } else if (scalingType == "strong") {
- gridBuilder->addGeometry(
- std::make_shared<Sphere>(0.5 * sideLengthCube, 0.5 * sideLengthCube, 0.5 * sideLengthCube, dSphere));
- }
-
- if (generatePart == 0)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xGridMax, yGridMin, yGridMax, zGridMin, zSplit));
- if (generatePart == 1)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xGridMax, yGridMin, yGridMax, zSplit, zGridMax));
-
- gridBuilder->buildGrids(true); // buildGrids() has to be called before setting the BCs!!!!
-
- if (generatePart == 0) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 1);
- }
-
- if (generatePart == 1) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 0);
- }
-
- gridBuilder->setPeriodicBoundaryCondition(false, false, false);
- //////////////////////////////////////////////////////////////////////////
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, vxLB, 0.0, 0.0);
- if (generatePart == 0)
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, vxLB, 0.0, 0.0);
- if (generatePart == 1)
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, 0.0, 0.0);
- gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.0); // set pressure BC after velocity BCs
- // gridBuilder->setVelocityBoundaryCondition(SideType::GEOMETRY, 0.0, 0.0, 0.0);
- //////////////////////////////////////////////////////////////////////////
-
- } else if (communicator.getNumberOfProcesses() == 4) {
- real ySplit = 0.5 * sideLengthCube;
- real zSplit = 0.5 * sideLengthCube;
-
- if (scalingType == "weak") {
- ySplit = yGridMax;
- yGridMax = yGridMax + (yGridMax - yGridMin);
- zSplit = zGridMax;
- zGridMax = zGridMax + (zGridMax - zGridMin);
- }
-
- if (generatePart == 0) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zGridMin, xGridMax, ySplit + overlap,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 1) {
- gridBuilder->addCoarseGrid(xGridMin, ySplit - overlap, zGridMin, xGridMax, yGridMax,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 2) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zSplit - overlap, xGridMax, ySplit + overlap,
- zGridMax, dxGrid);
- }
- if (generatePart == 3) {
- gridBuilder->addCoarseGrid(xGridMin, ySplit - overlap, zSplit - overlap, xGridMax, yGridMax,
- zGridMax, dxGrid);
- }
-
- if (useLevels) {
- if (scalingType == "strong") {
- gridBuilder->addGrid(
- std::make_shared<Sphere>(0.5 * sideLengthCube, 0.5 * sideLengthCube, 0.5 * sideLengthCube, dSphereLev1),
- 1);
- } else if (scalingType == "weak") {
- gridBuilder->addGrid(std::make_shared<Cuboid>(-0.5 * dCubeLev1, sideLengthCube - 0.5 * dCubeLev1,
- sideLengthCube - 0.5 * dCubeLev1, 0.5 * dCubeLev1,
- sideLengthCube + 0.5 * dCubeLev1,
- sideLengthCube + 0.5 * dCubeLev1),
- 1);
- }
- }
-
- if (scalingType == "weak") {
- if (useLevels) {
- gridBuilder->addGeometry(std::make_shared<Sphere>(0.0, sideLengthCube, sideLengthCube, dSphere));
- } else {
- auto sphereSTL = std::make_shared<TriangularMesh>(stlPath + "Spheres_4GPU.stl");
- gridBuilder->addGeometry(sphereSTL);
- }
- } else if (scalingType == "strong") {
- gridBuilder->addGeometry(
- std::make_shared<Sphere>(0.5 * sideLengthCube, 0.5 * sideLengthCube, 0.5 * sideLengthCube, dSphere));
- }
-
- if (generatePart == 0)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xGridMax, yGridMin, ySplit, zGridMin, zSplit));
- if (generatePart == 1)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xGridMax, ySplit, yGridMax, zGridMin, zSplit));
- if (generatePart == 2)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xGridMax, yGridMin, ySplit, zSplit, zGridMax));
- if (generatePart == 3)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xGridMax, ySplit, yGridMax, zSplit, zGridMax));
-
- gridBuilder->buildGrids(true); // buildGrids() has to be called before setting the BCs!!!!
- gridBuilder->setPeriodicBoundaryCondition(false, false, false);
-
- if (generatePart == 0) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PY, 1);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 2);
- }
- if (generatePart == 1) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MY, 0);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 3);
- }
- if (generatePart == 2) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PY, 3);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 0);
- }
- if (generatePart == 3) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MY, 2);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 1);
- }
-
- //////////////////////////////////////////////////////////////////////////
- if (generatePart == 0) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, vxLB, 0.0, 0.0);
- }
- if (generatePart == 1) {
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, vxLB, 0.0, 0.0);
- }
- if (generatePart == 2) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, 0.0, 0.0);
- }
- if (generatePart == 3) {
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, 0.0, 0.0);
- }
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, vxLB, 0.0, 0.0);
- gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.0); // set pressure BC after velocity BCs
- // gridBuilder->setVelocityBoundaryCondition(SideType::GEOMETRY, 0.0, 0.0, 0.0);
- //////////////////////////////////////////////////////////////////////////
- } else if (communicator.getNumberOfProcesses() == 8) {
- real xSplit = 0.5 * sideLengthCube;
- real ySplit = 0.5 * sideLengthCube;
- real zSplit = 0.5 * sideLengthCube;
-
- if (scalingType == "weak") {
- xSplit = xGridMax;
- xGridMax = xGridMax + (xGridMax - xGridMin);
- ySplit = yGridMax;
- yGridMax = yGridMax + (yGridMax - yGridMin);
- zSplit = zGridMax;
- zGridMax = zGridMax + (zGridMax - zGridMin);
- }
-
- if (generatePart == 0) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zGridMin, xSplit + overlap, ySplit + overlap,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 1) {
- gridBuilder->addCoarseGrid(xGridMin, ySplit - overlap, zGridMin, xSplit + overlap, yGridMax,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 2) {
- gridBuilder->addCoarseGrid(xSplit - overlap, yGridMin, zGridMin, xGridMax, ySplit + overlap,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 3) {
- gridBuilder->addCoarseGrid(xSplit - overlap, ySplit - overlap, zGridMin, xGridMax, yGridMax,
- zSplit + overlap, dxGrid);
- }
- if (generatePart == 4) {
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zSplit - overlap, xSplit + overlap, ySplit + overlap,
- zGridMax, dxGrid);
- }
- if (generatePart == 5) {
- gridBuilder->addCoarseGrid(xGridMin, ySplit - overlap, zSplit - overlap, xSplit + overlap, yGridMax,
- zGridMax, dxGrid);
- }
- if (generatePart == 6) {
- gridBuilder->addCoarseGrid(xSplit - overlap, yGridMin, zSplit - overlap, xGridMax, ySplit + overlap,
- zGridMax, dxGrid);
- }
- if (generatePart == 7) {
- gridBuilder->addCoarseGrid(xSplit - overlap, ySplit - overlap, zSplit - overlap, xGridMax, yGridMax,
- zGridMax, dxGrid);
- }
-
- if (useLevels) {
- if (scalingType == "strong") {
- gridBuilder->addGrid(
- std::make_shared<Sphere>(0.5 * sideLengthCube, 0.5 * sideLengthCube, 0.5 * sideLengthCube, dSphereLev1),
- 1);
- } else if (scalingType == "weak") {
- gridBuilder->addGrid(
- std::make_shared<Cuboid>(sideLengthCube - 0.5 * dCubeLev1, sideLengthCube - 0.5 * dCubeLev1,
- sideLengthCube - 0.5 * dCubeLev1, sideLengthCube + 0.5 * dCubeLev1,
- sideLengthCube + 0.5 * dCubeLev1, sideLengthCube + 0.5 * dCubeLev1),
- 1);
- }
- }
-
- if (scalingType == "weak") {
- if (useLevels) {
- gridBuilder->addGeometry(std::make_shared<Sphere>(sideLengthCube, sideLengthCube, sideLengthCube, dSphere));
- } else {
- auto sphereSTL = std::make_shared<TriangularMesh>(stlPath + "Spheres_8GPU.stl");
- gridBuilder->addGeometry(sphereSTL);
- }
- } else if (scalingType == "strong") {
- gridBuilder->addGeometry(
- std::make_shared<Sphere>(0.5 * sideLengthCube, 0.5 * sideLengthCube, 0.5 * sideLengthCube, dSphere));
- }
-
- if (generatePart == 0)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xSplit, yGridMin, ySplit, zGridMin, zSplit));
- if (generatePart == 1)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xSplit, ySplit, yGridMax, zGridMin, zSplit));
- if (generatePart == 2)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xSplit, xGridMax, yGridMin, ySplit, zGridMin, zSplit));
- if (generatePart == 3)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xSplit, xGridMax, ySplit, yGridMax, zGridMin, zSplit));
- if (generatePart == 4)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xSplit, yGridMin, ySplit, zSplit, zGridMax));
- if (generatePart == 5)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xGridMin, xSplit, ySplit, yGridMax, zSplit, zGridMax));
- if (generatePart == 6)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xSplit, xGridMax, yGridMin, ySplit, zSplit, zGridMax));
- if (generatePart == 7)
- gridBuilder->setSubDomainBox(
- std::make_shared<BoundingBox>(xSplit, xGridMax, ySplit, yGridMax, zSplit, zGridMax));
-
- gridBuilder->buildGrids(true); // buildGrids() has to be called before setting the BCs!!!!
- gridBuilder->setPeriodicBoundaryCondition(false, false, false);
-
- if (generatePart == 0) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PY, 1);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 2);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 4);
- }
- if (generatePart == 1) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MY, 0);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 3);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 5);
- }
- if (generatePart == 2) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PY, 3);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, 0);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 6);
- }
- if (generatePart == 3) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MY, 2);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, 1);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, 7);
- }
- if (generatePart == 4) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PY, 5);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 6);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 0);
- }
- if (generatePart == 5) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MY, 4);
- gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PX, 7);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 1);
- }
- if (generatePart == 6) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::PY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::PY, 7);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, 4);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 2);
- }
- if (generatePart == 7) {
- gridBuilder->findCommunicationIndices(CommunicationDirections::MY);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MY, 6);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MX, 5);
- gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
- gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, 3);
- }
-
- //////////////////////////////////////////////////////////////////////////
- if (generatePart == 0) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, vxLB, 0.0, 0.0);
- }
- if (generatePart == 1) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, vxLB, 0.0, 0.0);
- }
- if (generatePart == 2) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, vxLB, 0.0, 0.0);
- gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.0);
- }
- if (generatePart == 3) {
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, vxLB, 0.0, 0.0);
- gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.0);
- }
- if (generatePart == 4) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, 0.0, 0.0);
- }
- if (generatePart == 5) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, 0.0, 0.0);
- }
- if (generatePart == 6) {
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, 0.0, 0.0);
- gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.0); // set pressure BC after velocity BCs
- }
- if (generatePart == 7) {
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, 0.0, 0.0);
- gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.0); // set pressure BC after velocity BCs
- }
- // gridBuilder->setVelocityBoundaryCondition(SideType::GEOMETRY, 0.0, 0.0, 0.0);
- //////////////////////////////////////////////////////////////////////////
- }
-
- // gridBuilder->writeGridsToVtk(outPath + "grid/part" + std::to_string(generatePart) + "_");
- // gridBuilder->writeGridsToVtk(outPath +std::to_string(generatePart) + "/grid/");
- // gridBuilder->writeArrows(outPath + std::to_string(generatePart) + " /arrow");
-
- SimulationFileWriter::write(gridPath + std::to_string(generatePart) + "/", gridBuilder, FILEFORMAT::BINARY);
- } else {
-
- gridBuilder->addCoarseGrid(xGridMin, yGridMin, zGridMin, xGridMax, yGridMax, zGridMax, dxGrid);
-
- if (useLevels) {
- gridBuilder->setNumberOfLayers(10, 8);
- if (scalingType == "strong") {
- gridBuilder->addGrid(
- std::make_shared<Sphere>(0.5 * sideLengthCube, 0.5 * sideLengthCube, 0.5 * sideLengthCube, dSphereLev1), 1);
- } else if (scalingType == "weak")
- gridBuilder->addGrid(std::make_shared<Cuboid>(sideLengthCube - 0.5 * dCubeLev1, sideLengthCube - 0.5 * dCubeLev1,
- sideLengthCube - 0.5 * dCubeLev1, sideLengthCube + 0.5 * dCubeLev1,
- sideLengthCube + 0.5 * dCubeLev1, sideLengthCube + 0.5 * dCubeLev1),
- 1);
- }
-
- if (scalingType == "weak") {
- if (useLevels) {
- gridBuilder->addGeometry(std::make_shared<Sphere>(sideLengthCube, sideLengthCube, sideLengthCube, dSphere));
- } else {
- auto sphereSTL = std::make_shared<TriangularMesh>(stlPath + "Spheres_1GPU.stl");
- gridBuilder->addGeometry(sphereSTL);
- }
- } else {
- gridBuilder->addGeometry(
- std::make_shared<Sphere>(0.5 * sideLengthCube, 0.5 * sideLengthCube, 0.5 * sideLengthCube, dSphere));
- }
-
- gridBuilder->buildGrids(true); // buildGrids() has to be called before setting the BCs!!!!
-
- gridBuilder->setPeriodicBoundaryCondition(false, false, false);
- //////////////////////////////////////////////////////////////////////////
- gridBuilder->setVelocityBoundaryCondition(SideType::MX, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MY, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::MZ, vxLB, 0.0, 0.0);
- gridBuilder->setVelocityBoundaryCondition(SideType::PZ, vxLB, 0.0, 0.0);
- gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.0); // set pressure BC after velocity BCs
-
- // gridBuilder->setVelocityBoundaryCondition(SideType::GEOMETRY, 0.0, 0.0, 0.0);
- //////////////////////////////////////////////////////////////////////////
-
- // gridBuilder->writeGridsToVtk("E:/temp/MusselOyster/" + "/grid/");
- // gridBuilder->writeArrows ("E:/temp/MusselOyster/" + "/arrow");
-
- SimulationFileWriter::write(gridPath, gridBuilder, FILEFORMAT::BINARY);
- }
-
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
- bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::PressureNonEquilibriumCompressible);
-
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- auto cudaMemoryManager = std::make_shared<CudaMemoryManager>(para);
-
- SPtr<GridProvider> gridGenerator;
- if (useGridGenerator)
- gridGenerator = GridProvider::makeGridGenerator(gridBuilder, para, cudaMemoryManager, communicator);
- else {
- gridGenerator = GridProvider::makeGridReader(FILEFORMAT::BINARY, para, cudaMemoryManager);
- }
-
- Simulation sim(para, cudaMemoryManager, communicator, *gridGenerator, &bcFactory, &scalingFactory);
- sim.run();
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-}
-
-int main(int argc, char *argv[])
-{
- MPI_Init(&argc, &argv);
- std::string str, str2, configFile;
-
- if (argv != NULL) {
-
- try {
- VF_LOG_INFO("For the default config path to work, execute the app from the project root.");
- vf::basics::ConfigurationFile config = vf::basics::loadConfig(argc, argv, "./apps/gpu/SphereScaling/config.txt");
- runVirtualFluids(config);
-
- //////////////////////////////////////////////////////////////////////////
- } catch (const spdlog::spdlog_ex &ex) {
- std::cout << "Log initialization failed: " << ex.what() << std::endl;
- } catch (const std::bad_alloc &e) {
- VF_LOG_CRITICAL("Bad Alloc: {}", e.what());
- } catch (const std::exception &e) {
- VF_LOG_CRITICAL("exception: {}", e.what());
- } catch (...) {
- VF_LOG_CRITICAL("Unknown exception!");
- }
- }
-
- MPI_Finalize();
- return 0;
-}
diff --git a/apps/gpu/SphereScaling/config.txt b/apps/gpu/SphereScaling/config.txt
deleted file mode 100644
index b835c0b4ce0931f7775184233c8e627d97e1844b..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/config.txt
+++ /dev/null
@@ -1,50 +0,0 @@
-# Tesla 03
-# mpiexec -n 2 "C:/Users/Master/Documents/MasterAnna/VirtualFluids_dev/build/bin/Release/SphereScaling.exe" "C:/Users/Master/Documents/MasterAnna/VirtualFluids_dev/apps/gpu/SphereScaling/config.txt"
-# Phoenix
-# mpirun -np 2 "./VirtualFluids_dev/build/bin/SphereScaling" "./VirtualFluids_dev/apps/gpu/SphereScaling/config.txt"
-
-# Phoenix mpich
-# mpirun -np 2 nvprof -f -o SphereScaling.%q{PMI_RANK}.nvprof "./VirtualFluids_dev/build/bin/SphereScaling" "./VirtualFluids_dev/apps/gpu/SphereScaling/configPhoenix4GPU.txt"
-# Phoenix openmpi
-# mpirun -np 2 nvprof -f -o SphereScaling.%q{OMPI_COMM_WORLD_RANK}.nvprof "./VirtualFluids_dev/build/bin/SphereScaling" "./VirtualFluids_dev/apps/gpu/SphereScaling/configPhoenix4GPU.txt"
-
-##################################################
-#GPU Mapping
-##################################################
-#Devices="0 1 2 3"
-#NumberOfDevices=2
-
-##################################################
-#informations for Writing
-##################################################
-Path=./output/SphereScalingResults/
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/output/grids/SphereScalingResults/
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=10000
-TimeOut=1000
-TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = false
-useReducedCommunicationInInterpolation = false
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix1GPU_1LevStrongOS.txt b/apps/gpu/SphereScaling/configPhoenix1GPU_1LevStrongOS.txt
deleted file mode 100644
index e61f25ccb640beb4375a12336c40e73528096e74..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix1GPU_1LevStrongOS.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=2
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/1GPU/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling1GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=100000
-TimeOut=100000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = false
-useReducedCommunicationInInterpolation = false
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix1GPU_1LevStrongStream.txt b/apps/gpu/SphereScaling/configPhoenix1GPU_1LevStrongStream.txt
deleted file mode 100644
index a205af0cf09aeb51cbd481684ca653cde6492755..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix1GPU_1LevStrongStream.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=2
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/1GPU/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling1GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=100000
-TimeOut=100000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = true
-useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix2GPU_1LevStrongOS.txt b/apps/gpu/SphereScaling/configPhoenix2GPU_1LevStrongOS.txt
deleted file mode 100644
index 20602597eae3571cb228f8d9bdd6984d30b22b24..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix2GPU_1LevStrongOS.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=2
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/4GPU/1LevStrongStream/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling4GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=100000
-TimeOut=100000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = false
-useReducedCommunicationInInterpolation = false
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix2GPU_1LevStrongStream.txt b/apps/gpu/SphereScaling/configPhoenix2GPU_1LevStrongStream.txt
deleted file mode 100644
index a1bdbe2feb3dc93d0bf858b909af9d07d34a3006..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix2GPU_1LevStrongStream.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=2
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/4GPU/1LevStrongStream/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling4GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=100000
-TimeOut=100000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = true
-useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix4GPU_1LevStrongOS.txt b/apps/gpu/SphereScaling/configPhoenix4GPU_1LevStrongOS.txt
deleted file mode 100644
index 783b68ccc3623a11d43da29e75d05d77ede15caa..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix4GPU_1LevStrongOS.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=4
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/4GPU/1LevStrongStream/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling4GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=100000
-TimeOut=100000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = false
-useReducedCommunicationInInterpolation = false
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix4GPU_1LevStrongStream.txt b/apps/gpu/SphereScaling/configPhoenix4GPU_1LevStrongStream.txt
deleted file mode 100644
index 2f95e25e0ea343ac5eb8d31e61bedea52110235a..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix4GPU_1LevStrongStream.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=4
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/4GPU/1LevStrongStream/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling4GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=100000
-TimeOut=100000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = true
-useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix4GPU_1LevWeakStream.txt b/apps/gpu/SphereScaling/configPhoenix4GPU_1LevWeakStream.txt
deleted file mode 100644
index 6ecc44955f34c4aacc998554c367ab632239ee75..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix4GPU_1LevWeakStream.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=4
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/4GPU/1LevWeakStream/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling4GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=100000
-TimeOut=100000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = true
-useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix4GPU_2LevStrongStream.txt b/apps/gpu/SphereScaling/configPhoenix4GPU_2LevStrongStream.txt
deleted file mode 100644
index 12372f1c52ecc13a5a8902727129a880df40fc8d..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix4GPU_2LevStrongStream.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=4
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/4GPU/2LevStrongStream/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling4GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=10000
-TimeOut=1000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = true
-useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix8GPU_1LevStrongOS.txt b/apps/gpu/SphereScaling/configPhoenix8GPU_1LevStrongOS.txt
deleted file mode 100644
index 41ef2d6a246a7c72ff00f1eaf94391aafedcd1b3..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix8GPU_1LevStrongOS.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=4
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/8GPU/1LevStrongOS/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling8GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=100000
-TimeOut=100000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = false
-useReducedCommunicationInInterpolation = false
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix8GPU_1LevStrongStream.txt b/apps/gpu/SphereScaling/configPhoenix8GPU_1LevStrongStream.txt
deleted file mode 100644
index 994c713a2c2f5b35fdf7a31ddd7f3b4186d3d4e7..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix8GPU_1LevStrongStream.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=4
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/8GPU/1LevStrongStream/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling8GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=1000
-TimeOut=1000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = true
-useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix8GPU_1LevWeakOS.txt b/apps/gpu/SphereScaling/configPhoenix8GPU_1LevWeakOS.txt
deleted file mode 100644
index da9adb7ed35032b42a9f415bf523e1e641aab1bd..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix8GPU_1LevWeakOS.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=4
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/8GPU/1LevWeakOS/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling8GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=100000
-TimeOut=100000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = false
-useReducedCommunicationInInterpolation = false
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix8GPU_1LevWeakStream.txt b/apps/gpu/SphereScaling/configPhoenix8GPU_1LevWeakStream.txt
deleted file mode 100644
index 2ef3c31b63bfbf7abe176cfd7b7536d0ac73eb73..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix8GPU_1LevWeakStream.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=4
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/8GPU/1LevWeakStream/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling8GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=100
-TimeOut=100
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = true
-useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/SphereScaling/configPhoenix8GPU_2LevStrongStream.txt b/apps/gpu/SphereScaling/configPhoenix8GPU_2LevStrongStream.txt
deleted file mode 100644
index d37a513612fb8e88764b5ba0db859f296d88c7fc..0000000000000000000000000000000000000000
--- a/apps/gpu/SphereScaling/configPhoenix8GPU_2LevStrongStream.txt
+++ /dev/null
@@ -1,42 +0,0 @@
-##################################################
-#GPU Mapping
-##################################################
-Devices="0 1 2 3"
-NumberOfDevices=4
-
-##################################################
-#informations for Writing
-##################################################
-Path=/work/y0078217/Results/SphereScalingResults/8GPU/2LevStrongStream/
-#Path="F:/Work/Computations/out/SphereScaling/"
-#Prefix="SphereScaling"
-#WriteGrid=true
-##################################################
-#informations for reading
-##################################################
-GridPath=/work/y0078217/Grids/GridSphereScaling/SphereScaling8GPU/
-#GridPath="C:"
-
-##################################################
-#number of grid levels
-##################################################
-#NOGL=1
-
-##################################################
-#LBM Version
-##################################################
-#D3Qxx=27
-#MainKernelName=K17CompressibleNavierStokes
-
-##################################################
-#simulation parameter
-##################################################
-TimeEnd=10000
-TimeOut=10000
-#TimeStartOut=0
-
-##################################################
-# CUDA Streams and optimized communication (only used for multiple GPUs)
-##################################################
-useStreams = true
-useReducedCommunicationInInterpolation = true
\ No newline at end of file
diff --git a/apps/gpu/TGV_3D_GridRef/TGV_3D_GridRef.cpp b/apps/gpu/TGV_3D_GridRef/TGV_3D_GridRef.cpp
index 997d3c8572ac46bf53f032eae182c3dc43283f9e..811bd468e0aa9ba43857a4e38435492e7268f893 100644
--- a/apps/gpu/TGV_3D_GridRef/TGV_3D_GridRef.cpp
+++ b/apps/gpu/TGV_3D_GridRef/TGV_3D_GridRef.cpp
@@ -45,10 +45,11 @@
//////////////////////////////////////////////////////////////////////////
-#include "DataTypes.h"
-#include <logger/Logger.h>
+#include <basics/DataTypes.h>
+#include <basics/PointerDefinitions.h>
+#include <basics/config/ConfigurationFile.h>
-#include "PointerDefinitions.h"
+#include <logger/Logger.h>
//////////////////////////////////////////////////////////////////////////
diff --git a/apps/gpu/WTG_RUB/WTG_RUB.cpp b/apps/gpu/WTG_RUB/WTG_RUB.cpp
index 8de3357854fb2d28208f1956c4798544a12c84f3..f13ab7572dd1a3b815a4793b406a037085a3d47f 100644
--- a/apps/gpu/WTG_RUB/WTG_RUB.cpp
+++ b/apps/gpu/WTG_RUB/WTG_RUB.cpp
@@ -43,8 +43,9 @@
//////////////////////////////////////////////////////////////////////////
-#include "DataTypes.h"
-#include "PointerDefinitions.h"
+#include <basics/DataTypes.h>
+#include <basics/PointerDefinitions.h>
+#include <basics/config/ConfigurationFile.h>
#include <logger/Logger.h>
@@ -266,9 +267,9 @@ void multipleLevel(const std::string& configPath)
gridBuilder->setPressureBoundaryCondition(SideType::PX, 0.0);
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityAndPressureCompressible);
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityWithPressureInterpolatedCompressible);
bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::OutflowNonReflective);
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
diff --git a/apps/gpu/gridGeneratorTest/gridGenerator.cpp b/apps/gpu/gridGeneratorTest/gridGenerator.cpp
index b8a46f11ec0fbee082f5ccf504e7135028971dea..dcc07c798dcbf8caebbe454485dedb411e05fcca 100644
--- a/apps/gpu/gridGeneratorTest/gridGenerator.cpp
+++ b/apps/gpu/gridGeneratorTest/gridGenerator.cpp
@@ -193,8 +193,8 @@ void runVirtualFluids(const vf::basics::ConfigurationFile &config)
gridBuilder->setVelocityBoundaryCondition(SideType::GEOMETRY, 0.0, 0.0, 0.0);
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipCompressible);
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipInterpolatedCompressible);
bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::PressureNonEquilibriumCompressible);
//////////////////////////////////////////////////////////////////////////
@@ -282,8 +282,8 @@ void runVirtualFluids(const vf::basics::ConfigurationFile &config)
gridBuilder->setVelocityBoundaryCondition(SideType::GEOMETRY, 0.0, 0.0, 0.0);
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityAndPressureCompressible);
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityWithPressureInterpolatedCompressible);
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::OutflowNonReflective);
//////////////////////////////////////////////////////////////////////////
@@ -367,8 +367,8 @@ void runVirtualFluids(const vf::basics::ConfigurationFile &config)
gridBuilder->setVelocityBoundaryCondition(SideType::GEOMETRY, 0.0, 0.0, 0.0);
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityAndPressureCompressible);
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityWithPressureInterpolatedCompressible);
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::OutflowNonReflective);
//////////////////////////////////////////////////////////////////////////
@@ -437,8 +437,8 @@ void runVirtualFluids(const vf::basics::ConfigurationFile &config)
gridBuilder->setVelocityBoundaryCondition(SideType::GEOMETRY, 0.0, 0.0, 0.0);
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipCompressible);
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipInterpolatedCompressible);
bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::PressureNonEquilibriumCompressible);
//////////////////////////////////////////////////////////////////////////
@@ -528,8 +528,8 @@ void runVirtualFluids(const vf::basics::ConfigurationFile &config)
gridBuilder->setVelocityBoundaryCondition(SideType::GEOMETRY, 0.0, 0.0, 0.0);
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityAndPressureCompressible);
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipCompressible);
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityWithPressureInterpolatedCompressible);
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipInterpolatedCompressible);
bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::OutflowNonReflective);
//////////////////////////////////////////////////////////////////////////
@@ -686,8 +686,8 @@ void runVirtualFluids(const vf::basics::ConfigurationFile &config)
gridBuilder->setVelocityBoundaryCondition(SideType::GEOMETRY, 0.0, 0.0, 0.0);
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipCompressible);
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipInterpolatedCompressible);
bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::PressureNonEquilibriumCompressible);
//////////////////////////////////////////////////////////////////////////
diff --git a/cpu.cmake b/cpu.cmake
index 8be0f94e61abd748af369bd44d99f7252d6ae29b..3cc482ca97ea98aafd8b7995d69f0c7bf4fffcd2 100644
--- a/cpu.cmake
+++ b/cpu.cmake
@@ -47,5 +47,5 @@ add_subdirectory(apps/cpu/LaminarPipeFlow)
if(BUILD_USE_BOOST)
- add_subdirectory(apps/cpu/TPMSRow)
+ add_subdirectory(apps/cpu/GyroidsRow)
endif()
diff --git a/gpu.cmake b/gpu.cmake
index 76d5cc898827e51015fc4a0a815e11acbe99dde8..9e53ff1cf79c092f9fc6bc88fb2be019e8cc49c6 100644
--- a/gpu.cmake
+++ b/gpu.cmake
@@ -13,15 +13,15 @@ add_subdirectory(src/gpu/core)
if(BUILD_VF_ALL_SAMPLES)
list(APPEND USER_APPS
"apps/gpu/DrivenCavityMultiGPU"
+ "apps/gpu/AtmosphericBoundaryLayer"
"apps/gpu/ActuatorLine"
- "apps/gpu/SphereScaling"
+ "apps/gpu/SphereMultiGPU"
"apps/gpu/TGV_3D"
"apps/gpu/gridGeneratorTest")
endif()
add_subdirectory(apps/gpu/DrivenCavity)
-add_subdirectory(apps/gpu/SphereGPU)
-add_subdirectory(apps/gpu/BoundaryLayer)
+add_subdirectory(apps/gpu/SphereInChannel)
#############################################################
### Numeric Tests ###
diff --git a/pythonbindings/pyfluids-stubs/gpu/__init__.pyi b/pythonbindings/pyfluids-stubs/gpu/__init__.pyi
index 31fe74fb1a9d607960d21e7bf5448d95d99d1211..536ae4a2a57ddfb4ed155ca8a794a171bb3ed450 100644
--- a/pythonbindings/pyfluids-stubs/gpu/__init__.pyi
+++ b/pythonbindings/pyfluids-stubs/gpu/__init__.pyi
@@ -136,9 +136,9 @@ class CudaMemoryManager:
def __init__(self, parameter: Parameter) -> None: ...
-class FileType:
+class TransientBCFileType:
__members__: ClassVar[dict] = ... # read-only
- VTK: ClassVar[FileType] = ...
+ VTK: ClassVar[TransientBCFileType] = ...
__entries: ClassVar[dict] = ...
def __init__(self, arg0: int) -> None: ...
def __eq__(self, arg0: object) -> bool: ...
@@ -441,4 +441,4 @@ class VelocityBC:
def name(self) -> str: ...
-def create_file_collection(prefix: str, type: FileType) -> FileCollection: ...
+def create_file_collection(prefix: str, type: TransientBCFileType) -> FileCollection: ...
diff --git a/pythonbindings/pyfluids-stubs/gpu/grid_generator.pyi b/pythonbindings/pyfluids-stubs/gpu/grid_generator.pyi
index baf5c8b6def1bbc37f818d149943542b944e2c4e..ebab9fd0743c1bb87cb1a591e070a5dc38dd9063 100644
--- a/pythonbindings/pyfluids-stubs/gpu/grid_generator.pyi
+++ b/pythonbindings/pyfluids-stubs/gpu/grid_generator.pyi
@@ -70,6 +70,8 @@ class GridFactory:
@staticmethod
def make() -> GridFactory: ...
+class GridDimensions:
+ def __init__(self, min_x: float, max_x: float, min_y: float, max_y: float, min_z: float, max_z: float, delta: float) -> None: ...
class LevelGridBuilder(GridBuilder):
def __init__(self, *args, **kwargs) -> None: ...
@@ -94,8 +96,11 @@ class MultipleGridBuilder(LevelGridBuilder):
def __init__(self, *args, **kwargs) -> None: ...
@staticmethod
def make_shared(grid_factory: GridFactory) -> MultipleGridBuilder: ...
+ @overload
def add_coarse_grid(self, start_x: float, start_y: float, start_z: float, end_x: float, end_y: float, end_z: float, delta: float) -> None: ...
@overload
+ def add_coarse_grid(self, gridDimensions: GridDimensions) -> None: ...
+ @overload
def add_grid(self, grid_shape: Object) -> None: ...
@overload
def add_grid(self, grid_shape: Object, level_fine: int) -> None: ...
diff --git a/pythonbindings/src/gpu/submodules/boundary_conditions.cpp b/pythonbindings/src/gpu/submodules/boundary_conditions.cpp
index 21e3e85f6aaf3b802dc418161aa4789e2ac304b6..cd1bba026bbbda4fa83c282b417ac407f5b8a3dc 100644
--- a/pythonbindings/src/gpu/submodules/boundary_conditions.cpp
+++ b/pythonbindings/src/gpu/submodules/boundary_conditions.cpp
@@ -60,19 +60,18 @@ namespace boundary_conditions
.def("set_geometry_boundary_condition", &BoundaryConditionFactory::setGeometryBoundaryCondition, py::arg("boundary_condition_type"));
py::enum_<BoundaryConditionFactory::VelocityBC>(parentModule, "VelocityBC")
- .value("VelocitySimpleBounceBackCompressible", BoundaryConditionFactory::VelocityBC::VelocitySimpleBounceBackCompressible)
- .value("VelocityIncompressible", BoundaryConditionFactory::VelocityBC::VelocityIncompressible)
- .value("VelocityCompressible", BoundaryConditionFactory::VelocityBC::VelocityCompressible)
- .value("VelocityAndPressureCompressible", BoundaryConditionFactory::VelocityBC::VelocityAndPressureCompressible)
+ .value("VelocityBounceBack", BoundaryConditionFactory::VelocityBC::VelocityBounceBack)
+ .value("VelocityInterpolatedIncompressible", BoundaryConditionFactory::VelocityBC::VelocityInterpolatedIncompressible)
+ .value("VelocityInterpolatedCompressible", BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible)
+ .value("VelocityWithPressureInterpolatedCompressible", BoundaryConditionFactory::VelocityBC::VelocityWithPressureInterpolatedCompressible)
.value("NotSpecified", BoundaryConditionFactory::VelocityBC::NotSpecified);
py::enum_<BoundaryConditionFactory::NoSlipBC>(parentModule, "NoSlipBC")
- .value("NoSlipImplicitBounceBack", BoundaryConditionFactory::NoSlipBC::NoSlipImplicitBounceBack)
+ .value("NoSlipDelayBounceBack", BoundaryConditionFactory::NoSlipBC::NoSlipDelayBounceBack)
.value("NoSlipBounceBack", BoundaryConditionFactory::NoSlipBC::NoSlipBounceBack)
- .value("NoSlipIncompressible", BoundaryConditionFactory::NoSlipBC::NoSlipIncompressible)
- .value("NoSlipCompressible", BoundaryConditionFactory::NoSlipBC::NoSlipCompressible)
- .value("NoSlip3rdMomentsCompressible", BoundaryConditionFactory::NoSlipBC::NoSlip3rdMomentsCompressible);
+ .value("NoSlipInterpolatedIncompressible", BoundaryConditionFactory::NoSlipBC::NoSlipInterpolatedIncompressible)
+ .value("NoSlipInterpolatedCompressible", BoundaryConditionFactory::NoSlipBC::NoSlipInterpolatedCompressible);
py::enum_<BoundaryConditionFactory::SlipBC>(parentModule, "SlipBC")
.value("SlipIncompressible", BoundaryConditionFactory::SlipBC::SlipIncompressible)
@@ -83,8 +82,6 @@ namespace boundary_conditions
.value("NotSpecified", BoundaryConditionFactory::SlipBC::NotSpecified);
py::enum_<BoundaryConditionFactory::PressureBC>(parentModule, "PressureBC")
- .value("PressureEquilibrium", BoundaryConditionFactory::PressureBC::PressureEquilibrium)
- .value("PressureEquilibrium2", BoundaryConditionFactory::PressureBC::PressureEquilibrium2)
.value("PressureNonEquilibriumIncompressible", BoundaryConditionFactory::PressureBC::PressureNonEquilibriumIncompressible)
.value("PressureNonEquilibriumCompressible", BoundaryConditionFactory::PressureBC::PressureNonEquilibriumCompressible)
.value("OutflowNonReflective", BoundaryConditionFactory::PressureBC::OutflowNonReflective)
diff --git a/pythonbindings/src/gpu/submodules/grid_generator.cpp b/pythonbindings/src/gpu/submodules/grid_generator.cpp
index e313be7cae97e8dbab47cb36b1835769657c63ab..56751c8885ea39085c5cc1f601f7af165e38f9d1 100644
--- a/pythonbindings/src/gpu/submodules/grid_generator.cpp
+++ b/pythonbindings/src/gpu/submodules/grid_generator.cpp
@@ -41,6 +41,7 @@
#include "gpu/GridGenerator/grid/GridBuilder/GridBuilder.h"
#include "gpu/GridGenerator/grid/GridBuilder/LevelGridBuilder.h"
#include "gpu/GridGenerator/grid/GridBuilder/MultipleGridBuilder.h"
+#include "gpu/GridGenerator/grid/GridDimensions.h"
#include "basics/constants/NumericConstants.h"
using namespace vf::basics::constant;
@@ -82,6 +83,9 @@ namespace grid_generator
py::class_<TriangularMesh, Object, std::shared_ptr<TriangularMesh>>(gridGeneratorModule, "TriangularMesh")
.def_static("make", &TriangularMesh::make, py::return_value_policy::reference);
+ py::class_<GridDimensions, std::shared_ptr<GridDimensions>>(gridGeneratorModule, "GridDimension")
+ .def(py::init<real, real, real, real, real, real, real>(), py::arg("min_x"), py::arg("max_x"), py::arg("min_y"), py::arg("max_y"), py::arg("min_z"), py::arg("max_z"), py::arg("delta"));
+
py::class_<GridBuilder, std::shared_ptr<GridBuilder>>(gridGeneratorModule, "GridBuilder")
.def("get_number_of_grid_levels", &GridBuilder::getNumberOfGridLevels);
@@ -103,7 +107,8 @@ namespace grid_generator
py::class_<MultipleGridBuilder, LevelGridBuilder, std::shared_ptr<MultipleGridBuilder>>(gridGeneratorModule, "MultipleGridBuilder")
.def(py::init())
- .def("add_coarse_grid", &MultipleGridBuilder::addCoarseGrid, py::arg("start_x"), py::arg("start_y"), py::arg("start_z"), py::arg("end_x"), py::arg("end_y"), py::arg("end_z"), py::arg("delta"))
+ .def("add_coarse_grid", py::overload_cast<real, real, real, real, real, real, real>(&MultipleGridBuilder::addCoarseGrid), py::arg("start_x"), py::arg("start_y"), py::arg("start_z"), py::arg("end_x"), py::arg("end_y"), py::arg("end_z"), py::arg("delta"))
+ .def("add_coarse_grid", py::overload_cast<const GridDimensions&>(&MultipleGridBuilder::addCoarseGrid), py::arg("gridDimensions"))
.def("add_grid", py::overload_cast<SPtr<Object>>(&MultipleGridBuilder::addGrid), py::arg("grid_shape"))
.def("add_grid", py::overload_cast<SPtr<Object>, uint>(&MultipleGridBuilder::addGrid), py::arg("grid_shape"), py::arg("level_fine"))
.def("add_geometry", py::overload_cast<SPtr<Object>>(&MultipleGridBuilder::addGeometry), py::arg("solid_object"))
diff --git a/pythonbindings/src/gpu/submodules/transient_bc_setter.cpp b/pythonbindings/src/gpu/submodules/transient_bc_setter.cpp
index 89370ef4c1b91a0c8e480e968a1df3bd4fe540ca..80e49092c9629329534da42953675dcc761228b0 100644
--- a/pythonbindings/src/gpu/submodules/transient_bc_setter.cpp
+++ b/pythonbindings/src/gpu/submodules/transient_bc_setter.cpp
@@ -39,8 +39,8 @@ namespace transient_bc_setter
void makeModule(py::module_ &parentModule)
{
- py::enum_<FileType>(parentModule, "FileType")
- .value("VTK", FileType::VTK);
+ py::enum_<TransientBCFileType>(parentModule, "TransientBCFileType")
+ .value("VTK", TransientBCFileType::VTK);
parentModule.def("create_file_collection", &createFileCollection, py::arg("prefix"), py::arg("type"));
diff --git a/regression-tests/actuator_line_test.sh b/regression-tests/actuator_line_test.sh
index 6459154f325bcf81d3cfa2d3b7fc9c5a06638044..42460c1be56620e12922ade0b63776ffddc25615 100755
--- a/regression-tests/actuator_line_test.sh
+++ b/regression-tests/actuator_line_test.sh
@@ -6,10 +6,10 @@ source ./regression-tests/__regression_test_executer.sh
REFERENCE_DATA_DIR=regression_tests/gpu/ActuatorLine
# 2. set cmake flags for the build of VirtualFluids
-CMAKE_FLAGS="--preset=make_gpu -DCMAKE_BUILD_TYPE=Release -DCMAKE_CUDA_ARCHITECTURES=75 -DUSER_APPS=apps/gpu/ActuatorLineRegression"
+CMAKE_FLAGS="--preset=make_gpu -DCMAKE_BUILD_TYPE=Release -DCMAKE_CUDA_ARCHITECTURES=75 -DUSER_APPS=apps/gpu/ActuatorLine"
# 3. define the application to be executed
-APPLICATION=./build/bin/ActuatorLineRegression
+APPLICATION="./build/bin/ActuatorLine ./apps/gpu/ActuatorLine/configActuatorLineRegression.txt"
# 4. set the path to the produced data
RESULT_DATA_DIR=output/ActuatorLine
diff --git a/regression-tests/atmospheric_boundary_layer_test.sh b/regression-tests/atmospheric_boundary_layer_test.sh
new file mode 100755
index 0000000000000000000000000000000000000000..8c120fb8d4133f4736d87246d85b5818b68d43e9
--- /dev/null
+++ b/regression-tests/atmospheric_boundary_layer_test.sh
@@ -0,0 +1,19 @@
+#!/bin/bash
+source ./regression-tests/__regression_test_executer.sh
+
+
+# 1. set reference data directory (must match the folder structure in https://github.com/irmb/test_data)
+REFERENCE_DATA_DIR=regression_tests/gpu/AtmosphericBoundaryLayer
+
+# 2. set cmake flags for the build of VirtualFluids
+CMAKE_FLAGS="--preset=make_gpu -DCMAKE_BUILD_TYPE=Release -DCMAKE_CUDA_ARCHITECTURES=75 -DUSER_APPS=apps/gpu/AtmosphericBoundaryLayer"
+
+# 3. define the application to be executed
+APPLICATION="./build/bin/AtmosphericBoundaryLayer ./apps/gpu/AtmosphericBoundaryLayer/configAtmosphericBoundaryLayerRegression.txt"
+
+# 4. set the path to the produced data
+RESULT_DATA_DIR=output/AtmosphericBoundaryLayer
+
+
+run_regression_test "$REFERENCE_DATA_DIR" "$CMAKE_FLAGS" "$APPLICATION" "$RESULT_DATA_DIR" --ignore-missing-reference-files
+
diff --git a/regression-tests/flow_around_cylinder_test.sh b/regression-tests/flow_around_cylinder_test.sh
index 7e215486332581722cf64c566b9736d3857927e3..33e19fdf49a9e26504c6b988dd486c8ee8ca3b58 100755
--- a/regression-tests/flow_around_cylinder_test.sh
+++ b/regression-tests/flow_around_cylinder_test.sh
@@ -17,3 +17,19 @@ RESULT_DATA_DIR=output/FlowAroundCylinder
run_regression_test "$REFERENCE_DATA_DIR" "$CMAKE_FLAGS" "$APPLICATION" "$RESULT_DATA_DIR"
+
+
+# compare forces file manually
+file1="$RESULT_DATA_DIR/results/forces.txt"
+file2="reference_data/$REFERENCE_DATA_DIR/results/forces.txt"
+
+if cmp -s "$file1" "$file2"; then
+ printf 'The file "%s" is the same as "%s"\n' "$file1" "$file2"
+else
+ printf 'The file "%s" is different from "%s"\n' "$file1" "$file2"
+ printf $file1
+ cat $file1
+ printf $file2
+ cat $file2
+ exit 1
+fi
diff --git a/regression-tests/multigpu_test/rocket4GPU.yml b/regression-tests/multigpu_test/rocket4GPU.yml
index e8722cf367832104a12935af5bbbe660ce8e7fcc..d0c38bfec2e57f92b6091603b35dc80669038dfe 100755
--- a/regression-tests/multigpu_test/rocket4GPU.yml
+++ b/regression-tests/multigpu_test/rocket4GPU.yml
@@ -3,10 +3,6 @@ user: $PHOENIX_REMOTE_USER
private_keyfile: $PHOENIX_PRIVATE_KEY
copy:
- - from: regression-tests/multigpu_test/slurm4GPU.job
- to: multigpu_test/slurm4GPU.job
- overwrite: true
-
- from: "CMake/"
to: "multigpu_test/CMake/"
overwrite: true
@@ -47,5 +43,9 @@ collect:
clean:
- multigpu_test/*
-sbatch: multigpu_test/slurm4GPU.job
+sbatch:
+ script: multigpu_test/slurm4GPU.job
+ from: regression-tests/multigpu_test/slurm4GPU.job
+ overwrite: true
+
continue_if_job_fails: true
diff --git a/regression-tests/multigpu_test/rocket8GPU.yml b/regression-tests/multigpu_test/rocket8GPU.yml
index d179dbc84d1f80b0efb9fcb368bffaa2732c26da..6195240c941b98a4e7ff614746a36a37b09207ad 100755
--- a/regression-tests/multigpu_test/rocket8GPU.yml
+++ b/regression-tests/multigpu_test/rocket8GPU.yml
@@ -3,10 +3,6 @@ user: $PHOENIX_REMOTE_USER
private_keyfile: $PHOENIX_PRIVATE_KEY
copy:
- - from: regression-tests/multigpu_test/slurm8GPU.job
- to: multigpu_test/slurm8GPU.job
- overwrite: true
-
- from: "CMake/"
to: "multigpu_test/CMake/"
overwrite: true
@@ -47,5 +43,9 @@ collect:
clean:
- multigpu_test/*
-sbatch: multigpu_test/slurm8GPU.job
+sbatch:
+ script: multigpu_test/slurm8GPU.job
+ from: regression-tests/multigpu_test/slurm8GPU.job
+ overwrite: true
+
continue_if_job_fails: true
diff --git a/regression-tests/multigpu_test/slurm4GPU.job b/regression-tests/multigpu_test/slurm4GPU.job
index ce678a57945c87f881f88887e88d79dff51bef0e..ed39e9f9299525be8f4b4f159b4e7b7bc9326d89 100755
--- a/regression-tests/multigpu_test/slurm4GPU.job
+++ b/regression-tests/multigpu_test/slurm4GPU.job
@@ -19,20 +19,20 @@ module load comp/gcc/10.2.0
module load mpi/openmpi/4.0.5_gcc_9.3/openmpi
module load cuda/11.3
module load comp/git/2.27.0
-PATH=/home/irmb/tools/cmake-3.20.3-linux-x86_64/bin:$PATH
+PATH=/home/irmb/tools/cmake-3.26.4-linux-x86_64/bin:$PATH
module list
cd multigpu_test
rm -rf build && mkdir -p build
cd build
-cmake .. -DBUILD_VF_GPU=ON -DCMAKE_CUDA_ARCHITECTURES=60 -DUSER_APPS=apps/gpu/DrivenCavityMultiGPU\;apps/gpu/SphereScaling
+cmake .. -DBUILD_VF_GPU=ON -DCMAKE_CUDA_ARCHITECTURES=60 -DUSER_APPS=apps/gpu/DrivenCavityMultiGPU\;apps/gpu/SphereMultiGPU
make -j 16
cd ..
mkdir -p output
echo $'\n\n\n\n---First test: DrivenCavityMultiGPU on 4 GPUs\n\n'
-mpirun -np 4 "./build/bin/DrivenCavityMultiGPU" "apps/gpu/DrivenCavityMultiGPU/configPhoenix4GPU_regressionTest.txt"
+mpirun -np 4 "./build/bin/DrivenCavityMultiGPU" "apps/gpu/DrivenCavityMultiGPU/drivencavity_regressiontest_4gpu.cfg"
-echo $'\n\n\n\n---Second test: SphereScaling on 4 GPUs\n\n'
-mpirun -np 4 "./build/bin/SphereScaling" "apps/gpu/SphereScaling/configPhoenix4GPU_regressionTest.txt"
\ No newline at end of file
+echo $'\n\n\n\n---Second test: SphereMultiGPU on 4 GPUs\n\n'
+mpirun -np 4 "./build/bin/SphereMultiGPU" "apps/gpu/SphereMultiGPU/sphere_regressiontest_4gpu.cfg"
\ No newline at end of file
diff --git a/regression-tests/multigpu_test/slurm8GPU.job b/regression-tests/multigpu_test/slurm8GPU.job
index 0b97ce0cd17325f59d28c9fe0da92724201b1304..a354d71e4180f2e6122b26f997968459ed9aed82 100755
--- a/regression-tests/multigpu_test/slurm8GPU.job
+++ b/regression-tests/multigpu_test/slurm8GPU.job
@@ -19,20 +19,20 @@ module load comp/gcc/10.2.0
module load mpi/openmpi/4.0.5_gcc_9.3/openmpi
module load cuda/11.3
module load comp/git/2.27.0
-PATH=/home/irmb/tools/cmake-3.20.3-linux-x86_64/bin:$PATH
+PATH=/home/irmb/tools/cmake-3.26.4-linux-x86_64/bin:$PATH
module list
cd multigpu_test
rm -rf build && mkdir -p build
cd build
-cmake .. -DBUILD_VF_GPU=ON -DCMAKE_CUDA_ARCHITECTURES=60 -DUSER_APPS=apps/gpu/DrivenCavityMultiGPU\;apps/gpu/SphereScaling
+cmake .. -DBUILD_VF_GPU=ON -DCMAKE_CUDA_ARCHITECTURES=60 -DUSER_APPS=apps/gpu/DrivenCavityMultiGPU\;apps/gpu/SphereMultiGPU
make -j 16
cd ..
mkdir -p output
echo $'\n\n\n\n---First test: DrivenCavityMultiGPU on 8 GPUs\n\n'
-mpirun -np 8 "./build/bin/DrivenCavityMultiGPU" "apps/gpu/DrivenCavityMultiGPU/configPhoenix8GPU_regressionTest.txt"
+mpirun -np 8 "./build/bin/DrivenCavityMultiGPU" "apps/gpu/DrivenCavityMultiGPU/drivencavity_regressiontest_8gpu.cfg"
-echo $'\n\n\n\n---Second test: SphereScaling on 8 GPUs\n\n'
-mpirun -np 8 "./build/bin/SphereScaling" "apps/gpu/SphereScaling/configPhoenix8GPU_regressionTest.txt"
\ No newline at end of file
+echo $'\n\n\n\n---Second test: SphereMultiGPU on 8 GPUs\n\n'
+mpirun -np 8 "./build/bin/SphereMultiGPU" "apps/gpu/SphereMultiGPU/sphere_regressiontest_8gpu.cfg"
\ No newline at end of file
diff --git a/regression-tests/refined_sphere_in_channel_test.sh b/regression-tests/refined_sphere_in_channel_test.sh
index 51b6fa9481761f9727b4e4d7dc96945acae49265..1cf9903ecae45fceb80d9e074176e9b7f7a16bb6 100644
--- a/regression-tests/refined_sphere_in_channel_test.sh
+++ b/regression-tests/refined_sphere_in_channel_test.sh
@@ -6,15 +6,15 @@ source ./regression-tests/__regression_test_executer.sh
REFERENCE_DATA_DIR=regression_tests/gpu/SphereInChannel_3Levels
# 2. set cmake flags for the build of VirtualFluids
-CMAKE_FLAGS="--preset=make_gpu -DCMAKE_BUILD_TYPE=Release -DCMAKE_CUDA_ARCHITECTURES=75 -DUSER_APPS=apps/gpu/SphereRefined"
+CMAKE_FLAGS="--preset=make_gpu -DCMAKE_BUILD_TYPE=Release -DCMAKE_CUDA_ARCHITECTURES=75"
# 3. define the application to be executed
-APPLICATION=./build/bin/SphereRefined
+APPLICATION="./build/bin/SphereInChannel ./apps/gpu/SphereInChannel/sphere_3level.cfg"
# 4. set the path to the produced data
-RESULT_DATA_DIR=output/SphereRefined
+RESULT_DATA_DIR=output/SphereInChannel_3Level
run_regression_test "$REFERENCE_DATA_DIR" "$CMAKE_FLAGS" "$APPLICATION" "$RESULT_DATA_DIR"
-# fieldcompare dir output/Sphere reference_data/regression_tests/gpu/SphereInChannel --include-files "*.vtu"
\ No newline at end of file
+# fieldcompare dir output/SphereInChannel_3Level reference_data/regression_tests/gpu/SphereInChannelSphereInChannel_3Levels --include-files "*.vtu"
\ No newline at end of file
diff --git a/regression-tests/sphere_in_channel_test.sh b/regression-tests/sphere_in_channel_test.sh
index e416d535d274537d008a442435f66a38dd69fac1..c71efc3b283c759f6bdef4365fb0357415a7f366 100644
--- a/regression-tests/sphere_in_channel_test.sh
+++ b/regression-tests/sphere_in_channel_test.sh
@@ -9,12 +9,10 @@ REFERENCE_DATA_DIR=regression_tests/gpu/SphereInChannel
CMAKE_FLAGS="--preset=make_gpu -DCMAKE_BUILD_TYPE=Release -DCMAKE_CUDA_ARCHITECTURES=75"
# 3. define the application to be executed
-APPLICATION=./build/bin/SphereGPU
+APPLICATION="./build/bin/SphereInChannel ./apps/gpu/SphereInChannel/sphere_1level.cfg"
# 4. set the path to the produced data
-RESULT_DATA_DIR=output/Sphere
+RESULT_DATA_DIR=output/SphereInChannel_1Level
-run_regression_test "$REFERENCE_DATA_DIR" "$CMAKE_FLAGS" "$APPLICATION" "$RESULT_DATA_DIR"
-
-# fieldcompare dir output/Sphere reference_data/regression_tests/gpu/SphereInChannel --include-files "*.vtu"
\ No newline at end of file
+run_regression_test "$REFERENCE_DATA_DIR" "$CMAKE_FLAGS" "$APPLICATION" "$RESULT_DATA_DIR"
\ No newline at end of file
diff --git a/src/basics/geometry3d/GbGyroidThirdOrder.cpp b/src/basics/geometry3d/GbGyroidThirdOrder.cpp
new file mode 100644
index 0000000000000000000000000000000000000000..48c00f5a50384ae016f38dca5a4a92d250b1b0ef
--- /dev/null
+++ b/src/basics/geometry3d/GbGyroidThirdOrder.cpp
@@ -0,0 +1,390 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \file GbGyroidThirdOrder.cpp
+//! \ingroup geometry3d
+//! \author Hussein Alihussein
+//=======================================================================================
+
+#include <GbGyroidThirdOrder.h>
+
+#ifdef BUILD_USE_BOOST
+
+#include <basics/utilities/UbMath.h>
+
+#include <geometry3d/GbSystem3D.h>
+#include <geometry3d/GbTriangle3D.h>
+
+#include <boost/math/tools/roots.hpp>
+
+
+using namespace std;
+using boost::math::tools::bisect;
+
+
+/*=======================================================*/
+GbGyroidThirdOrder::GbGyroidThirdOrder()
+{
+
+}
+/*=======================================================*/
+// Konstruktor
+GbGyroidThirdOrder::GbGyroidThirdOrder(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b, const double& edgeLength, const double& dx, const double& thickness) :GbObject3D()
+{
+ this->p1 = new GbPoint3D(x1a, x2a, x3a);
+ this->p2 = new GbPoint3D(x1b, x2b, x3b);
+ this->p1->addObserver(this);
+ this->p2->addObserver(this);
+
+ this->p3 = new GbPoint3D(x1a, x2a, x3a);
+ this->p4 = new GbPoint3D(x1b, x2b, x3b);
+ this->p3->addObserver(this);
+ this->p4->addObserver(this);
+
+ this->edgeLength = edgeLength;
+ this->dx = dx;
+ this->thickness = thickness;
+}
+/*=======================================================*/
+GbGyroidThirdOrder::GbGyroidThirdOrder(GbGyroidThirdOrder * imp)
+{
+}
+/*=======================================================*/
+// Destruktor
+GbGyroidThirdOrder::~GbGyroidThirdOrder()
+{
+ if (this->p1)
+ this->p1->removeObserver(this);
+ if (this->p2)
+ this->p2->removeObserver(this);
+ if (this->p3)
+ this->p3->removeObserver(this);
+ if (this->p4)
+ this->p4->removeObserver(this);
+}
+/*=======================================================*/
+struct TerminationCondition {
+ bool operator() (double min, double max) {
+ return abs(min - max) <= 10e-10;
+ }
+};
+/*============================================M-===========*/
+struct FunctionToApproximate {
+ double x, y, z;
+ double dir1, dir2, dir3, L;
+ double operator() (double q) {
+ return sin(2.*M_PI / L*(x + q*dir1))*cos(2.*M_PI / L*(y + q*dir2)) + sin(2.*M_PI / L*(y + q*dir2))*cos(2.*M_PI / L*(z + q*dir3)) + sin(2.*M_PI / L*(z + q*dir3))*cos(2.*M_PI / L*(x + q*dir1));
+ }
+};
+/*=======================================================*/
+struct FunctionGyroidThirdOrder {
+ double x, y, z;
+ double dir1, dir2, dir3, L;
+ double h;
+
+
+ double operator() (double q) {
+ double t17, t3, t2, t18, t20, t8, t13, t5, t9, t6, t11, t14;
+ double f300, f210, f201, f120, f102, f030, f021, f012, f003, f200, f110, f101, f020, f011, f002, f100, f010, f001, f000;
+
+ double L_cubed, PI_cubed, L_squared, PI_squared, repeatedTermPsquared;
+
+ double repeatedTerm, repeatedTermRoot, repeatedTermRoot2, repeatedTermPowerOneandHalf;
+ double T1, T2, T3, T4, T5, T6, T7, T8, T9, Gyroidh;
+
+ //sins and cosines combinations
+ t2 = sin((2. * M_PI*(x+q*dir1)) / L)*sin((2. * M_PI*(y+q*dir2)) / L);
+ t3 = sin((2. * M_PI*(x+q*dir1)) / L)*sin((2. * M_PI*(z+q*dir3)) / L);
+ t5 = cos((2. * M_PI*(y+q*dir2)) / L)*sin((2. * M_PI*(x+q*dir1)) / L);
+ t6 = cos((2. * M_PI*(z+q*dir3)) / L)*sin((2. * M_PI*(x+q*dir1)) / L);
+ t8 = sin((2. * M_PI*(y+q*dir2)) / L)*sin((2. * M_PI*(z+q*dir3)) / L);
+ t9 = cos((2. * M_PI*(x+q*dir1)) / L)*sin((2. * M_PI*(y+q*dir2)) / L);
+ t11 = cos((2. * M_PI*(z+q*dir3)) / L)*sin((2. * M_PI*(y+q*dir2)) / L);
+ t13 = cos((2. * M_PI*(x+q*dir1)) / L)*sin((2. * M_PI*(z+q*dir3)) / L);
+ t14 = cos((2. * M_PI*(y+q*dir2)) / L)*sin((2. * M_PI*(z+q*dir3)) / L);
+ t17 = cos((2. * M_PI*(x+q*dir1)) / L)*cos((2. * M_PI*(y+q*dir2)) / L);
+ t18 = cos((2. * M_PI*(x+q*dir1)) / L)*cos((2. * M_PI*(z+q*dir3)) / L);
+ t20 = cos((2. * M_PI*(y+q*dir2)) / L)*cos((2. * M_PI*(z+q*dir3)) / L);
+
+ //Gyroid third order derivatives
+ L_cubed = pow(L, 3.);
+ PI_cubed = pow(M_PI, 3.);
+ f300 = (8. * PI_cubed*(-t17 + t3)) / L_cubed;
+ f210 = (8. * PI_cubed*t2) / L_cubed;
+ f201 = (-8. * PI_cubed*t18) / L_cubed;
+ f120 = (-8. * PI_cubed*t17) / L_cubed;
+ f102 = (8. * PI_cubed*t3) / L_cubed;
+ f030 = (8. * PI_cubed*(t2 - t20)) / L_cubed;
+ f021 = (8. * PI_cubed*t8) / L_cubed;
+ f012 = (-8. * PI_cubed*t20) / L_cubed;
+ f003 = (8. * PI_cubed*(-t18 + t8)) / L_cubed;
+
+ //Gyroid second order derivatives
+ L_squared = pow(L, 2.);
+ PI_squared = pow(M_PI, 2.);
+ f200 = (-4. * PI_squared*(t13 + t5)) / L_squared;
+ f110 = (-4. * PI_squared*t9) / L_squared;
+ f101 = (-4. * PI_squared*t6) / L_squared;
+ f020 = (-4. * PI_squared*(t11 + t5)) / L_squared;
+ f011 = (-4. * PI_squared*t14) / L_squared;
+ f002 = (-4. * PI_squared*(t11 + t13)) / L_squared;
+
+ //Gyroid first order derivatives
+ f100 = (2. * M_PI*(t17 - t3)) / L;
+ f010 = (2. * M_PI*(-t2 + t20)) / L;
+ f001 = (2. * M_PI*(t18 - t8)) / L;
+
+ //Gyroid
+ f000 = t11 + t13 + t5;
+
+ repeatedTerm = f100*f100 + f010*f010 + f001*f001;
+ repeatedTermRoot = sqrt(repeatedTerm);
+
+ T1 = f001*f002 + f010*f011 + f100*f101;
+ T2 = f001*f011 + f010*f020 + f100*f110;
+ T3 = f001*f101 + f010*f110 + f100*f200;
+ T4 = f002*f011 + f001*f012 + f011*f020 + f010*f021 + f101*f110;
+ T5 = f002*f101 + f001*f102 + f011*f110 + f101*f200 + f100*f201;
+ T6 = f011*f101 + f020*f110 + f010*f120 + f110*f200 + f100*f210;
+ T7 = f001*f002*h + f010*f011*h + f100*f101*h;
+ T8 = f001*f011*h + f010*f020*h + f100*f110*h;
+ T9 = f001*f101*h + f010*f110*h + f100*f200*h;
+
+ repeatedTermRoot2 = sqrt(pow(f001 - (T1*h) / (3.*repeatedTermRoot), 2) + pow(f010 - (T2*h) / (3.*repeatedTermRoot), 2) + pow(f100 - (T3*h) / (3.*repeatedTermRoot), 2));
+ repeatedTermPowerOneandHalf = pow(repeatedTerm, 1.5);
+ repeatedTermPsquared = pow(repeatedTerm, 2.);
+
+ Gyroidh = 2 * h*sqrt(pow(f001 - (T1*h) / (2.*repeatedTermRoot), 2) + pow(f010 - (T2*h) / (2.*repeatedTermRoot), 2) + pow(f100 - (T3*h) / (2.*repeatedTermRoot), 2))
+ - (3 * h*repeatedTermRoot2) / 2.
+ - (3 * h*sqrt(pow(f001 - (T1*h) / (3.*repeatedTermRoot) + (h*((T7 - 3 * f001*repeatedTermRoot)*
+ (4 * pow(T1, 2)*h - 4 * (pow(f002, 2) + f001*f003 + pow(f011, 2) + f010*f012 + pow(f101, 2) + f100*f102)*h*repeatedTerm + 12 * f002*repeatedTermPowerOneandHalf) +
+ (T8 - 3 * f010*repeatedTermRoot)*(4 * T1*T2*h - 4 * (T4)*h*repeatedTerm + 12 * f011*repeatedTermPowerOneandHalf) +
+ (T9 - 3 * f100*repeatedTermRoot)*(4 * T1*T3*h - 4 * (T5)*h*repeatedTerm + 12 * f101*repeatedTermPowerOneandHalf))) /
+ (108.*repeatedTermRoot2*
+ repeatedTermPsquared), 2) + pow(f010 - (T2*h) / (3.*repeatedTermRoot) +
+ (h*((T7 - 3 * f001*repeatedTermRoot)*(4 * T1*T2*h - 4 * (T4)*h*repeatedTerm + 12 * f011*repeatedTermPowerOneandHalf) +
+ (T8 - 3 * f010*repeatedTermRoot)*(4 * pow(T2, 2)*h - 4 * (pow(f011, 2) + pow(f020, 2) + f001*f021 + f010*f030 + pow(f110, 2) + f100*f120)*h*repeatedTerm + 12 * f020*repeatedTermPowerOneandHalf) +
+ (T9 - 3 * f100*repeatedTermRoot)*(4 * T2*T3*h - 4 * (T6)*h*repeatedTerm + 12 * f110*repeatedTermPowerOneandHalf))) /
+ (108.*repeatedTermRoot2*
+ repeatedTermPsquared), 2) + pow(f100 - (T3*h) / (3.*repeatedTermRoot) +
+ (h*((T7 - 3 * f001*repeatedTermRoot)*(4 * T1*T3*h - 4 * (T5)*h*repeatedTerm + 12 * f101*repeatedTermPowerOneandHalf) +
+ (T8 - 3 * f010*repeatedTermRoot)*(4 * T2*T3*h - 4 * (T6)*h*repeatedTerm + 12 * f110*repeatedTermPowerOneandHalf) +
+ (T9 - 3 * f100*repeatedTermRoot)*(4 * pow(T3, 2)*h - 4 * (pow(f101, 2) + pow(f110, 2) + pow(f200, 2) + f001*f201 + f010*f210 + f100*f300)*h*repeatedTerm + 12 * f200*repeatedTermPowerOneandHalf))) /
+ (108.*repeatedTermRoot2*
+ repeatedTermPsquared), 2))) / 2. + f000;
+
+ return Gyroidh;
+ }
+};
+/*==========================================================*/
+bool GbGyroidThirdOrder::isPointInGbObject3D(const double& x1, const double& x2, const double& x3)
+{
+ //double f = sin(2.*M_PI*x1/edgeLength)*cos(2.*M_PI*x2 / edgeLength) + sin(2.*M_PI*x2 / edgeLength)*cos(2.*M_PI*x3 / edgeLength) + sin(2.*M_PI*x3 / edgeLength)*cos(2.*M_PI*x1 / edgeLength);
+ //evaluateImplicitFunction(x1,x2,x3, 0., 0., 0.)
+ double f1 = evaluateImplicitFunction(x1, x2, x3, 1.);
+ double f2 = evaluateImplicitFunction(x1, x2, x3, -1.);
+ return UbMath::lessEqual(f1,0.) && UbMath::greaterEqual(f2,0.);
+
+}
+
+/*==========================================================*/
+double GbGyroidThirdOrder::getIntersectionRaytraceFactor(const double& x1, const double& x2, const double& x3, const double& rx1, const double& rx2, const double& rx3)
+{
+ double from = 0; // The solution must lie in the interval [from, to], additionally f(from) <= 0 && f(to) >= 0
+ double to = dx*sqrt(rx1*rx1+ rx2*rx2+ rx3*rx3);
+ FunctionGyroidThirdOrder f;
+ //FunctionToApproximate f;
+ f.x =x1 ;
+ f.y =x2 ;
+ f.z =x3 ;
+ f.dir1 = rx1;
+ f.dir2 = rx2;
+ f.dir3 = rx3;
+ f.L = edgeLength;
+ f.h = thickness;
+ if (f(from)*f(to)<0)
+ {
+ std::pair<double, double> result = bisect(f, from, to, TerminationCondition());
+ double root = (result.first + result.second) / 2;
+ return root;
+ }
+ f.h = -thickness;
+ if (f(from)*f(to) < 0)
+ {
+ std::pair<double, double> result = bisect(f, from, to, TerminationCondition());
+ double root = (result.first + result.second) / 2;
+ return root;
+ }
+ else
+ {
+ return 999;
+ }
+
+}
+/*=======================================================*/
+double GbGyroidThirdOrder::evaluateImplicitFunction(const double& x1, const double& x2, const double& x3, const double& position)
+{
+ double to = 0.;
+ FunctionGyroidThirdOrder f;
+ f.x = x1;
+ f.y = x2;
+ f.z = x3;
+ f.dir1 = 0.;
+ f.dir2 = 0.;
+ f.dir3 = 0.;
+ f.L = edgeLength;
+ f.h = position*thickness;
+ return f(to);
+}
+/*=======================================================*/
+double GbGyroidThirdOrder::getX1Centroid()
+{
+ return (0.5*(p1->x1 + p2->x1));
+}
+/*=======================================================*/
+double GbGyroidThirdOrder::getX1Minimum()
+{
+ return (this->p1->x1 < this->p2->x1 ? this->p1->x1 : this->p2->x1);
+}
+/*=======================================================*/
+double GbGyroidThirdOrder::getX1Maximum()
+{
+ return (this->p1->x1 > this->p2->x1 ? this->p1->x1 : this->p2->x1);
+}
+/*=======================================================*/
+double GbGyroidThirdOrder::getX2Centroid()
+{
+ return (0.5*(p1->x2 + p2->x2));
+}
+/*=======================================================*/
+double GbGyroidThirdOrder::getX2Minimum()
+{
+ return (this->p1->x2 < this->p2->x2 ? this->p1->x2 : this->p2->x2);
+}
+/*=======================================================*/
+double GbGyroidThirdOrder::getX2Maximum()
+{
+ return (this->p1->x2 > this->p2->x2 ? this->p1->x2 : this->p2->x2);
+}
+/*=======================================================*/
+double GbGyroidThirdOrder::getX3Centroid()
+{
+ return (0.5*(p1->x3 + p2->x3));
+}
+/*=======================================================*/
+double GbGyroidThirdOrder::getX3Minimum()
+{
+ return (this->p1->x3 < this->p2->x3 ? this->p1->x3 : this->p2->x3);
+}
+/*=======================================================*/
+double GbGyroidThirdOrder::getX3Maximum()
+{
+ return (this->p1->x3 > this->p2->x3 ? this->p1->x3 : this->p2->x3);
+}
+/*=======================================================*/
+bool GbGyroidThirdOrder::isCellInsideGbObject3D(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b)
+{
+ if (this->isPointInGbObject3D(x1a, x2a, x3a)
+ && this->isPointInGbObject3D(x1b, x2a, x3a)
+ && this->isPointInGbObject3D(x1b, x2b, x3a)
+ && this->isPointInGbObject3D(x1a, x2b, x3a)
+ && this->isPointInGbObject3D(x1a, x2a, x3b)
+ && this->isPointInGbObject3D(x1b, x2a, x3b)
+ && this->isPointInGbObject3D(x1b, x2b, x3b)
+ && this->isPointInGbObject3D(x1a, x2b, x3b))
+ {
+ return true;
+ }
+ return false;
+}
+/*=======================================================*/
+bool GbGyroidThirdOrder::isCellInsideOrCuttingGbObject3D(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b)
+{
+ if ((this->isPointInGbObject3D(x1a, x2a, x3a) == false)
+ && (this->isPointInGbObject3D(x1b, x2a, x3a) == false)
+ && (this->isPointInGbObject3D(x1b, x2b, x3a) == false)
+ && (this->isPointInGbObject3D(x1a, x2b, x3a) == false)
+ && (this->isPointInGbObject3D(x1a, x2a, x3b) == false)
+ && (this->isPointInGbObject3D(x1b, x2a, x3b) == false)
+ && (this->isPointInGbObject3D(x1b, x2b, x3b) == false)
+ && (this->isPointInGbObject3D(x1a, x2b, x3b) == false))
+ {
+ return false;
+ }
+ return true;
+}
+/*=======================================================*/
+bool GbGyroidThirdOrder::isCellCuttingGbObject3D(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b)
+{
+ if (!this->isCellInsideGbObject3D(x1a, x2a, x3a, x1b, x2b, x3b)
+ && this->isCellInsideOrCuttingGbObject3D(x1a, x2a, x3a, x1b, x2b, x3b))
+ {
+ return true;
+ }
+ return false;
+}
+/*==========================================================*/
+void GbGyroidThirdOrder::objectChanged(UbObservable *changedObject)
+{
+ GbPoint3D *point = dynamic_cast<GbPoint3D *>(changedObject);
+ if (!point || (this->p1 != point && this->p2 != point && this->p3 != point && this->p4 != point))
+ return;
+
+ this->notifyObserversObjectChanged();
+}
+/*==========================================================*/
+void GbGyroidThirdOrder::objectWillBeDeleted(UbObservable *objectForDeletion)
+{
+ if (this->p1) {
+ UbObservable *observedObj = dynamic_cast<UbObservable *>(this->p1);
+ if (objectForDeletion == observedObj) {
+ this->p1 = NULL;
+ }
+ }
+ if (this->p2) {
+ UbObservable *observedObj = dynamic_cast<UbObservable *>(this->p2);
+ if (objectForDeletion == observedObj) {
+ this->p2 = NULL;
+ }
+ }
+ if (this->p3) {
+ UbObservable *observedObj = dynamic_cast<UbObservable *>(this->p3);
+ if (objectForDeletion == observedObj) {
+ this->p3 = NULL;
+ }
+ }
+ if (this->p4) {
+ UbObservable *observedObj = dynamic_cast<UbObservable *>(this->p4);
+ if (objectForDeletion == observedObj) {
+ this->p4 = NULL;
+ }
+ }
+ // ACHTUNG: eigentlich muessten in allen methoden von GbLine if abfragen fuer NULL pointer hin... toDo
+}
+
+#endif
diff --git a/src/basics/geometry3d/GbGyroidThirdOrder.h b/src/basics/geometry3d/GbGyroidThirdOrder.h
new file mode 100644
index 0000000000000000000000000000000000000000..addf5aa34f5f884d8e40406a6e42fb101e2bdf45
--- /dev/null
+++ b/src/basics/geometry3d/GbGyroidThirdOrder.h
@@ -0,0 +1,126 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \file GbGyroidThirdOrder.h
+//! \ingroup geometry3d
+//! \author Hussein Alihussein
+//=======================================================================================
+#ifndef GbGyroidThirdOrder_H
+#define GbGyroidThirdOrder_H
+
+#ifdef BUILD_USE_BOOST
+
+#include <vector>
+
+#include <GbPoint3D.h>
+#include <basics/utilities/UbObserver.h>
+#include <basics/utilities/UbMath.h>
+
+#define _USE_MATH_DEFINES
+#include <cmath>
+#include <math.h>
+
+class GbLine3D;
+class GbObject3DCreator;
+
+#include <PointerDefinitions.h>
+class GbGyroidThirdOrder;
+using GbGyroidThirdOrderPtr = SPtr<GbGyroidThirdOrder>;
+
+
+class GbGyroidThirdOrder : public GbObject3D, public UbObserver
+{
+public:
+ GbGyroidThirdOrder();
+ GbGyroidThirdOrder(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b, const double& edgeLength, const double& dx, const double& thickness=0);
+
+ GbGyroidThirdOrder(const double & x1a, const double & x2a, const double & x3a, const double & x1b, const double & x2b, const double & x3b, const double & x1c, const double & x2c, const double & x3c, const double & x1d, const double & x2d, const double & x3d, const double & edgeLength, const double & dx);
+ GbGyroidThirdOrder(GbGyroidThirdOrder *imp);
+ ~GbGyroidThirdOrder();
+
+ GbGyroidThirdOrder* clone() override { return new GbGyroidThirdOrder(this); }
+ void finalize() override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
+
+ double getX1Centroid() override;
+ double getX1Minimum() override;
+ double getX1Maximum() override;
+ double getX2Centroid()override;
+ double getX2Minimum() override;
+ double getX2Maximum() override;
+ double getX3Centroid()override;
+ double getX3Minimum() override;
+ double getX3Maximum() override;
+ void setCenterCoordinates(const double &x1, const double &x2, const double &x3) override {throw UbException(UB_EXARGS, "finalize() - not implemented");
+ }
+
+ void translate(const double& x1, const double& x2, const double& x3) override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
+ void rotate(const double& rx1, const double& rx2, const double& rx3) override{ throw UbException(UB_EXARGS, "finalize() - not implemented"); }
+ void scale(const double& sx1, const double& sx2, const double& sx3) override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
+
+ double getLengthX1();
+ double getLengthX2();
+ double getLengthX3();
+
+ bool isPointInGbObject3D(const double &x1p, const double &x2p, const double &x3p, bool &pointinboundary) override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
+ bool isPointInGbObject3D(const double &x1p, const double &x2p, const double &x3p) override;
+ bool isCellInsideGbObject3D(const double &x1a, const double &x2a, const double &x3a, const double &x1b,
+ const double &x2b, const double &x3b) override;
+ bool isCellCuttingGbObject3D(const double &x1a, const double &x2a, const double &x3a, const double &x1b,
+ const double &x2b, const double &x3b) override;
+ bool isCellInsideOrCuttingGbObject3D(const double &x1a, const double &x2a, const double &x3a, const double &x1b,
+ const double &x2b, const double &x3b) override;
+ double getCellVolumeInsideGbObject3D(const double &x1a, const double &x2a, const double &x3a, const double &x1b,
+ const double &x2b, const double &x3b) override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
+ GbPoint3D *calculateInterSectionPoint3D(GbPoint3D &point1, GbPoint3D &point2);
+ GbLine3D *createClippedLine3D (GbPoint3D &point1, GbPoint3D &point2) override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
+ std::vector<GbTriangle3D *> getSurfaceTriangleSet() override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
+ void addSurfaceTriangleSet(std::vector<UbTupleFloat3> &nodes, std::vector<UbTupleInt3> &triangles) override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
+ bool hasRaytracing() override { return true; }
+ double getIntersectionRaytraceFactor (const double& x1, const double& x2, const double& x3, const double& rx1, const double& rx2, const double& rx3) override;
+ double evaluateImplicitFunction(const double & x1, const double & x2, const double & x3, const double & position);
+ double getDistance(const double& x1p, const double& x2p, const double& x3p) { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
+ std::string toString() override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
+ void objectChanged(UbObservable *changedObject) override;
+ void objectWillBeDeleted(UbObservable *objectForDeletion) override;
+ using GbObject3D::isPointInGbObject3D;
+
+protected:
+ GbPoint3D* p1;
+ GbPoint3D* p2;
+ GbPoint3D* p3;
+ GbPoint3D* p4;
+ double edgeLength;
+ double dx;
+ double thickness;
+private:
+};
+
+
+
+#endif
+#endif
diff --git a/src/basics/geometry3d/GbImplicitSurface.cpp b/src/basics/geometry3d/GbGyroidThirdOrderLong.cpp
similarity index 75%
rename from src/basics/geometry3d/GbImplicitSurface.cpp
rename to src/basics/geometry3d/GbGyroidThirdOrderLong.cpp
index 132b71fca06f02d6f784be34a7e162e3e74bfbe5..253e72f9cd205a9eceb63498e6427055f6ab8c29 100644
--- a/src/basics/geometry3d/GbImplicitSurface.cpp
+++ b/src/basics/geometry3d/GbGyroidThirdOrderLong.cpp
@@ -26,12 +26,12 @@
// You should have received a copy of the GNU General Public License along
// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
//
-//! \file GbImplicitSurface.cpp
+//! \file GbGyroidThirdOrderLong.cpp
//! \ingroup geometry3d
//! \author Hussein Alihussein
//=======================================================================================
-#include <GbImplicitSurface.h>
+#include <GbGyroidThirdOrderLong.h>
#ifdef BUILD_USE_BOOST
@@ -46,21 +46,14 @@
using namespace std;
using boost::math::tools::bisect;
-/*=======================================================*/
-// ObObjectCreator* GbImplicitSurface::getCreator()
-// {
-// GbObject3DCreator instance;
-// return &instance;
-// }
-/*=======================================================*/
// Konstruktor
-GbImplicitSurface::GbImplicitSurface() //: GbObject3D()
+GbGyroidThirdOrderLong::GbGyroidThirdOrderLong() //: GbObject3D()
{
}
/*=======================================================*/
// Konstruktor
-GbImplicitSurface::GbImplicitSurface(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b, const double& edgeLength, const double& dx, const double& thickness) :GbObject3D()
+GbGyroidThirdOrderLong::GbGyroidThirdOrderLong(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b, const double& edgeLength, const double& dx, const double& thickness) :GbObject3D()
{
this->p1 = new GbPoint3D(x1a, x2a, x3a);
this->p2 = new GbPoint3D(x1b, x2b, x3b);
@@ -77,31 +70,12 @@ GbImplicitSurface::GbImplicitSurface(const double& x1a, const double& x2a, const
this->thickness = thickness;
}
/*=======================================================*/
-// Konstruktor
-//GbImplicitSurface::GbImplicitSurface(
-// const double& x1a, const double& x2a, const double& x3a,
-// const double& x1b, const double& x2b, const double& x3b,
-//
-// const double& x1c, const double& x2c, const double& x3c,
-// const double& x1d, const double& x2d, const double& x3d,
-//
-// const double& edgeLength, const double& dx) :GbObject3D()
-//{
-// this->p1 = new GbPoint3D(x1a, x2a, x3a);
-// this->p2 = new GbPoint3D(x1b, x2b, x3b);
-//
-// this->p3 = new GbPoint3D(x1c, x2c, x3c);
-// this->p4 = new GbPoint3D(x1d, x2d, x3d);
-//
-// this->edgeLength = edgeLength;
-// this->dx = dx;
-//}
-GbImplicitSurface::GbImplicitSurface(GbImplicitSurface * imp)
+GbGyroidThirdOrderLong::GbGyroidThirdOrderLong(GbGyroidThirdOrderLong * imp)
{
}
/*=======================================================*/
// Destruktor
-GbImplicitSurface::~GbImplicitSurface()
+GbGyroidThirdOrderLong::~GbGyroidThirdOrderLong()
{
if (this->p1)
this->p1->removeObserver(this);
@@ -217,32 +191,21 @@ struct FunctionGyroidThirdOrder {
}
};
/*==========================================================*/
-bool GbImplicitSurface::isPointInGbObject3D(const double& x1, const double& x2, const double& x3)
+bool GbGyroidThirdOrderLong::isPointInGbObject3D(const double& x1, const double& x2, const double& x3)
{
//double f = sin(2.*M_PI*x1/edgeLength)*cos(2.*M_PI*x2 / edgeLength) + sin(2.*M_PI*x2 / edgeLength)*cos(2.*M_PI*x3 / edgeLength) + sin(2.*M_PI*x3 / edgeLength)*cos(2.*M_PI*x1 / edgeLength);
//evaluateImplicitFunction(x1,x2,x3, 0., 0., 0.)
double f1 = evaluateImplicitFunction(x1, x2, x3, 1.);
double f2 = evaluateImplicitFunction(x1, x2, x3, -1.);
- // if (f < 10.0E-15 && f > -10.0E-15)
- //if (fabs(f) <= 10e-15)
- //if (f <= 0)
- if (f1 <= 0. && f2 >= 0.)
-{
- return true;
-}
-else
-{
- return false;
-}
+ return UbMath::lessEqual(f1,0.) && UbMath::greaterEqual(f2,0.);
}
/*==========================================================*/
-double GbImplicitSurface::getIntersectionRaytraceFactor(const double& x1, const double& x2, const double& x3, const double& rx1, const double& rx2, const double& rx3)
+double GbGyroidThirdOrderLong::getIntersectionRaytraceFactor(const double& x1, const double& x2, const double& x3, const double& rx1, const double& rx2, const double& rx3)
{
double from = 0; // The solution must lie in the interval [from, to], additionally f(from) <= 0 && f(to) >= 0
double to = dx*sqrt(rx1*rx1+ rx2*rx2+ rx3*rx3);
FunctionGyroidThirdOrder f;
- //FunctionToApproximate f;
f.x =x1 ;
f.y =x2 ;
f.z =x3 ;
@@ -271,7 +234,7 @@ double GbImplicitSurface::getIntersectionRaytraceFactor(const double& x1, const
}
/*=======================================================*/
-double GbImplicitSurface::evaluateImplicitFunction(const double& x1, const double& x2, const double& x3, const double& position)
+double GbGyroidThirdOrderLong::evaluateImplicitFunction(const double& x1, const double& x2, const double& x3, const double& position)
{
double to = 0.;
FunctionGyroidThirdOrder f;
@@ -286,52 +249,52 @@ double GbImplicitSurface::evaluateImplicitFunction(const double& x1, const doubl
return f(to);
}
/*=======================================================*/
-double GbImplicitSurface::getX1Centroid()
+double GbGyroidThirdOrderLong::getX1Centroid()
{
return (0.5*(p1->x1 + p2->x1));
}
/*=======================================================*/
-double GbImplicitSurface::getX1Minimum()
+double GbGyroidThirdOrderLong::getX1Minimum()
{
return (this->p1->x1 < this->p2->x1 ? this->p1->x1 : this->p2->x1);
}
/*=======================================================*/
-double GbImplicitSurface::getX1Maximum()
+double GbGyroidThirdOrderLong::getX1Maximum()
{
return (this->p1->x1 > this->p2->x1 ? this->p1->x1 : this->p2->x1);
}
/*=======================================================*/
-double GbImplicitSurface::getX2Centroid()
+double GbGyroidThirdOrderLong::getX2Centroid()
{
return (0.5*(p1->x2 + p2->x2));
}
/*=======================================================*/
-double GbImplicitSurface::getX2Minimum()
+double GbGyroidThirdOrderLong::getX2Minimum()
{
return (this->p1->x2 < this->p2->x2 ? this->p1->x2 : this->p2->x2);
}
/*=======================================================*/
-double GbImplicitSurface::getX2Maximum()
+double GbGyroidThirdOrderLong::getX2Maximum()
{
return (this->p1->x2 > this->p2->x2 ? this->p1->x2 : this->p2->x2);
}
/*=======================================================*/
-double GbImplicitSurface::getX3Centroid()
+double GbGyroidThirdOrderLong::getX3Centroid()
{
return (0.5*(p1->x3 + p2->x3));
}
/*=======================================================*/
-double GbImplicitSurface::getX3Minimum()
+double GbGyroidThirdOrderLong::getX3Minimum()
{
return (this->p1->x3 < this->p2->x3 ? this->p1->x3 : this->p2->x3);
}
/*=======================================================*/
-double GbImplicitSurface::getX3Maximum()
+double GbGyroidThirdOrderLong::getX3Maximum()
{
return (this->p1->x3 > this->p2->x3 ? this->p1->x3 : this->p2->x3);
}
/*=======================================================*/
-bool GbImplicitSurface::isCellInsideGbObject3D(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b)
+bool GbGyroidThirdOrderLong::isCellInsideGbObject3D(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b)
{
if (this->isPointInGbObject3D(x1a, x2a, x3a)
&& this->isPointInGbObject3D(x1b, x2a, x3a)
@@ -347,7 +310,7 @@ bool GbImplicitSurface::isCellInsideGbObject3D(const double& x1a, const double&
return false;
}
/*=======================================================*/
-bool GbImplicitSurface::isCellInsideOrCuttingGbObject3D(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b)
+bool GbGyroidThirdOrderLong::isCellInsideOrCuttingGbObject3D(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b)
{
if ((this->isPointInGbObject3D(x1a, x2a, x3a) == false)
&& (this->isPointInGbObject3D(x1b, x2a, x3a) == false)
@@ -363,7 +326,7 @@ bool GbImplicitSurface::isCellInsideOrCuttingGbObject3D(const double& x1a, const
return true;
}
/*=======================================================*/
-bool GbImplicitSurface::isCellCuttingGbObject3D(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b)
+bool GbGyroidThirdOrderLong::isCellCuttingGbObject3D(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b)
{
if (!this->isCellInsideGbObject3D(x1a, x2a, x3a, x1b, x2b, x3b)
&& this->isCellInsideOrCuttingGbObject3D(x1a, x2a, x3a, x1b, x2b, x3b))
@@ -372,40 +335,8 @@ bool GbImplicitSurface::isCellCuttingGbObject3D(const double& x1a, const double&
}
return false;
}
-/*=======================================================*/
-void GbImplicitSurface::addSurfaceTriangleSet(vector<UbTupleFloat3>& nodes, vector<UbTupleInt3>& triangles)
-{
- /*0*/nodes.push_back(makeUbTuple((float)getX1Minimum(), (float)getX2Minimum(), (float)getX3Minimum()));
- /*1*/nodes.push_back(makeUbTuple((float)getX1Maximum(), (float)getX2Minimum(), (float)getX3Minimum()));
- /*2*/nodes.push_back(makeUbTuple((float)getX1Maximum(), (float)getX2Maximum(), (float)getX3Minimum()));
- /*3.*/nodes.push_back(makeUbTuple((float)getX1Minimum(), (float)getX2Maximum(), (float)getX3Minimum()));
-
- /*4*/nodes.push_back(makeUbTuple((float)getX1Minimum(), (float)getX2Minimum(), (float)getX3Maximum()));
- /*5*/nodes.push_back(makeUbTuple((float)getX1Maximum(), (float)getX2Minimum(), (float)getX3Maximum()));
- /*6*/nodes.push_back(makeUbTuple((float)getX1Maximum(), (float)getX2Maximum(), (float)getX3Maximum()));
- /*7*/nodes.push_back(makeUbTuple((float)getX1Minimum(), (float)getX2Maximum(), (float)getX3Maximum()));
-
- //"unten"
- triangles.push_back(makeUbTuple(0, 1, 2));
- triangles.push_back(makeUbTuple(0, 2, 3));
- //"oben"
- triangles.push_back(makeUbTuple(4, 5, 6));
- triangles.push_back(makeUbTuple(4, 6, 7));
- //"links"
- triangles.push_back(makeUbTuple(0, 3, 7));
- triangles.push_back(makeUbTuple(0, 7, 4));
- //"rechts"
- triangles.push_back(makeUbTuple(1, 2, 6));
- triangles.push_back(makeUbTuple(1, 6, 5));
- //"hinten"
- triangles.push_back(makeUbTuple(3, 2, 7));
- triangles.push_back(makeUbTuple(2, 7, 6));
- //"vorne"
- triangles.push_back(makeUbTuple(0, 1, 5));
- triangles.push_back(makeUbTuple(0, 5, 4));
-}
/*==========================================================*/
-void GbImplicitSurface::objectChanged(UbObservable *changedObject)
+void GbGyroidThirdOrderLong::objectChanged(UbObservable *changedObject)
{
GbPoint3D *point = dynamic_cast<GbPoint3D *>(changedObject);
if (!point || (this->p1 != point && this->p2 != point && this->p3 != point && this->p4 != point))
@@ -414,7 +345,7 @@ void GbImplicitSurface::objectChanged(UbObservable *changedObject)
this->notifyObserversObjectChanged();
}
/*==========================================================*/
-void GbImplicitSurface::objectWillBeDeleted(UbObservable *objectForDeletion)
+void GbGyroidThirdOrderLong::objectWillBeDeleted(UbObservable *objectForDeletion)
{
if (this->p1) {
UbObservable *observedObj = dynamic_cast<UbObservable *>(this->p1);
@@ -440,7 +371,6 @@ void GbImplicitSurface::objectWillBeDeleted(UbObservable *objectForDeletion)
this->p4 = NULL;
}
}
- // ACHTUNG: eigentlich muessten in allen methoden von GbLine if abfragen fuer NULL pointer hin... toDo
}
#endif
diff --git a/src/basics/geometry3d/GbImplicitSurface.h b/src/basics/geometry3d/GbGyroidThirdOrderLong.h
similarity index 72%
rename from src/basics/geometry3d/GbImplicitSurface.h
rename to src/basics/geometry3d/GbGyroidThirdOrderLong.h
index 6d6b4276c4f457271fda7347addfb028708c8086..54a7b001458161dc4dfea12f48dd0d2069a07b37 100644
--- a/src/basics/geometry3d/GbImplicitSurface.h
+++ b/src/basics/geometry3d/GbGyroidThirdOrderLong.h
@@ -26,12 +26,12 @@
// You should have received a copy of the GNU General Public License along
// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
//
-//! \file GbImplicitSurface.cpp
+//! \file GbGyroidThirdOrderLong.cpp
//! \ingroup geometry3d
//! \author Hussein Alihussein
//=======================================================================================
-#ifndef GbImplicitSurface_H
-#define GbImplicitSurface_H
+#ifndef GbGyroidThirdOrderLong_H
+#define GbGyroidThirdOrderLong_H
#ifdef BUILD_USE_BOOST
@@ -49,22 +49,20 @@ class GbLine3D;
class GbObject3DCreator;
#include <PointerDefinitions.h>
-class GbImplicitSurface;
-using GbImplicitSurfacePtr = SPtr<GbImplicitSurface>;
+class GbGyroidThirdOrderLong;
+using GbGyroidThirdOrderLongPtr = SPtr<GbGyroidThirdOrderLong>;
-class GbImplicitSurface : public GbObject3D, public UbObserver
+class GbGyroidThirdOrderLong : public GbObject3D, public UbObserver
{
public:
- GbImplicitSurface();
- GbImplicitSurface(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b, const double& edgeLength, const double& dx, const double& thickness=0);
+ GbGyroidThirdOrderLong();
+ GbGyroidThirdOrderLong(const double& x1a, const double& x2a, const double& x3a, const double& x1b, const double& x2b, const double& x3b, const double& edgeLength, const double& dx, const double& thickness=0);
+ GbGyroidThirdOrderLong(const double & x1a, const double & x2a, const double & x3a, const double & x1b, const double & x2b, const double & x3b, const double & x1c, const double & x2c, const double & x3c, const double & x1d, const double & x2d, const double & x3d, const double & edgeLength, const double & dx);
+ GbGyroidThirdOrderLong(GbGyroidThirdOrderLong *imp);
+ ~GbGyroidThirdOrderLong();
- GbImplicitSurface(const double & x1a, const double & x2a, const double & x3a, const double & x1b, const double & x2b, const double & x3b, const double & x1c, const double & x2c, const double & x3c, const double & x1d, const double & x2d, const double & x3d, const double & edgeLength, const double & dx);
- //GbImplicitSurface(const double& minX1, const double& minX2, const double& minX3, const double& maxX1, const double& maxX2, const double& maxX3);
- GbImplicitSurface(GbImplicitSurface *imp);
- ~GbImplicitSurface();
-
- GbImplicitSurface* clone() override { return new GbImplicitSurface(this); }
+ GbGyroidThirdOrderLong* clone() override { return new GbGyroidThirdOrderLong(this); }
void finalize() override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
@@ -101,48 +99,26 @@ public:
const double &x2b, const double &x3b) override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
GbPoint3D *calculateInterSectionPoint3D(GbPoint3D &point1, GbPoint3D &point2);
- //GbImplicitSurface* createClippedRectangle3D(const double& x1a,const double& x2a,const double& x3a,const double& x1b,const double& x2b,const double& x3b);
GbLine3D *createClippedLine3D (GbPoint3D &point1, GbPoint3D &point2) override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
std::vector<GbTriangle3D *> getSurfaceTriangleSet() override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
- void addSurfaceTriangleSet(std::vector<UbTupleFloat3> &nodes, std::vector<UbTupleInt3> &triangles) override;
+ void addSurfaceTriangleSet(std::vector<UbTupleFloat3> &nodes, std::vector<UbTupleInt3> &triangles) override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
bool hasRaytracing() override { return true; }
- /*|r| must be 1! einheitsvector!!*/
double getIntersectionRaytraceFactor (const double& x1, const double& x2, const double& x3, const double& rx1, const double& rx2, const double& rx3) override;
double evaluateImplicitFunction(const double & x1, const double & x2, const double & x3, const double & position);
- double getDistance(const double& x1p, const double& x2p, const double& x3p)
- {
- throw UbException(UB_EXARGS, "not implemented");
-
- // falls punkt innerhalt ist: minimalen abstand ausrechnen
- if (this->isPointInGbObject3D(x1p, x2p, x3p))
- {
- double x1Dist = UbMath::min(std::abs(x1p - this->getX1Minimum()), std::abs(x1p - this->getX1Maximum()));
- double x2Dist = UbMath::min(std::abs(x2p - this->getX2Minimum()), std::abs(x2p - this->getX2Maximum()));
- double x3Dist = UbMath::min(std::abs(x3p - this->getX3Minimum()), std::abs(x3p - this->getX3Maximum()));
-
- return UbMath::min(x1Dist, x2Dist, x3Dist);
- }
- else
- {
-
- }
- }
+ double getDistance(const double& x1p, const double& x2p, const double& x3p) { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
std::string toString() override { throw UbException(UB_EXARGS, "finalize() - not implemented"); }
-
- // virtuelle Methoden von UbObserver
void objectChanged(UbObservable *changedObject) override;
void objectWillBeDeleted(UbObservable *objectForDeletion) override;
- using GbObject3D::isPointInGbObject3D; //Grund: dadurch muss man hier isPointInGbObject3D(GbPoint3D*) nicht ausprogrammieren, welche sonst hier "ueberdeckt" waere
-
+ using GbObject3D::isPointInGbObject3D;
protected:
GbPoint3D* p1;
diff --git a/src/cpu/VirtualFluids.h b/src/cpu/VirtualFluids.h
index 738bf6e28c2b41e8cc2956cdea3401c23f86d962..210cfcd8bc6c31ebf04ff64d279ca20939ac6a96 100644
--- a/src/cpu/VirtualFluids.h
+++ b/src/cpu/VirtualFluids.h
@@ -224,7 +224,8 @@
#include <geometry3d/GbCylinder3D.h>
#include <geometry3d/GbHalfSpace3D.h>
#include <geometry3d/GbHalfSpaceKrischan3D.h>
-#include <geometry3d/GbImplicitSurface.h>
+#include <geometry3d/GbGyroidThirdOrder.h>
+#include <geometry3d/GbGyroidThirdOrderLong.h>
#include <geometry3d/GbLine3D.h>
#include <geometry3d/GbMeshTools3D.h>
#include <geometry3d/GbObject3D.h>
diff --git a/src/cpu/core/BoundaryConditions/OutflowNonReflectingWithPressure.cpp b/src/cpu/core/BoundaryConditions/OutflowNonReflectingWithPressure.cpp
index 5fd757d42d6e114921094c51283fbc99f06abebf..bb80dd449f395c14a3fad00725cff6ad4ebbdcca 100644
--- a/src/cpu/core/BoundaryConditions/OutflowNonReflectingWithPressure.cpp
+++ b/src/cpu/core/BoundaryConditions/OutflowNonReflectingWithPressure.cpp
@@ -34,6 +34,7 @@
#include "BoundaryConditions.h"
#include "D3Q27System.h"
+#include "DataTypes.h"
#include "DistributionArray3D.h"
OutflowNonReflectingWithPressure::OutflowNonReflectingWithPressure()
@@ -41,11 +42,17 @@ OutflowNonReflectingWithPressure::OutflowNonReflectingWithPressure()
BCStrategy::preCollision = true;
}
//////////////////////////////////////////////////////////////////////////
+OutflowNonReflectingWithPressure::OutflowNonReflectingWithPressure(real relaxationRate)
+{
+ BCStrategy::preCollision = true;
+ this->relaxationRate = relaxationRate;
+}
+//////////////////////////////////////////////////////////////////////////
OutflowNonReflectingWithPressure::~OutflowNonReflectingWithPressure() = default;
//////////////////////////////////////////////////////////////////////////
SPtr<BCStrategy> OutflowNonReflectingWithPressure::clone()
{
- SPtr<BCStrategy> bc(new OutflowNonReflectingWithPressure());
+ SPtr<BCStrategy> bc(new OutflowNonReflectingWithPressure(this->relaxationRate));
return bc;
}
//////////////////////////////////////////////////////////////////////////
@@ -97,7 +104,7 @@ void OutflowNonReflectingWithPressure::applyBC()
real rho, vx1, vx2, vx3;
calcMacrosFct(f, rho, vx1, vx2, vx3);
- real delf = rho* c1o100;
+ real delf = rho*(this->relaxationRate);
switch (direction) {
case dP00:
f[dP00] = ftemp[dP00] * (c1oSqrt3 + vx1) + (c1o1 - c1oSqrt3 - vx1) * f[dP00] - delf* WEIGTH[dP00];
diff --git a/src/cpu/core/BoundaryConditions/OutflowNonReflectingWithPressure.h b/src/cpu/core/BoundaryConditions/OutflowNonReflectingWithPressure.h
index af4dcaa7fac973abe4e5334dfa7b99e1346ae9d5..7c2380d13f4f5b33519eaa5bcb528272d79a258d 100644
--- a/src/cpu/core/BoundaryConditions/OutflowNonReflectingWithPressure.h
+++ b/src/cpu/core/BoundaryConditions/OutflowNonReflectingWithPressure.h
@@ -42,9 +42,12 @@ class OutflowNonReflectingWithPressure : public BCStrategy
{
public:
OutflowNonReflectingWithPressure();
+ OutflowNonReflectingWithPressure(real relaxationRate);
~OutflowNonReflectingWithPressure() override;
SPtr<BCStrategy> clone() override;
void addDistributions(SPtr<DistributionArray3D> distributions) override;
void applyBC() override;
+private:
+ real relaxationRate;
};
#endif // NonReflectingDensityBCStrategy_h__
diff --git a/src/cpu/core/BoundaryConditions/VelocityNonReflecting.cpp b/src/cpu/core/BoundaryConditions/VelocityNonReflecting.cpp
index b4f4878c74b02492aab15e9b3ff632d69abddd8f..2da13d8706faae56db38a46e76d6f38cf1e49246 100644
--- a/src/cpu/core/BoundaryConditions/VelocityNonReflecting.cpp
+++ b/src/cpu/core/BoundaryConditions/VelocityNonReflecting.cpp
@@ -41,11 +41,17 @@ VelocityNonReflecting::VelocityNonReflecting()
BCStrategy::preCollision = true;
}
//////////////////////////////////////////////////////////////////////////
+VelocityNonReflecting::VelocityNonReflecting(real relaxationRate)
+{
+ BCStrategy::preCollision = true;
+ this->BCVeloWeight = relaxationRate;
+}
+//////////////////////////////////////////////////////////////////////////
VelocityNonReflecting::~VelocityNonReflecting() = default;
//////////////////////////////////////////////////////////////////////////
SPtr<BCStrategy> VelocityNonReflecting::clone()
{
- SPtr<BCStrategy> bc(new VelocityNonReflecting());
+ SPtr<BCStrategy> bc(new VelocityNonReflecting(this->BCVeloWeight));
return bc;
}
//////////////////////////////////////////////////////////////////////////
@@ -70,49 +76,43 @@ void VelocityNonReflecting::applyBC()
int direction = -1;
// flag points in direction of fluid
- if (bcPtr->hasDensityBoundaryFlag(dP00)) {
+ if (bcPtr->hasVelocityBoundaryFlag(dP00)) {
nx1 += 1;
direction = dP00;
- } else if (bcPtr->hasDensityBoundaryFlag(dM00)) {
+ this->velocity = bcPtr->getBoundaryVelocityX1();
+ } else if (bcPtr->hasVelocityBoundaryFlag(dM00)) {
nx1 -= 1;
direction = dM00;
- } else if (bcPtr->hasDensityBoundaryFlag(d0P0)) {
+ this->velocity = bcPtr->getBoundaryVelocityX1();
+ } else if (bcPtr->hasVelocityBoundaryFlag(d0P0)) {
nx2 += 1;
direction = d0P0;
- } else if (bcPtr->hasDensityBoundaryFlag(d0M0)) {
+ this->velocity = bcPtr->getBoundaryVelocityX2();
+ } else if (bcPtr->hasVelocityBoundaryFlag(d0M0)) {
nx2 -= 1;
direction = d0M0;
- } else if (bcPtr->hasDensityBoundaryFlag(d00P)) {
+ this->velocity = bcPtr->getBoundaryVelocityX2();
+ } else if (bcPtr->hasVelocityBoundaryFlag(d00P)) {
nx3 += 1;
direction = d00P;
- } else if (bcPtr->hasDensityBoundaryFlag(d00M)) {
+ this->velocity = bcPtr->getBoundaryVelocityX3();
+ } else if (bcPtr->hasVelocityBoundaryFlag(d00M)) {
nx3 -= 1;
direction = d00M;
+ this->velocity = bcPtr->getBoundaryVelocityX3();
} else
- UB_THROW(UbException(UB_EXARGS, "Danger...no orthogonal BC-Flag on density boundary..."));
+ UB_THROW(UbException(UB_EXARGS, "Danger...no orthogonal BC-Flag on velocity boundary..."));
distributions->getPreCollisionDistribution(f, x1, x2, x3);
distributions->getPreCollisionDistribution(ftemp, nx1, nx2, nx3);
real rho, vx1, vx2, vx3;
calcMacrosFct(f, rho, vx1, vx2, vx3);
- //vx1 = 0.;
- real BCVeloWeight = c1o2;
- // real velocity = 0.004814077025232405;
- // real velocity = 0.00057735;
- //real velocity = 0.04;
- // real velocity = 0.01;
- // real velocity = 1./112.;
- // real velocity = 1./126.;
- real velocity = c1o100/2;
- // real velocity = 0.005;
- //real delf =(-velocity+vx1)*0.5 ;
real delf;
switch (direction) {
case dP00:
delf = (-velocity + vx1) * BCVeloWeight;
- // delf = (-velocity ) * BCVeloWeight;
f[dP00] = ftemp[dP00] * (c1oSqrt3 + vx1) + (c1o1 - c1oSqrt3 - vx1) * f[dP00] - delf* WEIGTH[dP00];
f[dPP0] = ftemp[dPP0] * (c1oSqrt3 + vx1) + (c1o1 - c1oSqrt3 - vx1) * f[dPP0]- delf* WEIGTH[dPP0];
f[dPM0] = ftemp[dPM0] * (c1oSqrt3 + vx1) + (c1o1 - c1oSqrt3 - vx1) * f[dPM0]- delf* WEIGTH[dPM0];
@@ -122,52 +122,7 @@ void VelocityNonReflecting::applyBC()
f[dPMP] = ftemp[dPMP] * (c1oSqrt3 + vx1) + (c1o1 - c1oSqrt3 - vx1) * f[dPMP]- delf* WEIGTH[dPMP];
f[dPPM] = ftemp[dPPM] * (c1oSqrt3 + vx1) + (c1o1 - c1oSqrt3 - vx1) * f[dPPM]- delf* WEIGTH[dPPM];
f[dPMM] = ftemp[dPMM] * (c1oSqrt3 + vx1) + (c1o1 - c1oSqrt3 - vx1) * f[dPMM]- delf* WEIGTH[dPMM];
- //f[dP00] = (ftemp[dP00] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dP00]) *
- // (1 - BCVeloWeight) +
- // (ftemp[dM00] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dM00] +
- // velocity*(6)*WEIGTH[dP00]/* bcPtr->getBoundaryVelocity(INVDIR[dM00])*/) *
- // (BCVeloWeight) ;
- //f[dPP0] = (ftemp[dPP0] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dPP0]) *
- // (1 - BCVeloWeight) +
- // (ftemp[dMM0] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dMM0] +
- // velocity * (6) * WEIGTH[dPP0] /*bcPtr->getBoundaryVelocity(INVDIR[dMM0])*/) *
- // (BCVeloWeight);
- //f[dPM0] = (ftemp[dPM0] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dPM0]) *
- // (1 - BCVeloWeight) +
- // (ftemp[dMP0] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dMP0] +
- // velocity*(6)*WEIGTH[dPP0]/* bcPtr->getBoundaryVelocity(INVDIR[dMP0])*/) *
- // (BCVeloWeight);
- //f[dP0P] = (ftemp[dP0P] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dP0P]) *
- // (1 - BCVeloWeight) +
- // (ftemp[dM0M] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dM0M] +
- // velocity*(6)*WEIGTH[dP0P]/* bcPtr->getBoundaryVelocity(INVDIR[dM0M])*/) *
- // (BCVeloWeight);
- //f[dP0M] = (ftemp[dP0M] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dP0M])*
- // (1 - BCVeloWeight) +
- // (ftemp[dM0P] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dM0P] +
- // velocity*(6)*WEIGTH[dP0M]/* bcPtr->getBoundaryVelocity(INVDIR[dM0P])*/) *
- // (BCVeloWeight);
- //f[dPPP] = (ftemp[dPPP] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dPPP])*
- // (1 - BCVeloWeight) +
- // (ftemp[dMMM] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dMMM] +
- // velocity * (6) * WEIGTH[dPPP] /* bcPtr->getBoundaryVelocity(INVDIR[dMMM])*/) *
- // (BCVeloWeight);
- //f[dPMP] = (ftemp[dPMP] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dPMP]) *
- // (1 - BCVeloWeight) +
- // (ftemp[dMPM] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dMPM] +
- // velocity * (6) * WEIGTH[dPPP] /*bcPtr->getBoundaryVelocity(INVDIR[dMPM])*/) *
- // (BCVeloWeight);
- //f[dPPM] = (ftemp[dPPM] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dPPM]) *
- // (1 - BCVeloWeight) +
- // (ftemp[dMMP] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dMMP] +
- // velocity * (6) * WEIGTH[dPPP] /* bcPtr->getBoundaryVelocity(INVDIR[dMMP])*/) *
- // (BCVeloWeight);
- //f[dPMM] = (ftemp[dPMM] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dPMM]) *
- // (1 - BCVeloWeight) +
- // (ftemp[dMPP] * (c1oSqrt3 + vx1) + (1.0 - c1oSqrt3 - vx1) * f[dMPP] +
- // velocity * (6) * WEIGTH[dPPP] /* bcPtr->getBoundaryVelocity(INVDIR[dMPP])*/) *
- // (BCVeloWeight);
-
+
distributions->setPreCollisionDistributionForDirection(f[dP00], x1 + DX1[dM00], x2 + DX2[dM00], x3 + DX3[dM00], dM00);
distributions->setPreCollisionDistributionForDirection(f[dPP0], x1 + DX1[dMM0], x2 + DX2[dMM0], x3 + DX3[dMM0], dMM0);
distributions->setPreCollisionDistributionForDirection(f[dPM0], x1 + DX1[dMP0], x2 + DX2[dMP0], x3 + DX3[dMP0], dMP0);
diff --git a/src/cpu/core/BoundaryConditions/VelocityNonReflecting.h b/src/cpu/core/BoundaryConditions/VelocityNonReflecting.h
index 50ac0802e1b9bc869eb0e8887927aeaa748d15e2..c99b6fdd3245e868ab06e897d082830ba90bde3d 100644
--- a/src/cpu/core/BoundaryConditions/VelocityNonReflecting.h
+++ b/src/cpu/core/BoundaryConditions/VelocityNonReflecting.h
@@ -42,9 +42,13 @@ class VelocityNonReflecting : public BCStrategy
{
public:
VelocityNonReflecting();
+ VelocityNonReflecting(real relaxationRate);
~VelocityNonReflecting() override;
SPtr<BCStrategy> clone() override;
void addDistributions(SPtr<DistributionArray3D> distributions) override;
void applyBC() override;
+private:
+ real velocity;
+ real BCVeloWeight;
};
#endif // NonReflectingDensityBCStrategy_h__
diff --git a/src/gpu/GridGenerator/CMakeLists.txt b/src/gpu/GridGenerator/CMakeLists.txt
index 7cc0f0e20e2b43601f9f70e639d0ecd61cadb2ae..11855659a4dfe85203b8a7eac0098766b78983cb 100644
--- a/src/gpu/GridGenerator/CMakeLists.txt
+++ b/src/gpu/GridGenerator/CMakeLists.txt
@@ -7,7 +7,8 @@ if(NOT MSVC)
target_compile_options(GridGenerator PRIVATE "-Wno-strict-aliasing")
endif()
-
if(BUILD_VF_UNIT_TESTS)
target_include_directories(GridGeneratorTests PRIVATE "${VF_ROOT_DIR}/src/basics/")
+ set_source_files_properties(geometries/BoundingBox/BoundingBoxTest.cpp PROPERTIES LANGUAGE CUDA)
+ set_source_files_properties(grid/MultipleGridBuilderFacadeTest.cpp PROPERTIES LANGUAGE CUDA)
endif()
\ No newline at end of file
diff --git a/src/gpu/GridGenerator/TransientBCSetter/TransientBCSetter.cpp b/src/gpu/GridGenerator/TransientBCSetter/TransientBCSetter.cpp
index 15efa9d3204cc37d4c4ccd8778ea13769ef655b8..aa870fc249a1cbc057c82ec617f73982d8cf35a8 100644
--- a/src/gpu/GridGenerator/TransientBCSetter/TransientBCSetter.cpp
+++ b/src/gpu/GridGenerator/TransientBCSetter/TransientBCSetter.cpp
@@ -1,24 +1,29 @@
#include "TransientBCSetter.h"
-#include "GridGenerator/grid/Grid.h"
-#include "GridGenerator/grid/BoundaryConditions/BoundaryCondition.h"
-#include <logger/Logger.h>
-
-#include <math.h>
+#include <cmath>
#include <sstream>
#include <fstream>
#include <iostream>
#include <algorithm>
+#include <stdexcept>
+
+#include <basics/constants/NumericConstants.h>
+#include <logger/Logger.h>
-SPtr<FileCollection> createFileCollection(std::string prefix, FileType type)
+#include "GridGenerator/grid/BoundaryConditions/BoundaryCondition.h"
+
+
+using namespace vf::basics::constant;
+
+SPtr<FileCollection> createFileCollection(std::string prefix, TransientBCFileType type)
{
switch(type)
{
- case FileType::VTK:
+ case TransientBCFileType::VTK:
return std::make_shared<VTKFileCollection>(prefix);
break;
default:
- return nullptr;
+ throw std::runtime_error("createFileCollection: Unknown file type");
}
}
@@ -26,11 +31,11 @@ SPtr<TransientBCInputFileReader> createReaderForCollection(SPtr<FileCollection>
{
switch(fileCollection->getFileType())
{
- case FileType::VTK:
+ case TransientBCFileType::VTK:
return std::make_shared<VTKReader>(std::static_pointer_cast<VTKFileCollection>(fileCollection), readLevel);
break;
default:
- return nullptr;
+ throw std::runtime_error("createReaderForCollection: No reader availabel for this file t");
}
}
@@ -55,10 +60,10 @@ std::string readElement(std::string line)
return line.substr(elemStart, nameLen);
}
-std::string readAttribute(std::string line, std::string attributeName)
+std::string readAttribute(const std::string& line, const std::string& attributeName)
{
const size_t attributeStart = line.find(attributeName)+attributeName.size() + 2; // add 2 for '="'
- const size_t attributeLen = line.find("\"", attributeStart)-attributeStart;
+ const size_t attributeLen = line.find('\"', attributeStart)-attributeStart;
return line.substr(attributeStart, attributeLen);
}
@@ -126,7 +131,7 @@ bool VTKFile::markNANs(const std::vector<uint>& readIndices) const
tmp.reserve(readIndices.size());
buf.seekg(this->quantities[0].offset);
buf.read((char*) tmp.data(), sizeof(double)*readIndices.size());
- const auto firstNAN = std::find_if(tmp.begin(), tmp.end(), [](auto it){ return isnan(it); });
+ const auto firstNAN = std::find_if(tmp.begin(), tmp.end(), [](auto it){ return std::isnan(it); });
return firstNAN != tmp.end();
}
@@ -175,11 +180,11 @@ void VTKFile::getData(real *data, uint numberOfNodes, const std::vector<uint> &r
void VTKFile::printFileInfo()
{
- printf("file %s with \n nx %i ny %i nz %i \n origin %f %f %f \n spacing %f %f %f \n",
- fileName.c_str(), nx, ny, nz, minX, minY, minZ, deltaX, deltaY, deltaZ);
+ VF_LOG_INFO("file {} with \n nx {} ny {} nz {]} \n origin {} {} {}\n spacing {} {} {} ",
+ fileName, nx, ny, nz, minX, minY, minZ, deltaX, deltaY, deltaZ);
for(const auto& quantity: this->quantities)
{
- printf("\t quantity %s offset %i \n", quantity.name.c_str(), quantity.offset);
+ VF_LOG_INFO("\t quantity {} offset {}", quantity.name, quantity.offset);
}
}
@@ -290,17 +295,17 @@ void VTKReader::fillArrays(std::vector<real>& coordsY, std::vector<real>& coords
// y in simulation is x in precursor/file, z in simulation is y in precursor/file
// simulation -> file: N -> E, S -> W, T -> N, B -> S
- const int idx = file.findNeighborMMM(posY, posZ, 0.f); //!> index of nearest WSB neighbor on precursor file
+ const int idx = file.findNeighborMMM(posY, posZ, c0o1); //!> index of nearest WSB neighbor on precursor file
if(idx!=-1)
{
// Filter for exact matches
- if(abs(posY-file.getX(idx)) < max_diff && abs(posZ-file.getY(idx)) < max_diff)
+ if(std::abs(posY-file.getX(idx)) < max_diff && std::abs(posZ-file.getY(idx)) < max_diff)
{
this->weights0PP.emplace_back(1e6f);
- this->weights0PM.emplace_back(0.f);
- this->weights0MP.emplace_back(0.f);
- this->weights0MM.emplace_back(0.f);
+ this->weights0PM.emplace_back(c0o1);
+ this->weights0MP.emplace_back(c0o1);
+ this->weights0MM.emplace_back(c0o1);
const uint writeIdx = this->getWriteIndex(level, fileId, idx); //!> writeIdx: index on host/device array where precursor value will be written to after loading from file
this->planeNeighbor0PP.push_back(writeIdx); //!> neighbor lists mapping where BC kernel should read from on host/device array
this->planeNeighbor0PM.push_back(writeIdx);
@@ -329,7 +334,7 @@ void VTKReader::fillArrays(std::vector<real>& coordsY, std::vector<real>& coords
if(!found0PP) //NT in simulation is EN in precursor
{
- const int index = file.findNeighborPPM(posY, posZ, 0.f);
+ const int index = file.findNeighborPPM(posY, posZ, c0o1);
if(index!=-1)
{
found0PP = true;
@@ -342,7 +347,7 @@ void VTKReader::fillArrays(std::vector<real>& coordsY, std::vector<real>& coords
if(!found0PM) //NB in simulation is ES in precursor
{
- const int index = file.findNeighborPMM(posY, posZ, 0.f);
+ const int index = file.findNeighborPMM(posY, posZ, c0o1);
if(index!=-1)
{
found0PM = true;
@@ -355,13 +360,13 @@ void VTKReader::fillArrays(std::vector<real>& coordsY, std::vector<real>& coords
if(!found0MP) //ST in simulation is WN in precursor
{
- const int index = file.findNeighborMPM(posY, posZ, 0.f);
+ const int index = file.findNeighborMPM(posY, posZ, c0o1);
if(index!=-1)
{
found0MP = true;
const real dy = file.getX(index)-posY;
const real dz = file.getY(index)-posZ;
- this->weights0MP.emplace_back(1.f/(dy*dy+dz*dz+eps));
+ this->weights0MP.emplace_back(c1o1/(dy*dy+dz*dz+eps));
this->planeNeighbor0MP.emplace_back(getWriteIndex(level, fileId, index));
}
}
@@ -373,13 +378,13 @@ void VTKReader::fillArrays(std::vector<real>& coordsY, std::vector<real>& coords
if(!foundAll)
{
- VF_LOG_CRITICAL("Found no matching precursor neighbors for grid point at y={}, z={} \n", posY, posZ);
+ VF_LOG_CRITICAL("Found no matching precursor neighbors for grid point at y={}, z={}", posY, posZ);
throw std::runtime_error("VTKReader::fillArrays(): Did not find neighbors in the FileCollection for all points");
}
}
if(perfect_match)
- printf("Precursor was a perfect match \n");
+ VF_LOG_INFO("Precursor was a perfect match");
for(size_t level=0; level<this->fileCollection->files.size(); level++){
@@ -405,38 +410,35 @@ uint VTKReader::getWriteIndex(int level, int id, int linearIndex)
void VTKReader::getNextData(real* data, uint numberOfNodes, real time)
{
- // for(size_t level=0; level<this->fileCollection->files.size(); level++)
- // {
- const uint level = this->readLevel;
- for(size_t id=0; id<this->fileCollection->files[level].size(); id++)
- {
- size_t numberOfFiles = this->nFile[level][id];
+ const uint level = this->readLevel;
+ for(size_t id=0; id<this->fileCollection->files[level].size(); id++)
+ {
+ size_t numberOfFiles = this->nFile[level][id];
- if(!this->fileCollection->files[level][id][numberOfFiles].inZBounds(time))
- {
- numberOfFiles++;
+ if(!this->fileCollection->files[level][id][numberOfFiles].inZBounds(time))
+ {
+ numberOfFiles++;
- VF_LOG_INFO("PrecursorBC on level {}: switching to file no. {}", level, numberOfFiles);
- if(numberOfFiles == this->fileCollection->files[level][id].size())
- throw std::runtime_error("Not enough Precursor Files to read");
+ VF_LOG_INFO("PrecursorBC on level {}: switching to file no. {}", level, numberOfFiles);
+ if(numberOfFiles == this->fileCollection->files[level][id].size())
+ throw std::runtime_error("Not enough Precursor Files to read");
- this->fileCollection->files[level][id][numberOfFiles-1].unloadFile();
- if(numberOfFiles+1<this->fileCollection->files[level][id].size())
+ this->fileCollection->files[level][id][numberOfFiles-1].unloadFile();
+ if(numberOfFiles+1<this->fileCollection->files[level][id].size())
+ {
+ VTKFile* nextFile = &this->fileCollection->files[level][id][numberOfFiles+1];
+ if(! nextFile->isLoaded())
{
- VTKFile* nextFile = &this->fileCollection->files[level][id][numberOfFiles+1];
- if(! nextFile->isLoaded())
- {
- read.wait();
- read = std::async(std::launch::async, [](VTKFile* file){ file->loadFile(); }, &this->fileCollection->files[level][id][numberOfFiles+1]);
- }
+ read.wait();
+ read = std::async(std::launch::async, [](VTKFile* file){ file->loadFile(); }, &this->fileCollection->files[level][id][numberOfFiles+1]);
}
}
-
- VTKFile* file = &this->fileCollection->files[level][id][numberOfFiles];
-
- const int off = file->getClosestIdxZ(time)*file->getNumberOfPointsInXYPlane();
- file->getData(data, numberOfNodes, this->readIndices[level][id], this->writeIndices[level][id], off, this->writingOffset);
- this->nFile[level][id] = numberOfFiles;
}
- // }
+
+ VTKFile* file = &this->fileCollection->files[level][id][numberOfFiles];
+
+ const int off = file->getClosestIdxZ(time)*file->getNumberOfPointsInXYPlane();
+ file->getData(data, numberOfNodes, this->readIndices[level][id], this->writeIndices[level][id], off, this->writingOffset);
+ this->nFile[level][id] = numberOfFiles;
+ }
}
diff --git a/src/gpu/GridGenerator/TransientBCSetter/TransientBCSetter.h b/src/gpu/GridGenerator/TransientBCSetter/TransientBCSetter.h
index 5b9ea91a831da4d9bf189418e0e3eaaf8abd7357..cdad6e032876518a79e6e216d2c507b1ffc306c9 100644
--- a/src/gpu/GridGenerator/TransientBCSetter/TransientBCSetter.h
+++ b/src/gpu/GridGenerator/TransientBCSetter/TransientBCSetter.h
@@ -1,23 +1,23 @@
#ifndef TRANSIENTBCSETTER_H_
#define TRANSIENTBCSETTER_H_
-#include "DataTypes.h"
-#include <StringUtilities/StringUtil.h>
-#include "PointerDefinitions.h"
-
+#include <cmath>
+#include <future>
#include <string>
#include <vector>
-#include <math.h>
-#include <sstream>
-#include <future>
+
+#include <basics/DataTypes.h>
+#include <basics/PointerDefinitions.h>
+#include <StringUtilities/StringUtil.h>
+
+
class Grid;
namespace gg
{
class BoundaryCondition;
}
-
-enum class FileType
+enum class TransientBCFileType
{
VTK
};
@@ -32,8 +32,8 @@ struct Quantity
class VTKFile
{
public:
- explicit VTKFile(std::string _fileName):
- fileName(_fileName)
+ explicit VTKFile(std::string fileName):
+ fileName(fileName)
{
readHeader();
this->loaded = false;
@@ -42,39 +42,39 @@ public:
void getData(real* data, uint numberOfNodes, const std::vector<uint>& readIndices, const std::vector<uint>& writeIndices, uint offsetRead, uint offsetWrite);
bool markNANs(const std::vector<uint>& readIndices) const;
- bool inBoundingBox(real posX, real posY, real posZ){return inXBounds(posX) && inYBounds(posY) && inZBounds(posZ); };
- bool inXBounds(real posX){ return posX<=maxX && posX>=minX; };
- bool inYBounds(real posY){ return posY<=maxY && posY>=minY; };
- bool inZBounds(real posZ){ return posZ<=maxZ && posZ>=minZ; };
- int findNeighborMMM(real posX, real posY, real posZ){ int idx = getLinearIndex(getIdxM00(posX) , getIdx0M0(posY) , getIdx00M(posZ) ); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
- int findNeighborMMP(real posX, real posY, real posZ){ int idx = getLinearIndex(getIdxM00(posX) , getIdx0M0(posY) , getIdx00M(posZ)+1); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
- int findNeighborMPM(real posX, real posY, real posZ){ int idx = getLinearIndex(getIdxM00(posX) , getIdx0M0(posY)+1, getIdx00M(posZ) ); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
- int findNeighborMPP(real posX, real posY, real posZ){ int idx = getLinearIndex(getIdxM00(posX) , getIdx0M0(posY)+1, getIdx00M(posZ)+1); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
- int findNeighborPMM(real posX, real posY, real posZ){ int idx = getLinearIndex(getIdxM00(posX)+1, getIdx0M0(posY) , getIdx00M(posZ) ); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
- int findNeighborPMP(real posX, real posY, real posZ){ int idx = getLinearIndex(getIdxM00(posX)+1, getIdx0M0(posY) , getIdx00M(posZ)+1); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
- int findNeighborPPM(real posX, real posY, real posZ){ int idx = getLinearIndex(getIdxM00(posX)+1, getIdx0M0(posY)+1, getIdx00M(posZ) ); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
- int findNeighborPPP(real posX, real posY, real posZ){ int idx = getLinearIndex(getIdxM00(posX)+1, getIdx0M0(posY)+1, getIdx00M(posZ)+1); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
- int getIdxX(int linearIdx){ return linearIdx%nx;};
- int getIdxY(int linearIdx){ return (linearIdx/nx)%ny;};
- int getIdxZ(int linearIdx){ return linearIdx/(nx*ny); };
- real getX(int linearIdx){ return getIdxX(linearIdx)*deltaX+minX; };
- real getY(int linearIdx){ return getIdxY(linearIdx)*deltaY+minY; };
- real getZ(int linearIdx){ return getIdxZ(linearIdx)*deltaZ+minZ; };
- int getIdxM00(real posX){ return (posX-minX)/deltaX; };
- int getIdx0M0(real posY){ return (posY-minY)/deltaY; };
- int getIdx00M(real posZ){ return (posZ-minZ)/deltaZ; };
- int getClosestIdxX(real posX){ int x = round((posX-minX)/deltaX); return x>nx ? nx : (x<0 ? 0 : x);};
- int getClosestIdxY(real posY){ int y = round((posY-minY)/deltaY); return y>ny ? ny : (y<0 ? 0 : y);};
- int getClosestIdxZ(real posZ){ int z = round((posZ-minZ)/deltaZ); return z>nz ? nz : (z<0 ? 0 : z);};
- int getLinearIndex(int idxX, int idxY, int idxZ){ return idxX + nx*(idxY+ny*idxZ); };
- int getNumberOfPointsInXYPlane(){ return nx*ny; }
- int getNumberOfPointsInYZPlane(){ return ny*nz; }
- int getNumberOfPointsInXZPlane(){ return nx*nz; }
- int getNumberOfPoints(){ return nx*ny*nz; }
+ bool inBoundingBox(real posX, real posY, real posZ) const{return inXBounds(posX) && inYBounds(posY) && inZBounds(posZ); };
+ bool inXBounds(real posX) const{ return posX<=maxX && posX>=minX; };
+ bool inYBounds(real posY) const{ return posY<=maxY && posY>=minY; };
+ bool inZBounds(real posZ) const{ return posZ<=maxZ && posZ>=minZ; };
+ int findNeighborMMM(real posX, real posY, real posZ) const{ const int idx = getLinearIndex(getIdxM00(posX) , getIdx0M0(posY) , getIdx00M(posZ) ); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
+ int findNeighborMMP(real posX, real posY, real posZ) const{ const int idx = getLinearIndex(getIdxM00(posX) , getIdx0M0(posY) , getIdx00M(posZ)+1); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
+ int findNeighborMPM(real posX, real posY, real posZ) const{ const int idx = getLinearIndex(getIdxM00(posX) , getIdx0M0(posY)+1, getIdx00M(posZ) ); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
+ int findNeighborMPP(real posX, real posY, real posZ) const{ const int idx = getLinearIndex(getIdxM00(posX) , getIdx0M0(posY)+1, getIdx00M(posZ)+1); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
+ int findNeighborPMM(real posX, real posY, real posZ) const{ const int idx = getLinearIndex(getIdxM00(posX)+1, getIdx0M0(posY) , getIdx00M(posZ) ); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
+ int findNeighborPMP(real posX, real posY, real posZ) const{ const int idx = getLinearIndex(getIdxM00(posX)+1, getIdx0M0(posY) , getIdx00M(posZ)+1); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
+ int findNeighborPPM(real posX, real posY, real posZ) const{ const int idx = getLinearIndex(getIdxM00(posX)+1, getIdx0M0(posY)+1, getIdx00M(posZ) ); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
+ int findNeighborPPP(real posX, real posY, real posZ) const{ const int idx = getLinearIndex(getIdxM00(posX)+1, getIdx0M0(posY)+1, getIdx00M(posZ)+1); return (idx>=0) && (idx<nx*ny*nz) ? idx : -1; };
+ int getIdxX(int linearIdx) const{ return linearIdx%nx;};
+ int getIdxY(int linearIdx) const{ return (linearIdx/nx)%ny;};
+ int getIdxZ(int linearIdx) const{ return linearIdx/(nx*ny); };
+ real getX(int linearIdx) const{ return getIdxX(linearIdx)*deltaX+minX; };
+ real getY(int linearIdx) const{ return getIdxY(linearIdx)*deltaY+minY; };
+ real getZ(int linearIdx) const{ return getIdxZ(linearIdx)*deltaZ+minZ; };
+ int getIdxM00(real posX) const{ return (posX-minX)/deltaX; };
+ int getIdx0M0(real posY) const{ return (posY-minY)/deltaY; };
+ int getIdx00M(real posZ) const{ return (posZ-minZ)/deltaZ; };
+ int getClosestIdxX(real posX) const{ const int x = round((posX-minX)/deltaX); return x>nx ? nx : (x<0 ? 0 : x);};
+ int getClosestIdxY(real posY) const{ const int y = round((posY-minY)/deltaY); return y>ny ? ny : (y<0 ? 0 : y);};
+ int getClosestIdxZ(real posZ) const{ const int z = round((posZ-minZ)/deltaZ); return z>nz ? nz : (z<0 ? 0 : z);};
+ int getLinearIndex(int idxX, int idxY, int idxZ) const{ return idxX + nx*(idxY+ny*idxZ); };
+ int getNumberOfPointsInXYPlane() const{ return nx*ny; }
+ int getNumberOfPointsInYZPlane() const{ return ny*nz; }
+ int getNumberOfPointsInXZPlane() const{ return nx*nz; }
+ int getNumberOfPoints() const{ return nx*ny*nz; }
size_t getNumberOfQuantities(){ return quantities.size(); }
void loadFile();
void unloadFile();
- bool isLoaded(){return loaded;};
+ bool isLoaded() const{return loaded;};
private:
@@ -95,14 +95,14 @@ private:
class FileCollection
{
public:
- FileCollection(std::string _prefix):
- prefix(_prefix){};
+ FileCollection(std::string prefix):
+ prefix(prefix){};
virtual ~FileCollection() = default;
virtual size_t getNumberOfQuantities() = 0;
- virtual FileType getFileType() = 0;
+ virtual TransientBCFileType getFileType() = 0;
protected:
std::string prefix;
@@ -112,13 +112,13 @@ protected:
class VTKFileCollection : public FileCollection
{
public:
- VTKFileCollection(std::string _prefix):
- FileCollection(_prefix)
+ VTKFileCollection(std::string prefix):
+ FileCollection(prefix)
{
findFiles();
};
- FileType getFileType() override{ return FileType::VTK; };
+ TransientBCFileType getFileType() override{ return TransientBCFileType::VTK; };
size_t getNumberOfQuantities() override{ return files[0][0][0].getNumberOfQuantities(); }
@@ -152,9 +152,9 @@ public:
virtual void getNextData(real* data, uint numberOfNodes, real time)=0;
virtual void fillArrays(std::vector<real>& coordsY, std::vector<real>& coordsZ)=0;
- uint getNPoints(){return nPoints; };
- uint getNPointsRead(){return nPointsRead; };
- size_t getNumberOfQuantities(){ return nQuantities; };
+ uint getNPoints() const{return nPoints; };
+ uint getNPointsRead() const{return nPointsRead; };
+ size_t getNumberOfQuantities() const{ return nQuantities; };
void setWritingOffset(uint offset){ this->writingOffset = offset; }
void getNeighbors(uint* neighbor0PP, uint* neighbor0PM, uint* neighbor0MP, uint* neighbor0MM);
void getWeights(real* _weights0PP, real* _weights0PM, real* _weights0MP, real* _weights0MM);
@@ -173,9 +173,9 @@ protected:
class VTKReader : public TransientBCInputFileReader
{
public:
- VTKReader(SPtr<VTKFileCollection> _fileCollection, uint _readLevel):
- fileCollection(_fileCollection),
- readLevel(_readLevel)
+ VTKReader(SPtr<VTKFileCollection> fileCollection, uint readLevel):
+ fileCollection(fileCollection),
+ readLevel(readLevel)
{
this->nQuantities = fileCollection->getNumberOfQuantities();
read = std::async([](){});
@@ -195,7 +195,7 @@ private:
};
-SPtr<FileCollection> createFileCollection(std::string prefix, FileType type);
+SPtr<FileCollection> createFileCollection(std::string prefix, TransientBCFileType type);
SPtr<TransientBCInputFileReader> createReaderForCollection(SPtr<FileCollection> fileCollection, uint readLevel);
#endif //TRANSIENTBCSETTER_H_
diff --git a/src/gpu/GridGenerator/geometries/BoundingBox/BoundingBoxTest.cpp b/src/gpu/GridGenerator/geometries/BoundingBox/BoundingBoxTest.cpp
index 35f4332ccec3cf541993b1e22c88eeeb365afadb..6be86fb2904c0c07a97a44c293b5045133ccf873 100644
--- a/src/gpu/GridGenerator/geometries/BoundingBox/BoundingBoxTest.cpp
+++ b/src/gpu/GridGenerator/geometries/BoundingBox/BoundingBoxTest.cpp
@@ -5,6 +5,7 @@
#include "geometries/BoundingBox/BoundingBox.h"
#include "geometries/Vertex/Vertex.h"
+
using namespace testing;
TEST(BoundingBoxExactTest, findMinMaxFromTriangle)
@@ -19,7 +20,7 @@ TEST(BoundingBoxExactTest, findMinMaxFromTriangle)
real maxY = 50.0f;
real maxZ = 12122.23f;
Vertex v1 = Vertex(maxX, maxY - 10, minZ + 2);
- Vertex v2 = Vertex(minX, maxY, maxZ);
+ Vertex v2 = Vertex(minX, maxY, maxZ);
Vertex v3 = Vertex(minX + 3, minY, minZ);
Vertex normal = Vertex(0.0f, 0.0f, 0.0f);
Triangle t = Triangle(v1, v2, v3, normal);
@@ -29,7 +30,7 @@ TEST(BoundingBoxExactTest, findMinMaxFromTriangle)
EXPECT_THAT(box.minX, RealEq(minX));
EXPECT_THAT(box.minY, RealEq(minY));
EXPECT_THAT(box.minZ, RealEq(minZ));
-
+
EXPECT_THAT(box.maxX, RealEq(maxX));
EXPECT_THAT(box.maxY, RealEq(maxY));
EXPECT_THAT(box.maxZ, RealEq(maxZ));
@@ -47,9 +48,9 @@ TEST(BoundingBoxTest, isInside_true)
box.maxY = 10.0f;
box.maxZ = 10.0f;
- Vertex v1 = Vertex(1,1,1);
- Vertex v2 = Vertex(2,2,2);
- Vertex v3 = Vertex(3,3,3);
+ Vertex v1 = Vertex(1, 1, 1);
+ Vertex v2 = Vertex(2, 2, 2);
+ Vertex v3 = Vertex(3, 3, 3);
Vertex normal = Vertex(0.0f, 0.0f, 0.0f);
Triangle t = Triangle(v1, v2, v3, normal);
@@ -68,9 +69,9 @@ TEST(BoundingBoxTest, isInside_false)
box.maxY = 10.0f;
box.maxZ = 10.0f;
- Vertex v1 = Vertex(1,1,1);
- Vertex v2 = Vertex(2,2,2);
- Vertex v3 = Vertex(3,3,11);
+ Vertex v1 = Vertex(1, 1, 1);
+ Vertex v2 = Vertex(2, 2, 2);
+ Vertex v3 = Vertex(3, 3, 11);
Vertex normal = Vertex(0.0f, 0.0f, 0.0f);
Triangle t = Triangle(v1, v2, v3, normal);
diff --git a/src/gpu/GridGenerator/grid/GridBuilder/LevelGridBuilder.h b/src/gpu/GridGenerator/grid/GridBuilder/LevelGridBuilder.h
index cad97a0e3347a12a6ba6a58391f0ec90f5ab2b2e..9aa0019762ddde3f66e1836e3da73da6813d8a7a 100644
--- a/src/gpu/GridGenerator/grid/GridBuilder/LevelGridBuilder.h
+++ b/src/gpu/GridGenerator/grid/GridBuilder/LevelGridBuilder.h
@@ -80,25 +80,27 @@ public:
GRIDGENERATOR_EXPORT ~LevelGridBuilder() override;
- GRIDGENERATOR_EXPORT void setSlipBoundaryCondition(SideType sideType, real nomalX, real normalY, real normalZ);
- GRIDGENERATOR_EXPORT void setStressBoundaryCondition(SideType sideType, real nomalX, real normalY, real normalZ, uint samplingOffset, real z0, real dx);
- GRIDGENERATOR_EXPORT void setVelocityBoundaryCondition(SideType sideType, real vx, real vy, real vz);
- GRIDGENERATOR_EXPORT void setPressureBoundaryCondition(SideType sideType, real rho);
- GRIDGENERATOR_EXPORT void setPeriodicBoundaryCondition(bool periodic_X, bool periodic_Y, bool periodic_Z);
+ GRIDGENERATOR_EXPORT virtual void setSlipBoundaryCondition(SideType sideType, real nomalX, real normalY, real normalZ);
+ GRIDGENERATOR_EXPORT virtual void setStressBoundaryCondition(SideType sideType, real nomalX, real normalY, real normalZ,
+ uint samplingOffset, real z0, real dx);
+ GRIDGENERATOR_EXPORT virtual void setVelocityBoundaryCondition(SideType sideType, real vx, real vy, real vz);
+ GRIDGENERATOR_EXPORT virtual void setPressureBoundaryCondition(SideType sideType, real rho);
+ GRIDGENERATOR_EXPORT virtual void setPeriodicBoundaryCondition(bool periodic_X, bool periodic_Y, bool periodic_Z);
GRIDGENERATOR_EXPORT void setPeriodicShiftOnXBoundaryInYDirection(real shift);
GRIDGENERATOR_EXPORT void setPeriodicShiftOnXBoundaryInZDirection(real shift);
GRIDGENERATOR_EXPORT void setPeriodicShiftOnYBoundaryInXDirection(real shift);
GRIDGENERATOR_EXPORT void setPeriodicShiftOnYBoundaryInZDirection(real shift);
GRIDGENERATOR_EXPORT void setPeriodicShiftOnZBoundaryInXDirection(real shift);
GRIDGENERATOR_EXPORT void setPeriodicShiftOnZBoundaryInYDirection(real shift);
- GRIDGENERATOR_EXPORT void setNoSlipBoundaryCondition(SideType sideType);
- GRIDGENERATOR_EXPORT void setPrecursorBoundaryCondition(SideType sideType, SPtr<FileCollection> fileCollection, int timeStepsBetweenReads,
- real velocityX=c0o1, real velocityY=c0o1, real velocityZ=c0o1,
- std::vector<uint> fileLevelToGridLevelMap = {});
+ GRIDGENERATOR_EXPORT virtual void setNoSlipBoundaryCondition(SideType sideType);
+ GRIDGENERATOR_EXPORT virtual void setPrecursorBoundaryCondition(SideType sideType, SPtr<FileCollection> fileCollection,
+ int timeStepsBetweenReads, real velocityX = c0o1,
+ real velocityY = c0o1, real velocityZ = c0o1,
+ std::vector<uint> fileLevelToGridLevelMap = {});
GRIDGENERATOR_EXPORT void setEnableFixRefinementIntoTheWall(bool enableFixRefinementIntoTheWall);
- GRIDGENERATOR_EXPORT void setCommunicationProcess(int direction, uint process);
+ GRIDGENERATOR_EXPORT virtual void setCommunicationProcess(int direction, uint process);
GRIDGENERATOR_EXPORT virtual uint getCommunicationProcess(int direction) override;
diff --git a/src/gpu/GridGenerator/grid/GridBuilder/MultipleGridBuilder.cpp b/src/gpu/GridGenerator/grid/GridBuilder/MultipleGridBuilder.cpp
index 2cf20863c199a47a27e51ae8a5364daa6e81c9a5..28268b652510cd639f017a6ae069886f6c000aa2 100644
--- a/src/gpu/GridGenerator/grid/GridBuilder/MultipleGridBuilder.cpp
+++ b/src/gpu/GridGenerator/grid/GridBuilder/MultipleGridBuilder.cpp
@@ -71,6 +71,12 @@ void MultipleGridBuilder::addCoarseGrid(real startX, real startY, real startZ, r
addGridToList(grid);
}
+void MultipleGridBuilder::addCoarseGrid(const GridDimensions &gridDimensions)
+{
+ this->addCoarseGrid(gridDimensions.minX, gridDimensions.minY, gridDimensions.minZ, gridDimensions.maxX,
+ gridDimensions.maxY, gridDimensions.maxZ, gridDimensions.delta);
+}
+
void MultipleGridBuilder::addGeometry(SPtr<Object> solidObject)
{
this->solidObject = solidObject;
diff --git a/src/gpu/GridGenerator/grid/GridBuilder/MultipleGridBuilder.h b/src/gpu/GridGenerator/grid/GridBuilder/MultipleGridBuilder.h
index 44ec17fec633f2bee09bdb2240ef55bc8c4f594a..bbbbb15cd34b1f0ce124ca77b3307c7fb68b1161 100644
--- a/src/gpu/GridGenerator/grid/GridBuilder/MultipleGridBuilder.h
+++ b/src/gpu/GridGenerator/grid/GridBuilder/MultipleGridBuilder.h
@@ -41,6 +41,7 @@
#include "grid/GridBuilder/LevelGridBuilder.h"
#include "grid/GridFactory.h"
#include "grid/distributions/Distribution.h"
+#include "grid/GridDimensions.h"
class Object;
class BoundingBox;
@@ -50,11 +51,13 @@ class MultipleGridBuilder : public LevelGridBuilder
public:
MultipleGridBuilder();
- GRIDGENERATOR_EXPORT void addCoarseGrid(real startX, real startY, real startZ, real endX, real endY, real endZ, real delta);
- GRIDGENERATOR_EXPORT void addGrid(SPtr<Object> gridShape);
- GRIDGENERATOR_EXPORT void addGrid(SPtr<Object> gridShape, uint levelFine);
+ GRIDGENERATOR_EXPORT virtual void addCoarseGrid(real startX, real startY, real startZ, real endX, real endY, real endZ,
+ real delta);
+ GRIDGENERATOR_EXPORT virtual void addCoarseGrid(const GridDimensions& gridDimensions);
+ GRIDGENERATOR_EXPORT virtual void addGrid(SPtr<Object> gridShape);
+ GRIDGENERATOR_EXPORT virtual void addGrid(SPtr<Object> gridShape, uint levelFine);
- GRIDGENERATOR_EXPORT void addGeometry(SPtr<Object> gridShape);
+ GRIDGENERATOR_EXPORT virtual void addGeometry(SPtr<Object> gridShape);
GRIDGENERATOR_EXPORT void addGeometry(SPtr<Object> solidObject, uint level);
GRIDGENERATOR_EXPORT uint getNumberOfLevels() const;
@@ -69,13 +72,13 @@ public:
GRIDGENERATOR_EXPORT real getEndZ(uint level) const;
GRIDGENERATOR_EXPORT std::vector<SPtr<Grid> > getGrids() const;
- GRIDGENERATOR_EXPORT void buildGrids(bool enableThinWalls = false);
+ GRIDGENERATOR_EXPORT virtual void buildGrids(bool enableThinWalls = false);
- GRIDGENERATOR_EXPORT void setNumberOfLayers( uint numberOfLayersFine, uint numberOfLayersBetweenLevels );
+ GRIDGENERATOR_EXPORT virtual void setNumberOfLayers(uint numberOfLayersFine, uint numberOfLayersBetweenLevels);
- GRIDGENERATOR_EXPORT void writeGridsToVtk(const std::string &path) const;
+ GRIDGENERATOR_EXPORT void writeGridsToVtk(const std::string& path) const;
- GRIDGENERATOR_EXPORT void setSubDomainBox(SPtr<BoundingBox> subDomainBox);
+ GRIDGENERATOR_EXPORT virtual void setSubDomainBox(SPtr<BoundingBox> subDomainBox);
private:
void addGridToList(SPtr<Grid> grid);
@@ -108,7 +111,7 @@ private:
SPtr<BoundingBox> subDomainBox;
public:
- GRIDGENERATOR_EXPORT void findCommunicationIndices(int direction, bool doShift=false);
+ GRIDGENERATOR_EXPORT virtual void findCommunicationIndices(int direction, bool doShift=false);
};
#endif
diff --git a/src/gpu/GridGenerator/grid/GridDimensions.h b/src/gpu/GridGenerator/grid/GridDimensions.h
new file mode 100644
index 0000000000000000000000000000000000000000..ec7e8e39c9e31773eb554ceb14fae450db108e37
--- /dev/null
+++ b/src/gpu/GridGenerator/grid/GridDimensions.h
@@ -0,0 +1,21 @@
+#ifndef GRIDDIMENSIONS_H
+#define GRIDDIMENSIONS_H
+
+#include "DataTypes.h"
+
+struct GridDimensions {
+public:
+ real minX;
+ real maxX;
+ real minY;
+ real maxY;
+ real minZ;
+ real maxZ;
+ real delta;
+
+ GridDimensions() = default;
+ GridDimensions(real minX, real maxX, real minY, real maxY, real minZ, real maxZ, real delta)
+ : minX(minX), maxX(maxX), minY(minY), maxY(maxY), minZ(minZ), maxZ(maxZ), delta(delta){};
+};
+
+#endif
\ No newline at end of file
diff --git a/src/gpu/GridGenerator/grid/MultipleGridBuilderFacade.cpp b/src/gpu/GridGenerator/grid/MultipleGridBuilderFacade.cpp
new file mode 100644
index 0000000000000000000000000000000000000000..3e18525b6fe7ca8bc4ffaf42f20e48a22a6ea5a3
--- /dev/null
+++ b/src/gpu/GridGenerator/grid/MultipleGridBuilderFacade.cpp
@@ -0,0 +1,386 @@
+#include <algorithm>
+#include <iostream>
+#include <iterator>
+#include <stdexcept>
+#include <string>
+#include <utility>
+
+#include "MultipleGridBuilderFacade.h"
+#include "grid/GridBuilder/MultipleGridBuilder.h"
+#include "grid/GridDimensions.h"
+#include "geometries/BoundingBox/BoundingBox.h"
+#include "geometries/Object.h"
+
+MultipleGridBuilderFacade::MultipleGridBuilderFacade(SPtr<MultipleGridBuilder> gridBuilder,
+ SPtr<GridDimensions> gridDimensions,
+ std::optional<real> overlapOfSubdomains)
+ : gridBuilder(std::move(gridBuilder)), gridDimensionsDomain(std::move(gridDimensions)),
+ overlapOfSubdomains(overlapOfSubdomains)
+{
+}
+
+MultipleGridBuilderFacade::MultipleGridBuilderFacade(SPtr<GridDimensions> gridDimensions,
+ std::optional<real> overlapOfSubdomains)
+ : MultipleGridBuilderFacade(std::make_shared<MultipleGridBuilder>(), std::move(gridDimensions), overlapOfSubdomains)
+{
+}
+
+void MultipleGridBuilderFacade::createGrids(uint generatePart)
+{
+ if (createGridsHasBeenCalled)
+ throw std::runtime_error("MultipleGridBuilderFacade::createGrids() has been called more than once.");
+ createGridsHasBeenCalled = true;
+
+ this->calculateNumberOfSubdomains();
+ this->numberOfGridsTotal = this->numberGridsX * this->numberGridsY * this->numberGridsZ;
+
+ if (numberOfGridsTotal > 1 && !this->overlapOfSubdomains)
+ throw std::runtime_error("OverlapOfSubdomains in MultipleGridBuilderFacade is NaN.");
+
+ if (generatePart >= numberOfGridsTotal)
+ throw std::runtime_error("Invalid id for subdomain: It is greater or equal to numberOfSubdomains");
+
+ this->sortSplitLocations();
+
+ this->checkSplitLocations(this->xSplits, this->gridDimensionsDomain->minX, this->gridDimensionsDomain->maxX);
+ this->checkSplitLocations(this->ySplits, this->gridDimensionsDomain->minY, this->gridDimensionsDomain->maxY);
+ this->checkSplitLocations(this->zSplits, this->gridDimensionsDomain->minZ, this->gridDimensionsDomain->maxZ);
+
+ this->calculatedIndexOfPart(generatePart);
+
+ this->checkForNeighbors();
+
+ this->configureSubDomainGrids();
+
+ this->addGeometriesToGridBuilder();
+
+ gridBuilder->buildGrids(false); // buildGrids() has to be called before setting the BCs!!!!
+
+ this->setUpCommunicationNeighbors();
+}
+
+void MultipleGridBuilderFacade::calculateNumberOfSubdomains()
+{
+ this->numberGridsX = (uint)(this->xSplits.size() + 1);
+ this->numberGridsY = (uint)(this->ySplits.size() + 1);
+ this->numberGridsZ = (uint)(this->zSplits.size() + 1);
+}
+
+void MultipleGridBuilderFacade::sortSplitLocations()
+{
+
+ std::sort(this->xSplits.begin(), this->xSplits.end());
+ std::sort(this->ySplits.begin(), this->ySplits.end());
+ std::sort(this->zSplits.begin(), this->zSplits.end());
+}
+
+void MultipleGridBuilderFacade::calculatedIndexOfPart(uint generatePart)
+{
+ this->xIndex = this->getX3D(generatePart);
+ this->yIndex = this->getY3D(generatePart);
+ this->zIndex = this->getZ3D(generatePart);
+}
+
+void MultipleGridBuilderFacade::checkSplitLocations(const std::vector<real> &splits, real lowerBound, real upperBound) const
+{
+ if (splits.empty()) return;
+
+ if (splits.front() < lowerBound)
+ throw std::runtime_error("The domain split value " + std::to_string(splits.front()) +
+ " is smaller than the lower bound (" + std::to_string(lowerBound) + ") of the domain.");
+ if (splits.back() > upperBound)
+ throw std::runtime_error("A domain split value " + std::to_string(splits.back()) +
+ " is larger than the upper bound (" + std::to_string(upperBound) + ") of the domain.");
+
+ auto iteratorOfDuplicate = std::adjacent_find(splits.begin(), splits.end());
+ if (iteratorOfDuplicate != splits.end())
+ throw std::runtime_error("The domain split value " + std::to_string(*iteratorOfDuplicate) +
+ " was added multiple times for the same coordinate direction");
+}
+
+void MultipleGridBuilderFacade::configureSubDomainGrids()
+{
+
+ // Example: 2 subdomains in x
+ // xSplits = {0}
+ // xMin = {-1}
+ // xMax = {1}
+
+ // vector xValues (bounding boxes of the subdomains)
+ //
+ // /------- subdmain 0 -------/
+ // | |
+ // -1.0 0.0 1.0
+ // | |
+ // /------- subdmain 1 -------/
+ //
+ // xValues = {-1.0, 0.0, 1.0}
+
+ // create vector with the coordinates of the subdomain's bounding boxes
+ std::vector<real> xValues = { this->gridDimensionsDomain->minX, this->gridDimensionsDomain->maxX };
+ xValues.insert(std::prev(xValues.end()), this->xSplits.begin(), this->xSplits.end());
+ std::vector<real> yValues = { this->gridDimensionsDomain->minY, this->gridDimensionsDomain->maxY };
+ yValues.insert(std::prev(yValues.end()), this->ySplits.begin(), this->ySplits.end());
+ std::vector<real> zValues = { this->gridDimensionsDomain->minZ, this->gridDimensionsDomain->maxZ };
+ zValues.insert(std::prev(zValues.end()), this->zSplits.begin(), this->zSplits.end());
+
+ real xMinCoarseGrid = xValues[xIndex];
+ real yMinCoarseGrid = yValues[yIndex];
+ real zMinCoarseGrid = zValues[zIndex];
+ real xMaxCoarseGrid = xValues[xIndex + 1];
+ real yMaxCoarseGrid = yValues[yIndex + 1];
+ real zMaxCoarseGrid = zValues[zIndex + 1];
+
+ // add overlap
+ xMinCoarseGrid -= (hasNeighbors[CommunicationDirections::MX]) ? overlapOfSubdomains.value() : 0;
+ yMinCoarseGrid -= (hasNeighbors[CommunicationDirections::MY]) ? overlapOfSubdomains.value() : 0;
+ zMinCoarseGrid -= (hasNeighbors[CommunicationDirections::MZ]) ? overlapOfSubdomains.value() : 0;
+ xMaxCoarseGrid += (hasNeighbors[CommunicationDirections::PX]) ? overlapOfSubdomains.value() : 0;
+ yMaxCoarseGrid += (hasNeighbors[CommunicationDirections::PY]) ? overlapOfSubdomains.value() : 0;
+ zMaxCoarseGrid += (hasNeighbors[CommunicationDirections::PZ]) ? overlapOfSubdomains.value() : 0;
+
+ // add coarse grid
+ gridBuilder->addCoarseGrid(xMinCoarseGrid, yMinCoarseGrid, zMinCoarseGrid, xMaxCoarseGrid, yMaxCoarseGrid,
+ zMaxCoarseGrid, gridDimensionsDomain->delta);
+
+ // add fine grids for grid refinement
+ this->addFineGridsToGridBuilder();
+
+ // set subdomain boxes
+ // subdomain boxes are only needed on multiple gpus
+ if ((numberGridsX * numberGridsY * numberGridsZ) > 1) {
+ gridBuilder->setSubDomainBox(std::make_shared<BoundingBox>(xValues[xIndex], xValues[xIndex + 1],
+ yValues[yIndex], yValues[yIndex + 1],
+ zValues[zIndex], zValues[zIndex + 1]));
+ }
+}
+
+void MultipleGridBuilderFacade::setUpCommunicationNeighbors()
+{
+ // Communication is only needed on multiple gpus
+ if (numberOfGridsTotal == 1) return;
+
+ if (hasNeighbors.empty())
+ throw std::runtime_error("checkForNeighbors() has to be called befor calling setUpCommunicationNeighbors()");
+
+ for (const auto &[direction, hasNeighbor] : hasNeighbors) {
+ if (hasNeighbor) {
+ gridBuilder->findCommunicationIndices(direction);
+
+ switch (direction) {
+ case CommunicationDirections::MX:
+ gridBuilder->setCommunicationProcess(direction, getIndex1D(xIndex - 1, yIndex, zIndex));
+ break;
+ case CommunicationDirections::MY:
+ gridBuilder->setCommunicationProcess(direction, getIndex1D(xIndex, yIndex - 1, zIndex));
+ break;
+ case CommunicationDirections::MZ:
+ gridBuilder->setCommunicationProcess(direction, getIndex1D(xIndex, yIndex, zIndex - 1));
+ break;
+ case CommunicationDirections::PX:
+ gridBuilder->setCommunicationProcess(direction, getIndex1D(xIndex + 1, yIndex, zIndex));
+ break;
+ case CommunicationDirections::PY:
+ gridBuilder->setCommunicationProcess(direction, getIndex1D(xIndex, yIndex + 1, zIndex));
+ break;
+ case CommunicationDirections::PZ:
+ gridBuilder->setCommunicationProcess(direction, getIndex1D(xIndex, yIndex, zIndex + 1));
+ break;
+ }
+ }
+ }
+}
+
+void MultipleGridBuilderFacade::checkForNeighbors()
+{
+ hasNeighbors[CommunicationDirections::MX] = (xIndex > 0);
+ hasNeighbors[CommunicationDirections::MY] = (yIndex > 0);
+ hasNeighbors[CommunicationDirections::MZ] = (zIndex > 0);
+ hasNeighbors[CommunicationDirections::PX] = (xIndex < numberGridsX - 1);
+ hasNeighbors[CommunicationDirections::PY] = (yIndex < numberGridsY - 1);
+ hasNeighbors[CommunicationDirections::PZ] = (zIndex < numberGridsZ - 1);
+}
+
+void MultipleGridBuilderFacade::addFineGridsToGridBuilder()
+{
+ for (auto const &grid : fineGrids) {
+ gridBuilder->addGrid(grid.first, grid.second);
+ }
+}
+
+void MultipleGridBuilderFacade::addGeometriesToGridBuilder()
+{
+ for (auto const &geometry : geometries) {
+ gridBuilder->addGeometry(geometry);
+ }
+}
+
+void MultipleGridBuilderFacade::setOverlapOfSubdomains(real overlap)
+{
+ this->overlapOfSubdomains = overlap;
+}
+
+void MultipleGridBuilderFacade::addDomainSplit(real coordinate, MultipleGridBuilderFacade::CoordDirection direction)
+{
+ if (this->createGridsHasBeenCalled)
+ throw std::runtime_error("MultipleGridBuilderFacade::addSplit() should be called before createGrids().");
+
+ switch (direction) {
+ case x:
+ this->xSplits.push_back(coordinate);
+ break;
+ case y:
+ this->ySplits.push_back(coordinate);
+ break;
+ case z:
+ this->zSplits.push_back(coordinate);
+ break;
+ }
+}
+
+void MultipleGridBuilderFacade::addFineGrid(std::shared_ptr<Object> gridShape, uint levelFine)
+{
+ if (this->createGridsHasBeenCalled)
+ throw std::runtime_error("MultipleGridBuilderFacade::addFineGrid() should be called before createGrids().");
+
+ this->fineGrids.emplace_back(gridShape, levelFine);
+}
+
+void MultipleGridBuilderFacade::addGeometry(std::shared_ptr<Object> gridShape)
+{
+ if (this->createGridsHasBeenCalled)
+ throw std::runtime_error("MultipleGridBuilderFacade::addGeometry() should be called before createGrids().");
+
+ this->geometries.emplace_back(gridShape);
+}
+
+void MultipleGridBuilderFacade::setNumberOfLayersForRefinement(uint numberOfLayersFine,
+ uint numberOfLayersBetweenLevels) const
+{
+ gridBuilder->setNumberOfLayers(numberOfLayersFine, numberOfLayersBetweenLevels);
+}
+
+uint MultipleGridBuilderFacade::getX3D(uint index1D) const
+{
+ return index1D % numberGridsX;
+}
+
+uint MultipleGridBuilderFacade::getY3D(uint index1D) const
+{
+ return (index1D / numberGridsX) % numberGridsY;
+}
+
+uint MultipleGridBuilderFacade::getZ3D(uint index1D) const
+{
+ return index1D / (numberGridsX * numberGridsY);
+}
+
+std::array<uint, 3> MultipleGridBuilderFacade::convertToIndices3D(uint index1D) const
+{
+ const uint xPos = getX3D(index1D);
+ const uint yPos = getY3D(index1D);
+ const uint zPos = getZ3D(index1D);
+ return { xPos, yPos, zPos };
+}
+
+uint MultipleGridBuilderFacade::getIndex1D(uint xIndex, uint yIndex, uint zIndex) const
+{
+ return xIndex + yIndex * numberGridsX + zIndex * numberGridsX * numberGridsY;
+}
+
+void MultipleGridBuilderFacade::setSlipBoundaryCondition(SideType sideType, real normalX, real normalY, real normalZ)
+{
+ setBoundaryCondition(sideType, [&]() { gridBuilder->setSlipBoundaryCondition(sideType, normalX, normalY, normalZ); });
+}
+
+void MultipleGridBuilderFacade::setStressBoundaryCondition(SideType sideType, real normalX, real normalY, real normalZ,
+ uint samplingOffset, real z0, real dx)
+{
+ setBoundaryCondition(sideType, [&]() {
+ gridBuilder->setStressBoundaryCondition(sideType, normalX, normalY, normalZ, samplingOffset, z0, dx);
+ });
+}
+
+void MultipleGridBuilderFacade::setPrecursorBoundaryCondition(SideType sideType, SPtr<FileCollection> fileCollection,
+ int timeStepsBetweenReads, real velocityX, real velocityY,
+ real velocityZ, std::vector<uint> fileLevelToGridLevelMap)
+{
+ setBoundaryCondition(sideType, [&]() {
+ gridBuilder->setPrecursorBoundaryCondition(sideType, fileCollection, timeStepsBetweenReads, velocityX, velocityY,
+ velocityZ, fileLevelToGridLevelMap);
+ });
+}
+
+void MultipleGridBuilderFacade::setVelocityBoundaryCondition(SideType sideType, real vx, real vy, real vz)
+{
+ setBoundaryCondition(sideType, [&]() { gridBuilder->setVelocityBoundaryCondition(sideType, vx, vy, vz); });
+}
+
+void MultipleGridBuilderFacade::setPressureBoundaryCondition(SideType sideType, real rho)
+{
+ setBoundaryCondition(sideType, [&]() { gridBuilder->setPressureBoundaryCondition(sideType, rho); });
+}
+
+void MultipleGridBuilderFacade::setNoSlipBoundaryCondition(SideType sideType)
+{
+ setBoundaryCondition(sideType, [&]() { gridBuilder->setNoSlipBoundaryCondition(sideType); });
+}
+
+void MultipleGridBuilderFacade::setPeriodicBoundaryCondition(bool periodic_X, bool periodic_Y, bool periodic_Z)
+{
+ bool localPeriodicityX = false;
+ bool localPeriodicityY = false;
+ bool localPeriodicityZ = false;
+
+ if (periodic_X) {
+ if (numberGridsX == 1) {
+ localPeriodicityX = true;
+ }
+ if (numberGridsX > 1 && !hasNeighbors[CommunicationDirections::MX]) {
+ // set last grid in x-direction as communication neighbor
+ gridBuilder->findCommunicationIndices(CommunicationDirections::MX);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::MX, getIndex1D(numberGridsX - 1, yIndex, zIndex));
+ } else if (numberGridsX > 1 && !hasNeighbors[CommunicationDirections::PX]) {
+ // set first grid in x-direction as communication neighbor
+ gridBuilder->findCommunicationIndices(CommunicationDirections::PX);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::PX, getIndex1D(0, yIndex, zIndex));
+ }
+ }
+
+ if (periodic_Y) {
+ if (numberGridsY == 1) {
+ localPeriodicityY = true;
+ }
+ if (numberGridsY > 1 && !hasNeighbors[CommunicationDirections::MY]) {
+ // set last grid in x-direction as communication neighbor
+ gridBuilder->findCommunicationIndices(CommunicationDirections::MY);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::MY, getIndex1D(xIndex, numberGridsY - 1, zIndex));
+ } else if (numberGridsY > 1 && !hasNeighbors[CommunicationDirections::PY]) {
+ // set first grid in x-direction as communication neighbor
+ gridBuilder->findCommunicationIndices(CommunicationDirections::PY);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::PY, getIndex1D(xIndex, 0, zIndex));
+ }
+ }
+
+ if (periodic_Z) {
+ if (numberGridsZ == 1) {
+ localPeriodicityZ = true;
+ }
+ if (numberGridsZ > 1 && !hasNeighbors[CommunicationDirections::MZ]) {
+ // set last grid in x-direction as communication neighbor
+ gridBuilder->findCommunicationIndices(CommunicationDirections::MZ);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::MZ, getIndex1D(xIndex, yIndex, numberGridsZ - 1));
+ } else if (numberGridsZ > 1 && !hasNeighbors[CommunicationDirections::PZ]) {
+ // set first grid in x-direction as communication neighbor
+ gridBuilder->findCommunicationIndices(CommunicationDirections::PZ);
+ gridBuilder->setCommunicationProcess(CommunicationDirections::PZ, getIndex1D(xIndex, yIndex, 0));
+ }
+ }
+
+ gridBuilder->setPeriodicBoundaryCondition(localPeriodicityX, localPeriodicityY, localPeriodicityZ);
+}
+
+SPtr<MultipleGridBuilder> MultipleGridBuilderFacade::getGridBuilder()
+{
+ return gridBuilder;
+}
\ No newline at end of file
diff --git a/src/gpu/GridGenerator/grid/MultipleGridBuilderFacade.h b/src/gpu/GridGenerator/grid/MultipleGridBuilderFacade.h
new file mode 100644
index 0000000000000000000000000000000000000000..ae139d32c79143cf2a8b5e3970729853e6db3e0c
--- /dev/null
+++ b/src/gpu/GridGenerator/grid/MultipleGridBuilderFacade.h
@@ -0,0 +1,227 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \file MultipleGridBuilderFacade.h
+//! \ingroup grid
+//! \author Anna Wellmann
+//! \brief A class that makes the setup of simulations on multiple gpus easier
+//! \details Using this class is optional.
+
+//=======================================================================================
+
+#ifndef MULTIGPUGRIDHELPER_H
+#define MULTIGPUGRIDHELPER_H
+
+#include <array>
+#include <cmath>
+#include <optional>
+#include <stdexcept>
+#include <vector>
+
+#include <basics/DataTypes.h>
+#include <basics/constants/NumericConstants.h>
+
+#include "grid/BoundaryConditions/Side.h"
+#include "utilities/communication.h"
+
+struct GridDimensions;
+class MultipleGridBuilder;
+class Object;
+class FileCollection;
+
+//! \class MultipleGridBuilderFacade
+//! \brief Simplifies the creation of the grids for a multi-gpu simulation
+//!
+//! \details Steps to set up the grids:
+//!
+//! - 1. initialize class with a MultipleGridBuilder and the dimensions of the entire domain
+//!
+//! - 2. Optional steps (their order does not matter):
+//!
+//! - a. for multi gpu:
+//!
+//! - addDomainSplit() [can be called multiple times]
+//!
+//! - b. for grids with refinement:
+//!
+//! - addFineGrid() [an be called multiple times]
+//!
+//! - setNumberOfLayersForRefinement() [call once (or not at all for default)]
+//!
+//! - c. for fluid domains with inserted geometry: call addGeometry()
+//!
+//! - 3. call createGrids()
+//!
+//! - 4. set boundary conditions
+//!
+
+using namespace vf::basics::constant;
+
+class MultipleGridBuilderFacade
+{
+public:
+ enum CoordDirection { x, y, z };
+
+ MultipleGridBuilderFacade(SPtr<MultipleGridBuilder> gridBuilder, SPtr<GridDimensions> gridDimensions,
+ std::optional<real> overlapOfSubdomains = std::nullopt);
+
+ MultipleGridBuilderFacade(SPtr<GridDimensions> gridDimensions, std::optional<real> overlapOfSubdomains = std::nullopt);
+
+ //! \brief split the domain in the passed direction at the passed coordinate
+ //! \details multiple splits can be added to a domain
+ void addDomainSplit(real coordinate, MultipleGridBuilderFacade::CoordDirection direction);
+
+ //! \brief set the overlap of the subdomains
+ void setOverlapOfSubdomains(real overlap);
+
+ //! \brief adds a fine grid
+ //! \details multiple fine grids can be added
+ void addFineGrid(std::shared_ptr<Object> gridShape, uint levelFine);
+
+ //! \brief adds a geometry to the fluid domain
+ //! \details add a primitive or an stl to the fluid domain
+ void addGeometry(SPtr<Object> gridShape);
+
+ //! \brief add number of layers for refinements
+ //! \details calls gridBuilder->setNumberOfLayers()
+ void setNumberOfLayersForRefinement(uint numberOfLayersFine, uint numberOfLayersBetweenLevels) const;
+
+ //! \brief generate the subdomain which is specified by generatePart
+ //! \details has to be called before the boundary conditions
+ void createGrids(uint generatePart);
+
+ // Boundary conditions, call after createGrids()
+ void setSlipBoundaryCondition(SideType sideType, real normalX, real normalY, real normalZ);
+ void setStressBoundaryCondition(SideType sideType, real normalX, real normalY, real normalZ, uint samplingOffset,
+ real z0, real dx);
+ void setVelocityBoundaryCondition(SideType sideType, real vx, real vy, real vz);
+ void setPressureBoundaryCondition(SideType sideType, real rho);
+ void setNoSlipBoundaryCondition(SideType sideType);
+ void setPeriodicBoundaryCondition(bool periodic_X, bool periodic_Y, bool periodic_Z);
+ void setPrecursorBoundaryCondition(SideType sideType, SPtr<FileCollection> fileCollection, int timeStepsBetweenReads,
+ real velocityX = c0o1, real velocityY = c0o1, real velocityZ = c0o1,
+ std::vector<uint> fileLevelToGridLevelMap = {});
+
+ SPtr<MultipleGridBuilder> getGridBuilder();
+
+protected:
+ // index calculations
+ std::array<uint, 3> convertToIndices3D(uint index1D) const;
+ uint getX3D(uint index1D) const;
+ uint getY3D(uint index1D) const;
+ uint getZ3D(uint index1D) const;
+ uint getIndex1D(uint xIndex, uint yIndex, uint zIndex) const;
+
+private:
+ //! \brief calculate the number of subdomains in all coordinate directions
+ void calculateNumberOfSubdomains();
+
+ //! \brief sort the split locations for multiGPU cases
+ void sortSplitLocations();
+
+ //! \brief calculate and save the 3d index from the 1d index generatePart
+ void calculatedIndexOfPart(uint generatePart);
+
+ //! \brief for each direction, calculate if the current subdomain has a neighbor in this direction
+ void checkForNeighbors();
+
+ //! \brief set up coarse grids and subdomain boxes for all grids
+ void configureSubDomainGrids();
+
+ //! \brief set up the communication to neighboring subdomains
+ void setUpCommunicationNeighbors();
+
+ //! \brief check if all locations for domain splits are inside the grid bounds and there are no duplicates.
+ void checkSplitLocations(const std::vector<real> &splits, real lowerBound, real upperBound) const;
+
+ //! \brief add fine grids to the gridBuilder
+ void addFineGridsToGridBuilder();
+
+ //! \brief add geometries to the grid builder
+ void addGeometriesToGridBuilder();
+
+ //! \brief call the grid builder's setter for a boundary condition
+ template <typename function>
+ void setBoundaryCondition(SideType sideType, function boundaryConditionFunction)
+ {
+ if (!createGridsHasBeenCalled) {
+ throw std::runtime_error(
+ "MultipleGridBuilderFacade::createGrids() has to be called before setting boundary conditions");
+ }
+
+ if (sideType == SideType::GEOMETRY ||
+ !hasNeighbors[static_cast<CommunicationDirections::CommunicationDirection>(static_cast<int>(sideType))]) {
+ boundaryConditionFunction();
+ }
+ }
+
+protected:
+ //! \brief total number of subdomains (computed)
+ uint numberGridsX;
+ uint numberGridsY;
+ uint numberGridsZ;
+
+private:
+ const SPtr<MultipleGridBuilder> gridBuilder;
+
+ // basic grid dimension (set in constructor)
+ const SPtr<GridDimensions> gridDimensionsDomain;
+
+ uint numberOfGridsTotal;
+
+ //! \brief coordinates, signifying where the domain is split into subdomains (must be set in a setter)
+ std::vector<real> xSplits;
+ std::vector<real> ySplits;
+ std::vector<real> zSplits;
+
+ //! \brief overlap between subdomains (must be set in a setter)
+ std::optional<real> overlapOfSubdomains = std::nullopt;
+
+ //! \brief index of the current subdomains in relation to all subdomains (computed)
+ uint xIndex;
+ uint yIndex;
+ uint zIndex;
+
+ //! \brief hasNeighbors, indicates if the current subdomains has a neighbor in a specific direction (computed)
+ //! \details use the enum CommunciationDirection to access the data
+ std::map<CommunicationDirections::CommunicationDirection, bool> hasNeighbors = {
+ { CommunicationDirections::MX, false }, { CommunicationDirections::PX, false },
+ { CommunicationDirections::MY, false }, { CommunicationDirections::PY, false },
+ { CommunicationDirections::MZ, false }, { CommunicationDirections::PZ, false }
+ };
+
+ //! \brief collects fineGrids: uint is the level, Object* the gridShape
+ std::vector<std::pair<std::shared_ptr<Object>, uint>> fineGrids;
+
+ //! \brief collects geometries
+ std::vector<std::shared_ptr<Object>> geometries;
+
+ bool createGridsHasBeenCalled = false;
+};
+
+#endif
\ No newline at end of file
diff --git a/src/gpu/GridGenerator/grid/MultipleGridBuilderFacadeTest.cpp b/src/gpu/GridGenerator/grid/MultipleGridBuilderFacadeTest.cpp
new file mode 100644
index 0000000000000000000000000000000000000000..a6160eebd335d83943108875fc31991f9a69e1f4
--- /dev/null
+++ b/src/gpu/GridGenerator/grid/MultipleGridBuilderFacadeTest.cpp
@@ -0,0 +1,905 @@
+#include <gmock/gmock.h>
+#include <memory>
+#include <stdexcept>
+
+#include "MultipleGridBuilderFacade.h"
+#include "geometries/BoundingBox/BoundingBox.h"
+#include "geometries/Sphere/Sphere.h"
+#include "core/BoundaryConditions/BoundaryConditionKernelManager.h"
+#include "grid/BoundaryConditions/Side.h"
+#include "basics/constants/NumericConstants.h"
+#include "utilities/communication.h"
+#include "grid/GridBuilder/MultipleGridBuilder.h"
+
+class MultipleGridBuilderFacadeTest : public MultipleGridBuilderFacade
+{public:
+ MultipleGridBuilderFacadeTest(SPtr<MultipleGridBuilder> gridBuilder, UPtr<GridDimensions> gridDimensions, std::optional<real> overlapOfSubdomains = std::nullopt)
+ : MultipleGridBuilderFacade(std::move(gridBuilder), std::move(gridDimensions), overlapOfSubdomains)
+ {
+ }
+ MultipleGridBuilderFacadeTest(SPtr<MultipleGridBuilder> gridBuilder, real minX, real maxX, real minY, real maxY,
+ real minZ, real maxZ, real dxGrid, std::optional<real> overlapOfSubdomains = std::nullopt)
+ : MultipleGridBuilderFacade(std::move(gridBuilder),
+ std::make_unique<GridDimensions>(minX, maxX, minY, maxY, minZ, maxZ, dxGrid), overlapOfSubdomains)
+ {
+ }
+
+ void setNumberOfGrids(uint x, uint y, uint z)
+ {
+ this->numberGridsX = x;
+ this->numberGridsY = y;
+ this->numberGridsZ = z;
+ };
+
+ uint getX3D(const uint index1D)
+ {
+ return MultipleGridBuilderFacade::getX3D(index1D);
+ }
+ uint getY3D(const uint index1D)
+ {
+ return MultipleGridBuilderFacade::getY3D(index1D);
+ }
+ uint getZ3D(const uint index1D)
+ {
+ return MultipleGridBuilderFacade::getZ3D(index1D);
+ }
+ uint getIndex1D(const uint xIndex, const uint yIndex, const uint zIndex)
+ {
+ return MultipleGridBuilderFacade::getIndex1D(xIndex, yIndex, zIndex);
+ }
+};
+
+class MockMultipleGridBuilder : public MultipleGridBuilder
+{
+public:
+ MOCK_METHOD(void, addCoarseGrid, (real startX, real startY, real startZ, real endX, real endY, real endZ, real delta),
+ (override));
+ void addCoarseGrid(const GridDimensions& gridDimensions) override {};
+ MOCK_METHOD(void, setSubDomainBox, (SPtr<BoundingBox> subDomainBox), (override));
+ MOCK_METHOD(void, findCommunicationIndices, (int direction, bool doShift), (override));
+ MOCK_METHOD(void, setCommunicationProcess, (int direction, uint process), (override));
+
+ MOCK_METHOD(void, setNoSlipBoundaryCondition, (SideType side), (override));
+ MOCK_METHOD(void, setStressBoundaryCondition,
+ (SideType sideType, real normalX, real normalY, real normalZ, uint samplingOffset, real z0, real dx),
+ (override));
+ MOCK_METHOD(void, setVelocityBoundaryCondition, (SideType sideType, real vx, real vy, real vz), (override));
+ MOCK_METHOD(void, setPressureBoundaryCondition, (SideType sideType, real rho), (override));
+ MOCK_METHOD(void, setSlipBoundaryCondition, (SideType sideType, real normalX, real normalY, real normalZ),
+ (override));
+ MOCK_METHOD(void, setPrecursorBoundaryCondition,
+ (SideType sideType, SPtr<FileCollection> fileCollection, int timeStepsBetweenReads, real velocityX,
+ real velocityY, real velocityZ, std::vector<uint> fileLevelToGridLevelMap),
+ (override));
+ MOCK_METHOD(void, setPeriodicBoundaryCondition, (bool periodic_X, bool periodic_Y, bool periodic_Z), (override));
+ MOCK_METHOD(void, setNumberOfLayers, (uint numberOfLayersFine, uint numberOfLayersBetweenLevels), (override));
+ MOCK_METHOD(void, addGrid, (std::shared_ptr<Object> gridShape, uint levelFine), (override));
+ MOCK_METHOD(void, addGrid, (std::shared_ptr<Object> gridShape), (override));
+ MOCK_METHOD(void, addGeometry, (std::shared_ptr<Object> gridShape), (override));
+
+ void buildGrids(bool enableThinWalls) override {};
+};
+
+TEST(MultipleGridBuilderFacadeTest, transform1dCoordinateToComponents)
+{
+ // y ^
+ // |
+ // |---->
+ // / x
+ // z /
+
+ // zIndex = 0: -----------
+ // | 4 | 5 |
+ // -----------
+ // | 2 | 3 |
+ // -----------
+ // | 0 | 1 |
+ // -----------
+
+ // zIndex = 3: -----------
+ // | 22 | 23 |
+ // -----------
+ // | 20 | 21 |
+ // -----------
+ // | 18 | 19 |
+ // -----------
+
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0);
+ sut.setNumberOfGrids(2, 3, 4);
+
+ // x
+ EXPECT_THAT(sut.getX3D(0), testing::Eq(0));
+ EXPECT_THAT(sut.getX3D(11), testing::Eq(1));
+ EXPECT_THAT(sut.getX3D(12), testing::Eq(0));
+ EXPECT_THAT(sut.getX3D(23), testing::Eq(1));
+
+ // y
+ EXPECT_THAT(sut.getY3D(0), testing::Eq(0));
+ EXPECT_THAT(sut.getY3D(9), testing::Eq(1));
+ EXPECT_THAT(sut.getY3D(10), testing::Eq(2));
+ EXPECT_THAT(sut.getY3D(13), testing::Eq(0));
+ EXPECT_THAT(sut.getY3D(23), testing::Eq(2));
+
+ // z
+ EXPECT_THAT(sut.getZ3D(0), testing::Eq(0));
+ EXPECT_THAT(sut.getZ3D(6), testing::Eq(1));
+ EXPECT_THAT(sut.getZ3D(17), testing::Eq(2));
+ EXPECT_THAT(sut.getZ3D(23), testing::Eq(3));
+
+ sut.setNumberOfGrids(1, 1, 1);
+ EXPECT_THAT(sut.getX3D(0), testing::Eq(0));
+ EXPECT_THAT(sut.getY3D(0), testing::Eq(0));
+ EXPECT_THAT(sut.getZ3D(0), testing::Eq(0));
+}
+
+TEST(MultipleGridBuilderFacadeTest, transformComponentsTo1DCoordinate)
+{
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0);
+ sut.setNumberOfGrids(2, 3, 4);
+
+ EXPECT_THAT(sut.getIndex1D(0, 0, 0), testing::Eq(0));
+ EXPECT_THAT(sut.getIndex1D(1, 2, 1), testing::Eq(11));
+ EXPECT_THAT(sut.getIndex1D(0, 0, 2), testing::Eq(12));
+ EXPECT_THAT(sut.getIndex1D(1, 2, 3), testing::Eq(23));
+}
+
+TEST(MultipleGridBuilderFacadeTest, noOverlapOnMultiGpu_Throws)
+{
+ auto gridBuilder = std::make_shared<MultipleGridBuilder>();
+ auto sut = MultipleGridBuilderFacadeTest(gridBuilder, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0, 0.0);
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::x);
+ EXPECT_THROW(sut.createGrids(0), std::runtime_error);
+}
+
+TEST(MultipleGridBuilderFacadeTest, createGrids1Gpu)
+{
+ auto mockGridBuilder = std::make_shared<MockMultipleGridBuilder>();
+ auto sut = MultipleGridBuilderFacadeTest(mockGridBuilder, -1.0, 1.0, -2.0, 2.0, -3.0, 3.0, 0.1);
+
+ EXPECT_CALL(*mockGridBuilder, addCoarseGrid(-1.0, -2.0, -3.0, 1.0, 2.0, 3.0, 0.1)).Times(1);
+ EXPECT_CALL(*mockGridBuilder, setSubDomainBox).Times(0);
+ sut.createGrids(0);
+}
+
+TEST(MultipleGridBuilderFacadeTest, createGrid_ProcessIdIsLargerThanNumberOfSubdomains_Throws)
+{
+ auto mockGridBuilder = std::make_shared<MockMultipleGridBuilder>();
+ auto sut = MultipleGridBuilderFacadeTest(mockGridBuilder, -1.0, 1.0, -2.0, 2.0, -3.0, 3.0, 0.1);
+
+ EXPECT_THROW(sut.createGrids(1), std::runtime_error); // generatePart >= number of subdomains --> should throw
+}
+
+class MultipleGridBuilderFacadeTest_24subdomains : public testing::Test
+{
+protected:
+ // y ^
+ // |
+ // |---->
+ // / x
+ // z /
+
+ // zIndex = 0: -----------
+ // | 4 | 5 |
+ // -----------
+ // | 2 | 3 |
+ // -----------
+ // | 0 | 1 |
+ // -----------
+
+ // zIndex = 3: -----------
+ // | 22 | 23 |
+ // -----------
+ // | 20 | 21 |
+ // -----------
+ // | 18 | 19 |
+ // -----------
+
+ std::shared_ptr<testing::NiceMock<MockMultipleGridBuilder>> mockGridBuilder =
+ std::make_shared<testing::NiceMock<MockMultipleGridBuilder>>();
+ std::unique_ptr<MultipleGridBuilderFacadeTest> sut;
+
+ void SetUp() override
+ {
+ createNewSut();
+ }
+
+ void createNewSut()
+ {
+ sut = std::make_unique<MultipleGridBuilderFacadeTest>(mockGridBuilder, std::make_unique<GridDimensions>(0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.1), 0.1);
+ sut->addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::x);
+ sut->addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::y);
+ sut->addDomainSplit(2.0, MultipleGridBuilderFacade::CoordDirection::y);
+ sut->addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::z);
+ sut->addDomainSplit(2.0, MultipleGridBuilderFacade::CoordDirection::z);
+ sut->addDomainSplit(3.0, MultipleGridBuilderFacade::CoordDirection::z);
+ }
+};
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, createGridsMultiGpu)
+{
+ // addCoarseGrid works with overlaps
+ EXPECT_CALL(*mockGridBuilder, addCoarseGrid(0.0, 0.0, 0.0, 1.1, 1.1, 1.1, 0.1));
+ EXPECT_CALL(*mockGridBuilder, addCoarseGrid(0.9, 0.9, 0.9, 2.0, 2.1, 2.1, 0.1));
+ EXPECT_CALL(*mockGridBuilder, addCoarseGrid(0.9, 1.9, 0.9, 2.0, 3.0, 2.1, 0.1));
+ EXPECT_CALL(*mockGridBuilder, addCoarseGrid(0.0, 0.0, 1.9, 1.1, 1.1, 3.1, 0.1));
+ EXPECT_CALL(*mockGridBuilder, addCoarseGrid(0.9, 1.9, 2.9, 2.0, 3.0, 4.0, 0.1));
+
+ // setSubDomainBox has to be called once per subdomain
+ EXPECT_CALL(*mockGridBuilder, setSubDomainBox(testing::_)).Times(5);
+
+ sut->createGrids(0);
+ this->createNewSut();
+ sut->createGrids(9);
+ this->createNewSut();
+ sut->createGrids(11);
+ this->createNewSut();
+ sut->createGrids(12);
+ this->createNewSut();
+ sut->createGrids(23);
+}
+
+TEST(MultipleGridBuilderFacadeTest, xSplitToLarge)
+{
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.1, 0.1);
+ sut.addDomainSplit(10.0, MultipleGridBuilderFacade::CoordDirection::x); // xSplit > maxX
+
+ EXPECT_THROW(sut.createGrids(0), std::runtime_error);
+ EXPECT_THROW(sut.createGrids(1), std::runtime_error);
+}
+
+TEST(MultipleGridBuilderFacadeTest, xSplitToSmall)
+{
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.1, 0.1);
+ sut.addDomainSplit(-1.0, MultipleGridBuilderFacade::CoordDirection::x); // xSplit < minX
+
+ EXPECT_THROW(sut.createGrids(0), std::runtime_error);
+ EXPECT_THROW(sut.createGrids(1), std::runtime_error);
+}
+
+TEST(MultipleGridBuilderFacadeTest, ySplitToLarge)
+{
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.1, 0.1);
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::y); // valid ySplit
+ sut.addDomainSplit(10.0, MultipleGridBuilderFacade::CoordDirection::y); // ySplit > maxY
+
+ EXPECT_THROW(sut.createGrids(0), std::runtime_error);
+ EXPECT_THROW(sut.createGrids(1), std::runtime_error);
+}
+
+TEST(MultipleGridBuilderFacadeTest, ySplitToSmall)
+{
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.1, 0.1);
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::y);
+ sut.addDomainSplit(-1.0, MultipleGridBuilderFacade::CoordDirection::y); // ySplit < minY
+
+ EXPECT_THROW(sut.createGrids(0), std::runtime_error);
+ EXPECT_THROW(sut.createGrids(1), std::runtime_error);
+}
+
+TEST(MultipleGridBuilderFacadeTest, zSplitToLarge)
+{
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.1, 0.1);
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::z);
+ sut.addDomainSplit(10.0, MultipleGridBuilderFacade::CoordDirection::z); // zSplit > maxZ
+ sut.addDomainSplit(2.0, MultipleGridBuilderFacade::CoordDirection::z);
+
+ EXPECT_THROW(sut.createGrids(0), std::runtime_error);
+ EXPECT_THROW(sut.createGrids(1), std::runtime_error);
+}
+
+TEST(MultipleGridBuilderFacadeTest, zSplitToSmall)
+{
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.1, 0.1);
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::z);
+ sut.addDomainSplit(-1.0, MultipleGridBuilderFacade::CoordDirection::z); // zSplit < minZ
+ sut.addDomainSplit(2.0, MultipleGridBuilderFacade::CoordDirection::z);
+
+ EXPECT_THROW(sut.createGrids(0), std::runtime_error);
+ EXPECT_THROW(sut.createGrids(1), std::runtime_error);
+}
+
+TEST(MultipleGridBuilderFacadeTest, sameSplitTwiceY)
+{
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.1, 0.1);
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::y);
+ sut.addDomainSplit(2.0, MultipleGridBuilderFacade::CoordDirection::y);
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::y);
+
+ EXPECT_THROW(sut.createGrids(0), std::runtime_error);
+ EXPECT_THROW(sut.createGrids(1), std::runtime_error);
+}
+
+TEST(MultipleGridBuilderFacadeTest, sameSplitTwiceZ)
+{
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.1);
+ sut.addDomainSplit(0.9, MultipleGridBuilderFacade::CoordDirection::z);
+ sut.addDomainSplit(0.9, MultipleGridBuilderFacade::CoordDirection::z);
+
+ EXPECT_THROW(sut.createGrids(0), std::runtime_error);
+ EXPECT_THROW(sut.createGrids(1), std::runtime_error);
+}
+
+TEST(MultipleGridBuilderFacadeTest, sameSplitTwiceX)
+{
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.1, 0.1);
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::x);
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::x);
+
+ EXPECT_THROW(sut.createGrids(0), std::runtime_error);
+ EXPECT_THROW(sut.createGrids(1), std::runtime_error);
+}
+
+TEST(MultipleGridBuilderFacadeTest, setUpCommunicationNeighbors1Gpu)
+{
+ // use nice mock to suppress uninteresting call warning in createGrids()
+ auto niceMockGridBuilder = std::make_shared<testing::NiceMock<MockMultipleGridBuilder>>();
+ auto sut = MultipleGridBuilderFacadeTest(niceMockGridBuilder, -1.0, 1.0, -2.0, 2.0, -3.0, 3.0, 0.1);
+
+ EXPECT_CALL(*niceMockGridBuilder, findCommunicationIndices).Times(0);
+ EXPECT_CALL(*niceMockGridBuilder, setCommunicationProcess).Times(0);
+
+ sut.createGrids(0);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, setUpCommunicationNeighborsMultiGpu)
+{
+ // process index 0
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(1, false));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(3, false));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(5, false));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(1, 1));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(3, 2));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(5, 6));
+ sut->createGrids(0);
+
+ // process index 9
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(0, false));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(2, false));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(3, false));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(4, false));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(5, false));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(0, 8));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(2, 7));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(3, 11));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(4, 3));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(5, 15));
+ sut->createGrids(9);
+
+ // process index 23
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(0, false));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(2, false));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(4, false));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(0, 22));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(2, 21));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(4, 17));
+ sut->createGrids(23);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, noSlipPX)
+{
+ // process index 0
+ EXPECT_CALL(*mockGridBuilder, setNoSlipBoundaryCondition).Times(0);
+ sut->createGrids(0);
+ sut->setNoSlipBoundaryCondition(SideType::PX);
+
+ // process index 9
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setNoSlipBoundaryCondition(SideType::PX));
+ sut->createGrids(9);
+ sut->setNoSlipBoundaryCondition(SideType::PX);
+
+ // process index 18
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setNoSlipBoundaryCondition).Times(0);
+ sut->createGrids(18);
+ sut->setNoSlipBoundaryCondition(SideType::PX);
+
+ // process index 23
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setNoSlipBoundaryCondition(SideType::PX));
+ sut->createGrids(23);
+ sut->setNoSlipBoundaryCondition(SideType::PX);
+
+ EXPECT_CALL(*mockGridBuilder, setNoSlipBoundaryCondition(SideType::PX)).Times(12);
+ for (int i = 0; i < 24; i++) {
+ this->createNewSut();
+ sut->createGrids(i);
+ sut->setNoSlipBoundaryCondition(SideType::PX);
+ }
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, stressMX)
+{
+ SideType sideType = SideType::MX;
+ real normalX = 0.1;
+ real normalY = 0.2;
+ real normalZ = 0.3;
+ uint samplingOffset = 1;
+ real z0 = 0.5;
+ real dx = 0.7;
+
+ // process index
+ EXPECT_CALL(*mockGridBuilder,
+ setStressBoundaryCondition(sideType, normalX, normalY, normalZ, samplingOffset, z0, dx));
+ sut->createGrids(0);
+ sut->setStressBoundaryCondition(sideType, normalX, normalY, normalZ, samplingOffset, z0, dx);
+
+ // process index 9
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setStressBoundaryCondition).Times(0);
+ sut->createGrids(9);
+ sut->setStressBoundaryCondition(sideType, normalX, normalY, normalZ, samplingOffset, z0, dx);
+
+ // process index 18
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder,
+ setStressBoundaryCondition(sideType, normalX, normalY, normalZ, samplingOffset, z0, dx));
+ sut->createGrids(18);
+ sut->setStressBoundaryCondition(sideType, normalX, normalY, normalZ, samplingOffset, z0, dx);
+
+ // process index 23
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setStressBoundaryCondition).Times(0);
+ sut->createGrids(23);
+ sut->setStressBoundaryCondition(sideType, normalX, normalY, normalZ, samplingOffset, z0, dx);
+
+ EXPECT_CALL(*mockGridBuilder,
+ setStressBoundaryCondition(sideType, normalX, normalY, normalZ, samplingOffset, z0, dx))
+ .Times(12);
+ for (int i = 0; i < 24; i++) {
+ this->createNewSut();
+ sut->createGrids(i);
+ sut->setStressBoundaryCondition(sideType, normalX, normalY, normalZ, samplingOffset, z0, dx);
+ }
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, velocityPY)
+{
+ SideType sideType = SideType::PY;
+ real vx = 0.1;
+ real vy = 0.2;
+ real vz = 0.3;
+
+ // process index 0
+ EXPECT_CALL(*mockGridBuilder, setVelocityBoundaryCondition).Times(0);
+ sut->createGrids(0);
+ sut->setVelocityBoundaryCondition(sideType, vx, vy, vz);
+
+ // process index 9
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setVelocityBoundaryCondition).Times(0);
+ sut->createGrids(9);
+ sut->setVelocityBoundaryCondition(sideType, vx, vy, vz);
+
+ // process index 16
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setVelocityBoundaryCondition(sideType, vx, vy, vz));
+ sut->createGrids(16);
+ sut->setVelocityBoundaryCondition(sideType, vx, vy, vz);
+
+ // process index 23
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setVelocityBoundaryCondition(sideType, vx, vy, vz));
+ sut->createGrids(23);
+ sut->setVelocityBoundaryCondition(sideType, vx, vy, vz);
+
+ EXPECT_CALL(*mockGridBuilder, setVelocityBoundaryCondition(sideType, vx, vy, vz)).Times(8);
+ for (int i = 0; i < 24; i++) {
+ this->createNewSut();
+ sut->createGrids(i);
+ sut->setVelocityBoundaryCondition(sideType, vx, vy, vz);
+ }
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, pressureMY)
+{
+ SideType sideType = SideType::MY;
+ real rho = 0.1;
+
+ // process index 0
+ EXPECT_CALL(*mockGridBuilder, setPressureBoundaryCondition(sideType, rho));
+ sut->createGrids(0);
+ sut->setPressureBoundaryCondition(sideType, rho);
+
+ // process index 9
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setPressureBoundaryCondition).Times(0);
+ sut->createGrids(9);
+ sut->setPressureBoundaryCondition(sideType, rho);
+
+ // process index 16
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setPressureBoundaryCondition).Times(0);
+ sut->createGrids(16);
+ sut->setPressureBoundaryCondition(sideType, rho);
+
+ // process index 23
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setPressureBoundaryCondition).Times(0);
+ sut->createGrids(23);
+ sut->setPressureBoundaryCondition(sideType, rho);
+
+ EXPECT_CALL(*mockGridBuilder, setPressureBoundaryCondition).Times(8);
+ for (int i = 0; i < 24; i++) {
+ this->createNewSut();
+ sut->createGrids(i);
+ sut->setPressureBoundaryCondition(sideType, rho);
+ }
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, slipPZ)
+{
+ SideType sideType = SideType::PZ;
+ real normalX = 0.1;
+ real normalY = 0.2;
+ real normalZ = 0.3;
+
+ // process index 0
+ EXPECT_CALL(*mockGridBuilder, setSlipBoundaryCondition).Times(0);
+ this->createNewSut();
+ sut->createGrids(0);
+ sut->setSlipBoundaryCondition(sideType, normalX, normalY, normalZ);
+
+ // process index 17
+ EXPECT_CALL(*mockGridBuilder, setSlipBoundaryCondition).Times(0);
+ this->createNewSut();
+ sut->createGrids(17);
+ sut->setSlipBoundaryCondition(sideType, normalX, normalY, normalZ);
+
+ // process index 18
+ EXPECT_CALL(*mockGridBuilder, setSlipBoundaryCondition(sideType, normalX, normalY, normalZ));
+ this->createNewSut();
+ sut->createGrids(18);
+ sut->setSlipBoundaryCondition(sideType, normalX, normalY, normalZ);
+
+ // process index 23
+ EXPECT_CALL(*mockGridBuilder, setSlipBoundaryCondition(sideType, normalX, normalY, normalZ));
+ this->createNewSut();
+ sut->createGrids(23);
+ sut->setSlipBoundaryCondition(sideType, normalX, normalY, normalZ);
+
+ EXPECT_CALL(*mockGridBuilder, setSlipBoundaryCondition).Times(6);
+ for (int i = 0; i < 24; i++) {
+ this->createNewSut();
+ sut->createGrids(i);
+ sut->setSlipBoundaryCondition(sideType, normalX, normalY, normalZ);
+ }
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, precursorMZ)
+{
+ SideType sideType = SideType::MZ;
+ SPtr<FileCollection> fileCollection = nullptr;
+ int timeStepsBetweenReads = 10;
+ real velocityX = c1o2;
+ real velocityY = c1o3;
+ real velocityZ = c1o4;
+ std::vector<uint> fileLevelToGridLevelMap = { 0 };
+
+ EXPECT_CALL(*mockGridBuilder,
+ setPrecursorBoundaryCondition(sideType, fileCollection, timeStepsBetweenReads, velocityX, velocityY,
+ velocityZ, fileLevelToGridLevelMap));
+ sut->createGrids(0);
+ sut->setPrecursorBoundaryCondition(sideType, fileCollection, timeStepsBetweenReads, velocityX, velocityY, velocityZ,
+ fileLevelToGridLevelMap);
+
+ // process index 17
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setPrecursorBoundaryCondition).Times(0);
+ sut->createGrids(17);
+ sut->setPrecursorBoundaryCondition(sideType, fileCollection, timeStepsBetweenReads, velocityX, velocityY, velocityZ,
+ fileLevelToGridLevelMap);
+
+ // process index 18
+ this->createNewSut();
+ EXPECT_CALL(*mockGridBuilder, setPrecursorBoundaryCondition).Times(0);
+ sut->createGrids(18);
+ sut->setPrecursorBoundaryCondition(sideType, fileCollection, timeStepsBetweenReads, velocityX, velocityY, velocityZ,
+ fileLevelToGridLevelMap);
+
+ EXPECT_CALL(*mockGridBuilder, setPrecursorBoundaryCondition).Times(6);
+ for (int i = 0; i < 24; i++) {
+ this->createNewSut();
+ sut->createGrids(i);
+ sut->setPrecursorBoundaryCondition(sideType, fileCollection, timeStepsBetweenReads, velocityX, velocityY,
+ velocityZ, fileLevelToGridLevelMap);
+ }
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, notPeriodic)
+{
+ bool periodic_X = false;
+ bool periodic_Y = false;
+ bool periodic_Z = false;
+
+ EXPECT_CALL(*mockGridBuilder, setPeriodicBoundaryCondition(periodic_X, periodic_Y, periodic_Z)).Times(24);
+ for (int i = 0; i < 24; i++) {
+ this->createNewSut();
+ sut->createGrids(i);
+ sut->setPeriodicBoundaryCondition(periodic_X, periodic_Y, periodic_Z);
+ }
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, periodicAllDirectionsMultiGPU_allProcesses)
+{
+ bool periodic_X = true;
+ bool periodic_Y = true;
+ bool periodic_Z = true;
+
+ EXPECT_CALL(*mockGridBuilder, setPeriodicBoundaryCondition(periodic_X, periodic_Y, periodic_Z)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setPeriodicBoundaryCondition(false, false, false)).Times(24);
+ for (int i = 0; i < 24; i++) {
+ this->createNewSut();
+ sut->createGrids(i);
+ sut->setPeriodicBoundaryCondition(periodic_X, periodic_Y, periodic_Z);
+ }
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, periodicAllDirectionsMultiGPU_process0)
+{
+ sut->createGrids(0);
+
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MX, false));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MY, false));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MZ, false));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MX, 1));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MY, 4));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MZ, 18));
+
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PX, false)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PY, false)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PZ, false)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PX, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PY, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PZ, testing::_)).Times(0);
+
+ sut->setPeriodicBoundaryCondition(true, true, true);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, periodicAllDirectionsMultiGPU_process9)
+{
+ sut->createGrids(9);
+
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PX, false));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PX, 8));
+
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MX, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MY, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MZ, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MX, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MY, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MZ, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PY, false)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PZ, false)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PY, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PZ, testing::_)).Times(0);
+
+ sut->setPeriodicBoundaryCondition(true, true, true);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, periodicAllDirectionsMultiGPU_process17)
+{
+ sut->createGrids(17);
+
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PX, testing::_));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PY, testing::_));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PX, 16));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PY, 13));
+
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MX, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MY, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MZ, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MX, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MY, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MZ, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PZ, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PZ, testing::_)).Times(0);
+
+ sut->setPeriodicBoundaryCondition(true, true, true);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_24subdomains, periodicAllDirectionsMultiGPU_process23)
+{
+ sut->createGrids(23);
+
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PX, testing::_));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PY, testing::_));
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PZ, testing::_));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PX, 22));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PY, 19));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PZ, 5));
+
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MX, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MY, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MZ, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MX, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MY, testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MZ, testing::_)).Times(0);
+
+ sut->setPeriodicBoundaryCondition(true, true, true);
+}
+
+class MultipleGridBuilderFacadeTest_CreateMockAndSut : public testing::Test
+{
+protected:
+ std::shared_ptr<MockMultipleGridBuilder> mockGridBuilder =
+ std::make_shared<testing::NiceMock<MockMultipleGridBuilder>>();
+ MultipleGridBuilderFacade sut =
+ MultipleGridBuilderFacade(mockGridBuilder, std::make_unique<GridDimensions>(0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.1));
+};
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, periodicAllDirectionsSingleGPU)
+{
+ sut.setOverlapOfSubdomains(0.1);
+ sut.createGrids(0);
+
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess).Times(0);
+ EXPECT_CALL(*mockGridBuilder, setPeriodicBoundaryCondition(true, true, true));
+
+ sut.setPeriodicBoundaryCondition(true, true, true);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, periodicXY2GPUs)
+{
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::x);
+ sut.setOverlapOfSubdomains(0.1);
+
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PX, testing::_));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PX, 1));
+ sut.createGrids(0);
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::MX, testing::_));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::MX, 1));
+ EXPECT_CALL(*mockGridBuilder, setPeriodicBoundaryCondition(false, true, false));
+ sut.setPeriodicBoundaryCondition(true, true, false);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, periodicYZ2GPUs)
+{
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::x);
+ sut.setOverlapOfSubdomains(0.1);
+
+ EXPECT_CALL(*mockGridBuilder, findCommunicationIndices(CommunicationDirections::PX, testing::_));
+ EXPECT_CALL(*mockGridBuilder, setCommunicationProcess(CommunicationDirections::PX, 1));
+ sut.createGrids(0);
+ EXPECT_CALL(*mockGridBuilder, setPeriodicBoundaryCondition(false, true, true));
+ sut.setPeriodicBoundaryCondition(false, true, true);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, setNumberOfLayersForRefinement_callsSetNumberOfLayersInGridBuilder)
+{
+ EXPECT_CALL(*mockGridBuilder, setNumberOfLayers(10, 8));
+ sut.setNumberOfLayersForRefinement(10, 8);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, addFineGrid_createGrid_callsAddGridAfterAddCoarseGrid)
+{
+ std::shared_ptr<Object> fineGrid = std::make_shared<Cuboid>(-0.25, -0.25, -0.25, 0.25, 0.25, 0.25);
+ sut.addFineGrid(fineGrid, 1);
+
+ testing::Expectation addCoarseGrid = EXPECT_CALL(*mockGridBuilder, addCoarseGrid);
+ EXPECT_CALL(*mockGridBuilder, addGrid(fineGrid, 1)).After(addCoarseGrid);
+
+ sut.createGrids(0);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, noFineGrid_createGrid_addGridNotCalled)
+{
+ EXPECT_CALL(*mockGridBuilder, addCoarseGrid);
+ EXPECT_CALL(*mockGridBuilder, addGrid(testing::_)).Times(0);
+ EXPECT_CALL(*mockGridBuilder, addGrid(testing::_, testing::_)).Times(0);
+
+ sut.createGrids(0);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, addFineGrid_createGridCallsMultipleFineGridsInOriginalOrder)
+{
+ std::shared_ptr<Object> fineGrid = nullptr;
+ sut.addFineGrid(fineGrid, 2);
+ sut.addFineGrid(fineGrid, 1);
+
+ testing::Expectation addCoarseGrid = EXPECT_CALL(*mockGridBuilder, addCoarseGrid);
+ testing::Expectation addFine2 = EXPECT_CALL(*mockGridBuilder, addGrid(fineGrid, 2)).After(addCoarseGrid);
+ EXPECT_CALL(*mockGridBuilder, addGrid(fineGrid, 1)).After(addFine2);
+
+ sut.createGrids(0);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, addFineGrid_createGridCallsFineGridsInProcess0)
+{
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::x);
+ sut.setOverlapOfSubdomains(0.1);
+ std::shared_ptr<Object> fineGrid = std::make_shared<Sphere>(0.0, 0.0, 0.0, 10.0);
+ sut.addFineGrid(fineGrid, 1);
+
+ testing::Expectation addCoarseGrid = EXPECT_CALL(*mockGridBuilder, addCoarseGrid);
+ EXPECT_CALL(*mockGridBuilder, addGrid(fineGrid, 1)).After(addCoarseGrid);
+ sut.createGrids(0);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, addFineGrid_createGridCallsFineGridsInProcess1)
+{
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::x);
+ sut.setOverlapOfSubdomains(0.1);
+ std::shared_ptr<Object> fineGrid = std::make_shared<Sphere>(0.0, 0.0, 0.0, 10.0);
+ sut.addFineGrid(fineGrid, 1);
+
+ testing::Expectation addCoarseGrid = EXPECT_CALL(*mockGridBuilder, addCoarseGrid);
+ EXPECT_CALL(*mockGridBuilder, addGrid(fineGrid, 1)).After(addCoarseGrid);
+ sut.createGrids(1);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, addGeometry_createGrid_callsAddGeometryFunctionOfGridBuilder)
+{
+ std::shared_ptr<Object> geometry = std::make_shared<Cuboid>(-0.25, -0.25, -0.25, 0.25, 0.25, 0.25);
+ sut.addGeometry(geometry);
+
+ EXPECT_CALL(*mockGridBuilder, addGeometry);
+
+ sut.createGrids(0);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, noFineGrid_createGrid_doesNotCallAddGeometryFunctionOfGridBuilder)
+{
+ EXPECT_CALL(*mockGridBuilder, addGeometry).Times(0);
+ sut.createGrids(0);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, addGeometry_createGridCallsAddGeometryFunctionOfGridBuilderProcess0)
+{
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::x);
+ sut.setOverlapOfSubdomains(0.1);
+ std::shared_ptr<Object> geometry = std::make_shared<Sphere>(0.0, 0.0, 0.0, 10.0);
+ sut.addGeometry(geometry);
+
+ EXPECT_CALL(*mockGridBuilder, addGeometry).Times(1);
+ sut.createGrids(0);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, addGeometry_createGridCallsAddGeometryFunctionOfGridBuilderProcess1)
+{
+ sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::x);
+ sut.setOverlapOfSubdomains(0.1);
+ std::shared_ptr<Object> geometry = std::make_shared<Sphere>(0.0, 0.0, 0.0, 10.0);
+ sut.addGeometry(geometry);
+
+ EXPECT_CALL(*mockGridBuilder, addGeometry).Times(1);
+ sut.createGrids(1);
+}
+
+TEST(MultipleGridBuilderFacadeTest, setBoundaryCondition_createGridsNotCalledBeforeBC_throws)
+{
+ auto sut = MultipleGridBuilderFacadeTest(nullptr, -1.0, 1.0, -2.0, 2.0, -3.0, 3.0, 0.1);
+ EXPECT_THROW(sut.setNoSlipBoundaryCondition(SideType::PX), std::runtime_error);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, addFineGrid_calledAfterCreateGrids_throws)
+{
+ sut.createGrids(0);
+ std::shared_ptr<Object> fineGrid = std::make_shared<Cuboid>(-0.25, -0.25, -0.25, 0.25, 0.25, 0.25);
+ EXPECT_THROW(sut.addFineGrid(fineGrid, 1), std::runtime_error);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, addGeometry_calledAfterCreateGrids_throws)
+{
+ sut.createGrids(0);
+ std::shared_ptr<Object> geometry = std::make_shared<Cuboid>(-0.25, -0.25, -0.25, 0.25, 0.25, 0.25);
+ EXPECT_THROW(sut.addGeometry(geometry), std::runtime_error);
+}
+
+TEST_F(MultipleGridBuilderFacadeTest_CreateMockAndSut, addSplit_calledAfterCreateGrids_throws)
+{
+ sut.createGrids(0);
+ std::shared_ptr<Object> fineGrid = std::make_shared<Cuboid>(-0.25, -0.25, -0.25, 0.25, 0.25, 0.25);
+ EXPECT_THROW(sut.addDomainSplit(1.0, MultipleGridBuilderFacade::CoordDirection::x), std::runtime_error);
+}
+
+TEST(MultipleGridBuilderFacadeTest, createGrids_createGridsMoreThanOnceForSamePart_throws)
+{
+ auto niceMockGridBuilder = std::make_shared<testing::NiceMock<MockMultipleGridBuilder>>();
+ auto sut = MultipleGridBuilderFacadeTest(niceMockGridBuilder, -1.0, 1.0, -2.0, 2.0, -3.0, 3.0, 0.1);
+ sut.createGrids(0);
+ EXPECT_THROW(sut.createGrids(0), std::runtime_error);
+}
\ No newline at end of file
diff --git a/src/gpu/GridGenerator/utilities/communication.h b/src/gpu/GridGenerator/utilities/communication.h
index 11a1085f6a21db1dfb26025514d8b3a9501fba5e..f8c89f09dc3d80791cfeee0420964bfb1a463a0d 100644
--- a/src/gpu/GridGenerator/utilities/communication.h
+++ b/src/gpu/GridGenerator/utilities/communication.h
@@ -33,14 +33,17 @@
#ifndef Communication_H
#define Communication_H
+#include "grid/BoundaryConditions/Side.h"
+
+// has to have the same order as SideType in Side.h
namespace CommunicationDirections {
- enum {
- MX = 0,
- PX = 1,
- MY = 2,
- PY = 3,
- MZ = 4,
- PZ = 5
+ enum CommunicationDirection{
+ MX = static_cast<int>(SideType::MX),
+ PX = static_cast<int>(SideType::PX),
+ MY = static_cast<int>(SideType::MY),
+ PY = static_cast<int>(SideType::PY),
+ MZ = static_cast<int>(SideType::MZ),
+ PZ = static_cast<int>(SideType::PZ)
};
}
diff --git a/src/gpu/core/BoundaryConditions/BoundaryConditionFactory.cpp b/src/gpu/core/BoundaryConditions/BoundaryConditionFactory.cpp
index e325650aeb8033cb481d5ffeaece88b7c29f9d72..968b8070cdd34f871fe7f61a7ae060ec0f81db29 100644
--- a/src/gpu/core/BoundaryConditions/BoundaryConditionFactory.cpp
+++ b/src/gpu/core/BoundaryConditions/BoundaryConditionFactory.cpp
@@ -1,3 +1,33 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr
+//=======================================================================================
#include "BoundaryConditionFactory.h"
#include "Parameter/Parameter.h"
#include "grid/BoundaryConditions/BoundaryCondition.h"
@@ -5,6 +35,8 @@
#include "BoundaryConditions/Outflow/Outflow.h"
#include "BoundaryConditions/Pressure/Pressure.h"
+#include "BoundaryConditions/NoSlip/NoSlip.h"
+#include "BoundaryConditions/Velocity/Velocity.h"
#include "GPU/GPU_Interface.h"
@@ -51,17 +83,17 @@ boundaryCondition BoundaryConditionFactory::getVelocityBoundaryConditionPost(boo
// for descriptions of the boundary conditions refer to the header
switch (boundaryCondition) {
- case VelocityBC::VelocitySimpleBounceBackCompressible:
- return QVelDevicePlainBB27;
+ case VelocityBC::VelocityBounceBack:
+ return VelocityBounceBack;
break;
- case VelocityBC::VelocityIncompressible:
- return QVelDev27;
+ case VelocityBC::VelocityInterpolatedIncompressible:
+ return VelocityInterpolatedIncompressible;
break;
- case VelocityBC::VelocityCompressible:
- return QVelDevComp27;
+ case VelocityBC::VelocityInterpolatedCompressible:
+ return VelocityInterpolatedCompressible;
break;
- case VelocityBC::VelocityAndPressureCompressible:
- return QVelDevCompZeroPress27;
+ case VelocityBC::VelocityWithPressureInterpolatedCompressible:
+ return VelocityWithPressureInterpolatedCompressible;
break;
default:
return nullptr;
@@ -75,20 +107,17 @@ boundaryCondition BoundaryConditionFactory::getNoSlipBoundaryConditionPost(bool
// for descriptions of the boundary conditions refer to the header
switch (boundaryCondition) {
- case NoSlipBC::NoSlipImplicitBounceBack:
+ case NoSlipBC::NoSlipDelayBounceBack:
return [](LBMSimulationParameter *, QforBoundaryConditions *) {};
break;
case NoSlipBC::NoSlipBounceBack:
- return BBDev27;
+ return NoSlipBounceBack;
break;
- case NoSlipBC::NoSlipIncompressible:
- return QDev27;
+ case NoSlipBC::NoSlipInterpolatedIncompressible:
+ return NoSlipInterpolatedIncompressible;
break;
- case NoSlipBC::NoSlipCompressible:
- return QDevComp27;
- break;
- case NoSlipBC::NoSlip3rdMomentsCompressible:
- return QDev3rdMomentsComp27;
+ case NoSlipBC::NoSlipInterpolatedCompressible:
+ return NoSlipInterpolatedCompressible;
break;
default:
return nullptr;
@@ -126,12 +155,6 @@ boundaryCondition BoundaryConditionFactory::getPressureBoundaryConditionPre() co
{
// for descriptions of the boundary conditions refer to the header
switch (this->pressureBoundaryCondition) {
- case PressureBC::PressureEquilibrium:
- return QPressDev27;
- break;
- case PressureBC::PressureEquilibrium2:
- return QPressDevEQZ27;
- break;
case PressureBC::PressureNonEquilibriumIncompressible:
return PressureNonEquilibriumIncompressible;
break;
diff --git a/src/gpu/core/BoundaryConditions/BoundaryConditionFactory.h b/src/gpu/core/BoundaryConditions/BoundaryConditionFactory.h
index 09f1a44166829f73c79cd839a7ecf75deae0e67e..9a7e23b2c63c9810f3bef2fcae360ec8331fd903 100644
--- a/src/gpu/core/BoundaryConditions/BoundaryConditionFactory.h
+++ b/src/gpu/core/BoundaryConditions/BoundaryConditionFactory.h
@@ -56,31 +56,28 @@ public:
//! \brief An enumeration for selecting a velocity boundary condition
enum class VelocityBC {
//! - VelocitySimpleBounceBackCompressible = plain bounce back velocity boundary condition
- VelocitySimpleBounceBackCompressible,
+ VelocityBounceBack,
//! - VelocityIncompressible = interpolated velocity boundary condition, based on subgrid distances
- VelocityIncompressible,
+ VelocityInterpolatedIncompressible,
//! - VelocityCompressible = interpolated velocity boundary condition, based on subgrid distances
- VelocityCompressible,
+ VelocityInterpolatedCompressible,
//! - VelocityAndPressureCompressible = interpolated velocity boundary condition, based on subgrid distances.
//! Also sets the pressure to the bulk pressure. Can be combined with OutflowNonReflective
- VelocityAndPressureCompressible,
+ VelocityWithPressureInterpolatedCompressible,
//! - NotSpecified = the user did not set a boundary condition
NotSpecified
};
//! \brief An enumeration for selecting a no-slip boundary condition
enum class NoSlipBC {
- //! - NoSlipImplicitBounceBack = implicit bounce back by Esoteric Twist
- NoSlipImplicitBounceBack,
- //! - NoSlipBounceBack = bounce back no-slip boundary condition
+ //! - NoSlipDelayBounceBack = implicit bounce back by Esoteric Twist
+ NoSlipDelayBounceBack,
+ //! - NoSlipBounceBack = explicit bounce back
NoSlipBounceBack,
- //! - NoSlipIncompressible = interpolated no-slip boundary condition, based on subgrid distances
- NoSlipIncompressible,
- //! - NoSlipCompressible = interpolated no-slip boundary condition, based on subgrid distances
- NoSlipCompressible,
- //! - NoSlipCompressible = interpolated no-slip boundary condition, based on subgrid distances
- //! Also uses the third order moments.
- NoSlip3rdMomentsCompressible
+ //! - NoSlipInterpolatedIncompressible = interpolated no-slip boundary condition, based on subgrid distances
+ NoSlipInterpolatedIncompressible,
+ //! - NoSlipInterpolatedCompressible = interpolated no-slip boundary condition, based on subgrid distances
+ NoSlipInterpolatedCompressible,
};
//! \brief An enumeration for selecting a slip boundary condition
@@ -101,10 +98,6 @@ public:
//! \brief An enumeration for selecting a pressure boundary condition
enum class PressureBC {
- //! - PressureEquilibrium = pressure boundary condition based on equilibrium
- PressureEquilibrium, // incorrect pressure :(
- //! - PressureEquilibrium2 = pressure boundary condition based on equilibrium (potentially better?! than PressureEquilibrium)
- PressureEquilibrium2, // is broken --> nan :(
//! - PressureNonEquilibriumIncompressible = pressure boundary condition based on non-equilibrium
PressureNonEquilibriumIncompressible,
//! - PressureNonEquilibriumCompressible = pressure boundary condition based on non-equilibrium
@@ -172,10 +165,10 @@ public:
private:
VelocityBC velocityBoundaryCondition = VelocityBC::NotSpecified;
- NoSlipBC noSlipBoundaryCondition = NoSlipBC::NoSlipImplicitBounceBack;
+ NoSlipBC noSlipBoundaryCondition = NoSlipBC::NoSlipDelayBounceBack;
SlipBC slipBoundaryCondition = SlipBC::NotSpecified;
PressureBC pressureBoundaryCondition = PressureBC::NotSpecified;
- std::variant<VelocityBC, NoSlipBC, SlipBC> geometryBoundaryCondition = NoSlipBC::NoSlipImplicitBounceBack;
+ std::variant<VelocityBC, NoSlipBC, SlipBC> geometryBoundaryCondition = NoSlipBC::NoSlipDelayBounceBack;
StressBC stressBoundaryCondition = StressBC::NotSpecified;
PrecursorBC precursorBoundaryCondition = PrecursorBC::NotSpecified;
diff --git a/src/gpu/core/BoundaryConditions/BoundaryConditionFactoryTest.cpp b/src/gpu/core/BoundaryConditions/BoundaryConditionFactoryTest.cpp
index ac1dac7e7cb8eede171e17c270de8dd23549d844..aaaae38e554f1f1011752c296b0706da602047c1 100644
--- a/src/gpu/core/BoundaryConditions/BoundaryConditionFactoryTest.cpp
+++ b/src/gpu/core/BoundaryConditions/BoundaryConditionFactoryTest.cpp
@@ -6,6 +6,8 @@
#include "BoundaryConditions/Outflow/Outflow.h"
#include "BoundaryConditions/Pressure/Pressure.h"
+#include "BoundaryConditions/NoSlip/NoSlip.h"
+#include "BoundaryConditions/Velocity/Velocity.h"
#include "GPU/GPU_Interface.h"
using bcFunction = void (*)(LBMSimulationParameter *, QforBoundaryConditions *);
@@ -72,21 +74,21 @@ TEST(BoundaryConditionFactoryTest, velocityBC)
{
auto bcFactory = BoundaryConditionFactory();
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocitySimpleBounceBackCompressible);
- EXPECT_TRUE(*(getVelocityBcTarget(bcFactory)) == QVelDevicePlainBB27)
- << "The returned boundary condition is not the expected function QVelDevicePlainBB27.";
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityBounceBack);
+ EXPECT_TRUE(*(getVelocityBcTarget(bcFactory)) == VelocityBounceBack)
+ << "The returned boundary condition is not the expected function VelocityBounceBack.";
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityIncompressible);
- EXPECT_TRUE(*(getVelocityBcTarget(bcFactory)) == QVelDev27)
- << "The returned boundary condition is not the expected function QVelDev27.";
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedIncompressible);
+ EXPECT_TRUE(*(getVelocityBcTarget(bcFactory)) == VelocityInterpolatedIncompressible)
+ << "The returned boundary condition is not the expected function VelocityInterpolatedIncompressible.";
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
- EXPECT_TRUE(*(getVelocityBcTarget(bcFactory)) == QVelDevComp27)
- << "The returned boundary condition is not the expected function QVelDevComp27.";
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
+ EXPECT_TRUE(*(getVelocityBcTarget(bcFactory)) == VelocityInterpolatedCompressible)
+ << "The returned boundary condition is not the expected function VelocityInterpolatedCompressible.";
- bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityAndPressureCompressible);
- EXPECT_TRUE(*(getVelocityBcTarget(bcFactory)) == QVelDevCompZeroPress27)
- << "The returned boundary condition is not the expected function QVelDevCompZeroPress27.";
+ bcFactory.setVelocityBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityWithPressureInterpolatedCompressible);
+ EXPECT_TRUE(*(getVelocityBcTarget(bcFactory)) == VelocityWithPressureInterpolatedCompressible)
+ << "The returned boundary condition is not the expected function VelocityWithPressureInterpolatedCompressible.";
}
bcFunction getNoSlipBcTarget(BoundaryConditionFactory &bcFactory)
@@ -101,25 +103,21 @@ TEST(BoundaryConditionFactoryTest, noSlipBC)
{
auto bcFactory = BoundaryConditionFactory();
- bcFactory.setNoSlipBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipImplicitBounceBack);
+ bcFactory.setNoSlipBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipDelayBounceBack);
auto bc = bcFactory.getNoSlipBoundaryConditionPost();
EXPECT_NO_THROW(bc(nullptr, nullptr)); // empty lambda function should not throw
bcFactory.setNoSlipBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipBounceBack);
- EXPECT_TRUE( *(getNoSlipBcTarget(bcFactory)) == BBDev27)
- << "The returned boundary condition is not the expected function BBDev27.";
+ EXPECT_TRUE( *(getNoSlipBcTarget(bcFactory)) == NoSlipBounceBack)
+ << "The returned boundary condition is not the expected function NoSlipBounceBack.";
- bcFactory.setNoSlipBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipIncompressible);
- EXPECT_TRUE( *(getNoSlipBcTarget(bcFactory)) == QDev27)
- << "The returned boundary condition is not the expected function QDev27.";
+ bcFactory.setNoSlipBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipInterpolatedIncompressible);
+ EXPECT_TRUE( *(getNoSlipBcTarget(bcFactory)) == NoSlipInterpolatedIncompressible)
+ << "The returned boundary condition is not the expected function NoSlipInterpolatedIncompressible.";
- bcFactory.setNoSlipBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipCompressible);
- EXPECT_TRUE( *(getNoSlipBcTarget(bcFactory)) == QDevComp27)
- << "The returned boundary condition is not the expected function QDevComp27.";
-
- bcFactory.setNoSlipBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlip3rdMomentsCompressible);
- EXPECT_TRUE( *(getNoSlipBcTarget(bcFactory)) == QDev3rdMomentsComp27)
- << "The returned boundary condition is not the expected function BBDev27.";
+ bcFactory.setNoSlipBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipInterpolatedCompressible);
+ EXPECT_TRUE( *(getNoSlipBcTarget(bcFactory)) == NoSlipInterpolatedCompressible)
+ << "The returned boundary condition is not the expected function NoSlipInterpolatedCompressible.";
}
bcFunction getSlipBcTarget(BoundaryConditionFactory &bcFactory)
@@ -159,14 +157,6 @@ TEST(BoundaryConditionFactoryTest, pressureBC)
{
auto bcFactory = BoundaryConditionFactory();
- bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::PressureEquilibrium);
- EXPECT_TRUE( *(getPressureBcTarget(bcFactory)) == QPressDev27)
- << "The returned boundary condition is not the expected function QPressDev27.";
-
- bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::PressureEquilibrium2);
- EXPECT_TRUE( *(getPressureBcTarget(bcFactory)) == QPressDevEQZ27)
- << "The returned boundary condition is not the expected function QPressDevEQZ27.";
-
bcFactory.setPressureBoundaryCondition(BoundaryConditionFactory::PressureBC::PressureNonEquilibriumIncompressible);
EXPECT_TRUE(*(getPressureBcTarget(bcFactory)) == PressureNonEquilibriumIncompressible)
<< "The returned boundary condition is not the expected function PressureNonEquilibriumIncompressible.";
@@ -193,34 +183,30 @@ TEST(BoundaryConditionFactoryTest, geometryBC)
auto bcFactory = BoundaryConditionFactory();
// velocity
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityIncompressible);
- EXPECT_TRUE( *(getGeometryBcTarget(bcFactory)) == QVelDev27)
- << "The returned boundary condition is not the expected function QVelDev27.";
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedIncompressible);
+ EXPECT_TRUE( *(getGeometryBcTarget(bcFactory)) == VelocityInterpolatedIncompressible)
+ << "The returned boundary condition is not the expected function VelocityInterpolatedIncompressible.";
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityCompressible);
- EXPECT_TRUE( *(getGeometryBcTarget(bcFactory)) == QVelDevComp27)
- << "The returned boundary condition is not the expected function QVelDevComp27.";
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityInterpolatedCompressible);
+ EXPECT_TRUE( *(getGeometryBcTarget(bcFactory)) == VelocityInterpolatedCompressible)
+ << "The returned boundary condition is not the expected function VelocityInterpolatedCompressible.";
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityAndPressureCompressible);
- EXPECT_TRUE( *(getGeometryBcTarget(bcFactory)) == QVelDevCompZeroPress27)
- << "The returned boundary condition is not the expected function QVelDevCompZeroPress27.";
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::VelocityBC::VelocityWithPressureInterpolatedCompressible);
+ EXPECT_TRUE(*(getGeometryBcTarget(bcFactory)) == VelocityWithPressureInterpolatedCompressible)
+ << "The returned boundary condition is not the expected function VelocityWithPressureInterpolatedCompressible.";
// no slip
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipImplicitBounceBack);
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipDelayBounceBack);
auto bc = bcFactory.getGeometryBoundaryConditionPost();
EXPECT_NO_THROW(bc(nullptr, nullptr)); // empty lambda function should not throw
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipIncompressible);
- EXPECT_TRUE( *(getGeometryBcTarget(bcFactory)) == QDev27)
- << "The returned boundary condition is not the expected function QDev27.";
-
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipCompressible);
- EXPECT_TRUE( *(getGeometryBcTarget(bcFactory)) == QDevComp27)
- << "The returned boundary condition is not the expected function QDevComp27.";
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipInterpolatedIncompressible);
+ EXPECT_TRUE( *(getGeometryBcTarget(bcFactory)) == NoSlipInterpolatedIncompressible)
+ << "The returned boundary condition is not the expected function NoSlipInterpolatedIncompressible.";
- bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlip3rdMomentsCompressible);
- EXPECT_TRUE( *(getGeometryBcTarget(bcFactory)) == QDev3rdMomentsComp27)
- << "The returned boundary condition is not the expected function QDev3rdMomentsComp27.";
+ bcFactory.setGeometryBoundaryCondition(BoundaryConditionFactory::NoSlipBC::NoSlipInterpolatedCompressible);
+ EXPECT_TRUE( *(getGeometryBcTarget(bcFactory)) == NoSlipInterpolatedCompressible)
+ << "The returned boundary condition is not the expected function NoSlipInterpolatedCompressible.";
}
TEST(BoundaryConditionFactoryTest, stressBoundaryConditions)
diff --git a/src/gpu/core/BoundaryConditions/BoundaryConditionKernelManager.cpp b/src/gpu/core/BoundaryConditions/BoundaryConditionKernelManager.cpp
index e75c76a2114ca3cac913f67d7b931e22daf435e0..9912965a80f3157ba45e4bdbe130d0729d17950d 100644
--- a/src/gpu/core/BoundaryConditions/BoundaryConditionKernelManager.cpp
+++ b/src/gpu/core/BoundaryConditions/BoundaryConditionKernelManager.cpp
@@ -75,18 +75,6 @@ void BoundaryConditionKernelManager::runVelocityBCKernelPre(const int level) con
{
if (para->getParD(level)->velocityBC.numberOfBCnodes > 0)
{
- // TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
- // if ( myid == 0)
- // {
- // VelSchlaffer27(para->getParD(level)->numberofthreads, t,
- // para->getParD(level)->distributions.f[0], para->getParD(level)->velocityBC.Vz,
- // para->getParD(level)->velocityBC.deltaVz, para->getParD(level)->velocityBC.k,
- // para->getParD(level)->velocityBC.kN, para->getParD(level)->velocityBC.numberOfBCnodes,
- // para->getParD(level)->omega, para->getParD(level)->neighborX,
- // para->getParD(level)->neighborY, para->getParD(level)->neighborZ,
- // para->getParD(level)->numberOfNodes, para->getParD(level)->isEvenTimestep);
- // getLastCudaError("VelSchlaffer27 execution failed");
- // }
////////////////////////////////////////////////////////////////////////////
// high viscosity incompressible
// QVelDevIncompHighNu27(
@@ -321,76 +309,27 @@ void BoundaryConditionKernelManager::runGeoBCKernelPost(const int level) const
void BoundaryConditionKernelManager::runOutflowBCKernelPre(const int level) const{
if (para->getParD(level)->outflowBC.numberOfBCnodes > 0)
- {
OutflowNonReflecting(para->getParD(level).get(), &(para->getParD(level)->outflowBC));
-
- // TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
- // if ( myid == numprocs - 1)
- // PressSchlaffer27(
- // para->getParD(level)->numberofthreads,
- // para->getParD(level)->outflowBC.RhoBC,
- // para->getParD(level)->distributions.f[0],
- // para->getParD(level)->outflowBC.Vx,
- // para->getParD(level)->outflowBC.Vy,
- // para->getParD(level)->outflowBC.Vz,
- // para->getParD(level)->outflowBC.deltaVz,
- // para->getParD(level)->outflowBC.k,
- // para->getParD(level)->outflowBC.kN,
- // para->getParD(level)->outflowBC.numberOfBCnodes,
- // para->getParD(level)->omega,
- // para->getParD(level)->neighborX,
- // para->getParD(level)->neighborY,
- // para->getParD(level)->neighborZ,
- // para->getParD(level)->numberOfNodes,
- // para->getParD(level)->isEvenTimestep);
- }
}
void BoundaryConditionKernelManager::runPressureBCKernelPre(const int level) const{
if (para->getParD(level)->pressureBC.numberOfBCnodes > 0)
- {
this->pressureBoundaryConditionPre(para->getParD(level).get(), &(para->getParD(level)->pressureBC));
- }
-}
-
-void BoundaryConditionKernelManager::runPressureBCKernelPost(const int level) const{
- if (para->getParD(level)->pressureBC.numberOfBCnodes > 0)
- {
- // QPressDev27_IntBB(
- // para->getParD(level)->numberofthreads,
- // para->getParD(level)->pressureBC.RhoBC,
- // para->getParD(level)->distributions.f[0],
- // para->getParD(level)->pressureBC.k,
- // para->getParD(level)->pressureBC.q27[0],
- // para->getParD(level)->pressureBC.numberOfBCnodes,
- // para->getParD(level)->omega,
- // para->getParD(level)->neighborX,
- // para->getParD(level)->neighborY,
- // para->getParD(level)->neighborZ,
- // para->getParD(level)->numberOfNodes,
- // para->getParD(level)->isEvenTimestep);
- }
}
void BoundaryConditionKernelManager::runStressWallModelKernelPost(const int level) const{
if (para->getParD(level)->stressBC.numberOfBCnodes > 0)
- {
stressBoundaryConditionPost(para.get(), &(para->getParD(level)->stressBC), level);
- }
}
void BoundaryConditionKernelManager::runSlipBCKernelPost(const int level) const{
if (para->getParD(level)->slipBC.numberOfBCnodes > 0)
- {
slipBoundaryConditionPost(para->getParD(level).get(), &(para->getParD(level)->slipBC));
- }
}
void BoundaryConditionKernelManager::runNoSlipBCKernelPost(const int level) const{
if (para->getParD(level)->noSlipBC.numberOfBCnodes > 0)
- {
noSlipBoundaryConditionPost(para->getParD(level).get(), &(para->getParD(level)->noSlipBC));
- }
}
void BoundaryConditionKernelManager::runPrecursorBCKernelPost(int level, uint t, CudaMemoryManager* cudaMemoryManager)
diff --git a/src/gpu/core/BoundaryConditions/BoundaryConditionKernelManager.h b/src/gpu/core/BoundaryConditions/BoundaryConditionKernelManager.h
index ece5947b461c2ebfa5c4100c77fa60aedcba5c9f..5fcea5a49a547c44506d18e9913872d33ace27b8 100644
--- a/src/gpu/core/BoundaryConditions/BoundaryConditionKernelManager.h
+++ b/src/gpu/core/BoundaryConditions/BoundaryConditionKernelManager.h
@@ -35,10 +35,9 @@
#include <memory>
#include <string>
-#include "LBM/LB.h"
#include <basics/PointerDefinitions.h>
-
+#include "core/LBM/LB.h"
class CudaMemoryManager;
class BoundaryConditionFactory;
@@ -81,9 +80,6 @@ public:
//! \brief calls the device function of the pressure boundary condition (pre-collision)
void runPressureBCKernelPre(const int level) const;
- //! \brief calls the device function of the pressure boundary condition (post-collision)
- void runPressureBCKernelPost(const int level) const;
-
//! \brief calls the device function of the precursor boundary condition
void runPrecursorBCKernelPost(int level, uint t, CudaMemoryManager* cudaMemoryManager);
diff --git a/src/gpu/core/BoundaryConditions/NoSlip/NoSlip.cu b/src/gpu/core/BoundaryConditions/NoSlip/NoSlip.cu
new file mode 100644
index 0000000000000000000000000000000000000000..bc4666a08003715e3c64e5770033031f7104b010
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/NoSlip/NoSlip.cu
@@ -0,0 +1,96 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr
+//=======================================================================================
+#include <cuda_runtime.h>
+#include <helper_functions.h>
+#include <helper_cuda.h>
+
+#include "LBM/LB.h"
+#include <cuda_helper/CudaGrid.h>
+
+#include "BoundaryConditions/NoSlip/NoSlip_Device.cuh"
+#include "Parameter/Parameter.h"
+
+void NoSlipBounceBack(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+{
+ dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 threads(parameterDevice->numberofthreads, 1, 1 );
+
+ NoSlipBounceBack_Device<<< grid, threads >>> (
+ parameterDevice->distributions.f[0],
+ boundaryCondition->k,
+ boundaryCondition->q27[0],
+ boundaryCondition->numberOfBCnodes,
+ parameterDevice->neighborX,
+ parameterDevice->neighborY,
+ parameterDevice->neighborZ,
+ parameterDevice->numberOfNodes,
+ parameterDevice->isEvenTimestep);
+ getLastCudaError("NoSlipBounceBack_Device execution failed");
+}
+
+void NoSlipInterpolatedIncompressible(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+{
+ dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 threads(parameterDevice->numberofthreads, 1, 1 );
+
+ NoSlipInterpolatedIncompressible_Device<<< grid, threads >>> (
+ parameterDevice->distributions.f[0],
+ boundaryCondition->k,
+ boundaryCondition->q27[0],
+ boundaryCondition->numberOfBCnodes,
+ parameterDevice->omega,
+ parameterDevice->neighborX,
+ parameterDevice->neighborY,
+ parameterDevice->neighborZ,
+ parameterDevice->numberOfNodes,
+ parameterDevice->isEvenTimestep);
+ getLastCudaError("NoSlipInterpolatedIncompressible_Device execution failed");
+}
+
+void NoSlipInterpolatedCompressible(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+{
+ dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 threads(parameterDevice->numberofthreads, 1, 1 );
+
+ NoSlipInterpolatedCompressible_Device<<< grid, threads >>> (
+ parameterDevice->distributions.f[0],
+ boundaryCondition->k,
+ boundaryCondition->q27[0],
+ boundaryCondition->numberOfBCnodes,
+ parameterDevice->omega,
+ parameterDevice->neighborX,
+ parameterDevice->neighborY,
+ parameterDevice->neighborZ,
+ parameterDevice->numberOfNodes,
+ parameterDevice->isEvenTimestep);
+ getLastCudaError("NoSlipInterpolatedCompressible_Device execution failed");
+}
+
diff --git a/src/gpu/core/BoundaryConditions/NoSlip/NoSlip.h b/src/gpu/core/BoundaryConditions/NoSlip/NoSlip.h
new file mode 100644
index 0000000000000000000000000000000000000000..c586f00a22821c4b561c1b1b527a0041c35ce2ed
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/NoSlip/NoSlip.h
@@ -0,0 +1,45 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr
+//=======================================================================================
+#ifndef NoSlip_H
+#define NoSlip_H
+
+#include "LBM/LB.h"
+
+struct LBMSimulationParameter;
+class Parameter;
+
+void NoSlipBounceBack(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
+
+void NoSlipInterpolatedIncompressible(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
+
+void NoSlipInterpolatedCompressible(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
+
+#endif
diff --git a/src/gpu/core/BoundaryConditions/NoSlip/NoSlipBounceBack.cu b/src/gpu/core/BoundaryConditions/NoSlip/NoSlipBounceBack.cu
new file mode 100644
index 0000000000000000000000000000000000000000..3fb4ee8b98feb69dabd00a2706d551f210aeda49
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/NoSlip/NoSlipBounceBack.cu
@@ -0,0 +1,173 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr, Anna Wellmann
+//======================================================================================
+#include "LBM/LB.h"
+#include "lbm/constants/D3Q27.h"
+#include <basics/constants/NumericConstants.h>
+#include "LBM/GPUHelperFunctions/KernelUtilities.h"
+
+using namespace vf::basics::constant;
+using namespace vf::lbm::dir;
+using namespace vf::gpu;
+
+__global__ void NoSlipBounceBack_Device(
+ real* distributions,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ unsigned int numberOfBCnodes,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep)
+{
+ //////////////////////////////////////////////////////////////////////////
+ //! The no-slip boundary condition is executed in the following steps
+ //!
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
+ //!
+ const unsigned nodeIndex = getNodeIndex();
+
+ //////////////////////////////////////////////////////////////////////////
+ // run for all indices in size of boundary condition (numberOfBCnodes)
+ if(nodeIndex < numberOfBCnodes)
+ {
+ //////////////////////////////////////////////////////////////////////////
+ //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
+ //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
+ //!
+ Distributions27 dist;
+ getPointersToDistributions(dist, distributions, numberOfLBnodes, isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local subgrid distances (q's)
+ //!
+ SubgridDistances27 subgridD;
+ getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set neighbor indices (necessary for indirect addressing)
+ //!
+ unsigned int indexOfBCnode = subgridDistanceIndices[nodeIndex];
+ unsigned int ke = indexOfBCnode;
+ unsigned int kw = neighborX[indexOfBCnode];
+ unsigned int kn = indexOfBCnode;
+ unsigned int ks = neighborY[indexOfBCnode];
+ unsigned int kt = indexOfBCnode;
+ unsigned int kb = neighborZ[indexOfBCnode];
+ unsigned int ksw = neighborY[kw];
+ unsigned int kne = indexOfBCnode;
+ unsigned int kse = ks;
+ unsigned int knw = kw;
+ unsigned int kbw = neighborZ[kw];
+ unsigned int kte = indexOfBCnode;
+ unsigned int kbe = kb;
+ unsigned int ktw = kw;
+ unsigned int kbs = neighborZ[ks];
+ unsigned int ktn = indexOfBCnode;
+ unsigned int kbn = kb;
+ unsigned int kts = ks;
+ unsigned int ktse = ks;
+ unsigned int kbnw = kbw;
+ unsigned int ktnw = kw;
+ unsigned int kbse = kbs;
+ unsigned int ktsw = ksw;
+ unsigned int kbne = kb;
+ unsigned int ktne = indexOfBCnode;
+ unsigned int kbsw = neighborZ[ksw];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local distributions
+ //!
+ real f_W = (dist.f[dP00])[ke ];
+ real f_E = (dist.f[dM00])[kw ];
+ real f_S = (dist.f[d0P0])[kn ];
+ real f_N = (dist.f[d0M0])[ks ];
+ real f_B = (dist.f[d00P])[kt ];
+ real f_T = (dist.f[d00M])[kb ];
+ real f_SW = (dist.f[dPP0])[kne ];
+ real f_NE = (dist.f[dMM0])[ksw ];
+ real f_NW = (dist.f[dPM0])[kse ];
+ real f_SE = (dist.f[dMP0])[knw ];
+ real f_BW = (dist.f[dP0P])[kte ];
+ real f_TE = (dist.f[dM0M])[kbw ];
+ real f_TW = (dist.f[dP0M])[kbe ];
+ real f_BE = (dist.f[dM0P])[ktw ];
+ real f_BS = (dist.f[d0PP])[ktn ];
+ real f_TN = (dist.f[d0MM])[kbs ];
+ real f_TS = (dist.f[d0PM])[kbn ];
+ real f_BN = (dist.f[d0MP])[kts ];
+ real f_BSW = (dist.f[dPPP])[ktne ];
+ real f_BNE = (dist.f[dMMP])[ktsw ];
+ real f_BNW = (dist.f[dPMP])[ktse ];
+ real f_BSE = (dist.f[dMPP])[ktnw ];
+ real f_TSW = (dist.f[dPPM])[kbne ];
+ real f_TNE = (dist.f[dMMM])[kbsw ];
+ real f_TNW = (dist.f[dPMM])[kbse ];
+ real f_TSE = (dist.f[dMPM])[kbnw ];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - change the pointer to write the results in the correct array
+ //!
+ getPointersToDistributions(dist, distributions, numberOfLBnodes, !isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - rewrite distributions if there is a sub-grid distance (q) in same direction
+ real q;
+ q = (subgridD.q[dP00])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM00])[kw ]=f_E ;
+ q = (subgridD.q[dM00])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP00])[ke ]=f_W ;
+ q = (subgridD.q[d0P0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0M0])[ks ]=f_N ;
+ q = (subgridD.q[d0M0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0P0])[kn ]=f_S ;
+ q = (subgridD.q[d00P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d00M])[kb ]=f_T ;
+ q = (subgridD.q[d00M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d00P])[kt ]=f_B ;
+ q = (subgridD.q[dPP0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMM0])[ksw ]=f_NE ;
+ q = (subgridD.q[dMM0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPP0])[kne ]=f_SW ;
+ q = (subgridD.q[dPM0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMP0])[knw ]=f_SE ;
+ q = (subgridD.q[dMP0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPM0])[kse ]=f_NW ;
+ q = (subgridD.q[dP0P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM0M])[kbw ]=f_TE ;
+ q = (subgridD.q[dM0M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP0P])[kte ]=f_BW ;
+ q = (subgridD.q[dP0M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM0P])[ktw ]=f_BE ;
+ q = (subgridD.q[dM0P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP0M])[kbe ]=f_TW ;
+ q = (subgridD.q[d0PP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0MM])[kbs ]=f_TN ;
+ q = (subgridD.q[d0MM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0PP])[ktn ]=f_BS ;
+ q = (subgridD.q[d0PM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0MP])[kts ]=f_BN ;
+ q = (subgridD.q[d0MP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0PM])[kbn ]=f_TS ;
+ q = (subgridD.q[dPPP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMMM])[kbsw]=f_TNE;
+ q = (subgridD.q[dMMM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPPP])[ktne]=f_BSW;
+ q = (subgridD.q[dPPM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMMP])[ktsw]=f_BNE;
+ q = (subgridD.q[dMMP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPPM])[kbne]=f_TSW;
+ q = (subgridD.q[dPMP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMPM])[kbnw]=f_TSE;
+ q = (subgridD.q[dMPM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPMP])[ktse]=f_BNW;
+ q = (subgridD.q[dPMM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMPP])[ktnw]=f_BSE;
+ q = (subgridD.q[dMPP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPMM])[kbse]=f_TNW;
+ }
+}
+
diff --git a/src/gpu/core/BoundaryConditions/NoSlip/NoSlipInterpolatedCompressible.cu b/src/gpu/core/BoundaryConditions/NoSlip/NoSlipInterpolatedCompressible.cu
new file mode 100644
index 0000000000000000000000000000000000000000..efd0a4979f6ce543f9eb3998895cacc5f6f4611a
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/NoSlip/NoSlipInterpolatedCompressible.cu
@@ -0,0 +1,375 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr, Anna Wellmann
+//======================================================================================
+#include "LBM/LB.h"
+#include "lbm/constants/D3Q27.h"
+#include "basics/constants/NumericConstants.h"
+#include "LBM/GPUHelperFunctions/KernelUtilities.h"
+
+using namespace vf::basics::constant;
+using namespace vf::lbm::dir;
+using namespace vf::gpu;
+
+__global__ void NoSlipInterpolatedCompressible_Device(
+ real* distributions,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ unsigned int numberOfBCnodes,
+ real omega,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep)
+{
+ //////////////////////////////////////////////////////////////////////////
+ //! The no-slip boundary condition is executed in the following steps
+ //!
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
+ //!
+ const unsigned nodeIndex = getNodeIndex();
+
+ if(nodeIndex < numberOfBCnodes)
+ {
+ //////////////////////////////////////////////////////////////////////////
+ //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
+ //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
+ //!
+ Distributions27 dist;
+ getPointersToDistributions(dist, distributions, numberOfLBnodes, isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local subgrid distances (q's)
+ //!
+ SubgridDistances27 subgridD;
+ getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set neighbor indices (necessary for indirect addressing)
+ //!
+ unsigned int indexOfBCnode = subgridDistanceIndices[nodeIndex];
+ unsigned int kzero= indexOfBCnode;
+ unsigned int ke = indexOfBCnode;
+ unsigned int kw = neighborX[indexOfBCnode];
+ unsigned int kn = indexOfBCnode;
+ unsigned int ks = neighborY[indexOfBCnode];
+ unsigned int kt = indexOfBCnode;
+ unsigned int kb = neighborZ[indexOfBCnode];
+ unsigned int ksw = neighborY[kw];
+ unsigned int kne = indexOfBCnode;
+ unsigned int kse = ks;
+ unsigned int knw = kw;
+ unsigned int kbw = neighborZ[kw];
+ unsigned int kte = indexOfBCnode;
+ unsigned int kbe = kb;
+ unsigned int ktw = kw;
+ unsigned int kbs = neighborZ[ks];
+ unsigned int ktn = indexOfBCnode;
+ unsigned int kbn = kb;
+ unsigned int kts = ks;
+ unsigned int ktse = ks;
+ unsigned int kbnw = kbw;
+ unsigned int ktnw = kw;
+ unsigned int kbse = kbs;
+ unsigned int ktsw = ksw;
+ unsigned int kbne = kb;
+ unsigned int ktne = indexOfBCnode;
+ unsigned int kbsw = neighborZ[ksw];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local distributions
+ //!
+ real f_W = (dist.f[dP00])[ke ];
+ real f_E = (dist.f[dM00])[kw ];
+ real f_S = (dist.f[d0P0])[kn ];
+ real f_N = (dist.f[d0M0])[ks ];
+ real f_B = (dist.f[d00P])[kt ];
+ real f_T = (dist.f[d00M])[kb ];
+ real f_SW = (dist.f[dPP0])[kne ];
+ real f_NE = (dist.f[dMM0])[ksw ];
+ real f_NW = (dist.f[dPM0])[kse ];
+ real f_SE = (dist.f[dMP0])[knw ];
+ real f_BW = (dist.f[dP0P])[kte ];
+ real f_TE = (dist.f[dM0M])[kbw ];
+ real f_TW = (dist.f[dP0M])[kbe ];
+ real f_BE = (dist.f[dM0P])[ktw ];
+ real f_BS = (dist.f[d0PP])[ktn ];
+ real f_TN = (dist.f[d0MM])[kbs ];
+ real f_TS = (dist.f[d0PM])[kbn ];
+ real f_BN = (dist.f[d0MP])[kts ];
+ real f_BSW = (dist.f[dPPP])[ktne ];
+ real f_BNE = (dist.f[dMMP])[ktsw ];
+ real f_BNW = (dist.f[dPMP])[ktse ];
+ real f_BSE = (dist.f[dMPP])[ktnw ];
+ real f_TSW = (dist.f[dPPM])[kbne ];
+ real f_TNE = (dist.f[dMMM])[kbsw ];
+ real f_TNW = (dist.f[dPMM])[kbse ];
+ real f_TSE = (dist.f[dMPM])[kbnw ];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Calculate macroscopic quantities
+ //!
+ real drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
+ f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
+ f_T + f_B + f_N + f_S + f_E + f_W + ((dist.f[d000])[kzero]);
+
+ real vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
+ ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
+ (f_E - f_W)) / (c1o1 + drho);
+
+ real vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
+ ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
+ (f_N - f_S)) / (c1o1 + drho);
+
+ real vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
+ (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
+ (f_T - f_B)) / (c1o1 + drho);
+
+ real cu_sq = c3o2 * (vx1 * vx1 + vx2 * vx2 + vx3 * vx3) * (c1o1 + drho);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - change the pointer to write the results in the correct array
+ //!
+ getPointersToDistributions(dist, distributions, numberOfLBnodes, !isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Update distributions with subgrid distance (q) between zero and one
+ real feq, q, velocityLB;
+ q = (subgridD.q[dP00])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1) // only update distribution for q between zero and one
+ {
+ velocityLB = vx1;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[dM00])[kw] = getInterpolatedDistributionForNoSlipBC(q, f_E, f_W, feq, omega);
+ }
+
+ q = (subgridD.q[dM00])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[dP00])[ke] = getInterpolatedDistributionForNoSlipBC(q, f_W, f_E, feq, omega);
+ }
+
+ q = (subgridD.q[d0P0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[d0M0])[ks] = getInterpolatedDistributionForNoSlipBC(q, f_N, f_S, feq, omega);
+ }
+
+ q = (subgridD.q[d0M0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[d0P0])[kn] = getInterpolatedDistributionForNoSlipBC(q, f_S, f_N, feq, omega);
+ }
+
+ q = (subgridD.q[d00P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[d00M])[kb] = getInterpolatedDistributionForNoSlipBC(q, f_T, f_B, feq, omega);
+ }
+
+ q = (subgridD.q[d00M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[d00P])[kt] = getInterpolatedDistributionForNoSlipBC(q, f_B, f_T, feq, omega);
+ }
+
+ q = (subgridD.q[dPP0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dMM0])[ksw] = getInterpolatedDistributionForNoSlipBC(q, f_NE, f_SW, feq, omega);
+ }
+
+ q = (subgridD.q[dMM0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dPP0])[kne] = getInterpolatedDistributionForNoSlipBC(q, f_SW, f_NE, feq, omega);
+ }
+
+ q = (subgridD.q[dPM0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dMP0])[knw] = getInterpolatedDistributionForNoSlipBC(q, f_SE, f_NW, feq, omega);
+ }
+
+ q = (subgridD.q[dMP0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dPM0])[kse] = getInterpolatedDistributionForNoSlipBC(q, f_NW, f_SE, feq, omega);
+ }
+
+ q = (subgridD.q[dP0P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dM0M])[kbw] = getInterpolatedDistributionForNoSlipBC(q, f_TE, f_BW, feq, omega);
+ }
+
+ q = (subgridD.q[dM0M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dP0P])[kte] = getInterpolatedDistributionForNoSlipBC(q, f_BW, f_TE, feq, omega);
+ }
+
+ q = (subgridD.q[dP0M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dM0P])[ktw] = getInterpolatedDistributionForNoSlipBC(q, f_BE, f_TW, feq, omega);
+ }
+
+ q = (subgridD.q[dM0P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dP0M])[kbe] = getInterpolatedDistributionForNoSlipBC(q, f_TW, f_BE, feq, omega);
+ }
+
+ q = (subgridD.q[d0PP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[d0MM])[kbs] = getInterpolatedDistributionForNoSlipBC(q, f_TN, f_BS, feq, omega);
+ }
+
+ q = (subgridD.q[d0MM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[d0PP])[ktn] = getInterpolatedDistributionForNoSlipBC(q, f_BS, f_TN, feq, omega);
+ }
+
+ q = (subgridD.q[d0PM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[d0MP])[kts] = getInterpolatedDistributionForNoSlipBC(q, f_BN, f_TS, feq, omega);
+ }
+
+ q = (subgridD.q[d0MP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[d0PM])[kbn] = getInterpolatedDistributionForNoSlipBC(q, f_TS, f_BN, feq, omega);
+ }
+
+ q = (subgridD.q[dPPP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dMMM])[kbsw] = getInterpolatedDistributionForNoSlipBC(q, f_TNE, f_BSW, feq, omega);
+ }
+
+ q = (subgridD.q[dMMM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dPPP])[ktne] = getInterpolatedDistributionForNoSlipBC(q, f_BSW, f_TNE, feq, omega);
+ }
+
+ q = (subgridD.q[dPPM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dMMP])[ktsw] = getInterpolatedDistributionForNoSlipBC(q, f_BNE, f_TSW, feq, omega);
+ }
+
+ q = (subgridD.q[dMMP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dPPM])[kbne] = getInterpolatedDistributionForNoSlipBC(q, f_TSW, f_BNE, feq, omega);
+ }
+
+ q = (subgridD.q[dPMP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dMPM])[kbnw] = getInterpolatedDistributionForNoSlipBC(q, f_TSE, f_BNW, feq, omega);
+ }
+
+ q = (subgridD.q[dMPM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dPMP])[ktse] = getInterpolatedDistributionForNoSlipBC(q, f_BNW, f_TSE, feq, omega);
+ }
+
+ q = (subgridD.q[dPMM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dMPP])[ktnw] = getInterpolatedDistributionForNoSlipBC(q, f_BSE, f_TNW, feq, omega);
+ }
+
+ q = (subgridD.q[dMPP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dPMM])[kbse] = getInterpolatedDistributionForNoSlipBC(q, f_TNW, f_BSE, feq, omega);
+ }
+ }
+}
+
diff --git a/src/gpu/core/BoundaryConditions/NoSlip/NoSlipInterpolatedIncompressible.cu b/src/gpu/core/BoundaryConditions/NoSlip/NoSlipInterpolatedIncompressible.cu
new file mode 100644
index 0000000000000000000000000000000000000000..ac3cb9c4f80d63cc84a6d56a726128bbd72721d0
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/NoSlip/NoSlipInterpolatedIncompressible.cu
@@ -0,0 +1,381 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr, Anna Wellmann
+//======================================================================================
+#include "LBM/LB.h"
+#include "lbm/constants/D3Q27.h"
+#include "basics/constants/NumericConstants.h"
+#include "LBM/GPUHelperFunctions/KernelUtilities.h"
+
+using namespace vf::basics::constant;
+using namespace vf::lbm::dir;
+using namespace vf::gpu;
+
+__global__ void NoSlipInterpolatedIncompressible_Device(
+ real* distributions,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ unsigned int numberOfBCnodes,
+ real omega,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep)
+{
+ //////////////////////////////////////////////////////////////////////////
+ //! The no-slip boundary condition is executed in the following steps
+ //!
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
+ //!
+ const unsigned nodeIndex = getNodeIndex();
+
+ //////////////////////////////////////////////////////////////////////////
+ //! - Run for all indices in size of boundary condition (numberOfBCnodes)
+ //!
+ if(nodeIndex < numberOfBCnodes)
+ {
+
+ //////////////////////////////////////////////////////////////////////////
+ //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
+ //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
+ //!
+ Distributions27 dist;
+ getPointersToDistributions(dist, distributions, numberOfLBnodes, isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local subgrid distances (q's)
+ //!
+ SubgridDistances27 subgridD;
+ getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set neighbor indices (necessary for indirect addressing)
+ //!
+ unsigned int indexOfBCnode = subgridDistanceIndices[nodeIndex];
+ unsigned int kzero= indexOfBCnode;
+ unsigned int ke = indexOfBCnode;
+ unsigned int kw = neighborX[indexOfBCnode];
+ unsigned int kn = indexOfBCnode;
+ unsigned int ks = neighborY[indexOfBCnode];
+ unsigned int kt = indexOfBCnode;
+ unsigned int kb = neighborZ[indexOfBCnode];
+ unsigned int ksw = neighborY[kw];
+ unsigned int kne = indexOfBCnode;
+ unsigned int kse = ks;
+ unsigned int knw = kw;
+ unsigned int kbw = neighborZ[kw];
+ unsigned int kte = indexOfBCnode;
+ unsigned int kbe = kb;
+ unsigned int ktw = kw;
+ unsigned int kbs = neighborZ[ks];
+ unsigned int ktn = indexOfBCnode;
+ unsigned int kbn = kb;
+ unsigned int kts = ks;
+ unsigned int ktse = ks;
+ unsigned int kbnw = kbw;
+ unsigned int ktnw = kw;
+ unsigned int kbse = kbs;
+ unsigned int ktsw = ksw;
+ unsigned int kbne = kb;
+ unsigned int ktne = indexOfBCnode;
+ unsigned int kbsw = neighborZ[ksw];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local distributions
+ //!
+ real f_W = (dist.f[dP00])[ke ];
+ real f_E = (dist.f[dM00])[kw ];
+ real f_S = (dist.f[d0P0])[kn ];
+ real f_N = (dist.f[d0M0])[ks ];
+ real f_B = (dist.f[d00P])[kt ];
+ real f_T = (dist.f[d00M])[kb ];
+ real f_SW = (dist.f[dPP0])[kne ];
+ real f_NE = (dist.f[dMM0])[ksw ];
+ real f_NW = (dist.f[dPM0])[kse ];
+ real f_SE = (dist.f[dMP0])[knw ];
+ real f_BW = (dist.f[dP0P])[kte ];
+ real f_TE = (dist.f[dM0M])[kbw ];
+ real f_TW = (dist.f[dP0M])[kbe ];
+ real f_BE = (dist.f[dM0P])[ktw ];
+ real f_BS = (dist.f[d0PP])[ktn ];
+ real f_TN = (dist.f[d0MM])[kbs ];
+ real f_TS = (dist.f[d0PM])[kbn ];
+ real f_BN = (dist.f[d0MP])[kts ];
+ real f_BSW = (dist.f[dPPP])[ktne ];
+ real f_BNE = (dist.f[dMMP])[ktsw ];
+ real f_BNW = (dist.f[dPMP])[ktse ];
+ real f_BSE = (dist.f[dMPP])[ktnw ];
+ real f_TSW = (dist.f[dPPM])[kbne ];
+ real f_TNE = (dist.f[dMMM])[kbsw ];
+ real f_TNW = (dist.f[dPMM])[kbse ];
+ real f_TSE = (dist.f[dMPM])[kbnw ];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Calculate macroscopic quantities
+ //!
+ real drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
+ f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
+ f_T + f_B + f_N + f_S + f_E + f_W + ((dist.f[d000])[kzero]);
+
+ real vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
+ ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
+ (f_E - f_W));
+
+ real vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
+ ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
+ (f_N - f_S));
+
+ real vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
+ (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
+ (f_T - f_B));
+
+ real cu_sq = c3o2 * (vx1 * vx1 + vx2 * vx2 + vx3 * vx3);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - change the pointer to write the results in the correct array
+ //!
+ getPointersToDistributions(dist, distributions, numberOfLBnodes, !isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Update distributions with subgrid distance (q) between zero and one
+ //!
+ real feq, q, velocityLB;
+ q = (subgridD.q[dP00])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1) // only update distribution for q between zero and one
+ {
+ velocityLB = vx1;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[dM00])[kw] = getInterpolatedDistributionForNoSlipBC(q, f_E, f_W, feq, omega);
+ }
+
+ q = (subgridD.q[dM00])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[dP00])[ke] = getInterpolatedDistributionForNoSlipBC(q, f_W, f_E, feq, omega);
+ }
+
+ q = (subgridD.q[d0P0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[d0M0])[ks] = getInterpolatedDistributionForNoSlipBC(q, f_N, f_S, feq, omega);
+ }
+
+ q = (subgridD.q[d0M0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[d0P0])[kn] = getInterpolatedDistributionForNoSlipBC(q, f_S, f_N, feq, omega);
+ }
+
+ q = (subgridD.q[d00P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[d00M])[kb] = getInterpolatedDistributionForNoSlipBC(q, f_T, f_B, feq, omega);
+ }
+
+ q = (subgridD.q[d00M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ (dist.f[d00P])[kt] = getInterpolatedDistributionForNoSlipBC(q, f_B, f_T, feq, omega);
+ }
+
+ q = (subgridD.q[dPP0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dMM0])[ksw] = getInterpolatedDistributionForNoSlipBC(q, f_NE, f_SW, feq, omega);
+ }
+
+ q = (subgridD.q[dMM0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dPP0])[kne] = getInterpolatedDistributionForNoSlipBC(q, f_SW, f_NE, feq, omega);
+ }
+
+ q = (subgridD.q[dPM0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dMP0])[knw] = getInterpolatedDistributionForNoSlipBC(q, f_SE, f_NW, feq, omega);
+ }
+
+ q = (subgridD.q[dMP0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dPM0])[kse] = getInterpolatedDistributionForNoSlipBC(q, f_NW, f_SE, feq, omega);
+ }
+
+ q = (subgridD.q[dP0P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dM0M])[kbw] = getInterpolatedDistributionForNoSlipBC(q, f_TE, f_BW, feq, omega);
+ }
+
+ q = (subgridD.q[dM0M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dP0P])[kte] = getInterpolatedDistributionForNoSlipBC(q, f_BW, f_TE, feq, omega);
+ }
+
+ q = (subgridD.q[dP0M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dM0P])[ktw] = getInterpolatedDistributionForNoSlipBC(q, f_BE, f_TW, feq, omega);
+ }
+
+ q = (subgridD.q[dM0P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[dP0M])[kbe] = getInterpolatedDistributionForNoSlipBC(q, f_TW, f_BE, feq, omega);
+ }
+
+ q = (subgridD.q[d0PP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[d0MM])[kbs] = getInterpolatedDistributionForNoSlipBC(q, f_TN, f_BS, feq, omega);
+ }
+
+ q = (subgridD.q[d0MM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[d0PP])[ktn] = getInterpolatedDistributionForNoSlipBC(q, f_BS, f_TN, feq, omega);
+ }
+
+ q = (subgridD.q[d0PM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[d0MP])[kts] = getInterpolatedDistributionForNoSlipBC(q, f_BN, f_TS, feq, omega);
+ }
+
+ q = (subgridD.q[d0MP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ (dist.f[d0PM])[kbn] = getInterpolatedDistributionForNoSlipBC(q, f_TS, f_BN, feq, omega);
+ }
+
+ q = (subgridD.q[dPPP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dMMM])[kbsw] = getInterpolatedDistributionForNoSlipBC(q, f_TNE, f_BSW, feq, omega);
+ }
+
+ q = (subgridD.q[dMMM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dPPP])[ktne] = getInterpolatedDistributionForNoSlipBC(q, f_BSW, f_TNE, feq, omega);
+ }
+
+ q = (subgridD.q[dPPM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dMMP])[ktsw] = getInterpolatedDistributionForNoSlipBC(q, f_BNE, f_TSW, feq, omega);
+ }
+
+ q = (subgridD.q[dMMP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dPPM])[kbne] = getInterpolatedDistributionForNoSlipBC(q, f_TSW, f_BNE, feq, omega);
+ }
+
+ q = (subgridD.q[dPMP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dMPM])[kbnw] = getInterpolatedDistributionForNoSlipBC(q, f_TSE, f_BNW, feq, omega);
+ }
+
+ q = (subgridD.q[dMPM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dPMP])[ktse] = getInterpolatedDistributionForNoSlipBC(q, f_BNW, f_TSE, feq, omega);
+ }
+
+ q = (subgridD.q[dPMM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dMPP])[ktnw] = getInterpolatedDistributionForNoSlipBC(q, f_BSE, f_TNW, feq, omega);
+ }
+
+ q = (subgridD.q[dMPP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ (dist.f[dPMM])[kbse] = getInterpolatedDistributionForNoSlipBC(q, f_TNW, f_BSE, feq, omega);
+ }
+ }
+}
+////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+
diff --git a/src/gpu/core/BoundaryConditions/NoSlip/NoSlip_Device.cuh b/src/gpu/core/BoundaryConditions/NoSlip/NoSlip_Device.cuh
new file mode 100644
index 0000000000000000000000000000000000000000..0dd576f1e8642892b2a787310500315be996ea15
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/NoSlip/NoSlip_Device.cuh
@@ -0,0 +1,71 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr
+//=======================================================================================
+#ifndef NoSlip_Device_H
+#define NoSlip_Device_H
+
+#include "LBM/LB.h"
+
+__global__ void NoSlipBounceBack_Device(
+ real* distributions,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ unsigned int numberOfBCnodes,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep);
+
+__global__ void NoSlipInterpolatedIncompressible_Device(
+ real* distributions,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ unsigned int numberOfBCnodes,
+ real omega,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep);
+
+__global__ void NoSlipInterpolatedCompressible_Device(
+ real* distributions,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ unsigned int numberOfBCnodes,
+ real omega,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep);
+
+#endif
diff --git a/src/gpu/core/BoundaryConditions/Velocity/Velocity.cu b/src/gpu/core/BoundaryConditions/Velocity/Velocity.cu
new file mode 100644
index 0000000000000000000000000000000000000000..694434eeca82ad486054586ef0660f311e3672f1
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/Velocity/Velocity.cu
@@ -0,0 +1,128 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr
+//=======================================================================================
+#include <cuda_runtime.h>
+#include <helper_functions.h>
+#include <helper_cuda.h>
+
+#include "LBM/LB.h"
+#include <cuda_helper/CudaGrid.h>
+
+#include "BoundaryConditions/Velocity/Velocity_Device.cuh"
+#include "Parameter/Parameter.h"
+
+void VelocityBounceBack(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+{
+ dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 threads(parameterDevice->numberofthreads, 1, 1 );
+
+ VelocityBounceBack_Device<<< grid, threads >>> (
+ boundaryCondition->Vx,
+ boundaryCondition->Vy,
+ boundaryCondition->Vz,
+ parameterDevice->distributions.f[0],
+ boundaryCondition->k,
+ boundaryCondition->q27[0],
+ boundaryCondition->numberOfBCnodes,
+ parameterDevice->neighborX,
+ parameterDevice->neighborY,
+ parameterDevice->neighborZ,
+ parameterDevice->numberOfNodes,
+ parameterDevice->isEvenTimestep);
+ getLastCudaError("VelocityBounceBack_Device execution failed");
+}
+
+void VelocityInterpolatedIncompressible(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+{
+ dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 threads(parameterDevice->numberofthreads, 1, 1 );
+
+ VelocityInterpolatedIncompressible_Device<<< grid, threads >>> (
+ parameterDevice->nx,
+ parameterDevice->ny,
+ boundaryCondition->Vx,
+ boundaryCondition->Vy,
+ boundaryCondition->Vz,
+ parameterDevice->distributions.f[0],
+ boundaryCondition->k,
+ boundaryCondition->q27[0],
+ boundaryCondition->numberOfBCnodes,
+ parameterDevice->omega,
+ parameterDevice->neighborX,
+ parameterDevice->neighborY,
+ parameterDevice->neighborZ,
+ parameterDevice->numberOfNodes,
+ parameterDevice->isEvenTimestep);
+ getLastCudaError("VelocityInterpolatedIncompressible_Device execution failed");
+}
+
+void VelocityInterpolatedCompressible(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+{
+ dim3 grid = vf::cuda::getCudaGrid(parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 threads(parameterDevice->numberofthreads, 1, 1 );
+
+ VelocityInterpolatedCompressible_Device<<< grid, threads >>> (
+ boundaryCondition->Vx,
+ boundaryCondition->Vy,
+ boundaryCondition->Vz,
+ parameterDevice->distributions.f[0],
+ boundaryCondition->k,
+ boundaryCondition->q27[0],
+ boundaryCondition->numberOfBCnodes,
+ parameterDevice->omega,
+ parameterDevice->neighborX,
+ parameterDevice->neighborY,
+ parameterDevice->neighborZ,
+ parameterDevice->numberOfNodes,
+ parameterDevice->isEvenTimestep);
+ getLastCudaError("VelocityInterpolatedCompressible_Device execution failed");
+}
+
+void VelocityWithPressureInterpolatedCompressible(LBMSimulationParameter *parameterDevice, QforBoundaryConditions *boundaryCondition)
+{
+ dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 threads(parameterDevice->numberofthreads, 1, 1 );
+
+ VelocityWithPressureInterpolatedCompressible_Device<<< grid, threads >>> (
+ boundaryCondition->Vx,
+ boundaryCondition->Vy,
+ boundaryCondition->Vz,
+ parameterDevice->distributions.f[0],
+ boundaryCondition->k,
+ boundaryCondition->q27[0],
+ boundaryCondition->numberOfBCnodes,
+ parameterDevice->omega,
+ parameterDevice->neighborX,
+ parameterDevice->neighborY,
+ parameterDevice->neighborZ,
+ parameterDevice->numberOfNodes,
+ parameterDevice->isEvenTimestep);
+ getLastCudaError("VelocityWithPressureInterpolatedCompressible_Device execution failed");
+}
diff --git a/src/gpu/core/BoundaryConditions/Velocity/Velocity.h b/src/gpu/core/BoundaryConditions/Velocity/Velocity.h
new file mode 100644
index 0000000000000000000000000000000000000000..bab76593fda7f05e98185e817b0cfabb1fe5c103
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/Velocity/Velocity.h
@@ -0,0 +1,50 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr
+//=======================================================================================
+#ifndef Velocity_H
+#define Velocity_H
+
+#include "LBM/LB.h"
+
+#include <cuda.h>
+#include <cuda_runtime.h>
+
+struct LBMSimulationParameter;
+class Parameter;
+
+void VelocityBounceBack(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
+
+void VelocityInterpolatedIncompressible(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
+
+void VelocityInterpolatedCompressible(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
+
+void VelocityWithPressureInterpolatedCompressible(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
+
+#endif
diff --git a/src/gpu/core/BoundaryConditions/Velocity/VelocityBounceBack.cu b/src/gpu/core/BoundaryConditions/Velocity/VelocityBounceBack.cu
new file mode 100644
index 0000000000000000000000000000000000000000..0a88940da42053f832511ae019b3018a8b2c03ec
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/Velocity/VelocityBounceBack.cu
@@ -0,0 +1,184 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \file VelocityBCs27.cu
+//! \ingroup GPU
+//! \author Martin Schoenherr, Anna Wellmann
+//======================================================================================
+#include "LBM/LB.h"
+#include "lbm/constants/D3Q27.h"
+#include "basics/constants/NumericConstants.h"
+#include "LBM/GPUHelperFunctions/KernelUtilities.h"
+
+using namespace vf::basics::constant;
+using namespace vf::lbm::dir;
+using namespace vf::gpu;
+
+__global__ void VelocityBounceBack_Device(
+ real* velocityX,
+ real* velocityY,
+ real* velocityZ,
+ real* distributions,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ uint numberOfBCnodes,
+ uint* neighborX,
+ uint* neighborY,
+ uint* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep)
+{
+ //////////////////////////////////////////////////////////////////////////
+ //! The velocity boundary condition is executed in the following steps
+ //!
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
+ //!
+ const unsigned nodeIndex = getNodeIndex();
+
+ //////////////////////////////////////////////////////////////////////////
+ // run for all indices in size of boundary condition (numberOfBCnodes)
+ if(nodeIndex < numberOfBCnodes)
+ {
+ //////////////////////////////////////////////////////////////////////////
+ //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
+ //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
+ //!
+ Distributions27 dist;
+ getPointersToDistributions(dist, distributions, numberOfLBnodes, isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local velocities
+ //!
+ real VeloX = velocityX[nodeIndex];
+ real VeloY = velocityY[nodeIndex];
+ real VeloZ = velocityZ[nodeIndex];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local subgrid distances (q's)
+ //!
+ SubgridDistances27 subgridD;
+ getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set neighbor indices (necessary for indirect addressing)
+ //!
+ uint indexOfBCnode = subgridDistanceIndices[nodeIndex];
+ uint ke = indexOfBCnode;
+ uint kw = neighborX[indexOfBCnode];
+ uint kn = indexOfBCnode;
+ uint ks = neighborY[indexOfBCnode];
+ uint kt = indexOfBCnode;
+ uint kb = neighborZ[indexOfBCnode];
+ uint ksw = neighborY[kw];
+ uint kne = indexOfBCnode;
+ uint kse = ks;
+ uint knw = kw;
+ uint kbw = neighborZ[kw];
+ uint kte = indexOfBCnode;
+ uint kbe = kb;
+ uint ktw = kw;
+ uint kbs = neighborZ[ks];
+ uint ktn = indexOfBCnode;
+ uint kbn = kb;
+ uint kts = ks;
+ uint ktse = ks;
+ uint kbnw = kbw;
+ uint ktnw = kw;
+ uint kbse = kbs;
+ uint ktsw = ksw;
+ uint kbne = kb;
+ uint ktne = indexOfBCnode;
+ uint kbsw = neighborZ[ksw];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local distributions
+ //!
+ real f_W = (dist.f[dP00])[ke ];
+ real f_E = (dist.f[dM00])[kw ];
+ real f_S = (dist.f[d0P0])[kn ];
+ real f_N = (dist.f[d0M0])[ks ];
+ real f_B = (dist.f[d00P])[kt ];
+ real f_T = (dist.f[d00M])[kb ];
+ real f_SW = (dist.f[dPP0])[kne ];
+ real f_NE = (dist.f[dMM0])[ksw ];
+ real f_NW = (dist.f[dPM0])[kse ];
+ real f_SE = (dist.f[dMP0])[knw ];
+ real f_BW = (dist.f[dP0P])[kte ];
+ real f_TE = (dist.f[dM0M])[kbw ];
+ real f_TW = (dist.f[dP0M])[kbe ];
+ real f_BE = (dist.f[dM0P])[ktw ];
+ real f_BS = (dist.f[d0PP])[ktn ];
+ real f_TN = (dist.f[d0MM])[kbs ];
+ real f_TS = (dist.f[d0PM])[kbn ];
+ real f_BN = (dist.f[d0MP])[kts ];
+ real f_BSW = (dist.f[dPPP])[ktne ];
+ real f_BNE = (dist.f[dMMP])[ktsw ];
+ real f_BNW = (dist.f[dPMP])[ktse ];
+ real f_BSE = (dist.f[dMPP])[ktnw ];
+ real f_TSW = (dist.f[dPPM])[kbne ];
+ real f_TNE = (dist.f[dMMM])[kbsw ];
+ real f_TNW = (dist.f[dPMM])[kbse ];
+ real f_TSE = (dist.f[dMPM])[kbnw ];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - change the pointer to write the results in the correct array
+ //!
+ getPointersToDistributions(dist, distributions, numberOfLBnodes, !isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - rewrite distributions if there is a sub-grid distance (q) in same direction
+ real q;
+ q = (subgridD.q[dP00])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM00])[kw ]=f_E + c4o9 * (-VeloX);
+ q = (subgridD.q[dM00])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP00])[ke ]=f_W + c4o9 * ( VeloX);
+ q = (subgridD.q[d0P0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0M0])[ks ]=f_N + c4o9 * (-VeloY);
+ q = (subgridD.q[d0M0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0P0])[kn ]=f_S + c4o9 * ( VeloY);
+ q = (subgridD.q[d00P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d00M])[kb ]=f_T + c4o9 * (-VeloZ);
+ q = (subgridD.q[d00M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d00P])[kt ]=f_B + c4o9 * ( VeloZ);
+ q = (subgridD.q[dPP0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMM0])[ksw ]=f_NE + c1o9 * (-VeloX - VeloY);
+ q = (subgridD.q[dMM0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPP0])[kne ]=f_SW + c1o9 * ( VeloX + VeloY);
+ q = (subgridD.q[dPM0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMP0])[knw ]=f_SE + c1o9 * (-VeloX + VeloY);
+ q = (subgridD.q[dMP0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPM0])[kse ]=f_NW + c1o9 * ( VeloX - VeloY);
+ q = (subgridD.q[dP0P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM0M])[kbw ]=f_TE + c1o9 * (-VeloX - VeloZ);
+ q = (subgridD.q[dM0M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP0P])[kte ]=f_BW + c1o9 * ( VeloX + VeloZ);
+ q = (subgridD.q[dP0M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM0P])[ktw ]=f_BE + c1o9 * (-VeloX + VeloZ);
+ q = (subgridD.q[dM0P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP0M])[kbe ]=f_TW + c1o9 * ( VeloX - VeloZ);
+ q = (subgridD.q[d0PP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0MM])[kbs ]=f_TN + c1o9 * (-VeloY - VeloZ);
+ q = (subgridD.q[d0MM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0PP])[ktn ]=f_BS + c1o9 * ( VeloY + VeloZ);
+ q = (subgridD.q[d0PM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0MP])[kts ]=f_BN + c1o9 * (-VeloY + VeloZ);
+ q = (subgridD.q[d0MP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0PM])[kbn ]=f_TS + c1o9 * ( VeloY - VeloZ);
+ q = (subgridD.q[dPPP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMMM])[kbsw]=f_TNE + c1o36 * (-VeloX - VeloY - VeloZ);
+ q = (subgridD.q[dMMM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPPP])[ktne]=f_BSW + c1o36 * ( VeloX + VeloY + VeloZ);
+ q = (subgridD.q[dPPM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMMP])[ktsw]=f_BNE + c1o36 * (-VeloX - VeloY + VeloZ);
+ q = (subgridD.q[dMMP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPPM])[kbne]=f_TSW + c1o36 * ( VeloX + VeloY - VeloZ);
+ q = (subgridD.q[dPMP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMPM])[kbnw]=f_TSE + c1o36 * (-VeloX + VeloY - VeloZ);
+ q = (subgridD.q[dMPM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPMP])[ktse]=f_BNW + c1o36 * ( VeloX - VeloY + VeloZ);
+ q = (subgridD.q[dPMM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMPP])[ktnw]=f_BSE + c1o36 * (-VeloX + VeloY + VeloZ);
+ q = (subgridD.q[dMPP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPMM])[kbse]=f_TNW + c1o36 * ( VeloX - VeloY - VeloZ);
+ }
+}
diff --git a/src/gpu/core/BoundaryConditions/Velocity/VelocityInterpolatedCompressible.cu b/src/gpu/core/BoundaryConditions/Velocity/VelocityInterpolatedCompressible.cu
new file mode 100644
index 0000000000000000000000000000000000000000..f0cd8769faebc4c52f8ffffbc8f4b6c21bb050fc
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/Velocity/VelocityInterpolatedCompressible.cu
@@ -0,0 +1,414 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr, Anna Wellmann
+//======================================================================================
+#include "LBM/LB.h"
+#include "lbm/constants/D3Q27.h"
+#include "basics/constants/NumericConstants.h"
+#include "LBM/GPUHelperFunctions/KernelUtilities.h"
+
+using namespace vf::basics::constant;
+using namespace vf::lbm::dir;
+using namespace vf::gpu;
+
+__global__ void VelocityInterpolatedCompressible_Device(
+ real* velocityX,
+ real* velocityY,
+ real* velocityZ,
+ real* distributions,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ unsigned int numberOfBCnodes,
+ real omega,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep)
+{
+ //////////////////////////////////////////////////////////////////////////
+ //! The velocity boundary condition is executed in the following steps
+ //!
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
+ //!
+ const unsigned nodeIndex = getNodeIndex();
+
+ //////////////////////////////////////////////////////////////////////////
+ //! - Run for all indices in size of boundary condition (numberOfBCnodes)
+ //!
+ if(nodeIndex < numberOfBCnodes)
+ {
+ //////////////////////////////////////////////////////////////////////////
+ //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
+ //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
+ //!
+ Distributions27 dist;
+ getPointersToDistributions(dist, distributions, numberOfLBnodes, isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local velocities
+ //!
+ real VeloX = velocityX[nodeIndex];
+ real VeloY = velocityY[nodeIndex];
+ real VeloZ = velocityZ[nodeIndex];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local subgrid distances (q's)
+ //!
+ SubgridDistances27 subgridD;
+ getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set neighbor indices (necessary for indirect addressing)
+ //!
+ unsigned int indexOfBCnode = subgridDistanceIndices[nodeIndex];
+ unsigned int kzero= indexOfBCnode;
+ unsigned int ke = indexOfBCnode;
+ unsigned int kw = neighborX[indexOfBCnode];
+ unsigned int kn = indexOfBCnode;
+ unsigned int ks = neighborY[indexOfBCnode];
+ unsigned int kt = indexOfBCnode;
+ unsigned int kb = neighborZ[indexOfBCnode];
+ unsigned int ksw = neighborY[kw];
+ unsigned int kne = indexOfBCnode;
+ unsigned int kse = ks;
+ unsigned int knw = kw;
+ unsigned int kbw = neighborZ[kw];
+ unsigned int kte = indexOfBCnode;
+ unsigned int kbe = kb;
+ unsigned int ktw = kw;
+ unsigned int kbs = neighborZ[ks];
+ unsigned int ktn = indexOfBCnode;
+ unsigned int kbn = kb;
+ unsigned int kts = ks;
+ unsigned int ktse = ks;
+ unsigned int kbnw = kbw;
+ unsigned int ktnw = kw;
+ unsigned int kbse = kbs;
+ unsigned int ktsw = ksw;
+ unsigned int kbne = kb;
+ unsigned int ktne = indexOfBCnode;
+ unsigned int kbsw = neighborZ[ksw];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local distributions
+ //!
+ real f_W = (dist.f[dP00])[ke ];
+ real f_E = (dist.f[dM00])[kw ];
+ real f_S = (dist.f[d0P0])[kn ];
+ real f_N = (dist.f[d0M0])[ks ];
+ real f_B = (dist.f[d00P])[kt ];
+ real f_T = (dist.f[d00M])[kb ];
+ real f_SW = (dist.f[dPP0])[kne ];
+ real f_NE = (dist.f[dMM0])[ksw ];
+ real f_NW = (dist.f[dPM0])[kse ];
+ real f_SE = (dist.f[dMP0])[knw ];
+ real f_BW = (dist.f[dP0P])[kte ];
+ real f_TE = (dist.f[dM0M])[kbw ];
+ real f_TW = (dist.f[dP0M])[kbe ];
+ real f_BE = (dist.f[dM0P])[ktw ];
+ real f_BS = (dist.f[d0PP])[ktn ];
+ real f_TN = (dist.f[d0MM])[kbs ];
+ real f_TS = (dist.f[d0PM])[kbn ];
+ real f_BN = (dist.f[d0MP])[kts ];
+ real f_BSW = (dist.f[dPPP])[ktne ];
+ real f_BNE = (dist.f[dMMP])[ktsw ];
+ real f_BNW = (dist.f[dPMP])[ktse ];
+ real f_BSE = (dist.f[dMPP])[ktnw ];
+ real f_TSW = (dist.f[dPPM])[kbne ];
+ real f_TNE = (dist.f[dMMM])[kbsw ];
+ real f_TNW = (dist.f[dPMM])[kbse ];
+ real f_TSE = (dist.f[dMPM])[kbnw ];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Calculate macroscopic quantities
+ //!
+ real drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
+ f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
+ f_T + f_B + f_N + f_S + f_E + f_W + ((dist.f[d000])[kzero]);
+
+ real vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
+ ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
+ (f_E - f_W)) / (c1o1 + drho);
+
+ real vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
+ ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
+ (f_N - f_S)) / (c1o1 + drho);
+
+ real vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
+ (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
+ (f_T - f_B)) / (c1o1 + drho);
+
+ real cu_sq = c3o2 * (vx1 * vx1 + vx2 * vx2 + vx3 * vx3) * (c1o1 + drho);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - change the pointer to write the results in the correct array
+ //!
+ getPointersToDistributions(dist, distributions, numberOfLBnodes, !isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Update distributions with subgrid distance (q) between zero and one
+ //!
+ real feq, q, velocityLB, velocityBC;
+ q = (subgridD.q[dP00])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1) // only update distribution for q between zero and one
+ {
+ velocityLB = vx1;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = VeloX;
+ (dist.f[dM00])[kw] = getInterpolatedDistributionForVeloBC(q, f_E, f_W, feq, omega, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[dM00])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = -VeloX;
+ (dist.f[dP00])[ke] = getInterpolatedDistributionForVeloBC(q, f_W, f_E, feq, omega, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[d0P0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = VeloY;
+ (dist.f[d0M0])[ks] = getInterpolatedDistributionForVeloBC(q, f_N, f_S, feq, omega, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[d0M0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = -VeloY;
+ (dist.f[d0P0])[kn] = getInterpolatedDistributionForVeloBC(q, f_S, f_N, feq, omega, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[d00P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = VeloZ;
+ (dist.f[d00M])[kb] = getInterpolatedDistributionForVeloBC(q, f_T, f_B, feq, omega, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[d00M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = -VeloZ;
+ (dist.f[d00P])[kt] = getInterpolatedDistributionForVeloBC(q, f_B, f_T, feq, omega, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[dPP0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloX + VeloY;
+ (dist.f[dMM0])[ksw] = getInterpolatedDistributionForVeloBC(q, f_NE, f_SW, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dMM0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloX - VeloY;
+ (dist.f[dPP0])[kne] = getInterpolatedDistributionForVeloBC(q, f_SW, f_NE, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dPM0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloX - VeloY;
+ (dist.f[dMP0])[knw] = getInterpolatedDistributionForVeloBC(q, f_SE, f_NW, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dMP0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloX + VeloY;
+ (dist.f[dPM0])[kse] = getInterpolatedDistributionForVeloBC(q, f_NW, f_SE, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dP0P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloX + VeloZ;
+ (dist.f[dM0M])[kbw] = getInterpolatedDistributionForVeloBC(q, f_TE, f_BW, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dM0M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloX - VeloZ;
+ (dist.f[dP0P])[kte] = getInterpolatedDistributionForVeloBC(q, f_BW, f_TE, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dP0M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloX - VeloZ;
+ (dist.f[dM0P])[ktw] = getInterpolatedDistributionForVeloBC(q, f_BE, f_TW, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dM0P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloX + VeloZ;
+ (dist.f[dP0M])[kbe] = getInterpolatedDistributionForVeloBC(q, f_TW, f_BE, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[d0PP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloY + VeloZ;
+ (dist.f[d0MM])[kbs] = getInterpolatedDistributionForVeloBC(q, f_TN, f_BS, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[d0MM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloY - VeloZ;
+ (dist.f[d0PP])[ktn] = getInterpolatedDistributionForVeloBC(q, f_BS, f_TN, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[d0PM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloY - VeloZ;
+ (dist.f[d0MP])[kts] = getInterpolatedDistributionForVeloBC(q, f_BN, f_TS, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[d0MP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloY + VeloZ;
+ (dist.f[d0PM])[kbn] = getInterpolatedDistributionForVeloBC(q, f_TS, f_BN, feq, omega, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dPPP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = VeloX + VeloY + VeloZ;
+ (dist.f[dMMM])[kbsw] = getInterpolatedDistributionForVeloBC(q, f_TNE, f_BSW, feq, omega, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dMMM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = -VeloX - VeloY - VeloZ;
+ (dist.f[dPPP])[ktne] = getInterpolatedDistributionForVeloBC(q, f_BSW, f_TNE, feq, omega, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dPPM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = VeloX + VeloY - VeloZ;
+ (dist.f[dMMP])[ktsw] = getInterpolatedDistributionForVeloBC(q, f_BNE, f_TSW, feq, omega, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dMMP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = -VeloX - VeloY + VeloZ;
+ (dist.f[dPPM])[kbne] = getInterpolatedDistributionForVeloBC(q, f_TSW, f_BNE, feq, omega, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dPMP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = VeloX - VeloY + VeloZ;
+ (dist.f[dMPM])[kbnw] = getInterpolatedDistributionForVeloBC(q, f_TSE, f_BNW, feq, omega, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dMPM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = -VeloX + VeloY - VeloZ;
+ (dist.f[dPMP])[ktse] = getInterpolatedDistributionForVeloBC(q, f_BNW, f_TSE, feq, omega, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dPMM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = VeloX - VeloY - VeloZ;
+ (dist.f[dMPP])[ktnw] = getInterpolatedDistributionForVeloBC(q, f_BSE, f_TNW, feq, omega, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dMPP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = -VeloX + VeloY + VeloZ;
+ (dist.f[dPMM])[kbse] = getInterpolatedDistributionForVeloBC(q, f_TNW, f_BSE, feq, omega, velocityBC, c1o216);
+ }
+ }
+}
diff --git a/src/gpu/core/BoundaryConditions/Velocity/VelocityInterpolatedIncompressible.cu b/src/gpu/core/BoundaryConditions/Velocity/VelocityInterpolatedIncompressible.cu
new file mode 100644
index 0000000000000000000000000000000000000000..a4a19dd040a0810d347f5e4e60f40cb3a600384f
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/Velocity/VelocityInterpolatedIncompressible.cu
@@ -0,0 +1,494 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr, Anna Wellmann
+//======================================================================================
+#include "LBM/LB.h"
+#include "lbm/constants/D3Q27.h"
+#include "basics/constants/NumericConstants.h"
+#include "LBM/GPUHelperFunctions/KernelUtilities.h"
+
+using namespace vf::basics::constant;
+using namespace vf::lbm::dir;
+using namespace vf::gpu;
+
+__global__ void VelocityInterpolatedIncompressible_Device(
+ int inx,
+ int iny,
+ real* vx,
+ real* vy,
+ real* vz,
+ real* DD,
+ int* k_Q,
+ real* QQ,
+ unsigned int numberOfBCnodes,
+ real om1,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep)
+{
+ Distributions27 D;
+ if (isEvenTimestep==true)
+ {
+ D.f[dP00] = &DD[dP00 * numberOfLBnodes];
+ D.f[dM00] = &DD[dM00 * numberOfLBnodes];
+ D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
+ D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
+ D.f[d00P] = &DD[d00P * numberOfLBnodes];
+ D.f[d00M] = &DD[d00M * numberOfLBnodes];
+ D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
+ D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
+ D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
+ D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
+ D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
+ D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
+ D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
+ D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
+ D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
+ D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
+ D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
+ D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
+ D.f[d000] = &DD[d000 * numberOfLBnodes];
+ D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
+ D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
+ D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
+ D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
+ D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
+ D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
+ D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
+ D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
+ }
+ else
+ {
+ D.f[dM00] = &DD[dP00 * numberOfLBnodes];
+ D.f[dP00] = &DD[dM00 * numberOfLBnodes];
+ D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
+ D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
+ D.f[d00M] = &DD[d00P * numberOfLBnodes];
+ D.f[d00P] = &DD[d00M * numberOfLBnodes];
+ D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
+ D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
+ D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
+ D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
+ D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
+ D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
+ D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
+ D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
+ D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
+ D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
+ D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
+ D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
+ D.f[d000] = &DD[d000 * numberOfLBnodes];
+ D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
+ D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
+ D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
+ D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
+ D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
+ D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
+ D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
+ D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
+ }
+ ////////////////////////////////////////////////////////////////////////////////
+ const unsigned x = threadIdx.x; // Globaler x-Index
+ const unsigned y = blockIdx.x; // Globaler y-Index
+ const unsigned z = blockIdx.y; // Globaler z-Index
+
+ const unsigned nx = blockDim.x;
+ const unsigned ny = gridDim.x;
+
+ const unsigned k = nx*(ny*z + y) + x;
+ //////////////////////////////////////////////////////////////////////////
+
+ if(k<numberOfBCnodes)
+ {
+ ////////////////////////////////////////////////////////////////////////////////
+ real VeloX = vx[k];
+ real VeloY = vy[k];
+ real VeloZ = vz[k]; //(16.0*(u0*2.0)*bbx*bby*(grid_nx-bbx)*(grid_ny-bby))/(grid_nx*grid_nx*grid_ny*grid_ny)
+ ////////////////////////////////////////////////////////////////////////////////
+ real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
+ *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
+ *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
+ *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
+ *q_dirBSE, *q_dirBNW;
+ q_dirE = &QQ[dP00 * numberOfBCnodes];
+ q_dirW = &QQ[dM00 * numberOfBCnodes];
+ q_dirN = &QQ[d0P0 * numberOfBCnodes];
+ q_dirS = &QQ[d0M0 * numberOfBCnodes];
+ q_dirT = &QQ[d00P * numberOfBCnodes];
+ q_dirB = &QQ[d00M * numberOfBCnodes];
+ q_dirNE = &QQ[dPP0 * numberOfBCnodes];
+ q_dirSW = &QQ[dMM0 * numberOfBCnodes];
+ q_dirSE = &QQ[dPM0 * numberOfBCnodes];
+ q_dirNW = &QQ[dMP0 * numberOfBCnodes];
+ q_dirTE = &QQ[dP0P * numberOfBCnodes];
+ q_dirBW = &QQ[dM0M * numberOfBCnodes];
+ q_dirBE = &QQ[dP0M * numberOfBCnodes];
+ q_dirTW = &QQ[dM0P * numberOfBCnodes];
+ q_dirTN = &QQ[d0PP * numberOfBCnodes];
+ q_dirBS = &QQ[d0MM * numberOfBCnodes];
+ q_dirBN = &QQ[d0PM * numberOfBCnodes];
+ q_dirTS = &QQ[d0MP * numberOfBCnodes];
+ q_dirTNE = &QQ[dPPP * numberOfBCnodes];
+ q_dirTSW = &QQ[dMMP * numberOfBCnodes];
+ q_dirTSE = &QQ[dPMP * numberOfBCnodes];
+ q_dirTNW = &QQ[dMPP * numberOfBCnodes];
+ q_dirBNE = &QQ[dPPM * numberOfBCnodes];
+ q_dirBSW = &QQ[dMMM * numberOfBCnodes];
+ q_dirBSE = &QQ[dPMM * numberOfBCnodes];
+ q_dirBNW = &QQ[dMPM * numberOfBCnodes];
+ ////////////////////////////////////////////////////////////////////////////////
+ //index
+ unsigned int KQK = k_Q[k];
+ unsigned int kzero= KQK;
+ unsigned int ke = KQK;
+ unsigned int kw = neighborX[KQK];
+ unsigned int kn = KQK;
+ unsigned int ks = neighborY[KQK];
+ unsigned int kt = KQK;
+ unsigned int kb = neighborZ[KQK];
+ unsigned int ksw = neighborY[kw];
+ unsigned int kne = KQK;
+ unsigned int kse = ks;
+ unsigned int knw = kw;
+ unsigned int kbw = neighborZ[kw];
+ unsigned int kte = KQK;
+ unsigned int kbe = kb;
+ unsigned int ktw = kw;
+ unsigned int kbs = neighborZ[ks];
+ unsigned int ktn = KQK;
+ unsigned int kbn = kb;
+ unsigned int kts = ks;
+ unsigned int ktse = ks;
+ unsigned int kbnw = kbw;
+ unsigned int ktnw = kw;
+ unsigned int kbse = kbs;
+ unsigned int ktsw = ksw;
+ unsigned int kbne = kb;
+ unsigned int ktne = KQK;
+ unsigned int kbsw = neighborZ[ksw];
+ ////////////////////////////////////////////////////////////////////////////////
+ real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
+ f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
+
+ f_W = (D.f[dP00])[ke ];
+ f_E = (D.f[dM00])[kw ];
+ f_S = (D.f[d0P0])[kn ];
+ f_N = (D.f[d0M0])[ks ];
+ f_B = (D.f[d00P])[kt ];
+ f_T = (D.f[d00M])[kb ];
+ f_SW = (D.f[dPP0])[kne ];
+ f_NE = (D.f[dMM0])[ksw ];
+ f_NW = (D.f[dPM0])[kse ];
+ f_SE = (D.f[dMP0])[knw ];
+ f_BW = (D.f[dP0P])[kte ];
+ f_TE = (D.f[dM0M])[kbw ];
+ f_TW = (D.f[dP0M])[kbe ];
+ f_BE = (D.f[dM0P])[ktw ];
+ f_BS = (D.f[d0PP])[ktn ];
+ f_TN = (D.f[d0MM])[kbs ];
+ f_TS = (D.f[d0PM])[kbn ];
+ f_BN = (D.f[d0MP])[kts ];
+ f_BSW = (D.f[dPPP])[ktne ];
+ f_BNE = (D.f[dMMP])[ktsw ];
+ f_BNW = (D.f[dPMP])[ktse ];
+ f_BSE = (D.f[dMPP])[ktnw ];
+ f_TSW = (D.f[dPPM])[kbne ];
+ f_TNE = (D.f[dMMM])[kbsw ];
+ f_TNW = (D.f[dPMM])[kbse ];
+ f_TSE = (D.f[dMPM])[kbnw ];
+ ////////////////////////////////////////////////////////////////////////////////
+ real vx1, vx2, vx3, drho, feq, q;
+ drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
+ f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
+ f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
+
+ vx1 = ((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
+ ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
+ (f_E - f_W);
+
+
+ vx2 = (-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
+ ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
+ (f_N - f_S);
+
+ vx3 = ((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
+ (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
+ (f_T - f_B);
+
+ real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);
+
+ //////////////////////////////////////////////////////////////////////////
+ if (isEvenTimestep==false)
+ {
+ D.f[dP00] = &DD[dP00 * numberOfLBnodes];
+ D.f[dM00] = &DD[dM00 * numberOfLBnodes];
+ D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
+ D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
+ D.f[d00P] = &DD[d00P * numberOfLBnodes];
+ D.f[d00M] = &DD[d00M * numberOfLBnodes];
+ D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
+ D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
+ D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
+ D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
+ D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
+ D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
+ D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
+ D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
+ D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
+ D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
+ D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
+ D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
+ D.f[d000] = &DD[d000 * numberOfLBnodes];
+ D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
+ D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
+ D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
+ D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
+ D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
+ D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
+ D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
+ D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
+ }
+ else
+ {
+ D.f[dM00] = &DD[dP00 * numberOfLBnodes];
+ D.f[dP00] = &DD[dM00 * numberOfLBnodes];
+ D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
+ D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
+ D.f[d00M] = &DD[d00P * numberOfLBnodes];
+ D.f[d00P] = &DD[d00M * numberOfLBnodes];
+ D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
+ D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
+ D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
+ D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
+ D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
+ D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
+ D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
+ D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
+ D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
+ D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
+ D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
+ D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
+ D.f[d000] = &DD[d000 * numberOfLBnodes];
+ D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
+ D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
+ D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
+ D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
+ D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
+ D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
+ D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
+ D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
+ }
+
+ ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
+
+ q = q_dirE[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c2o27* (drho+c9o2*( vx1 )*( vx1 )-cu_sq);
+ (D.f[dM00])[kw]=(c1o1-q)/(c1o1+q)*(f_E-f_W+(f_E+f_W-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_E+f_W)-c6o1*c2o27*( VeloX ))/(c1o1+q);
+ }
+
+ q = q_dirW[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c2o27* (drho+c9o2*(-vx1 )*(-vx1 )-cu_sq);
+ (D.f[dP00])[ke]=(c1o1-q)/(c1o1+q)*(f_W-f_E+(f_W+f_E-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_W+f_E)-c6o1*c2o27*(-VeloX ))/(c1o1+q);
+ }
+
+ q = q_dirN[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c2o27* (drho+c9o2*( vx2 )*( vx2 )-cu_sq);
+ (D.f[d0M0])[ks]=(c1o1-q)/(c1o1+q)*(f_N-f_S+(f_N+f_S-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_N+f_S)-c6o1*c2o27*( VeloY ))/(c1o1+q);
+ }
+
+ q = q_dirS[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c2o27* (drho+c9o2*( -vx2 )*( -vx2 )-cu_sq);
+ (D.f[d0P0])[kn]=(c1o1-q)/(c1o1+q)*(f_S-f_N+(f_S+f_N-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_S+f_N)-c6o1*c2o27*(-VeloY ))/(c1o1+q);
+ }
+
+ q = q_dirT[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c2o27* (drho+c9o2*( vx3)*( vx3)-cu_sq);
+ (D.f[d00M])[kb]=(c1o1-q)/(c1o1+q)*(f_T-f_B+(f_T+f_B-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_T+f_B)-c6o1*c2o27*( VeloZ ))/(c1o1+q);
+ }
+
+ q = q_dirB[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c2o27* (drho+c9o2*( -vx3)*( -vx3)-cu_sq);
+ (D.f[d00P])[kt]=(c1o1-q)/(c1o1+q)*(f_B-f_T+(f_B+f_T-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_B+f_T)-c6o1*c2o27*(-VeloZ ))/(c1o1+q);
+ }
+
+ q = q_dirNE[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*( vx1+vx2 )*( vx1+vx2 )-cu_sq);
+ (D.f[dMM0])[ksw]=(c1o1-q)/(c1o1+q)*(f_NE-f_SW+(f_NE+f_SW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_NE+f_SW)-c6o1*c1o54*(VeloX+VeloY))/(c1o1+q);
+ }
+
+ q = q_dirSW[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*(-vx1-vx2 )*(-vx1-vx2 )-cu_sq);
+ (D.f[dPP0])[kne]=(c1o1-q)/(c1o1+q)*(f_SW-f_NE+(f_SW+f_NE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_SW+f_NE)-c6o1*c1o54*(-VeloX-VeloY))/(c1o1+q);
+ }
+
+ q = q_dirSE[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*( vx1-vx2 )*( vx1-vx2 )-cu_sq);
+ (D.f[dMP0])[knw]=(c1o1-q)/(c1o1+q)*(f_SE-f_NW+(f_SE+f_NW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_SE+f_NW)-c6o1*c1o54*( VeloX-VeloY))/(c1o1+q);
+ }
+
+ q = q_dirNW[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*(-vx1+vx2 )*(-vx1+vx2 )-cu_sq);
+ (D.f[dPM0])[kse]=(c1o1-q)/(c1o1+q)*(f_NW-f_SE+(f_NW+f_SE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_NW+f_SE)-c6o1*c1o54*(-VeloX+VeloY))/(c1o1+q);
+ }
+
+ q = q_dirTE[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*( vx1 +vx3)*( vx1 +vx3)-cu_sq);
+ (D.f[dM0M])[kbw]=(c1o1-q)/(c1o1+q)*(f_TE-f_BW+(f_TE+f_BW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TE+f_BW)-c6o1*c1o54*( VeloX+VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirBW[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*(-vx1 -vx3)*(-vx1 -vx3)-cu_sq);
+ (D.f[dP0P])[kte]=(c1o1-q)/(c1o1+q)*(f_BW-f_TE+(f_BW+f_TE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BW+f_TE)-c6o1*c1o54*(-VeloX-VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirBE[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*( vx1 -vx3)*( vx1 -vx3)-cu_sq);
+ (D.f[dM0P])[ktw]=(c1o1-q)/(c1o1+q)*(f_BE-f_TW+(f_BE+f_TW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BE+f_TW)-c6o1*c1o54*( VeloX-VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirTW[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*(-vx1 +vx3)*(-vx1 +vx3)-cu_sq);
+ (D.f[dP0M])[kbe]=(c1o1-q)/(c1o1+q)*(f_TW-f_BE+(f_TW+f_BE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TW+f_BE)-c6o1*c1o54*(-VeloX+VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirTN[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*( vx2+vx3)*( vx2+vx3)-cu_sq);
+ (D.f[d0MM])[kbs]=(c1o1-q)/(c1o1+q)*(f_TN-f_BS+(f_TN+f_BS-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TN+f_BS)-c6o1*c1o54*( VeloY+VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirBS[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*( -vx2-vx3)*( -vx2-vx3)-cu_sq);
+ (D.f[d0PP])[ktn]=(c1o1-q)/(c1o1+q)*(f_BS-f_TN+(f_BS+f_TN-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BS+f_TN)-c6o1*c1o54*( -VeloY-VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirBN[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*( vx2-vx3)*( vx2-vx3)-cu_sq);
+ (D.f[d0MP])[kts]=(c1o1-q)/(c1o1+q)*(f_BN-f_TS+(f_BN+f_TS-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BN+f_TS)-c6o1*c1o54*( VeloY-VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirTS[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o54* (drho+c9o2*( -vx2+vx3)*( -vx2+vx3)-cu_sq);
+ (D.f[d0PM])[kbn]=(c1o1-q)/(c1o1+q)*(f_TS-f_BN+(f_TS+f_BN-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TS+f_BN)-c6o1*c1o54*( -VeloY+VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirTNE[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o216*(drho+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3)-cu_sq);
+ (D.f[dMMM])[kbsw]=(c1o1-q)/(c1o1+q)*(f_TNE-f_BSW+(f_TNE+f_BSW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TNE+f_BSW)-c6o1*c1o216*( VeloX+VeloY+VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirBSW[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o216*(drho+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3)-cu_sq);
+ (D.f[dPPP])[ktne]=(c1o1-q)/(c1o1+q)*(f_BSW-f_TNE+(f_BSW+f_TNE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BSW+f_TNE)-c6o1*c1o216*(-VeloX-VeloY-VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirBNE[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o216*(drho+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3)-cu_sq);
+ (D.f[dMMP])[ktsw]=(c1o1-q)/(c1o1+q)*(f_BNE-f_TSW+(f_BNE+f_TSW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BNE+f_TSW)-c6o1*c1o216*( VeloX+VeloY-VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirTSW[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o216*(drho+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3)-cu_sq);
+ (D.f[dPPM])[kbne]=(c1o1-q)/(c1o1+q)*(f_TSW-f_BNE+(f_TSW+f_BNE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TSW+f_BNE)-c6o1*c1o216*(-VeloX-VeloY+VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirTSE[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o216*(drho+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3)-cu_sq);
+ (D.f[dMPM])[kbnw]=(c1o1-q)/(c1o1+q)*(f_TSE-f_BNW+(f_TSE+f_BNW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TSE+f_BNW)-c6o1*c1o216*( VeloX-VeloY+VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirBNW[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o216*(drho+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3)-cu_sq);
+ (D.f[dPMP])[ktse]=(c1o1-q)/(c1o1+q)*(f_BNW-f_TSE+(f_BNW+f_TSE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BNW+f_TSE)-c6o1*c1o216*(-VeloX+VeloY-VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirBSE[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o216*(drho+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3)-cu_sq);
+ (D.f[dMPP])[ktnw]=(c1o1-q)/(c1o1+q)*(f_BSE-f_TNW+(f_BSE+f_TNW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BSE+f_TNW)-c6o1*c1o216*( VeloX-VeloY-VeloZ))/(c1o1+q);
+ }
+
+ q = q_dirTNW[k];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ feq=c1o216*(drho+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3)-cu_sq);
+ (D.f[dPMM])[kbse]=(c1o1-q)/(c1o1+q)*(f_TNW-f_BSE+(f_TNW+f_BSE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TNW+f_BSE)-c6o1*c1o216*(-VeloX+VeloY+VeloZ))/(c1o1+q);
+ }
+ }
+}
diff --git a/src/gpu/core/BoundaryConditions/Velocity/VelocityWithPressureInterpolatedCompressible.cu b/src/gpu/core/BoundaryConditions/Velocity/VelocityWithPressureInterpolatedCompressible.cu
new file mode 100644
index 0000000000000000000000000000000000000000..eefd7bdb3cf30d59dfbaf93e9b2d6b24796640ba
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/Velocity/VelocityWithPressureInterpolatedCompressible.cu
@@ -0,0 +1,416 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr, Anna Wellmann
+//======================================================================================
+#include "LBM/LB.h"
+#include "lbm/constants/D3Q27.h"
+#include "basics/constants/NumericConstants.h"
+#include "LBM/GPUHelperFunctions/KernelUtilities.h"
+
+using namespace vf::basics::constant;
+using namespace vf::lbm::dir;
+using namespace vf::gpu;
+
+__global__ void VelocityWithPressureInterpolatedCompressible_Device(
+ real* velocityX,
+ real* velocityY,
+ real* velocityZ,
+ real* distribution,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ unsigned int numberOfBCnodes,
+ real omega,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep)
+{
+ //////////////////////////////////////////////////////////////////////////
+ //! The velocity boundary condition is executed in the following steps
+ //!
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
+ //!
+ const unsigned nodeIndex = getNodeIndex();
+
+ //////////////////////////////////////////////////////////////////////////
+ //! - Run for all indices in size of boundary condition (numberOfBCnodes)
+ //!
+ if(nodeIndex < numberOfBCnodes)
+ {
+
+ //////////////////////////////////////////////////////////////////////////
+ //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
+ //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
+ //!
+ Distributions27 dist;
+ getPointersToDistributions(dist, distribution, numberOfLBnodes, isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local velocities
+ //!
+ real VeloX = velocityX[nodeIndex];
+ real VeloY = velocityY[nodeIndex];
+ real VeloZ = velocityZ[nodeIndex];
+
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local subgrid distances (q's)
+ //!
+ SubgridDistances27 subgridD;
+ getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set neighbor indices (necessary for indirect addressing)
+ //!
+ unsigned int KQK = subgridDistanceIndices[nodeIndex];
+ unsigned int kzero= KQK;
+ unsigned int ke = KQK;
+ unsigned int kw = neighborX[KQK];
+ unsigned int kn = KQK;
+ unsigned int ks = neighborY[KQK];
+ unsigned int kt = KQK;
+ unsigned int kb = neighborZ[KQK];
+ unsigned int ksw = neighborY[kw];
+ unsigned int kne = KQK;
+ unsigned int kse = ks;
+ unsigned int knw = kw;
+ unsigned int kbw = neighborZ[kw];
+ unsigned int kte = KQK;
+ unsigned int kbe = kb;
+ unsigned int ktw = kw;
+ unsigned int kbs = neighborZ[ks];
+ unsigned int ktn = KQK;
+ unsigned int kbn = kb;
+ unsigned int kts = ks;
+ unsigned int ktse = ks;
+ unsigned int kbnw = kbw;
+ unsigned int ktnw = kw;
+ unsigned int kbse = kbs;
+ unsigned int ktsw = ksw;
+ unsigned int kbne = kb;
+ unsigned int ktne = KQK;
+ unsigned int kbsw = neighborZ[ksw];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Set local distributions
+ //!
+ real f_W = (dist.f[dP00])[ke ];
+ real f_E = (dist.f[dM00])[kw ];
+ real f_S = (dist.f[d0P0])[kn ];
+ real f_N = (dist.f[d0M0])[ks ];
+ real f_B = (dist.f[d00P])[kt ];
+ real f_T = (dist.f[d00M])[kb ];
+ real f_SW = (dist.f[dPP0])[kne ];
+ real f_NE = (dist.f[dMM0])[ksw ];
+ real f_NW = (dist.f[dPM0])[kse ];
+ real f_SE = (dist.f[dMP0])[knw ];
+ real f_BW = (dist.f[dP0P])[kte ];
+ real f_TE = (dist.f[dM0M])[kbw ];
+ real f_TW = (dist.f[dP0M])[kbe ];
+ real f_BE = (dist.f[dM0P])[ktw ];
+ real f_BS = (dist.f[d0PP])[ktn ];
+ real f_TN = (dist.f[d0MM])[kbs ];
+ real f_TS = (dist.f[d0PM])[kbn ];
+ real f_BN = (dist.f[d0MP])[kts ];
+ real f_BSW = (dist.f[dPPP])[ktne ];
+ real f_BNE = (dist.f[dMMP])[ktsw ];
+ real f_BNW = (dist.f[dPMP])[ktse ];
+ real f_BSE = (dist.f[dMPP])[ktnw ];
+ real f_TSW = (dist.f[dPPM])[kbne ];
+ real f_TNE = (dist.f[dMMM])[kbsw ];
+ real f_TNW = (dist.f[dPMM])[kbse ];
+ real f_TSE = (dist.f[dMPM])[kbnw ];
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Calculate macroscopic quantities
+ //!
+ real drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
+ f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
+ f_T + f_B + f_N + f_S + f_E + f_W + ((dist.f[d000])[kzero]);
+
+ real vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
+ ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
+ (f_E - f_W)) / (c1o1 + drho);
+
+
+ real vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
+ ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
+ (f_N - f_S)) / (c1o1 + drho);
+
+ real vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
+ (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
+ (f_T - f_B)) / (c1o1 + drho);
+
+ real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3) * (c1o1 + drho);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - change the pointer to write the results in the correct array
+ //!
+ getPointersToDistributions(dist, distribution, numberOfLBnodes, !isEvenTimestep);
+
+ ////////////////////////////////////////////////////////////////////////////////
+ //! - Update distributions with subgrid distance (q) between zero and one
+ real feq, q, velocityLB, velocityBC;
+ q = (subgridD.q[dP00])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1) // only update distribution for q between zero and one
+ {
+ velocityLB = vx1;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = VeloX;
+ (dist.f[dM00])[kw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_E, f_W, feq, omega, drho, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[dM00])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = -VeloX;
+ (dist.f[dP00])[ke] = getInterpolatedDistributionForVeloWithPressureBC(q, f_W, f_E, feq, omega, drho, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[d0P0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = VeloY;
+ (dist.f[d0M0])[ks] = getInterpolatedDistributionForVeloWithPressureBC(q, f_N, f_S, feq, omega, drho, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[d0M0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = -VeloY;
+ (dist.f[d0P0])[kn] = getInterpolatedDistributionForVeloWithPressureBC(q, f_S, f_N, feq, omega, drho, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[d00P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = VeloZ;
+ (dist.f[d00M])[kb] = getInterpolatedDistributionForVeloWithPressureBC(q, f_T, f_B, feq, omega, drho, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[d00M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
+ velocityBC = -VeloZ;
+ (dist.f[d00P])[kt] = getInterpolatedDistributionForVeloWithPressureBC(q, f_B, f_T, feq, omega, drho, velocityBC, c2o27);
+ }
+
+ q = (subgridD.q[dPP0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloX + VeloY;
+ (dist.f[dMM0])[ksw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_NE, f_SW, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dMM0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloX - VeloY;
+ (dist.f[dPP0])[kne] = getInterpolatedDistributionForVeloWithPressureBC(q, f_SW, f_NE, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dPM0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloX - VeloY;
+ (dist.f[dMP0])[knw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_SE, f_NW, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dMP0])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloX + VeloY;
+ (dist.f[dPM0])[kse] = getInterpolatedDistributionForVeloWithPressureBC(q, f_NW, f_SE, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dP0P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloX + VeloZ;
+ (dist.f[dM0M])[kbw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TE, f_BW, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dM0M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloX - VeloZ;
+ (dist.f[dP0P])[kte] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BW, f_TE, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dP0M])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloX - VeloZ;
+ (dist.f[dM0P])[ktw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BE, f_TW, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dM0P])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloX + VeloZ;
+ (dist.f[dP0M])[kbe] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TW, f_BE, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[d0PP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloY + VeloZ;
+ (dist.f[d0MM])[kbs] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TN, f_BS, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[d0MM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloY - VeloZ;
+ (dist.f[d0PP])[ktn] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BS, f_TN, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[d0PM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = VeloY - VeloZ;
+ (dist.f[d0MP])[kts] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BN, f_TS, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[d0MP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
+ velocityBC = -VeloY + VeloZ;
+ (dist.f[d0PM])[kbn] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TS, f_BN, feq, omega, drho, velocityBC, c1o54);
+ }
+
+ q = (subgridD.q[dPPP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = VeloX + VeloY + VeloZ;
+ (dist.f[dMMM])[kbsw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TNE, f_BSW, feq, omega, drho, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dMMM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = -VeloX - VeloY - VeloZ;
+ (dist.f[dPPP])[ktne] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BSW, f_TNE, feq, omega, drho, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dPPM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 + vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = VeloX + VeloY - VeloZ;
+ (dist.f[dMMP])[ktsw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BNE, f_TSW, feq, omega, drho, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dMMP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 - vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = -VeloX - VeloY + VeloZ;
+ (dist.f[dPPM])[kbne] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TSW, f_BNE, feq, omega, drho, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dPMP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = VeloX - VeloY + VeloZ;
+ (dist.f[dMPM])[kbnw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TSE, f_BNW, feq, omega, drho, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dMPM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = -VeloX + VeloY - VeloZ;
+ (dist.f[dPMP])[ktse] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BNW, f_TSE, feq, omega, drho, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dPMM])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = vx1 - vx2 - vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = VeloX - VeloY - VeloZ;
+ (dist.f[dMPP])[ktnw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BSE, f_TNW, feq, omega, drho, velocityBC, c1o216);
+ }
+
+ q = (subgridD.q[dMPP])[nodeIndex];
+ if (q>=c0o1 && q<=c1o1)
+ {
+ velocityLB = -vx1 + vx2 + vx3;
+ feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
+ velocityBC = -VeloX + VeloY + VeloZ;
+ (dist.f[dPMM])[kbse] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TNW, f_BSE, feq, omega, drho, velocityBC, c1o216);
+ }
+ }
+}
diff --git a/src/gpu/core/BoundaryConditions/Velocity/Velocity_Device.cuh b/src/gpu/core/BoundaryConditions/Velocity/Velocity_Device.cuh
new file mode 100644
index 0000000000000000000000000000000000000000..17f5062b83bef3a3e3d394697dac9564a23c89fe
--- /dev/null
+++ b/src/gpu/core/BoundaryConditions/Velocity/Velocity_Device.cuh
@@ -0,0 +1,97 @@
+//=======================================================================================
+// ____ ____ __ ______ __________ __ __ __ __
+// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
+// \ \ | | | | | |_) | | | | | | | / \ | |
+// \ \ | | | | | _ / | | | | | | / /\ \ | |
+// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
+// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
+// \ \ | | ________________________________________________________________
+// \ \ | | | ______________________________________________________________|
+// \ \| | | | __ __ __ __ ______ _______
+// \ | | |_____ | | | | | | | | | _ \ / _____)
+// \ | | _____| | | | | | | | | | | \ \ \_______
+// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
+// \ _____| |__| |________| \_______/ |__| |______/ (_______/
+//
+// This file is part of VirtualFluids. VirtualFluids is free software: you can
+// redistribute it and/or modify it under the terms of the GNU General Public
+// License as published by the Free Software Foundation, either version 3 of
+// the License, or (at your option) any later version.
+//
+// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
+// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
+// for more details.
+//
+// You should have received a copy of the GNU General Public License along
+// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
+//
+//! \author Martin Schoenherr
+//=======================================================================================
+#ifndef Velocity_Device_H
+#define Velocity_Device_H
+
+#include "LBM/LB.h"
+
+__global__ void VelocityBounceBack_Device(
+ real* velocityX,
+ real* velocityY,
+ real* velocityZ,
+ real* distributions,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ uint numberOfBCnodes,
+ uint* neighborX,
+ uint* neighborY,
+ uint* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep);
+
+__global__ void VelocityInterpolatedIncompressible_Device(
+ int inx,
+ int iny,
+ real* vx,
+ real* vy,
+ real* vz,
+ real* DD,
+ int* k_Q,
+ real* QQ,
+ unsigned int numberOfBCnodes,
+ real om1,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep);
+
+__global__ void VelocityInterpolatedCompressible_Device(
+ real* velocityX,
+ real* velocityY,
+ real* velocityZ,
+ real* distribution,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ unsigned int numberOfBCnodes,
+ real omega,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep);
+
+__global__ void VelocityWithPressureInterpolatedCompressible_Device(
+ real* velocityX,
+ real* velocityY,
+ real* velocityZ,
+ real* distribution,
+ int* subgridDistanceIndices,
+ real* subgridDistances,
+ unsigned int numberOfBCnodes,
+ real omega,
+ unsigned int* neighborX,
+ unsigned int* neighborY,
+ unsigned int* neighborZ,
+ unsigned long long numberOfLBnodes,
+ bool isEvenTimestep);
+
+#endif
diff --git a/src/gpu/core/Calculation/UpdateGrid27.cpp b/src/gpu/core/Calculation/UpdateGrid27.cpp
index 01863a525882672c9b931ff8909e6b45fff324a0..697c7c3b5db4932f6e6ea89fe946b6ebdb48eda6 100644
--- a/src/gpu/core/Calculation/UpdateGrid27.cpp
+++ b/src/gpu/core/Calculation/UpdateGrid27.cpp
@@ -78,7 +78,9 @@ void UpdateGrid27::collisionUsingIndices(int level, unsigned int t, uint *tagged
if (taggedFluidNodeIndices != nullptr && numberOfTaggedFluidNodes != 0)
kernels.at(level)->runOnIndices(taggedFluidNodeIndices, numberOfTaggedFluidNodes, collisionTemplate, stream);
else
- VF_LOG_WARNING("In collision: fluidNodeIndices or numberOfFluidNodes not defined");
+ VF_LOG_CRITICAL("In collision: fluidNodeIndices or numberOfFluidNodes not defined (level = {})", level);
+
+ //////////////////////////////////////////////////////////////////////////
if (para->getDiffOn())
collisionAdvectionDiffusion(level);
@@ -119,7 +121,7 @@ void UpdateGrid27::exchangeMultiGPU(int level, CudaStreamIndex streamIndex)
// 3D domain decomposition convection diffusion
if (para->getDiffOn()) {
if (para->getUseStreams())
- VF_LOG_WARNING("Cuda streams not yet implemented for convection diffusion");
+ VF_LOG_WARNING("Warning: Cuda streams not yet implemented for convection diffusion");
exchangePostCollDataADXGPU27(para.get(), comm, cudaMemoryManager.get(), level);
exchangePostCollDataADYGPU27(para.get(), comm, cudaMemoryManager.get(), level);
exchangePostCollDataADZGPU27(para.get(), comm, cudaMemoryManager.get(), level);
@@ -225,10 +227,6 @@ void UpdateGrid27::postCollisionBC(int level, uint t)
// O U T F L O W
this->bcKernelManager->runOutflowBCKernelPre(level);
- //////////////////////////////////////////////////////////////////////////
- // P R E S S U R E
- this->bcKernelManager->runPressureBCKernelPost(level);
-
//////////////////////////////////////////////////////////////////////////
// P R E C U R S O R
this->bcKernelManager->runPrecursorBCKernelPost(level, t, cudaMemoryManager.get());
diff --git a/src/gpu/core/FindInterface/FindInterface.cpp b/src/gpu/core/FindInterface/FindInterface.cpp
deleted file mode 100644
index a2efa941eda46d713d42b727908b2406f77c58bc..0000000000000000000000000000000000000000
--- a/src/gpu/core/FindInterface/FindInterface.cpp
+++ /dev/null
@@ -1,3187 +0,0 @@
-#include "FindInterface/FindInterface.h"
-
-void interpolation(InterpolationCells &intCF, InterpolationCells &intFC,
- unsigned int LxCoarse, unsigned int LyCoarse, unsigned int LzCoarse,
- unsigned int LxFine, unsigned int LyFine, unsigned int LzFine,
- unsigned int dNx, unsigned int dNy, unsigned int dNz,
- unsigned int *kCoarse, unsigned int *kFine, bool* needInterface,
- InterpolationCellNeighbor &offCF, InterpolationCellNeighbor &offFC)
-{
- unsigned int iC,iF,jC,jF,hC,hF;
- unsigned int posCSWB, posFSWB;
- unsigned int posC;
- real xOff = (real)0.0f;
- real yOff = (real)0.0f;
- real zOff = (real)0.0f;
- intCF.numberOfCells = 0;
- intFC.numberOfCells = 0;
-
- ///////////////////////////////////////////////////////////////////////////
- //Defines
- ///////////////////////////////////////////////////////////////////////////
- //Coarse to Fine
- unsigned int CF_Coarse[6], CF_NCoarse[6], CF_Fine[6], CF_NFine[6];
- unsigned int CF_xDefaultCoarse, CF_yDefaultCoarse, CF_zDefaultCoarse;
- unsigned int CF_xDefaultFine, CF_yDefaultFine, CF_zDefaultFine;
-
- CF_Coarse[ INTERFACE_E] = dNx+LxFine/2-1;
- CF_Coarse[ INTERFACE_W] = dNx;
- CF_Coarse[ INTERFACE_N] = dNy+LyFine/2-1;
- CF_Coarse[ INTERFACE_S] = dNy;
- CF_Coarse[ INTERFACE_T] = dNz+LzFine/2-1;
- CF_Coarse[ INTERFACE_B] = dNz;
-
- CF_NCoarse[INTERFACE_E] = dNx+LxFine/2-2;
- CF_NCoarse[INTERFACE_W] = dNx+1;
- CF_NCoarse[INTERFACE_N] = dNy+LyFine/2-2;
- CF_NCoarse[INTERFACE_S] = dNy+1;
- CF_NCoarse[INTERFACE_T] = dNz+LzFine/2-2;
- CF_NCoarse[INTERFACE_B] = dNz+1;
-
- CF_Fine[ INTERFACE_E] = LxFine-2;
- CF_Fine[ INTERFACE_W] = 0;
- CF_Fine[ INTERFACE_N] = LyFine-2;
- CF_Fine[ INTERFACE_S] = 0;
- CF_Fine[ INTERFACE_T] = LzFine-2;
- CF_Fine[ INTERFACE_B] = 0;
-
- CF_NFine[INTERFACE_E] = LxFine-3;
- CF_NFine[INTERFACE_W] = 1;
- CF_NFine[INTERFACE_N] = LyFine-3;
- CF_NFine[INTERFACE_S] = 1;
- CF_NFine[INTERFACE_T] = LzFine-3;
- CF_NFine[INTERFACE_B] = 1;
-
- CF_xDefaultCoarse=dNx+1;
- CF_yDefaultCoarse=dNy+1;
- CF_zDefaultCoarse=dNz+1;
- CF_xDefaultFine =2;
- CF_yDefaultFine =2;
- CF_zDefaultFine =2;
- ///////////////////////////////////////////////////////////////////////////
- //Fine to Coarse
- unsigned int FC_Coarse[6], FC_NCoarse[6], FC_Fine[6], FC_NFine[6];
- unsigned int FC_xDefaultCoarse, FC_yDefaultCoarse, FC_zDefaultCoarse;
- unsigned int FC_xDefaultFine, FC_yDefaultFine, FC_zDefaultFine;
-
- FC_Coarse[ INTERFACE_E] = dNx+LxFine/2-2;
- FC_Coarse[ INTERFACE_W] = dNx+2;
- FC_Coarse[ INTERFACE_N] = dNy+LyFine/2-2;
- FC_Coarse[ INTERFACE_S] = dNy+2;
- FC_Coarse[ INTERFACE_T] = dNz+LzFine/2-2;
- FC_Coarse[ INTERFACE_B] = dNz+2;
-
- FC_NCoarse[INTERFACE_E] = dNx+LxFine/2-1;
- FC_NCoarse[INTERFACE_W] = dNx+1;
- FC_NCoarse[INTERFACE_N] = dNy+LyFine/2-1;
- FC_NCoarse[INTERFACE_S] = dNy+1;
- FC_NCoarse[INTERFACE_T] = dNz+LzFine/2-1;
- FC_NCoarse[INTERFACE_B] = dNz+1;
-
- FC_Fine[ INTERFACE_E] = LxFine-5;
- FC_Fine[ INTERFACE_W] = 3;
- FC_Fine[ INTERFACE_N] = LyFine-5;
- FC_Fine[ INTERFACE_S] = 3;
- FC_Fine[ INTERFACE_T] = LzFine-5;
- FC_Fine[ INTERFACE_B] = 3;
-
- FC_NFine[INTERFACE_E] = LxFine-3;
- FC_NFine[INTERFACE_W] = 1;
- FC_NFine[INTERFACE_N] = LyFine-3;
- FC_NFine[INTERFACE_S] = 1;
- FC_NFine[INTERFACE_T] = LzFine-3;
- FC_NFine[INTERFACE_B] = 1;
-
- FC_xDefaultCoarse=dNx+3;
- FC_yDefaultCoarse=dNy+3;
- FC_zDefaultCoarse=dNz+3;
- FC_xDefaultFine =5;
- FC_yDefaultFine =5;
- FC_zDefaultFine =5;
- ///////////////////////////////////////////////////////////////////////////
-
-
-
-
- ///////////////////////////////////////////////////////////////////////////
- /////////// ///////////
- /////////// 6 ///////////
- /////////// ///////////
- /////////// FACES ///////////
- /////////// ///////////
- ///////////////////////////////////////////////////////////////////////////
-
- ///////////////////////////////////////////////////////////////////////////
- // face west 1 //
- ///////////////////////////////////////////////////////////////////////////
- if (needInterface[INTERFACE_W]==true)
- {
- ////////////////////////// coarse->fine ////////////////////////////
- iC = CF_Coarse[INTERFACE_W]; iF = CF_Fine[INTERFACE_W];
-
- for (hF = CF_zDefaultFine, hC = CF_zDefaultCoarse ; hF <= LzFine-4; hC++,hF+=2)
- {
- for (jF = CF_yDefaultFine, jC = CF_yDefaultCoarse ; jF <= LyFine-4; jC++,jF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
- }
- ////////////////////////// fine->coarse ////////////////////////////
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // face north 2 //
- ///////////////////////////////////////////////////////////////////////////
- if (needInterface[INTERFACE_N]==true)
- {
- ////////////////////////// coarse->fine ////////////////////////////
- jC = CF_Coarse[ INTERFACE_N]; jF = CF_Fine[ INTERFACE_N];
-
- for (hF = CF_zDefaultFine, hC = CF_zDefaultCoarse ; hF <= LzFine-4; hC++,hF+=2)
- {
- for (iF = CF_xDefaultFine, iC = CF_xDefaultCoarse ; iF<=LxFine-4; iC++,iF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
- }
- ////////////////////////// fine->coarse ////////////////////////////
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // face east 3 //
- ///////////////////////////////////////////////////////////////////////////
- if (needInterface[INTERFACE_E]==true)
- {
- ////////////////////////// coarse->fine ////////////////////////////
- iC = CF_Coarse[ INTERFACE_E]; iF = CF_Fine[ INTERFACE_E];
-
- for (hF = CF_zDefaultFine, hC = CF_zDefaultCoarse ; hF <= LzFine-4; hC++,hF+=2)
- {
- for (jF = CF_yDefaultFine, jC = CF_yDefaultCoarse ; jF <= LyFine-4; jC++,jF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
- }
- ////////////////////////// fine->coarse ////////////////////////////
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // face south 4 //
- ///////////////////////////////////////////////////////////////////////////
- if (needInterface[INTERFACE_S]==true)
- {
- ////////////////////////// coarse->fine ////////////////////////////
- jC = CF_Coarse[ INTERFACE_S]; jF = CF_Fine[ INTERFACE_S];
-
- for (hF = CF_zDefaultFine, hC = CF_zDefaultCoarse ; hF <= LzFine-4; hC++,hF+=2)
- {
- for (iF = CF_xDefaultFine, iC = CF_xDefaultCoarse ; iF<=LxFine-4; iC++,iF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
- }
- ////////////////////////// fine->coarse ////////////////////////////
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // face top 5 //
- ///////////////////////////////////////////////////////////////////////////
- if (needInterface[INTERFACE_T]==true)
- {
- ////////////////////////// coarse->fine ////////////////////////////
- hC = CF_Coarse[ INTERFACE_T]; hF = CF_Fine[ INTERFACE_T];
-
- for (jF = CF_yDefaultFine, jC = CF_yDefaultCoarse ; jF<=LyFine-4; jC++,jF+=2)
- {
- for (iF = CF_xDefaultFine, iC = CF_xDefaultCoarse ; iF<=LxFine-4; iC++,iF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
- }
- ////////////////////////// fine->coarse ////////////////////////////
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] =xOff;
- offFC.y[intFC.numberOfCells] =yOff;
- offFC.z[intFC.numberOfCells] =zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // face bottom 6 //
- ///////////////////////////////////////////////////////////////////////////
- if (needInterface[INTERFACE_B]==true)
- {
- ////////////////////////// coarse->fine ////////////////////////////
- hC = CF_Coarse[ INTERFACE_B]; hF = CF_Fine[ INTERFACE_B];
-
- for (jF = CF_yDefaultFine, jC = CF_yDefaultCoarse ; jF<=LyFine-4; jC++,jF+=2)
- {
- for (iF = CF_xDefaultFine, iC = CF_xDefaultCoarse ; iF<=LxFine-4; iC++,iF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
- }
- ////////////////////////// fine->coarse ////////////////////////////
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- /////////// ///////////
- /////////// 12 ///////////
- /////////// ///////////
- /////////// EDGES ///////////
- /////////// ///////////
- ///////////////////////////////////////////////////////////////////////////
-
- ///////////////////////////////////////////////////////////////////////////
- // edge east-north 1 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_E]==true) || (needInterface[INTERFACE_N]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_E]==false)
- {
- iC = CF_NCoarse[INTERFACE_E];
- iF = CF_NFine[ INTERFACE_E];
- xOff = (real)0.5f;
- }
- else
- {
- iC = CF_Coarse[ INTERFACE_E];
- iF = CF_Fine[ INTERFACE_E];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_N]==false)
- {
- jC = CF_NCoarse[INTERFACE_N];
- jF = CF_NFine[ INTERFACE_N];
- yOff = (real)0.5f;
- }
- else
- {
- jC = CF_Coarse[ INTERFACE_N];
- jF = CF_Fine[ INTERFACE_N];
- }
- //////////////////////////////////////////////////////////////////////////
- for (hF = CF_zDefaultFine, hC = CF_zDefaultCoarse ; hF <= LzFine-4; hC++,hF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_E]==false)
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[INTERFACE_N]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // edge east-south 2 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_E]==true) || (needInterface[INTERFACE_S]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_E]==false)
- {
- iC = CF_NCoarse[INTERFACE_E];
- iF = CF_NFine[ INTERFACE_E];
- xOff = (real)0.5f;
- }
- else
- {
- iC = CF_Coarse[ INTERFACE_E];
- iF = CF_Fine[ INTERFACE_E];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_S]==false)
- {
- jC = CF_NCoarse[INTERFACE_S];
- jF = CF_NFine[ INTERFACE_S];
- yOff = (real)-0.5f;
- }
- else
- {
- jC = CF_Coarse[ INTERFACE_S];
- jF = CF_Fine[ INTERFACE_S];
- }
- //////////////////////////////////////////////////////////////////////////
- for (hF = CF_zDefaultFine, hC = CF_zDefaultCoarse ; hF <= LzFine-4; hC++,hF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_E]==false)
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[INTERFACE_S]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // edge east-top 3 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_E]==true) || (needInterface[INTERFACE_T]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_E]==false)
- {
- iC = CF_NCoarse[INTERFACE_E];
- iF = CF_NFine[ INTERFACE_E];
- xOff = (real)0.5f;
- }
- else
- {
- iC = CF_Coarse[ INTERFACE_E];
- iF = CF_Fine[ INTERFACE_E];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_T]==false)
- {
- hC = CF_NCoarse[INTERFACE_T];
- hF = CF_NFine[ INTERFACE_T];
- zOff = (real)0.5f;
- }
- else
- {
- hC = CF_Coarse[ INTERFACE_T];
- hF = CF_Fine[ INTERFACE_T];
- }
- //////////////////////////////////////////////////////////////////////////
- for (jF = CF_yDefaultFine, jC = CF_yDefaultCoarse ; jF<=LyFine-4; jC++,jF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_E]==false)
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[INTERFACE_T]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // edge east-bottom 4 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_E]==true) || (needInterface[INTERFACE_B]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_E]==false)
- {
- iC = CF_NCoarse[INTERFACE_E];
- iF = CF_NFine[ INTERFACE_E];
- xOff = (real)0.5f;
- }
- else
- {
- iC = CF_Coarse[ INTERFACE_E];
- iF = CF_Fine[ INTERFACE_E];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_B]==false)
- {
- hC = CF_NCoarse[INTERFACE_B];
- hF = CF_NFine[ INTERFACE_B];
- zOff = (real)-0.5f;
- }
- else
- {
- hC = CF_Coarse[ INTERFACE_B];
- hF = CF_Fine[ INTERFACE_B];
- }
- //////////////////////////////////////////////////////////////////////////
- for (jF = CF_yDefaultFine, jC = CF_yDefaultCoarse ; jF<=LyFine-4; jC++,jF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_E]==false)
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[INTERFACE_B]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // edge west-north 5 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_W]==true) || (needInterface[INTERFACE_N]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_W]==false)
- {
- iC = CF_NCoarse[INTERFACE_W];
- iF = CF_NFine[ INTERFACE_W];
- xOff = (real)-0.5f;
- }
- else
- {
- iC = CF_Coarse[ INTERFACE_W];
- iF = CF_Fine[ INTERFACE_W];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_N]==false)
- {
- jC = CF_NCoarse[INTERFACE_N];
- jF = CF_NFine[ INTERFACE_N];
- yOff = (real)0.5f;
- }
- else
- {
- jC = CF_Coarse[ INTERFACE_N];
- jF = CF_Fine[ INTERFACE_N];
- }
- //////////////////////////////////////////////////////////////////////////
- for (hF = CF_zDefaultFine, hC = CF_zDefaultCoarse ; hF <= LzFine-4; hC++,hF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_W]==false)
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[INTERFACE_N]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // edge west-south 6 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_W]==true) || (needInterface[INTERFACE_S]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_W]==false)
- {
- iC = CF_NCoarse[INTERFACE_W];
- iF = CF_NFine[ INTERFACE_W];
- xOff = (real)-0.5f;
- }
- else
- {
- iC = CF_Coarse[ INTERFACE_W];
- iF = CF_Fine[ INTERFACE_W];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_S]==false)
- {
- jC = CF_NCoarse[INTERFACE_S];
- jF = CF_NFine[ INTERFACE_S];
- yOff = (real)-0.5f;
- }
- else
- {
- jC = CF_Coarse[ INTERFACE_S];
- jF = CF_Fine[ INTERFACE_S];
- }
- //////////////////////////////////////////////////////////////////////////
- for (hF = CF_zDefaultFine, hC = CF_zDefaultCoarse ; hF <= LzFine-4; hC++,hF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_W]==false)
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[INTERFACE_S]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
-
- for (hF = FC_zDefaultFine, hC = FC_zDefaultCoarse ; hF<=LzFine-7; hC++,hF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // edge west-top 7 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_W]==true) || (needInterface[INTERFACE_T]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_W]==false)
- {
- iC = CF_NCoarse[INTERFACE_W];
- iF = CF_NFine[ INTERFACE_W];
- xOff = (real)-0.5f;
- }
- else
- {
- iC = CF_Coarse[ INTERFACE_W];
- iF = CF_Fine[ INTERFACE_W];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_T]==false)
- {
- hC = CF_NCoarse[INTERFACE_T];
- hF = CF_NFine[ INTERFACE_T];
- zOff = (real)0.5f;
- }
- else
- {
- hC = CF_Coarse[ INTERFACE_T];
- hF = CF_Fine[ INTERFACE_T];
- }
- //////////////////////////////////////////////////////////////////////////
- for (jF = CF_yDefaultFine, jC = CF_yDefaultCoarse ; jF<=LyFine-4; jC++,jF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_W]==false)
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[INTERFACE_T]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // edge west-bottom 8 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_W]==true) || (needInterface[INTERFACE_B]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_W]==false)
- {
- iC = CF_NCoarse[INTERFACE_W];
- iF = CF_NFine[ INTERFACE_W];
- xOff = (real)-0.5f;
- }
- else
- {
- iC = CF_Coarse[ INTERFACE_W];
- iF = CF_Fine[ INTERFACE_W];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_B]==false)
- {
- hC = CF_NCoarse[INTERFACE_B];
- hF = CF_NFine[ INTERFACE_B];
- zOff = (real)-0.5f;
- }
- else
- {
- hC = CF_Coarse[ INTERFACE_B];
- hF = CF_Fine[ INTERFACE_B];
- }
- //////////////////////////////////////////////////////////////////////////
- for (jF = CF_yDefaultFine, jC = CF_yDefaultCoarse ; jF<=LyFine-4; jC++,jF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_W]==false)
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[INTERFACE_B]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- for (jF = FC_yDefaultFine, jC = FC_yDefaultCoarse ; jF<=LyFine-7; jC++,jF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // edge north-top 9 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_N]==true) || (needInterface[INTERFACE_T]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_N]==false)
- {
- jC = CF_NCoarse[INTERFACE_N];
- jF = CF_NFine[ INTERFACE_N];
- yOff = (real)0.5f;
- }
- else
- {
- jC = CF_Coarse[ INTERFACE_N];
- jF = CF_Fine[ INTERFACE_N];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_T]==false)
- {
- hC = CF_NCoarse[INTERFACE_T];
- hF = CF_NFine[ INTERFACE_T];
- zOff = (real)0.5f;
- }
- else
- {
- hC = CF_Coarse[ INTERFACE_T];
- hF = CF_Fine[ INTERFACE_T];
- }
- //////////////////////////////////////////////////////////////////////////
- for (iF = CF_xDefaultFine, iC = CF_xDefaultCoarse ; iF<=LxFine-4; iC++,iF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[ INTERFACE_N]==false)
- {
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[ INTERFACE_T]==false)
- {
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // edge north-bottom 10 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_N]==true) || (needInterface[INTERFACE_B]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_N]==false)
- {
- jC = CF_NCoarse[INTERFACE_N];
- jF = CF_NFine[ INTERFACE_N];
- yOff = (real)0.5f;
- }
- else
- {
- jC = CF_Coarse[ INTERFACE_N];
- jF = CF_Fine[ INTERFACE_N];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_B]==false)
- {
- hC = CF_NCoarse[INTERFACE_B];
- hF = CF_NFine[ INTERFACE_B];
- zOff = (real)-0.5f;
- }
- else
- {
- hC = CF_Coarse[ INTERFACE_B];
- hF = CF_Fine[ INTERFACE_B];
- }
- //////////////////////////////////////////////////////////////////////////
- for (iF = CF_xDefaultFine, iC = CF_xDefaultCoarse ; iF<=LxFine-4; iC++,iF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[ INTERFACE_N]==false)
- {
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[ INTERFACE_B]==false)
- {
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // edge south-top 11 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_S]==true) || (needInterface[INTERFACE_T]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_S]==false)
- {
- jC = CF_NCoarse[INTERFACE_S];
- jF = CF_NFine[ INTERFACE_S];
- yOff = (real)-0.5f;
- }
- else
- {
- jC = CF_Coarse[ INTERFACE_S];
- jF = CF_Fine[ INTERFACE_S];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_T]==false)
- {
- hC = CF_NCoarse[INTERFACE_T];
- hF = CF_NFine[ INTERFACE_T];
- zOff = (real)0.5f;
- }
- else
- {
- hC = CF_Coarse[ INTERFACE_T];
- hF = CF_Fine[ INTERFACE_T];
- }
- //////////////////////////////////////////////////////////////////////////
- for (iF = CF_xDefaultFine, iC = CF_xDefaultCoarse ; iF<=LxFine-4; iC++,iF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[ INTERFACE_S]==false)
- {
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[ INTERFACE_T]==false)
- {
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // edge south-bottom 12 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_S]==true) || (needInterface[INTERFACE_B]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_S]==false)
- {
- jC = CF_NCoarse[INTERFACE_S];
- jF = CF_NFine[ INTERFACE_S];
- yOff = (real)-0.5f;
- }
- else
- {
- jC = CF_Coarse[ INTERFACE_S];
- jF = CF_Fine[ INTERFACE_S];
- }
- //////////////////////////////////////////////////////////////////////////
- if (needInterface[ INTERFACE_B]==false)
- {
- hC = CF_NCoarse[INTERFACE_B];
- hF = CF_NFine[ INTERFACE_B];
- zOff = (real)-0.5f;
- }
- else
- {
- hC = CF_Coarse[ INTERFACE_B];
- hF = CF_Fine[ INTERFACE_B];
- }
- //////////////////////////////////////////////////////////////////////////
- for (iF = CF_xDefaultFine, iC = CF_xDefaultCoarse ; iF<=LxFine-4; iC++,iF+=2)
- {
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- }
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[ INTERFACE_S]==false)
- {
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- else if (needInterface[ INTERFACE_B]==false)
- {
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- for (iF = FC_xDefaultFine, iC = FC_xDefaultCoarse ; iF<=LxFine-7; iC++,iF+=2)
- {
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- /////////// ///////////
- /////////// 8 ///////////
- /////////// ///////////
- /////////// CORNERS ///////////
- /////////// ///////////
- ///////////////////////////////////////////////////////////////////////////
-
- ///////////////////////////////////////////////////////////////////////////
- // corner east-north-top 1 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_E]==true) ||
- (needInterface[INTERFACE_N]==true) ||
- (needInterface[INTERFACE_T]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- iC = CF_Coarse[ INTERFACE_E]; iF = CF_Fine[ INTERFACE_E];
- jC = CF_Coarse[ INTERFACE_N]; jF = CF_Fine[ INTERFACE_N];
- hC = CF_Coarse[ INTERFACE_T]; hF = CF_Fine[ INTERFACE_T];
-
- if (needInterface[INTERFACE_E]==false)
- {
- iC = CF_NCoarse[INTERFACE_E]; iF = CF_NFine[INTERFACE_E];
- xOff = (real)0.5f;
- }
- if (needInterface[INTERFACE_N]==false)
- {
- jC = CF_NCoarse[INTERFACE_N]; jF = CF_NFine[INTERFACE_N];
- yOff = (real)0.5f;
- }
- if (needInterface[INTERFACE_T]==false)
- {
- hC = CF_NCoarse[INTERFACE_T]; hF = CF_NFine[INTERFACE_T];
- zOff = (real)0.5f;
- }
- //////////////////////////////////////////////////////////////////////////
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
-
- if (needInterface[INTERFACE_E]==false)
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_N]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_T]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_E]==false) && (needInterface[INTERFACE_N]==false))
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_E]==false) && (needInterface[INTERFACE_T]==false))
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_N]==false) && (needInterface[INTERFACE_T]==false))
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // corner east-north-bottom 2 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_E]==true) ||
- (needInterface[INTERFACE_N]==true) ||
- (needInterface[INTERFACE_B]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- iC = CF_Coarse[ INTERFACE_E]; iF = CF_Fine[ INTERFACE_E];
- jC = CF_Coarse[ INTERFACE_N]; jF = CF_Fine[ INTERFACE_N];
- hC = CF_Coarse[ INTERFACE_B]; hF = CF_Fine[ INTERFACE_B];
-
- if (needInterface[INTERFACE_E]==false)
- {
- iC = CF_NCoarse[INTERFACE_E]; iF = CF_NFine[INTERFACE_E];
- xOff = (real)0.5f;
- }
- if (needInterface[INTERFACE_N]==false)
- {
- jC = CF_NCoarse[INTERFACE_N]; jF = CF_NFine[INTERFACE_N];
- yOff = (real)0.5f;
- }
- if (needInterface[INTERFACE_B]==false)
- {
- hC = CF_NCoarse[INTERFACE_B]; hF = CF_NFine[INTERFACE_B];
- zOff = (real)-0.5f;
- }
- //////////////////////////////////////////////////////////////////////////
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
-
- if (needInterface[INTERFACE_E]==false)
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_N]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_B]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_E]==false) && (needInterface[INTERFACE_N]==false))
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_E]==false) && (needInterface[INTERFACE_B]==false))
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_N]==false) && (needInterface[INTERFACE_B]==false))
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // corner east-south-top 3 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_E]==true) ||
- (needInterface[INTERFACE_S]==true) ||
- (needInterface[INTERFACE_T]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- iC = CF_Coarse[ INTERFACE_E]; iF = CF_Fine[ INTERFACE_E];
- jC = CF_Coarse[ INTERFACE_S]; jF = CF_Fine[ INTERFACE_S];
- hC = CF_Coarse[ INTERFACE_T]; hF = CF_Fine[ INTERFACE_T];
-
- if (needInterface[INTERFACE_E]==false)
- {
- iC = CF_NCoarse[INTERFACE_E]; iF = CF_NFine[INTERFACE_E];
- xOff = (real)0.5f;
- }
- if (needInterface[INTERFACE_S]==false)
- {
- jC = CF_NCoarse[INTERFACE_S]; jF = CF_NFine[INTERFACE_S];
- yOff = (real)-0.5f;
- }
- if (needInterface[INTERFACE_T]==false)
- {
- hC = CF_NCoarse[INTERFACE_T]; hF = CF_NFine[INTERFACE_T];
- zOff = (real)0.5f;
- }
- //////////////////////////////////////////////////////////////////////////
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
-
- if (needInterface[INTERFACE_E]==false)
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_S]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_T]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_E]==false) && (needInterface[INTERFACE_S]==false))
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_E]==false) && (needInterface[INTERFACE_T]==false))
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_S]==false) && (needInterface[INTERFACE_T]==false))
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // corner east-south-bottom 4 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_E]==true) ||
- (needInterface[INTERFACE_S]==true) ||
- (needInterface[INTERFACE_B]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- iC = CF_Coarse[ INTERFACE_E]; iF = CF_Fine[ INTERFACE_E];
- jC = CF_Coarse[ INTERFACE_S]; jF = CF_Fine[ INTERFACE_S];
- hC = CF_Coarse[ INTERFACE_B]; hF = CF_Fine[ INTERFACE_B];
-
- if (needInterface[INTERFACE_E]==false)
- {
- iC = CF_NCoarse[INTERFACE_E]; iF = CF_NFine[INTERFACE_E];
- xOff = (real)0.5f;
- }
- if (needInterface[INTERFACE_S]==false)
- {
- jC = CF_NCoarse[INTERFACE_S]; jF = CF_NFine[INTERFACE_S];
- yOff = (real)-0.5f;
- }
- if (needInterface[INTERFACE_B]==false)
- {
- hC = CF_NCoarse[INTERFACE_B]; hF = CF_NFine[INTERFACE_B];
- zOff = (real)-0.5f;
- }
- //////////////////////////////////////////////////////////////////////////
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
-
- if (needInterface[INTERFACE_E]==false)
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_S]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_B]==false)
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_E]==false) && (needInterface[INTERFACE_S]==false))
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_E]==false) && (needInterface[INTERFACE_B]==false))
- {
- iC = FC_NCoarse[INTERFACE_E]; iF = FC_NFine[INTERFACE_E];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_S]==false) && (needInterface[INTERFACE_B]==false))
- {
- iC = FC_Coarse[ INTERFACE_E]; iF = FC_Fine[ INTERFACE_E];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // corner west-north-top 5 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_W]==true) ||
- (needInterface[INTERFACE_N]==true) ||
- (needInterface[INTERFACE_T]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- iC = CF_Coarse[ INTERFACE_W]; iF = CF_Fine[ INTERFACE_W];
- jC = CF_Coarse[ INTERFACE_N]; jF = CF_Fine[ INTERFACE_N];
- hC = CF_Coarse[ INTERFACE_T]; hF = CF_Fine[ INTERFACE_T];
-
- if (needInterface[INTERFACE_W]==false)
- {
- iC = CF_NCoarse[INTERFACE_W]; iF = CF_NFine[INTERFACE_W];
- xOff = (real)-0.5f;
- }
- if (needInterface[INTERFACE_N]==false)
- {
- jC = CF_NCoarse[INTERFACE_N]; jF = CF_NFine[INTERFACE_N];
- yOff = (real)0.5f;
- }
- if (needInterface[INTERFACE_T]==false)
- {
- hC = CF_NCoarse[INTERFACE_T]; hF = CF_NFine[INTERFACE_T];
- zOff = (real)0.5f;
- }
- //////////////////////////////////////////////////////////////////////////
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
-
- if (needInterface[INTERFACE_W]==false)
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_N]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_T]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_W]==false) && (needInterface[INTERFACE_N]==false))
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_W]==false) && (needInterface[INTERFACE_T]==false))
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_N]==false) && (needInterface[INTERFACE_T]==false))
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // corner west-north-bottom 6 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_W]==true) ||
- (needInterface[INTERFACE_N]==true) ||
- (needInterface[INTERFACE_B]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- iC = CF_Coarse[ INTERFACE_W]; iF = CF_Fine[ INTERFACE_W];
- jC = CF_Coarse[ INTERFACE_N]; jF = CF_Fine[ INTERFACE_N];
- hC = CF_Coarse[ INTERFACE_B]; hF = CF_Fine[ INTERFACE_B];
-
- if (needInterface[INTERFACE_W]==false)
- {
- iC = CF_NCoarse[INTERFACE_W]; iF = CF_NFine[INTERFACE_W];
- xOff = (real)-0.5f;
- }
- if (needInterface[INTERFACE_N]==false)
- {
- jC = CF_NCoarse[INTERFACE_N]; jF = CF_NFine[INTERFACE_N];
- yOff = (real)0.5f;
- }
- if (needInterface[INTERFACE_B]==false)
- {
- hC = CF_NCoarse[INTERFACE_B]; hF = CF_NFine[INTERFACE_B];
- zOff = (real)-0.5f;
- }
- //////////////////////////////////////////////////////////////////////////
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
-
- if (needInterface[INTERFACE_W]==false)
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_N]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_B]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_W]==false) && (needInterface[INTERFACE_N]==false))
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_W]==false) && (needInterface[INTERFACE_B]==false))
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_N]; jF = FC_Fine[ INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_N]==false) && (needInterface[INTERFACE_B]==false))
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_N]; jF = FC_NFine[INTERFACE_N];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // corner west-south-top 7 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_W]==true) ||
- (needInterface[INTERFACE_S]==true) ||
- (needInterface[INTERFACE_T]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- iC = CF_Coarse[ INTERFACE_W]; iF = CF_Fine[ INTERFACE_W];
- jC = CF_Coarse[ INTERFACE_S]; jF = CF_Fine[ INTERFACE_S];
- hC = CF_Coarse[ INTERFACE_T]; hF = CF_Fine[ INTERFACE_T];
-
- if (needInterface[INTERFACE_W]==false)
- {
- iC = CF_NCoarse[INTERFACE_W]; iF = CF_NFine[INTERFACE_W];
- xOff = (real)-0.5f;
- }
- if (needInterface[INTERFACE_S]==false)
- {
- jC = CF_NCoarse[INTERFACE_S]; jF = CF_NFine[INTERFACE_S];
- yOff = (real)-0.5f;
- }
- if (needInterface[INTERFACE_T]==false)
- {
- hC = CF_NCoarse[INTERFACE_T]; hF = CF_NFine[INTERFACE_T];
- zOff = (real)0.5f;
- }
- //////////////////////////////////////////////////////////////////////////
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
-
- if (needInterface[INTERFACE_W]==false)
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_S]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_T]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_W]==false) && (needInterface[INTERFACE_S]==false))
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_T]; hF = FC_Fine[ INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_W]==false) && (needInterface[INTERFACE_T]==false))
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_S]==false) && (needInterface[INTERFACE_T]==false))
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_T]; hF = FC_NFine[INTERFACE_T];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
-
- ///////////////////////////////////////////////////////////////////////////
- // corner west-south-bottom 8 //
- ///////////////////////////////////////////////////////////////////////////
- if ((needInterface[INTERFACE_W]==true) ||
- (needInterface[INTERFACE_S]==true) ||
- (needInterface[INTERFACE_B]==true))
- {
- //////////////////////////////////////////////////////////////////////////
- // coarse->fine
- //////////////////////////////////////////////////////////////////////////
- iC = CF_Coarse[ INTERFACE_W]; iF = CF_Fine[ INTERFACE_W];
- jC = CF_Coarse[ INTERFACE_S]; jF = CF_Fine[ INTERFACE_S];
- hC = CF_Coarse[ INTERFACE_B]; hF = CF_Fine[ INTERFACE_B];
-
- if (needInterface[INTERFACE_W]==false)
- {
- iC = CF_NCoarse[INTERFACE_W]; iF = CF_NFine[INTERFACE_W];
- xOff = (real)-0.5f;
- }
- if (needInterface[INTERFACE_S]==false)
- {
- jC = CF_NCoarse[INTERFACE_S]; jF = CF_NFine[INTERFACE_S];
- yOff = (real)-0.5f;
- }
- if (needInterface[INTERFACE_B]==false)
- {
- hC = CF_NCoarse[INTERFACE_B]; hF = CF_NFine[INTERFACE_B];
- zOff = (real)-0.5f;
- }
- //////////////////////////////////////////////////////////////////////////
- posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
- intCF.coarseCellIndices[intCF.numberOfCells] = kCoarse[posCSWB];
- intCF.fineCellIndices[intCF.numberOfCells] = kFine[posFSWB];
- offCF.x[intCF.numberOfCells] = xOff;
- offCF.y[intCF.numberOfCells] = yOff;
- offCF.z[intCF.numberOfCells] = zOff;
- intCF.numberOfCells++;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- //reset
- xOff = (real)0.0f;
- yOff = (real)0.0f;
- zOff = (real)0.0f;
- //////////////////////////////////////////////////////////////////////////
-
-
- //////////////////////////////////////////////////////////////////////////
- // fine->coarse
- //////////////////////////////////////////////////////////////////////////
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
-
- if (needInterface[INTERFACE_W]==false)
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_S]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if (needInterface[INTERFACE_B]==false)
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_W]==false) && (needInterface[INTERFACE_S]==false))
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_Coarse[ INTERFACE_B]; hF = FC_Fine[ INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_W]==false) && (needInterface[INTERFACE_B]==false))
- {
- iC = FC_NCoarse[INTERFACE_W]; iF = FC_NFine[INTERFACE_W];
- jC = FC_Coarse[ INTERFACE_S]; jF = FC_Fine[ INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- if ((needInterface[INTERFACE_S]==false) && (needInterface[INTERFACE_B]==false))
- {
- iC = FC_Coarse[ INTERFACE_W]; iF = FC_Fine[ INTERFACE_W];
- jC = FC_NCoarse[INTERFACE_S]; jF = FC_NFine[INTERFACE_S];
- hC = FC_NCoarse[INTERFACE_B]; hF = FC_NFine[INTERFACE_B];
-
- posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
- posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
- intFC.coarseCellIndices[intFC.numberOfCells] = kCoarse[posC];
- intFC.fineCellIndices[intFC.numberOfCells] = kFine[posFSWB];
- offFC.x[intFC.numberOfCells] = xOff;
- offFC.y[intFC.numberOfCells] = yOff;
- offFC.z[intFC.numberOfCells] = zOff;
- intFC.numberOfCells++;
- }
- }
-
-//////////////////////////////////////////////////////////////////////////
-// The End
-//////////////////////////////////////////////////////////////////////////
-}
-
-
-
-////////////////////////////////////////////////////////////////////////////
-////old stuff
-////////////////////////////////////////////////////////////////////////////
-//void interpolation(InterpolationCellCF &intCF, InterpolationCellFC &intFC,
-// unsigned int LxCoarse, unsigned int LyCoarse, unsigned int LzCoarse,
-// unsigned int LxFine, unsigned int LyFine, unsigned int LzFine,
-// unsigned int dNx, unsigned int dNy, unsigned int dNz,
-// unsigned int *kCoarse, unsigned int *kFine, bool* needInterface,
-// OffsetCF &offCF, OffsetFC &offFC)
-//{
-// unsigned int iC,iF,jC,jF,hC,hF;
-// unsigned int posCSWB, posFSWB;
-// unsigned int posC;
-// intCF.kCF = 0;
-// intFC.kFC = 0;
-//
-// ///////////////////////////////////////////////////////////////////////////
-// // area west //
-// ///////////////////////////////////////////////////////////////////////////
-// if (needInterface[INTERFACE_W]==true)
-// {
-// ////////////////////////// coarse->fine ////////////////////////////
-// iC = dNx; iF = 0;
-// jC = dNy; jF = 0;
-// hC = dNz; hF = 0;
-//
-// for (hF = 0, hC = dNz ; hF <= LzFine-2; hC++,hF+=2)
-// {
-// for (jF = 0, jC = dNy ; jF <= LyFine-2; jC++,jF+=2)
-// {
-// posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
-// intCF.ICellCFC[intCF.kCF] = kCoarse[posCSWB];
-// intCF.ICellCFF[intCF.kCF] = kFine[posFSWB];
-// offCF.xOffCF[intCF.kCF] = (real)0.0f;
-// offCF.yOffCF[intCF.kCF] = (real)0.0f;
-// offCF.zOffCF[intCF.kCF] = (real)0.0f;
-// intCF.kCF++;
-// }
-// }
-// ////////////////////////// fine->coarse ////////////////////////////
-// iC = dNx + 2; iF = 3;
-// jC = dNy + 2; jF = 3;
-// hC = dNz + 2; hF = 3;
-//
-// for (hF = 3, hC = dNz + 2 ; hF<=LzFine-5; hC++,hF+=2)
-// {
-// for (jF = 3, jC = dNy + 2 ; jF<=LyFine-5; jC++,jF+=2)
-// {
-// posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
-// intFC.ICellFCC[intFC.kFC] = kCoarse[posC];
-// intFC.ICellFCF[intFC.kFC] = kFine[posFSWB];
-// offFC.xOffFC[intFC.kFC] = (real)0.0f;
-// offFC.yOffFC[intFC.kFC] = (real)0.0f;
-// offFC.zOffFC[intFC.kFC] = (real)0.0f;
-// intFC.kFC++;
-// }
-// }
-// }
-//
-// ///////////////////////////////////////////////////////////////////////////
-// // area north //
-// ///////////////////////////////////////////////////////////////////////////
-// if (needInterface[INTERFACE_N]==true)
-// {
-// ////////////////////////// coarse->fine ////////////////////////////
-// iC = dNx; iF = 0;
-// jC = dNy + LyFine/2 - 1; jF = LyFine - 2;
-// hC = dNz; hF = 0;
-//
-// for (hF = 0, hC = dNz ; hF <= LzFine-2; hC++,hF+=2)
-// {
-// for (iF = 0 , iC = dNx ; iF<=LxFine-2; iC++,iF+=2)
-// {
-// posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
-// intCF.ICellCFC[intCF.kCF] = kCoarse[posCSWB];
-// intCF.ICellCFF[intCF.kCF] = kFine[posFSWB];
-// offCF.xOffCF[intCF.kCF] = (real)0.0f;
-// offCF.yOffCF[intCF.kCF] = (real)0.0f;
-// offCF.zOffCF[intCF.kCF] = (real)0.0f;
-// intCF.kCF++;
-// }
-// }
-// ////////////////////////// fine->coarse ////////////////////////////
-// iC = dNx + 2; iF = 3;
-// jC = dNy + LyFine/2 - 2; jF = LyFine - 5;
-// hC = dNz + 2; hF = 3;
-//
-// for (hF = 3, hC = dNz + 2 ; hF<=LzFine-5; hC++,hF+=2)
-// {
-// for (iF = 3, iC = dNx + 2 ; iF<=LxFine-5; iC++,iF+=2)
-// {
-// posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
-// intFC.ICellFCC[intFC.kFC] = kCoarse[posC];
-// intFC.ICellFCF[intFC.kFC] = kFine[posFSWB];
-// offFC.xOffFC[intFC.kFC] = (real)0.0f;
-// offFC.yOffFC[intFC.kFC] = (real)0.0f;
-// offFC.zOffFC[intFC.kFC] = (real)0.0f;
-// intFC.kFC++;
-// }
-// }
-// }
-//
-// ///////////////////////////////////////////////////////////////////////////
-// // area east //
-// ///////////////////////////////////////////////////////////////////////////
-// if (needInterface[INTERFACE_E]==true)
-// {
-// ////////////////////////// coarse->fine ////////////////////////////
-// iC = dNx+LxFine/2-1; iF = LxFine-2;
-// jC = dNy; jF = 0;
-// hC = dNz; hF = 0;
-//
-// for (hF = 0, hC = dNz ; hF<=LzFine-2; hC++,hF+=2)
-// {
-// for (jF = 0, jC = dNy ; jF<=LyFine-2; jC++,jF+=2)
-// {
-// posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
-// intCF.ICellCFC[intCF.kCF] = kCoarse[posCSWB];
-// intCF.ICellCFF[intCF.kCF] = kFine[posFSWB];
-// offCF.xOffCF[intCF.kCF] = (real)0.0f;
-// offCF.yOffCF[intCF.kCF] = (real)0.0f;
-// offCF.zOffCF[intCF.kCF] = (real)0.0f;
-// intCF.kCF++;
-// }
-// }
-// ////////////////////////// fine->coarse ////////////////////////////
-// iC = dNx + LxFine/2 - 2; iF = LxFine - 5;
-// jC = dNy + 2; jF = 3;
-// hC = dNz + 2; hF = 3;
-//
-// for (hF = 3, hC = dNz + 2 ; hF<=LzFine-5; hC++,hF+=2)
-// {
-// for (jF = 3, jC = dNy + 2 ; jF<=LyFine-5; jC++,jF+=2)
-// {
-// posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
-// intFC.ICellFCC[intFC.kFC] = kCoarse[posC];
-// intFC.ICellFCF[intFC.kFC] = kFine[posFSWB];
-// offFC.xOffFC[intFC.kFC] = (real)0.0f;
-// offFC.yOffFC[intFC.kFC] = (real)0.0f;
-// offFC.zOffFC[intFC.kFC] = (real)0.0f;
-// intFC.kFC++;
-// }
-// }
-// }
-//
-// ///////////////////////////////////////////////////////////////////////////
-// // area south //
-// ///////////////////////////////////////////////////////////////////////////
-// if (needInterface[INTERFACE_S]==true)
-// {
-// ////////////////////////// coarse->fine ////////////////////////////
-// iC = dNx; iF = 0;
-// jC = dNy; jF = 0;
-// hC = dNz; hF = 0;
-//
-// for (hF = 0, hC = dNz ; hF <= LzFine-2; hC++,hF+=2)
-// {
-// for (iF = 0, iC = dNx ; iF<=LxFine-2; iC++,iF+=2)
-// {
-// posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
-// intCF.ICellCFC[intCF.kCF] = kCoarse[posCSWB];
-// intCF.ICellCFF[intCF.kCF] = kFine[posFSWB];
-// offCF.xOffCF[intCF.kCF] = (real)0.0f;
-// offCF.yOffCF[intCF.kCF] = (real)0.0f;
-// offCF.zOffCF[intCF.kCF] = (real)0.0f;
-// intCF.kCF++;
-// }
-// }
-// ////////////////////////// fine->coarse ////////////////////////////
-// iC = dNx + 2; iF = 3;
-// jC = dNy + 2; jF = 3;
-// hC = dNz + 2; hF = 3;
-//
-// for (hF = 3, hC = dNz + 2 ; hF<=LzFine-5; hC++,hF+=2)
-// {
-// for (iF = 3, iC = dNx + 2 ; iF<=LxFine-5; iC++,iF+=2)
-// {
-// posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
-// intFC.ICellFCC[intFC.kFC] = kCoarse[posC];
-// intFC.ICellFCF[intFC.kFC] = kFine[posFSWB];
-// offFC.xOffFC[intFC.kFC] = (real)0.0f;
-// offFC.yOffFC[intFC.kFC] = (real)0.0f;
-// offFC.zOffFC[intFC.kFC] = (real)0.0f;
-// intFC.kFC++;
-// }
-// }
-// }
-//
-// ///////////////////////////////////////////////////////////////////////////
-// // area top //
-// ///////////////////////////////////////////////////////////////////////////
-// if (needInterface[INTERFACE_T]==true)
-// {
-// ////////////////////////// coarse->fine ////////////////////////////
-// iC = dNx; iF = 0;
-// jC = dNy; jF = 0;
-// hC = dNz; hF = 0;
-//
-// for (jF = 0, jC = dNy ; jF<=LyFine-2; jC++,jF+=2)
-// {
-// for (iF = 0, iC = dNx ; iF<=LxFine-2; iC++,iF+=2)
-// {
-// posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
-// intCF.ICellCFC[intCF.kCF] = kCoarse[posCSWB];
-// intCF.ICellCFF[intCF.kCF] = kFine[posFSWB];
-// offCF.xOffCF[intCF.kCF] = (real)0.0f;
-// offCF.yOffCF[intCF.kCF] = (real)0.0f;
-// offCF.zOffCF[intCF.kCF] = (real)0.0f;
-// intCF.kCF++;
-// }
-// }
-// ////////////////////////// fine->coarse ////////////////////////////
-// iC = dNx + 2; iF = 3;
-// jC = dNy + 2; jF = 3;
-// hC = dNz + 2; hF = 3;
-//
-// for (jF = 3, jC = dNy + 2 ; jF<=LyFine-5; jC++,jF+=2)
-// {
-// for (iF = 3, iC = dNx + 2 ; iF<=LxFine-5; iC++,iF+=2)
-// {
-// posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
-// intFC.ICellFCC[intFC.kFC] = kCoarse[posC];
-// intFC.ICellFCF[intFC.kFC] = kFine[posFSWB];
-// offFC.xOffFC[intFC.kFC] = (real)0.0f;
-// offFC.yOffFC[intFC.kFC] = (real)0.0f;
-// offFC.zOffFC[intFC.kFC] = (real)0.0f;
-// intFC.kFC++;
-// }
-// }
-// }
-//
-// ///////////////////////////////////////////////////////////////////////////
-// // area bottom //
-// ///////////////////////////////////////////////////////////////////////////
-// if (needInterface[INTERFACE_B]==true)
-// {
-// ////////////////////////// coarse->fine ////////////////////////////
-// iC = dNx; iF = 0;
-// jC = dNy; jF = 0;
-// hC = dNz + LzFine/2 -1; hF = LzFine - 2;
-//
-// for (jF = 0, jC = dNy ; jF<=LyFine-2; jC++,jF+=2)
-// {
-// for (iF = 0, iC = dNx ; iF<=LxFine-2; iC++,iF+=2)
-// {
-// posCSWB=vectorPosition(iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine , LyFine);
-// intCF.ICellCFC[intCF.kCF] = kCoarse[posCSWB];
-// intCF.ICellCFF[intCF.kCF] = kFine[posFSWB];
-// offCF.xOffCF[intCF.kCF] = (real)0.0f;
-// offCF.yOffCF[intCF.kCF] = (real)0.0f;
-// offCF.zOffCF[intCF.kCF] = (real)0.0f;
-// intCF.kCF++;
-// }
-// }
-// ////////////////////////// fine->coarse ////////////////////////////
-// iC = dNx + 2; iF = 3;
-// jC = dNy + 2; jF = 3;
-// hC = dNz + LzFine/2 - 2; hF = LzFine - 5;
-//
-// for (jF = 3, jC = dNy + 2 ; jF<=LyFine-5; jC++,jF+=2)
-// {
-// for (iF = 3, iC = dNx + 2 ; iF<=LxFine-5; iC++,iF+=2)
-// {
-// posC=vectorPosition( iC, jC, hC, LxCoarse, LyCoarse);
-// posFSWB=vectorPosition(iF, jF, hF, LxFine, LyFine);
-// intFC.ICellFCC[intFC.kFC] = kCoarse[posC];
-// intFC.ICellFCF[intFC.kFC] = kFine[posFSWB];
-// offFC.xOffFC[intFC.kFC] = (real)0.0f;
-// offFC.yOffFC[intFC.kFC] = (real)0.0f;
-// offFC.zOffFC[intFC.kFC] = (real)0.0f;
-// intFC.kFC++;
-// }
-// }
-// }
-//}
-//
-//
-//
diff --git a/src/gpu/core/FindInterface/FindInterface.h b/src/gpu/core/FindInterface/FindInterface.h
deleted file mode 100644
index 17e63824f930161656291bf2d7ecc05e23af9161..0000000000000000000000000000000000000000
--- a/src/gpu/core/FindInterface/FindInterface.h
+++ /dev/null
@@ -1,15 +0,0 @@
-#ifndef FINDINTERFACE_H
-#define FINDINTERFACE_H
-
-#include "LBM/LB.h"
-#include "lbm/constants/D3Q27.h"
-
-
-void interpolation(InterpolationCells &intCF, InterpolationCells &intFC,
- unsigned int LxCoarse, unsigned int LyCoarse, unsigned int LzCoarse,
- unsigned int LxFine, unsigned int LyFine, unsigned int LzFine,
- unsigned int dNx, unsigned int dNy, unsigned int dNz,
- unsigned int *kCoarse, unsigned int *kFine, bool* needInterface,
- InterpolationCellNeighbor &offCF, InterpolationCellNeighbor &offFC);
-
-#endif
diff --git a/src/gpu/core/FindQ/DefineBCs.cpp b/src/gpu/core/FindQ/DefineBCs.cpp
deleted file mode 100644
index 3aab8a8cb628ad0da30f366b0371363c2dfcfef9..0000000000000000000000000000000000000000
--- a/src/gpu/core/FindQ/DefineBCs.cpp
+++ /dev/null
@@ -1,232 +0,0 @@
-#include "FindQ/DefineBCs.h"
-#include "FindQ/FindQ.h"
-
-void findPressQShip(Parameter* para, CudaMemoryManager* cudaMemoryManager)
-{
- //x = begin (0)
- findKforQPressX0(para, para->getCoarse());
- cudaMemoryManager->cudaAllocPressX0(para->getCoarse());
- findQPressX0(para, para->getCoarse());
- cudaMemoryManager->cudaCopyPressX0(para->getCoarse());
- //x = end (1)
- findKforQPressX1(para, para->getCoarse());
- cudaMemoryManager->cudaAllocPressX1(para->getCoarse());
- findQPressX1(para, para->getCoarse());
- cudaMemoryManager->cudaCopyPressX1(para->getCoarse());
- //for (int lev = para->getFine(); lev >= para->getCoarse(); lev--)
- //{
- // findKforQPressX1(para, lev);
- // para->cudaAllocPressX1(lev);
- // findQPressX1(para, lev);
- // para->cudaCopyPressX1(lev);
- //}
-}
-
-
-
-
-void findQ27(Parameter* para, CudaMemoryManager* cudaMemoryManager)
-{
- for (int lev = para->getFine(); lev >= para->getCoarse(); lev--)
- {
- findKforQ(para, lev);
- para->getParD(lev)->noSlipBC.numberOfBCnodes = para->getParH(lev)->noSlipBC.numberOfBCnodes;
- printf("numberOfBCnodes= %d\n", para->getParH(lev)->noSlipBC.numberOfBCnodes);
-
- cudaMemoryManager->cudaAllocNoSlipBC(lev);
-
- findQ(para, lev);
- para->getParD(lev)->noSlipBC.numberOfBCnodes = para->getParH(lev)->noSlipBC.numberOfBCnodes;
- printf("numberOfBCnodes= %d\n", para->getParH(lev)->noSlipBC.numberOfBCnodes);
-
- cudaMemoryManager->cudaCopyNoSlipBC(lev);
- }
-}
-
-
-
-
-void findBC27(Parameter* para, CudaMemoryManager* cudaMemoryManager)
-{
- if ( para->getMyProcessID() == 0)
- {
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //Inflow
- findKforQInflow(para);
-
- printf("numberOfVeloBCnodes= %d\n", para->getParH(para->getCoarse())->velocityBC.numberOfBCnodes);
-
- cudaMemoryManager->cudaAllocVeloBC(0); //level = 0
-
- findQInflow(para);
-
- cudaMemoryManager->cudaCopyVeloBC(0); //level = 0
- }
-
- // TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
- //...!!!...next if gets a block comment for a simple test...
- //if ( para->getMyID() == para->getNumprocs() - 1)
- //{
- // ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- // //Outflow
- // findKforQOutflow(para);
-
- // printf("numberOfOutflowBCnodes= %d\n", para->getParH(para->getCoarse())->outflowBC.numberOfBCnodes);
-
- // para->cudaAllocPressBC();
-
- // findQOutflow(para);
-
- // para->cudaCopyPressBC();
- //}
-
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- // SOUND WAVE BCs at the solid nodes (walls) //////////////////////////////////////////////////////////////////////////////////////////////
- // by //////////////////////////////////////////////////////////////////////////////////////////////
- // Maddin Schlaffer //////////////////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //findKforQSchlaff( para->getParH(para->getCoarse())->nx,
- // para->getParH(para->getCoarse())->ny,
- // para->getParH(para->getCoarse())->gridNX,
- // para->getParH(para->getCoarse())->gridNY,
- // para->getParH(para->getCoarse())->gridNZ,
- // para->getParH(para->getCoarse())->geo,
- // QnH,
- // QsH,
- // QeH,
- // QwH);
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //// Allocate Host Memory
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////North
- //unsigned int mem_size_N_Q_k = sizeof(int)*QnH.numberOfBCnodes;
- //unsigned int mem_size_N_Q_q = sizeof(real)*QnH.numberOfBCnodes;
- //kNQ = QnH.numberOfBCnodes;
- //printf("kNQ= %d\n",kNQ);
- //cudaHostMemoryAllocate((void**) &QnH.q27[0], para->getD3Qxx()*mem_size_N_Q_q );
- //cudaHostMemoryAllocate((void**) &QnH.k, mem_size_N_Q_k );
- //cudaHostMemoryAllocate((void**) &VxNH, mem_size_N_Q_q );
- //cudaHostMemoryAllocate((void**) &VyNH, mem_size_N_Q_q );
- //cudaHostMemoryAllocate((void**) &VzNH, mem_size_N_Q_q );
- //cudaHostMemoryAllocate((void**) &deltaVNH, mem_size_N_Q_q );
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////South
- //unsigned int mem_size_S_Q_k = sizeof(int)*QsH.numberOfBCnodes;
- //unsigned int mem_size_S_Q_q = sizeof(real)*QsH.numberOfBCnodes;
- //kSQ = QsH.numberOfBCnodes;
- //printf("kSQ= %d\n",kSQ);
- //cudaHostMemoryAllocate((void**) &QsH.q27[0], para->getD3Qxx()*mem_size_S_Q_q );
- //cudaHostMemoryAllocate((void**) &QsH.k, mem_size_S_Q_k );
- //cudaHostMemoryAllocate((void**) &VxSH, mem_size_S_Q_q );
- //cudaHostMemoryAllocate((void**) &VySH, mem_size_S_Q_q );
- //cudaHostMemoryAllocate((void**) &VzSH, mem_size_S_Q_q );
- //cudaHostMemoryAllocate((void**) &deltaVSH, mem_size_S_Q_q );
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////East
- //unsigned int mem_size_E_Q_k = sizeof(int)*QeH.numberOfBCnodes;
- //unsigned int mem_size_E_Q_q = sizeof(real)*QeH.numberOfBCnodes;
- //kEQ = QeH.numberOfBCnodes;
- //printf("kEQ= %d\n",kEQ);
- //cudaHostMemoryAllocate((void**) &QeH.q27[0], para->getD3Qxx()*mem_size_E_Q_q );
- //cudaHostMemoryAllocate((void**) &QeH.k, mem_size_E_Q_k );
- //cudaHostMemoryAllocate((void**) &VxEH, mem_size_E_Q_q );
- //cudaHostMemoryAllocate((void**) &VyEH, mem_size_E_Q_q );
- //cudaHostMemoryAllocate((void**) &VzEH, mem_size_E_Q_q );
- //cudaHostMemoryAllocate((void**) &deltaVEH, mem_size_E_Q_q );
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////West
- //unsigned int mem_size_W_Q_k = sizeof(int)*QwH.numberOfBCnodes;
- //unsigned int mem_size_W_Q_q = sizeof(real)*QwH.numberOfBCnodes;
- //kWQ = QwH.numberOfBCnodes;
- //printf("kWQ= %d\n",kWQ);
- //cudaHostMemoryAllocate((void**) &QwH.q27[0], para->getD3Qxx()*mem_size_W_Q_q );
- //cudaHostMemoryAllocate((void**) &QwH.k, mem_size_W_Q_k );
- //cudaHostMemoryAllocate((void**) &VxWH, mem_size_W_Q_q );
- //cudaHostMemoryAllocate((void**) &VyWH, mem_size_W_Q_q );
- //cudaHostMemoryAllocate((void**) &VzWH, mem_size_W_Q_q );
- //cudaHostMemoryAllocate((void**) &deltaVWH, mem_size_W_Q_q );
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////find inflow Q's on coarse grid
- //findQSchlaff( para->getParH(para->getCoarse())->nx,
- // para->getParH(para->getCoarse())->ny,
- // para->getParH(para->getCoarse())->gridNX,
- // para->getParH(para->getCoarse())->gridNY,
- // para->getParH(para->getCoarse())->gridNZ,
- // para->getParH(para->getCoarse())->geo,
- // para->getParH(para->getCoarse())->k,
- // kNQ, VxNH, VyNH, VzNH, deltaVNH, QnH.q27[0], QnH,
- // kSQ, VxSH, VySH, VzSH, deltaVSH, QsH.q27[0], QsH,
- // kEQ, VxEH, VyEH, VzEH, deltaVEH, QeH.q27[0], QeH,
- // kWQ, VxWH, VyWH, VzWH, deltaVWH, QwH.q27[0], QwH);
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //// Allocate Device Memory
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////North
- //cudaMemoryAllocate((void**) &QnD.q27[0], para->getD3Qxx()* mem_size_N_Q_q );
- //cudaMemoryAllocate((void**) &QnD.k, mem_size_N_Q_k );
- //cudaMemoryAllocate((void**) &VxND, mem_size_N_Q_q );
- //cudaMemoryAllocate((void**) &VyND, mem_size_N_Q_q );
- //cudaMemoryAllocate((void**) &VzND, mem_size_N_Q_q );
- //cudaMemoryAllocate((void**) &deltaVND, mem_size_N_Q_q );
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////South
- //cudaMemoryAllocate((void**) &QsD.q27[0], para->getD3Qxx()* mem_size_S_Q_q );
- //cudaMemoryAllocate((void**) &QsD.k, mem_size_S_Q_k );
- //cudaMemoryAllocate((void**) &VxSD, mem_size_S_Q_q );
- //cudaMemoryAllocate((void**) &VySD, mem_size_S_Q_q );
- //cudaMemoryAllocate((void**) &VzSD, mem_size_S_Q_q );
- //cudaMemoryAllocate((void**) &deltaVSD, mem_size_S_Q_q );
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////East
- //cudaMemoryAllocate((void**) &QeD.q27[0], para->getD3Qxx()* mem_size_E_Q_q );
- //cudaMemoryAllocate((void**) &QeD.k, mem_size_E_Q_k );
- //cudaMemoryAllocate((void**) &VxED, mem_size_E_Q_q );
- //cudaMemoryAllocate((void**) &VyED, mem_size_E_Q_q );
- //cudaMemoryAllocate((void**) &VzED, mem_size_E_Q_q );
- //cudaMemoryAllocate((void**) &deltaVED, mem_size_E_Q_q );
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////West
- //cudaMemoryAllocate((void**) &QwD.q27[0], para->getD3Qxx()* mem_size_W_Q_q );
- //cudaMemoryAllocate((void**) &QwD.k, mem_size_W_Q_k );
- //cudaMemoryAllocate((void**) &VxWD, mem_size_W_Q_q );
- //cudaMemoryAllocate((void**) &VyWD, mem_size_W_Q_q );
- //cudaMemoryAllocate((void**) &VzWD, mem_size_W_Q_q );
- //cudaMemoryAllocate((void**) &deltaVWD, mem_size_W_Q_q );
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //// Copy Host Memory to Device
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////North
- //cudaMemoryCopy(QnD.q27[0], QnH.q27[0], para->getD3Qxx()* mem_size_N_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(QnD.k, QnH.k, mem_size_N_Q_k, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VxND, VxNH, mem_size_N_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VyND, VyNH, mem_size_N_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VzND, VzNH, mem_size_N_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(deltaVND, deltaVNH, mem_size_N_Q_q, cudaMemcpyHostToDevice);
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////South
- //cudaMemoryCopy(QsD.q27[0], QsH.q27[0], para->getD3Qxx()* mem_size_S_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(QsD.k, QsH.k, mem_size_S_Q_k, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VxSD, VxSH, mem_size_S_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VySD, VySH, mem_size_S_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VzSD, VzSH, mem_size_S_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(deltaVSD, deltaVSH, mem_size_S_Q_q, cudaMemcpyHostToDevice);
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////East
- //cudaMemoryCopy(QeD.q27[0], QeH.q27[0], para->getD3Qxx()* mem_size_E_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(QeD.k, QeH.k, mem_size_E_Q_k, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VxED, VxEH, mem_size_E_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VyED, VyEH, mem_size_E_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VzED, VzEH, mem_size_E_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(deltaVED, deltaVEH, mem_size_E_Q_q, cudaMemcpyHostToDevice);
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////West
- //cudaMemoryCopy(QwD.q27[0], QwH.q27[0], para->getD3Qxx()* mem_size_W_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(QwD.k, QwH.k, mem_size_W_Q_k, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VxWD, VxWH, mem_size_W_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VyWD, VyWH, mem_size_W_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(VzWD, VzWH, mem_size_W_Q_q, cudaMemcpyHostToDevice);
- //cudaMemoryCopy(deltaVWD, deltaVWH, mem_size_W_Q_q, cudaMemcpyHostToDevice);
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-}
-
diff --git a/src/gpu/core/FindQ/DefineBCs.h b/src/gpu/core/FindQ/DefineBCs.h
deleted file mode 100644
index 045d77f25cab213dfd130fe068f0724b6955bc4d..0000000000000000000000000000000000000000
--- a/src/gpu/core/FindQ/DefineBCs.h
+++ /dev/null
@@ -1,15 +0,0 @@
-#ifndef DEFINE_BCS_H
-#define DEFINE_BCS_H
-
-#include "LBM/LB.h"
-#include "lbm/constants/D3Q27.h"
-#include "Parameter/Parameter.h"
-#include "GPU/CudaMemoryManager.h"
-
-void findQ27(Parameter* para, CudaMemoryManager* cudaMemoryManager);
-
-void findBC27(Parameter* para, CudaMemoryManager* cudaMemoryManager);
-
-void findPressQShip(Parameter* para, CudaMemoryManager* cudaMemoryManager);
-
-#endif
diff --git a/src/gpu/core/FindQ/FindQ.cpp b/src/gpu/core/FindQ/FindQ.cpp
deleted file mode 100644
index 469bc0c05fa706175ab553bf1583503eb41f5c54..0000000000000000000000000000000000000000
--- a/src/gpu/core/FindQ/FindQ.cpp
+++ /dev/null
@@ -1,1412 +0,0 @@
-#include "FindQ/FindQ.h"
-#include <logger/Logger.h>
-#include "lbm/constants/D3Q27.h"
-
-using namespace vf::lbm::dir;
-
-////////////////////////////////////////////////////////////////////////////////
-void findQ(Parameter* para, int lev)
-{
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
-
- VF_LOG_CRITICAL("findQ() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
- int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
- int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
- int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
- real ON[27];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m, mm, l;
- int nx = para->getParH(lev)->nx;
- int ny = para->getParH(lev)->ny;
- unsigned int nnx = para->getParH(lev)->gridNX;
- unsigned int nny = para->getParH(lev)->gridNY;
- unsigned int nnz = para->getParH(lev)->gridNZ;
- int* geo_mat = para->getParH(lev)->geo;
- unsigned int* kk = para->getParH(para->getCoarse())->k;
- unsigned int sizeQ = para->getParH(lev)->noSlipBC.numberOfBCnodes;
- real* QQ = para->getParH(lev)->noSlipBC.q27[0];
- QforBoundaryConditions &QIN = para->getParH(lev)->noSlipBC;
- QIN.numberOfBCnodes = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //int relx, rely, relz;
-
- //unsigned int centerX = nnx / 2;
- //unsigned int centerY = nny / 2;
- //unsigned int centerZ = nnz / 2;
- //real radius = nny / 5.f;//2.56f;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- QforBoundaryConditions Q;
- Q.q27[dP00 ] = &QQ[dP00 *sizeQ];
- Q.q27[dM00 ] = &QQ[dM00 *sizeQ];
- Q.q27[d0P0 ] = &QQ[d0P0 *sizeQ];
- Q.q27[d0M0 ] = &QQ[d0M0 *sizeQ];
- Q.q27[d00P ] = &QQ[d00P *sizeQ];
- Q.q27[d00M ] = &QQ[d00M *sizeQ];
- Q.q27[dPP0 ] = &QQ[dPP0 *sizeQ];
- Q.q27[dMM0 ] = &QQ[dMM0 *sizeQ];
- Q.q27[dPM0 ] = &QQ[dPM0 *sizeQ];
- Q.q27[dMP0 ] = &QQ[dMP0 *sizeQ];
- Q.q27[dP0P ] = &QQ[dP0P *sizeQ];
- Q.q27[dM0M ] = &QQ[dM0M *sizeQ];
- Q.q27[dP0M ] = &QQ[dP0M *sizeQ];
- Q.q27[dM0P ] = &QQ[dM0P *sizeQ];
- Q.q27[d0PP ] = &QQ[d0PP *sizeQ];
- Q.q27[d0MM ] = &QQ[d0MM *sizeQ];
- Q.q27[d0PM ] = &QQ[d0PM *sizeQ];
- Q.q27[d0MP ] = &QQ[d0MP *sizeQ];
- Q.q27[d000] = &QQ[d000*sizeQ];
- Q.q27[dPPP ] = &QQ[dPPP *sizeQ];
- Q.q27[dMMP ] = &QQ[dMMP *sizeQ];
- Q.q27[dPMP ] = &QQ[dPMP *sizeQ];
- Q.q27[dMPP ] = &QQ[dMPP *sizeQ];
- Q.q27[dPPM ] = &QQ[dPPM *sizeQ];
- Q.q27[dMMM ] = &QQ[dMMM *sizeQ];
- Q.q27[dPMM ] = &QQ[dPMM *sizeQ];
- Q.q27[dMPM ] = &QQ[dMPM *sizeQ];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- for(k=STARTOFFZ + 1 ; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY + 1 ; j<=nny+STARTOFFY-2 ; j++){ //j<=nny/2+STARTOFFY //j<=STARTOFFY+1
- for(i=STARTOFFX + 1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- //relx = i - STARTOFFX - centerX;
- //rely = j - STARTOFFY - centerY;
- //relz = k - STARTOFFZ - centerZ;
- ON[18] = (real)-1.f;
- for(l=0;l<=26;l++){
- mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if((geo_mat[mm] == GEO_SOLID) || (geo_mat[mm] == GEO_VOID)){
- //ON[l] = -(((real)ex[l]*(real)relx + (real)ey[l]*(real)rely + (real)ez[l]*(real)relz +/*+/- Achtung, innen und aussen nicht verwechseln!!*/
- // sqrt(pow((real)ex[l]*(real)relx + (real)ey[l]*(real)rely + (real)ez[l]*(real)relz,2) +
- // (pow((real)ex[l],2) + pow((real)ey[l],2) + pow((real)ez[l],2))* (pow(radius,2) -
- // pow((real)relx,2) - pow((real)rely,2) - pow((real)relz,2))))
- // /(pow((real)ex[l],2) + pow((real)ey[l],2) + pow((real)ez[l],2)));
- ON[l] = (real)0.5f;//1.0f;
- ON[18] = (real)1.f; //ZERO
- }
- else{
- ON[l] = (real)-1.f;
- }
- }
- if (ON[18]==(real)1.f)
- {
- QIN.k[QIN.numberOfBCnodes] = kk[m];
-
- //Q.q27[dP00 ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dM00 ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[d0P0 ][QIN.numberOfBCnodes] = 0.f;
- //Q.q27[d0M0 ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[d00P ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[d00M ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dPP0 ][QIN.numberOfBCnodes] = 0.f;
- //Q.q27[dMM0 ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dPM0 ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dMP0 ][QIN.numberOfBCnodes] = 0.f;
- //Q.q27[dP0P ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dM0M ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dP0M ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dM0P ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[d0PP ][QIN.numberOfBCnodes] = 0.f;
- //Q.q27[d0MM ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[d0PM ][QIN.numberOfBCnodes] = 0.f;
- //Q.q27[d0MP ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[d000][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dPPP ][QIN.numberOfBCnodes] = 0.f;
- //Q.q27[dMMP ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dPMP ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dMPP ][QIN.numberOfBCnodes] = 0.f;
- //Q.q27[dPPM ][QIN.numberOfBCnodes] = 0.f;
- //Q.q27[dMMM ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dPMM ][QIN.numberOfBCnodes] = -1.f;
- //Q.q27[dMPM ][QIN.numberOfBCnodes] = 0.f;
-
- //Q.q27[dP00 ][QIN.numberOfBCnodes] = ON[dM00 ];
- //Q.q27[dM00 ][QIN.numberOfBCnodes] = ON[dP00 ];
- //Q.q27[d0P0 ][QIN.numberOfBCnodes] = ON[d0M0 ];
- //Q.q27[d0M0 ][QIN.numberOfBCnodes] = ON[d0P0 ];
- //Q.q27[d00P ][QIN.numberOfBCnodes] = ON[d00M ];
- //Q.q27[d00M ][QIN.numberOfBCnodes] = ON[d00P ];
- //Q.q27[dPP0 ][QIN.numberOfBCnodes] = ON[dMM0 ];
- //Q.q27[dMM0 ][QIN.numberOfBCnodes] = ON[dPP0 ];
- //Q.q27[dPM0 ][QIN.numberOfBCnodes] = ON[dMP0 ];
- //Q.q27[dMP0 ][QIN.numberOfBCnodes] = ON[dPM0 ];
- //Q.q27[dP0P ][QIN.numberOfBCnodes] = ON[dM0M ];
- //Q.q27[dM0M ][QIN.numberOfBCnodes] = ON[dP0P ];
- //Q.q27[dP0M ][QIN.numberOfBCnodes] = ON[dM0P ];
- //Q.q27[dM0P ][QIN.numberOfBCnodes] = ON[dP0M ];
- //Q.q27[d0PP ][QIN.numberOfBCnodes] = ON[d0MM ];
- //Q.q27[d0MM ][QIN.numberOfBCnodes] = ON[d0PP ];
- //Q.q27[d0PM ][QIN.numberOfBCnodes] = ON[d0MP ];
- //Q.q27[d0MP ][QIN.numberOfBCnodes] = ON[d0PM ];
- //Q.q27[d000][QIN.numberOfBCnodes] = ON[d000];
- //Q.q27[dPPP ][QIN.numberOfBCnodes] = ON[dMMM ];
- //Q.q27[dMMP ][QIN.numberOfBCnodes] = ON[dPPM ];
- //Q.q27[dPMP ][QIN.numberOfBCnodes] = ON[dMPM ];
- //Q.q27[dMPP ][QIN.numberOfBCnodes] = ON[dPMM ];
- //Q.q27[dPPM ][QIN.numberOfBCnodes] = ON[dMMP ];
- //Q.q27[dMMM ][QIN.numberOfBCnodes] = ON[dPPP ];
- //Q.q27[dPMM ][QIN.numberOfBCnodes] = ON[dMPP ];
- //Q.q27[dMPM ][QIN.numberOfBCnodes] = ON[dPMP ];
-
- Q.q27[dP00 ][QIN.numberOfBCnodes] = ON[dP00 ];
- Q.q27[dM00 ][QIN.numberOfBCnodes] = ON[dM00 ];
- Q.q27[d0P0 ][QIN.numberOfBCnodes] = ON[d0P0 ];
- Q.q27[d0M0 ][QIN.numberOfBCnodes] = ON[d0M0 ];
- Q.q27[d00P ][QIN.numberOfBCnodes] = ON[d00P ];
- Q.q27[d00M ][QIN.numberOfBCnodes] = ON[d00M ];
- Q.q27[dPP0 ][QIN.numberOfBCnodes] = ON[dPP0 ];
- Q.q27[dMM0 ][QIN.numberOfBCnodes] = ON[dMM0 ];
- Q.q27[dPM0 ][QIN.numberOfBCnodes] = ON[dPM0 ];
- Q.q27[dMP0 ][QIN.numberOfBCnodes] = ON[dMP0 ];
- Q.q27[dP0P ][QIN.numberOfBCnodes] = ON[dP0P ];
- Q.q27[dM0M ][QIN.numberOfBCnodes] = ON[dM0M ];
- Q.q27[dP0M ][QIN.numberOfBCnodes] = ON[dP0M ];
- Q.q27[dM0P ][QIN.numberOfBCnodes] = ON[dM0P ];
- Q.q27[d0PP ][QIN.numberOfBCnodes] = ON[d0PP ];
- Q.q27[d0MM ][QIN.numberOfBCnodes] = ON[d0MM ];
- Q.q27[d0PM ][QIN.numberOfBCnodes] = ON[d0PM ];
- Q.q27[d0MP ][QIN.numberOfBCnodes] = ON[d0MP ];
- Q.q27[d000][QIN.numberOfBCnodes] = ON[d000];
- Q.q27[dPPP ][QIN.numberOfBCnodes] = ON[dPPP ];
- Q.q27[dMMP ][QIN.numberOfBCnodes] = ON[dMMP ];
- Q.q27[dPMP ][QIN.numberOfBCnodes] = ON[dPMP ];
- Q.q27[dMPP ][QIN.numberOfBCnodes] = ON[dMPP ];
- Q.q27[dPPM ][QIN.numberOfBCnodes] = ON[dPPM ];
- Q.q27[dMMM ][QIN.numberOfBCnodes] = ON[dMMM ];
- Q.q27[dPMM ][QIN.numberOfBCnodes] = ON[dPMM ];
- Q.q27[dMPM ][QIN.numberOfBCnodes] = ON[dMPM ];
-
- QIN.numberOfBCnodes++;
- }
- }
- }
- }
- }
-}
-
-////////////////////////////////////////////////////////////////////////////////
-void findKforQ(Parameter* para, int lev)
-{
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
-
- VF_LOG_CRITICAL("findKforQ() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
- int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
- int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
- int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
- real ON[27];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m, mm, l;
- real test = (real)0.f;
- int nx = para->getParH(lev)->nx;
- int ny = para->getParH(lev)->ny;
- unsigned int nnx = para->getParH(lev)->gridNX;
- unsigned int nny = para->getParH(lev)->gridNY;
- unsigned int nnz = para->getParH(lev)->gridNZ;
- int* geo_mat = para->getParH(lev)->geo;
- QforBoundaryConditions &QIN = para->getParH(lev)->noSlipBC;
- QIN.numberOfBCnodes = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- for(k=STARTOFFZ + 1 ; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY + 1 ; j<=nny+STARTOFFY-2 ; j++){ //j<=nny/2+STARTOFFY //j<=STARTOFFY+1
- for(i=STARTOFFX + 1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- test =(real)0.f;
- for(l=0;l<=26;l++){
- mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if((geo_mat[mm] == GEO_SOLID) || (geo_mat[mm] == GEO_VOID)){
- ON[l] =(real) 1.f;
- }
- else{
- ON[l] = (real)0.f;
- }
- test += ON[l];
- }
- if (test>0)
- {
- QIN.numberOfBCnodes++;
- }
- }
- }
- }
- }
-}
-
-////////////////////////////////////////////////////////////////////////////////
-void findQ_MG( int nx, int ny, unsigned int nnx, unsigned int nny, unsigned int nnz, int* geo_mat, unsigned int* kk, unsigned int sizeQ, real* QQ, QforBoundaryConditions &QIN)
-{
- QforBoundaryConditions Q;
- Q.q27[dP00 ] = &QQ[dP00 *sizeQ];
- Q.q27[dM00 ] = &QQ[dM00 *sizeQ];
- Q.q27[d0P0 ] = &QQ[d0P0 *sizeQ];
- Q.q27[d0M0 ] = &QQ[d0M0 *sizeQ];
- Q.q27[d00P ] = &QQ[d00P *sizeQ];
- Q.q27[d00M ] = &QQ[d00M *sizeQ];
- Q.q27[dPP0 ] = &QQ[dPP0 *sizeQ];
- Q.q27[dMM0 ] = &QQ[dMM0 *sizeQ];
- Q.q27[dPM0 ] = &QQ[dPM0 *sizeQ];
- Q.q27[dMP0 ] = &QQ[dMP0 *sizeQ];
- Q.q27[dP0P ] = &QQ[dP0P *sizeQ];
- Q.q27[dM0M ] = &QQ[dM0M *sizeQ];
- Q.q27[dP0M ] = &QQ[dP0M *sizeQ];
- Q.q27[dM0P ] = &QQ[dM0P *sizeQ];
- Q.q27[d0PP ] = &QQ[d0PP *sizeQ];
- Q.q27[d0MM ] = &QQ[d0MM *sizeQ];
- Q.q27[d0PM ] = &QQ[d0PM *sizeQ];
- Q.q27[d0MP ] = &QQ[d0MP *sizeQ];
- Q.q27[d000] = &QQ[d000*sizeQ];
- Q.q27[dPPP ] = &QQ[dPPP *sizeQ];
- Q.q27[dMMP ] = &QQ[dMMP *sizeQ];
- Q.q27[dPMP ] = &QQ[dPMP *sizeQ];
- Q.q27[dMPP ] = &QQ[dMPP *sizeQ];
- Q.q27[dPPM ] = &QQ[dPPM *sizeQ];
- Q.q27[dMMM ] = &QQ[dMMM *sizeQ];
- Q.q27[dPMM ] = &QQ[dPMM *sizeQ];
- Q.q27[dMPM ] = &QQ[dMPM *sizeQ];
-
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
-
- VF_LOG_CRITICAL("findQ_MG() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
- int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
- int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
- int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
- real ON[27];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- unsigned int i, j, k, m, mm, l;
- int relx, rely, relz;
-
- unsigned int centerX = nnx / 2;
- unsigned int centerY = nny / 2;
- unsigned int centerZ = nnz / 2;
- real radius = nny / 2.56f;
-
- QIN.numberOfBCnodes = 0;
-
- for(k=STARTOFFZ+2 ; k<=nnz+STARTOFFZ-3 ; k++){
- for(j=STARTOFFY+2 ; j<=nny+STARTOFFY-3 ; j++){
- for(i=STARTOFFX +2; i<=nnx+STARTOFFX-3 ; i++){
- m = nx*(ny*k + j) + i;
- if((geo_mat[m] == GEO_SOLID) || (geo_mat[m] == GEO_VOID)){
- relx = i - STARTOFFX - centerX;
- rely = j - STARTOFFY - centerY;
- relz = k - STARTOFFZ - centerZ;
- ON[18] = (real)-1.f;
- for(l=0;l<=26;l++){
- mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if(geo_mat[mm] == GEO_FLUID){
- ON[l] = -(((real)ex[l]*(real)relx + (real)ey[l]*(real)rely + (real)ez[l]*(real)relz +
- sqrt(pow((real)ex[l]*(real)relx + (real)ey[l]*(real)rely + (real)ez[l]*(real)relz,2) +
- (pow((real)ex[l],2) + pow((real)ey[l],2) + pow((real)ez[l],2))*
- (pow(radius,2) - pow((real)relx,2) - pow((real)rely,2) -
- pow((real)relz,2))))/(pow((real)ex[l],2) + pow((real)ey[l],2) + pow((real)ez[l],2)));
-
- ON[18] = (real)1.f; //ZERO
- }
- else{
- ON[l] = (real)-1.f;
- }
- }
- if (ON[18]==1.f)
- {
- QIN.k[QIN.numberOfBCnodes] = kk[m];
-
- Q.q27[dP00 ][QIN.numberOfBCnodes] = ON[dP00 ];
- Q.q27[dM00 ][QIN.numberOfBCnodes] = ON[dM00 ];
- Q.q27[d0P0 ][QIN.numberOfBCnodes] = ON[d0P0 ];
- Q.q27[d0M0 ][QIN.numberOfBCnodes] = ON[d0M0 ];
- Q.q27[d00P ][QIN.numberOfBCnodes] = ON[d00P ];
- Q.q27[d00M ][QIN.numberOfBCnodes] = ON[d00M ];
- Q.q27[dPP0 ][QIN.numberOfBCnodes] = ON[dPP0 ];
- Q.q27[dMM0 ][QIN.numberOfBCnodes] = ON[dMM0 ];
- Q.q27[dPM0 ][QIN.numberOfBCnodes] = ON[dPM0 ];
- Q.q27[dMP0 ][QIN.numberOfBCnodes] = ON[dMP0 ];
- Q.q27[dP0P ][QIN.numberOfBCnodes] = ON[dP0P ];
- Q.q27[dM0M ][QIN.numberOfBCnodes] = ON[dM0M ];
- Q.q27[dP0M ][QIN.numberOfBCnodes] = ON[dP0M ];
- Q.q27[dM0P ][QIN.numberOfBCnodes] = ON[dM0P ];
- Q.q27[d0PP ][QIN.numberOfBCnodes] = ON[d0PP ];
- Q.q27[d0MM ][QIN.numberOfBCnodes] = ON[d0MM ];
- Q.q27[d0PM ][QIN.numberOfBCnodes] = ON[d0PM ];
- Q.q27[d0MP ][QIN.numberOfBCnodes] = ON[d0MP ];
- Q.q27[d000][QIN.numberOfBCnodes] = ON[d000];
- Q.q27[dPPP ][QIN.numberOfBCnodes] = ON[dPPP ];
- Q.q27[dMMP ][QIN.numberOfBCnodes] = ON[dMMP ];
- Q.q27[dPMP ][QIN.numberOfBCnodes] = ON[dPMP ];
- Q.q27[dMPP ][QIN.numberOfBCnodes] = ON[dMPP ];
- Q.q27[dPPM ][QIN.numberOfBCnodes] = ON[dPPM ];
- Q.q27[dMMM ][QIN.numberOfBCnodes] = ON[dMMM ];
- Q.q27[dPMM ][QIN.numberOfBCnodes] = ON[dPMM ];
- Q.q27[dMPM ][QIN.numberOfBCnodes] = ON[dMPM ];
-
- QIN.numberOfBCnodes++;
- }
- }
- }
- }
- }
-}
-
-////////////////////////////////////////////////////////////////////////////////
-void findKforQ_MG(int nx, int ny, unsigned int nnx, unsigned int nny, unsigned int nnz, int* geo_mat, QforBoundaryConditions &QIN)
-{
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
-
- VF_LOG_CRITICAL("findKforQ_MG() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
- int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
- int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
- int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
- real ON[27];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- unsigned int i, j, k, m, mm, l;
- real test = (real)0.f;
-
- QIN.numberOfBCnodes = 0;
-
- for(k=STARTOFFZ+2 ; k<=nnz+STARTOFFZ-3 ; k++){
- for(j=STARTOFFY+2 ; j<=nny+STARTOFFY-3 ; j++){
- for(i=STARTOFFX +2; i<=nnx+STARTOFFX-3 ; i++){
- m = nx*(ny*k + j) + i;
- if((geo_mat[m] == GEO_SOLID) || (geo_mat[m] == GEO_VOID)){
- test =(real)0.f;
- for(l=0;l<=26;l++){
- mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if(geo_mat[mm] == GEO_FLUID){
- ON[l] = (real)1.f;
- }
- else{
- ON[l] = (real)0.f;
- }
- test += ON[l];
- }
- if (test>0)
- {
- QIN.numberOfBCnodes++;
- }
- }
- }
- }
- }
-}
-
-////////////////////////////////////////////////////////////////////////////////
-void findQInflow(Parameter* para)
-{
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
- VF_LOG_CRITICAL("findQInflow() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m;//, mm, l;
- //int nx = para->getParH(para->getFine())->nx;
- //int ny = para->getParH(para->getFine())->ny;
- //unsigned int nnx = para->getParH(para->getFine())->gridNX;
- //unsigned int nny = para->getParH(para->getFine())->gridNY;
- //unsigned int nnz = para->getParH(para->getFine())->gridNZ;
- //int* geo_mat = para->getParH(para->getFine())->geo;
- //unsigned int* kk = para->getParH(para->getFine())->k;
- int nx = para->getParH(para->getCoarse())->nx;
- int ny = para->getParH(para->getCoarse())->ny;
- unsigned int nnx = para->getParH(para->getCoarse())->gridNX;
- unsigned int nny = para->getParH(para->getCoarse())->gridNY;
- unsigned int nnz = para->getParH(para->getCoarse())->gridNZ;
- int* geo_mat = para->getParH(para->getCoarse())->geo;
- unsigned int* kk = para->getParH(para->getCoarse())->k;
- unsigned int sizeQ = para->getParH(para->getCoarse())->velocityBC.numberOfBCnodes;
- //real* rhoBC = para->getParH(para->getCoarse())->velocityBC.RhoBC;
- real u0 = para->getVelocity();
- real* vx = para->getParH(para->getCoarse())->velocityBC.Vx;
- real* vy = para->getParH(para->getCoarse())->velocityBC.Vy;
- real* vz = para->getParH(para->getCoarse())->velocityBC.Vz;
- real*deltaVz = para->getParH(para->getCoarse())->velocityBC.deltaVz;
- real* QQ = para->getParH(para->getCoarse())->velocityBC.q27[0];
- QforBoundaryConditions &QIN = para->getParH(para->getCoarse())->velocityBC;
- //unsigned int nxny = nx*ny;
- QIN.numberOfBCnodes = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- QforBoundaryConditions Q;
- Q.q27[dP00 ] = &QQ[dP00 *sizeQ];
- Q.q27[dM00 ] = &QQ[dM00 *sizeQ];
- Q.q27[d0P0 ] = &QQ[d0P0 *sizeQ];
- Q.q27[d0M0 ] = &QQ[d0M0 *sizeQ];
- Q.q27[d00P ] = &QQ[d00P *sizeQ];
- Q.q27[d00M ] = &QQ[d00M *sizeQ];
- Q.q27[dPP0 ] = &QQ[dPP0 *sizeQ];
- Q.q27[dMM0 ] = &QQ[dMM0 *sizeQ];
- Q.q27[dPM0 ] = &QQ[dPM0 *sizeQ];
- Q.q27[dMP0 ] = &QQ[dMP0 *sizeQ];
- Q.q27[dP0P ] = &QQ[dP0P *sizeQ];
- Q.q27[dM0M ] = &QQ[dM0M *sizeQ];
- Q.q27[dP0M ] = &QQ[dP0M *sizeQ];
- Q.q27[dM0P ] = &QQ[dM0P *sizeQ];
- Q.q27[d0PP ] = &QQ[d0PP *sizeQ];
- Q.q27[d0MM ] = &QQ[d0MM *sizeQ];
- Q.q27[d0PM ] = &QQ[d0PM *sizeQ];
- Q.q27[d0MP ] = &QQ[d0MP *sizeQ];
- Q.q27[d000] = &QQ[d000*sizeQ];
- Q.q27[dPPP ] = &QQ[dPPP *sizeQ];
- Q.q27[dMMP ] = &QQ[dMMP *sizeQ];
- Q.q27[dPMP ] = &QQ[dPMP *sizeQ];
- Q.q27[dMPP ] = &QQ[dMPP *sizeQ];
- Q.q27[dPPM ] = &QQ[dPPM *sizeQ];
- Q.q27[dMMM ] = &QQ[dMMM *sizeQ];
- Q.q27[dPMM ] = &QQ[dPMM *sizeQ];
- Q.q27[dMPM ] = &QQ[dMPM *sizeQ];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //unsigned int li = ((nnx+STARTOFFX-2)-(STARTOFFX+1)-1);
- //unsigned int lj = ((nny+STARTOFFY-2)-(STARTOFFY+1)-1);
-
- //k = STARTOFFZ + 1;
- k = nnz+STARTOFFZ - 1/*3*/;
-
- for(j=STARTOFFY/*+1*/ ; j<=nny+STARTOFFY/*-2*/ ; j++){
- for(i=STARTOFFX/*+1*/; i<=nnx+STARTOFFX/*-2*/ ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- QIN.k[QIN.numberOfBCnodes] = kk[m];
- //vx[QIN.numberOfBCnodes] = (real)0.f;
- vx[QIN.numberOfBCnodes] = u0;
- vy[QIN.numberOfBCnodes] = (real)0.f;
- vz[QIN.numberOfBCnodes] = (real)0.f;
- //vz[QIN.numberOfBCnodes] = u0;
- //vz[QIN.numberOfBCnodes] = (real)(u0*2.f)*((-4.f*i*i + nnx*(-2.f - 4.f*STARTOFFX) - 4.f*(-1.5f + STARTOFFX)*(0.5f + STARTOFFX) + i*(-4.f + 4.f*nnx + 8.f*STARTOFFX))*(-4.f*j*j + nny*(-2.f - 4.f*STARTOFFY) - 4.f*(-1.5f + STARTOFFY)*(0.5f + STARTOFFY) + j*(-4.f + 4.f*nny + 8.f*STARTOFFY)))/((2.f - nnx)*(2.f - nnx)*(2.f - nny)*(2.f - nny));
- //vz[QIN.numberOfBCnodes] = (real)(16.f*(u0*2.f)*(i-(STARTOFFX+1)-0.5f)*(li-1.5f-(i-(STARTOFFX+1)))*(j-(STARTOFFY+1)-0.5f)*(lj-1.5f-(j-(STARTOFFY+1))))/(li*lj*li*lj);
- //vz[QIN.numberOfBCnodes] = (real)(16.f*(u0*2.f)*i*j*(nx-i)*(ny-j))/(nx*nx*ny*ny);
- deltaVz[QIN.numberOfBCnodes] = (real)0.f;
- //////////////////////////////////////////////////////////////////////////
- //Q.q27[dP00 ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[dM00 ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[d0P0 ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[d0M0 ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[d00P ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[d00M ][QIN.numberOfBCnodes] = (real)1.f;
- //Q.q27[dPP0 ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[dMM0 ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[dPM0 ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[dMP0 ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[dP0P ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[dM0M ][QIN.numberOfBCnodes] = (real)1.f;
- //Q.q27[dP0M ][QIN.numberOfBCnodes] = (real)1.f;
- //Q.q27[dM0P ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[d0PP ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[d0MM ][QIN.numberOfBCnodes] = (real)1.f;
- //Q.q27[d0PM ][QIN.numberOfBCnodes] = (real)1.f;
- //Q.q27[d0MP ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[d000][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[dPPP ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[dMMP ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[dPMP ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[dMPP ][QIN.numberOfBCnodes] = (real)-1.f;
- //Q.q27[dPPM ][QIN.numberOfBCnodes] = (real)1.f;
- //Q.q27[dMMM ][QIN.numberOfBCnodes] = (real)1.f;
- //Q.q27[dPMM ][QIN.numberOfBCnodes] = (real)1.f;
- //Q.q27[dMPM ][QIN.numberOfBCnodes] = (real)1.f;
- //////////////////////////////////////////////////////////////////////////
-
-
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
-
- Q.q27[dP00 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dM00 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0P0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0M0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d00P ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[d00M ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPP0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMM0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPM0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMP0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dP0P ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dM0M ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dP0M ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dM0P ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[d0PP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[d0MM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0PM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0MP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[d000][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPPP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dMMP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dPMP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dMPP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dPPM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMMM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPMM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMPM ][QIN.numberOfBCnodes] = (real)-1.f;
- //////////////////////////////////////////////////////////////////////////
- QIN.numberOfBCnodes++;
- }
- }
- }
- //k = STARTOFFZ +2;
- //{
- // for(j=STARTOFFY ; j<=nny+STARTOFFY-1 ; j++){
- // for(i=STARTOFFX; i<=nnx+STARTOFFX-1 ; i++){
- // m = nx*(ny*k + j) + i;
- // if(geo_mat[m]==GEO_FLUID){
- // ON[18] = -1.f;
- // for(l=0;l<=26;l++){
- // mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- // if(ez[l]==-1){
- // ON[l] = 1.f;
-
- // ON[18] = 1.f; //ZERO
- // }
- // else{
- // ON[l] = -1.f;
- // }
- // }
- // if (ON[18]==1.f)
- // {
- // QIN.k[QIN.numberOfBCnodes] = m;
- // vx[QIN.numberOfBCnodes] = 0.f;
- // vy[QIN.numberOfBCnodes] = 0.f;
- // vz[QIN.numberOfBCnodes] = u0;
-
- // Q.q27[dP00 ][QIN.numberOfBCnodes] = ON[dP00 ];
- // Q.q27[dM00 ][QIN.numberOfBCnodes] = ON[dM00 ];
- // Q.q27[d0P0 ][QIN.numberOfBCnodes] = ON[d0P0 ];
- // Q.q27[d0M0 ][QIN.numberOfBCnodes] = ON[d0M0 ];
- // Q.q27[d00P ][QIN.numberOfBCnodes] = ON[d00P ];
- // Q.q27[d00M ][QIN.numberOfBCnodes] = ON[d00M ];
- // Q.q27[dPP0 ][QIN.numberOfBCnodes] = ON[dPP0 ];
- // Q.q27[dMM0 ][QIN.numberOfBCnodes] = ON[dMM0 ];
- // Q.q27[dPM0 ][QIN.numberOfBCnodes] = ON[dPM0 ];
- // Q.q27[dMP0 ][QIN.numberOfBCnodes] = ON[dMP0 ];
- // Q.q27[dP0P ][QIN.numberOfBCnodes] = ON[dP0P ];
- // Q.q27[dM0M ][QIN.numberOfBCnodes] = ON[dM0M ];
- // Q.q27[dP0M ][QIN.numberOfBCnodes] = ON[dP0M ];
- // Q.q27[dM0P ][QIN.numberOfBCnodes] = ON[dM0P ];
- // Q.q27[d0PP ][QIN.numberOfBCnodes] = ON[d0PP ];
- // Q.q27[d0MM ][QIN.numberOfBCnodes] = ON[d0MM ];
- // Q.q27[d0PM ][QIN.numberOfBCnodes] = ON[d0PM ];
- // Q.q27[d0MP ][QIN.numberOfBCnodes] = ON[d0MP ];
- // Q.q27[d000][QIN.numberOfBCnodes] = ON[d000];
- // Q.q27[dPPP ][QIN.numberOfBCnodes] = ON[dPPP ];
- // Q.q27[dMMP ][QIN.numberOfBCnodes] = ON[dMMP ];
- // Q.q27[dPMP ][QIN.numberOfBCnodes] = ON[dPMP ];
- // Q.q27[dMPP ][QIN.numberOfBCnodes] = ON[dMPP ];
- // Q.q27[dPPM ][QIN.numberOfBCnodes] = ON[dPPM ];
- // Q.q27[dMMM ][QIN.numberOfBCnodes] = ON[dMMM ];
- // Q.q27[dPMM ][QIN.numberOfBCnodes] = ON[dPMM ];
- // Q.q27[dMPM ][QIN.numberOfBCnodes] = ON[dMPM ];
-
- // QIN.numberOfBCnodes++;
- // }
- // }
- // }
- // }
- //}
-
- //for(k=STARTOFFZ ; k<=nnz+STARTOFFZ-1 ; k++){
- // for(j=STARTOFFY ; j<=nny+STARTOFFY-1 ; j++){
- // for(i=STARTOFFX; i<=nnx+STARTOFFX-1 ; i++){
- // m = nx*(ny*k + j) + i;
- // if(geo_mat[m]==GEO_FLUID){
- // ON[18] = -1.f;
- // for(l=0;l<=26;l++){
- // mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- // if(geo_mat[mm] == GEO_VELO){
- // ON[l] = 1.f;
-
- // ON[18] = 1.f; //ZERO
- // }
- // else{
- // ON[l] = -1.f;
- // }
- // }
- // if (ON[18]==1.f)
- // {
- // QIN.k[QIN.numberOfBCnodes] = m;
- // vx[QIN.numberOfBCnodes] = u0;//0.f;
- // vy[QIN.numberOfBCnodes] = 0.f;
- // vz[QIN.numberOfBCnodes] = 0.f;//u0;
-
- // Q.q27[dP00 ][QIN.numberOfBCnodes] = ON[dP00 ];
- // Q.q27[dM00 ][QIN.numberOfBCnodes] = ON[dM00 ];
- // Q.q27[d0P0 ][QIN.numberOfBCnodes] = ON[d0P0 ];
- // Q.q27[d0M0 ][QIN.numberOfBCnodes] = ON[d0M0 ];
- // Q.q27[d00P ][QIN.numberOfBCnodes] = ON[d00P ];
- // Q.q27[d00M ][QIN.numberOfBCnodes] = ON[d00M ];
- // Q.q27[dPP0 ][QIN.numberOfBCnodes] = ON[dPP0 ];
- // Q.q27[dMM0 ][QIN.numberOfBCnodes] = ON[dMM0 ];
- // Q.q27[dPM0 ][QIN.numberOfBCnodes] = ON[dPM0 ];
- // Q.q27[dMP0 ][QIN.numberOfBCnodes] = ON[dMP0 ];
- // Q.q27[dP0P ][QIN.numberOfBCnodes] = ON[dP0P ];
- // Q.q27[dM0M ][QIN.numberOfBCnodes] = ON[dM0M ];
- // Q.q27[dP0M ][QIN.numberOfBCnodes] = ON[dP0M ];
- // Q.q27[dM0P ][QIN.numberOfBCnodes] = ON[dM0P ];
- // Q.q27[d0PP ][QIN.numberOfBCnodes] = ON[d0PP ];
- // Q.q27[d0MM ][QIN.numberOfBCnodes] = ON[d0MM ];
- // Q.q27[d0PM ][QIN.numberOfBCnodes] = ON[d0PM ];
- // Q.q27[d0MP ][QIN.numberOfBCnodes] = ON[d0MP ];
- // Q.q27[d000][QIN.numberOfBCnodes] = ON[d000];
- // Q.q27[dPPP ][QIN.numberOfBCnodes] = ON[dPPP ];
- // Q.q27[dMMP ][QIN.numberOfBCnodes] = ON[dMMP ];
- // Q.q27[dPMP ][QIN.numberOfBCnodes] = ON[dPMP ];
- // Q.q27[dMPP ][QIN.numberOfBCnodes] = ON[dMPP ];
- // Q.q27[dPPM ][QIN.numberOfBCnodes] = ON[dPPM ];
- // Q.q27[dMMM ][QIN.numberOfBCnodes] = ON[dMMM ];
- // Q.q27[dPMM ][QIN.numberOfBCnodes] = ON[dPMM ];
- // Q.q27[dMPM ][QIN.numberOfBCnodes] = ON[dMPM ];
-
- // QIN.numberOfBCnodes++;
- // }
- // }
- // }
- // }
- //}
-}
-
-////////////////////////////////////////////////////////////////////////////////
-void findKforQInflow(Parameter* para)
-{
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
- VF_LOG_CRITICAL("findKforQInflow() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
- //int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
- //int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
- int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
- real ON[27];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //unsigned int mm;
- unsigned int i, j, k, m, l;
- real test = 0.f;
- //int nx = para->getParH(para->getFine())->nx;
- //int ny = para->getParH(para->getFine())->ny;
- //unsigned int nnx = para->getParH(para->getFine())->gridNX;
- //unsigned int nny = para->getParH(para->getFine())->gridNY;
- //unsigned int nnz = para->getParH(para->getFine())->gridNZ;
- //int* geo_mat = para->getParH(para->getFine())->geo;
- int nx = para->getParH(para->getCoarse())->nx;
- int ny = para->getParH(para->getCoarse())->ny;
- unsigned int nnx = para->getParH(para->getCoarse())->gridNX;
- unsigned int nny = para->getParH(para->getCoarse())->gridNY;
- unsigned int nnz = para->getParH(para->getCoarse())->gridNZ;
- int* geo_mat = para->getParH(para->getCoarse())->geo;
- QforBoundaryConditions &QIN = para->getParH(para->getCoarse())->velocityBC;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- QIN.numberOfBCnodes = 0;
-
- k=nnz+STARTOFFZ-1/*3*/;
- //k=STARTOFFZ+1;
- {
- for(j=STARTOFFY/*+1*/ ; j<=nny+STARTOFFY/*-2*/ ; j++){
- for(i=STARTOFFX/*+1*/; i<=nnx+STARTOFFX/*-2*/ ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- test = (real)0.f;
- for(l=0;l<=26;l++){
- //mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if(ez[l]==1/*-1*/){
- ON[l] = (real) 1.f;
- }
- else{
- ON[l] = (real) 0.f;
- }
- test += ON[l];
- }
- if (test>0)
- {
- QIN.numberOfBCnodes++;
- }
- }
- }
- }
- }
-
- //for(k=STARTOFFZ ; k<=nnz+STARTOFFZ-1 ; k++){
- // for(j=STARTOFFY ; j<=nny+STARTOFFY-1 ; j++){
- // for(i=STARTOFFX; i<=nnx+STARTOFFX-1 ; i++){
- // m = nx*(ny*k + j) + i;
- // if(geo_mat[m]==GEO_FLUID){
- // test =0.f;
- // for(l=0;l<=26;l++){
- // mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- // if(geo_mat[mm] == GEO_VELO){
- // ON[l] = 1.f;
- // }
- // else{
- // ON[l] = 0.f;
- // }
- // test += ON[l];
- // }
- // if (test>0)
- // {
- // QIN.numberOfBCnodes++;
- // }
- // }
- // }
- // }
- //}
-}
-
-
-////////////////////////////////////////////////////////////////////////////////
-void findQOutflow(Parameter* para)
-{
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
- VF_LOG_CRITICAL("findQOutflow() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
- //int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
- //int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
- //int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
- //real ON[27];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m;//, mm, l;
- //int nx = para->getParH(para->getFine())->nx;
- //int ny = para->getParH(para->getFine())->ny;
- //unsigned int nnx = para->getParH(para->getFine())->gridNX;
- //unsigned int nny = para->getParH(para->getFine())->gridNY;
- //unsigned int nnz = para->getParH(para->getFine())->gridNZ;
- //int* geo_mat = para->getParH(para->getFine())->geo;
- //unsigned int* kk = para->getParH(para->getFine())->k;
- int nx = para->getParH(para->getCoarse())->nx;
- int ny = para->getParH(para->getCoarse())->ny;
- unsigned int nnx = para->getParH(para->getCoarse())->gridNX;
- unsigned int nny = para->getParH(para->getCoarse())->gridNY;
- unsigned int nnz = para->getParH(para->getCoarse())->gridNZ;
- int* geo_mat = para->getParH(para->getCoarse())->geo;
- unsigned int* kk = para->getParH(para->getCoarse())->k;
- unsigned int sizeQ = para->getParH(para->getCoarse())->outflowBC.numberOfBCnodes;
- real* rhoBC = para->getParH(para->getCoarse())->outflowBC.RhoBC;
- real u0 = para->getVelocity();
- real* vx = para->getParH(para->getCoarse())->outflowBC.Vx;
- real* vy = para->getParH(para->getCoarse())->outflowBC.Vy;
- real* vz = para->getParH(para->getCoarse())->outflowBC.Vz;
- real*deltaVz = para->getParH(para->getCoarse())->outflowBC.deltaVz;
- real* QQ = para->getParH(para->getCoarse())->outflowBC.q27[0];
- QforBoundaryConditions &QIN = para->getParH(para->getCoarse())->outflowBC;
- unsigned int nxny = nx*ny;
- QIN.numberOfBCnodes = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- QforBoundaryConditions Q;
- Q.q27[dP00 ] = &QQ[dP00 *sizeQ];
- Q.q27[dM00 ] = &QQ[dM00 *sizeQ];
- Q.q27[d0P0 ] = &QQ[d0P0 *sizeQ];
- Q.q27[d0M0 ] = &QQ[d0M0 *sizeQ];
- Q.q27[d00P ] = &QQ[d00P *sizeQ];
- Q.q27[d00M ] = &QQ[d00M *sizeQ];
- Q.q27[dPP0 ] = &QQ[dPP0 *sizeQ];
- Q.q27[dMM0 ] = &QQ[dMM0 *sizeQ];
- Q.q27[dPM0 ] = &QQ[dPM0 *sizeQ];
- Q.q27[dMP0 ] = &QQ[dMP0 *sizeQ];
- Q.q27[dP0P ] = &QQ[dP0P *sizeQ];
- Q.q27[dM0M ] = &QQ[dM0M *sizeQ];
- Q.q27[dP0M ] = &QQ[dP0M *sizeQ];
- Q.q27[dM0P ] = &QQ[dM0P *sizeQ];
- Q.q27[d0PP ] = &QQ[d0PP *sizeQ];
- Q.q27[d0MM ] = &QQ[d0MM *sizeQ];
- Q.q27[d0PM ] = &QQ[d0PM *sizeQ];
- Q.q27[d0MP ] = &QQ[d0MP *sizeQ];
- Q.q27[d000] = &QQ[d000*sizeQ];
- Q.q27[dPPP ] = &QQ[dPPP *sizeQ];
- Q.q27[dMMP ] = &QQ[dMMP *sizeQ];
- Q.q27[dPMP ] = &QQ[dPMP *sizeQ];
- Q.q27[dMPP ] = &QQ[dMPP *sizeQ];
- Q.q27[dPPM ] = &QQ[dPPM *sizeQ];
- Q.q27[dMMM ] = &QQ[dMMM *sizeQ];
- Q.q27[dPMM ] = &QQ[dPMM *sizeQ];
- Q.q27[dMPM ] = &QQ[dMPM *sizeQ];
-
-
- //unsigned int li = ((nnx+STARTOFFX-2)-(STARTOFFX+1)-1);
- //unsigned int lj = ((nny+STARTOFFY-2)-(STARTOFFY+1)-1);
-
- k = nnz + STARTOFFZ - 3;
-
- for(j=STARTOFFY+1 ; j<=nny+STARTOFFY-2 ; j++){
- for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- QIN.k[QIN.numberOfBCnodes] = kk[m];
- QIN.kN[QIN.numberOfBCnodes] = kk[m-nxny];
- rhoBC[QIN.numberOfBCnodes] = (real)0.f;
- vx[QIN.numberOfBCnodes] = (real)0.f;
- vy[QIN.numberOfBCnodes] = (real)0.f;
- //vz[QIN.numberOfBCnodes] = u0;
- vz[QIN.numberOfBCnodes] = (real)(u0*2.f)*((-4.f*i*i + nnx*(-2.f - 4.f*STARTOFFX) - 4.f*(-1.5f + STARTOFFX)*(0.5f + STARTOFFX) + i*(-4.f + 4.f*nnx + 8.f*STARTOFFX))*(-4.f*j*j + nny*(-2.f - 4.f*STARTOFFY) - 4.f*(-1.5f + STARTOFFY)*(0.5f + STARTOFFY) + j*(-4.f + 4.f*nny + 8.f*STARTOFFY)))/((2.f - nnx)*(2.f - nnx)*(2.f - nny)*(2.f - nny));
- //vz[QIN.numberOfBCnodes] = (real)(16.f*(u0*2.f)*(i-(STARTOFFX+1)-0.5f)*(li-1.5f-(i-(STARTOFFX+1)))*(j-(STARTOFFY+1)-0.5f)*(lj-1.5f-(j-(STARTOFFY+1))))/(li*lj*li*lj);
- //vz[QIN.numberOfBCnodes] = (real)(16.f*(u0*2.f)*i*j*(nx-i)*(ny-j))/(nx*nx*ny*ny);
- deltaVz[QIN.numberOfBCnodes] = (real)0.f;
- Q.q27[dP00 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dM00 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0P0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0M0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d00P ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[d00M ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPP0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMM0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPM0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMP0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dP0P ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dM0M ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dP0M ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dM0P ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[d0PP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[d0MM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0PM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0MP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[d000][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPPP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dMMP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dPMP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dMPP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dPPM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMMM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPMM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMPM ][QIN.numberOfBCnodes] = (real)-1.f;
- QIN.numberOfBCnodes++;
- }
- }
- }
-
- //i = nnx / 2 + STARTOFFX;
- //j = nny / 2 + STARTOFFY;
- //k = nnz / 2 + STARTOFFZ;
- //QIN.numberOfBCnodes = 0;
- //rhoBC[QIN.numberOfBCnodes] = 0.1f;
- //QIN.numberOfBCnodes++;
-
-}
-
-////////////////////////////////////////////////////////////////////////////////
-void findKforQOutflow(Parameter* para)
-{
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
- VF_LOG_CRITICAL("findKforQOutflow() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
- //int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
- //int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
- int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
- real ON[27];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //unsigned int mm;
- unsigned int i, j, k, m, l;
- real test = (real) 0.f;
- //int nx = para->getParH(para->getFine())->nx;
- //int ny = para->getParH(para->getFine())->ny;
- //unsigned int nnx = para->getParH(para->getFine())->gridNX;
- //unsigned int nny = para->getParH(para->getFine())->gridNY;
- //unsigned int nnz = para->getParH(para->getFine())->gridNZ;
- //int* geo_mat = para->getParH(para->getFine())->geo;
- int nx = para->getParH(para->getCoarse())->nx;
- int ny = para->getParH(para->getCoarse())->ny;
- unsigned int nnx = para->getParH(para->getCoarse())->gridNX;
- unsigned int nny = para->getParH(para->getCoarse())->gridNY;
- unsigned int nnz = para->getParH(para->getCoarse())->gridNZ;
- int* geo_mat = para->getParH(para->getCoarse())->geo;
- QforBoundaryConditions &QIN = para->getParH(para->getCoarse())->outflowBC;
- QIN.numberOfBCnodes = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- k=nnz+STARTOFFZ-3;
- {
- for(j=STARTOFFY+1 ; j<=nny+STARTOFFY-2 ; j++){
- for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- test = (real)0.f;
- for(l=0;l<=26;l++){
- //mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if(ez[l]==1){
- ON[l] = (real) 1.f;
- }
- else{
- ON[l] = (real) 0.f;
- }
- test += ON[l];
- }
- if (test>0)
- {
- QIN.numberOfBCnodes++;
- }
- }
- }
- }
- }
-
- //QIN.numberOfBCnodes = 0;
- //QIN.numberOfBCnodes++;
-
-}
-// TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
-//////////////////////////////////////////////////////////////////////////////////
-//void findQSchlaff( int nx, int ny, unsigned int nnx, unsigned int nny, unsigned int nnz, int* geo_mat, unsigned int* kk,
-// unsigned int sizeQN, real* vxN, real* vyN, real* vzN, real*deltaVN, real* QQN, QforBoundaryConditions &QNin,
-// unsigned int sizeQS, real* vxS, real* vyS, real* vzS, real*deltaVS, real* QQS, QforBoundaryConditions &QSin,
-// unsigned int sizeQE, real* vxE, real* vyE, real* vzE, real*deltaVE, real* QQE, QforBoundaryConditions &QEin,
-// unsigned int sizeQW, real* vxW, real* vyW, real* vzW, real*deltaVW, real* QQW, QforBoundaryConditions &QWin)
-//{
-// QforBoundaryConditions QN;
-// QN.q27[dP00 ] = &QQN[dP00 *sizeQN];
-// QN.q27[dM00 ] = &QQN[dM00 *sizeQN];
-// QN.q27[d0P0 ] = &QQN[d0P0 *sizeQN];
-// QN.q27[d0M0 ] = &QQN[d0M0 *sizeQN];
-// QN.q27[d00P ] = &QQN[d00P *sizeQN];
-// QN.q27[d00M ] = &QQN[d00M *sizeQN];
-// QN.q27[dPP0 ] = &QQN[dPP0 *sizeQN];
-// QN.q27[dMM0 ] = &QQN[dMM0 *sizeQN];
-// QN.q27[dPM0 ] = &QQN[dPM0 *sizeQN];
-// QN.q27[dMP0 ] = &QQN[dMP0 *sizeQN];
-// QN.q27[dP0P ] = &QQN[dP0P *sizeQN];
-// QN.q27[dM0M ] = &QQN[dM0M *sizeQN];
-// QN.q27[dP0M ] = &QQN[dP0M *sizeQN];
-// QN.q27[dM0P ] = &QQN[dM0P *sizeQN];
-// QN.q27[d0PP ] = &QQN[d0PP *sizeQN];
-// QN.q27[d0MM ] = &QQN[d0MM *sizeQN];
-// QN.q27[d0PM ] = &QQN[d0PM *sizeQN];
-// QN.q27[d0MP ] = &QQN[d0MP *sizeQN];
-// QN.q27[d000] = &QQN[d000*sizeQN];
-// QN.q27[dPPP ] = &QQN[dPPP *sizeQN];
-// QN.q27[dMMP ] = &QQN[dMMP *sizeQN];
-// QN.q27[dPMP ] = &QQN[dPMP *sizeQN];
-// QN.q27[dMPP ] = &QQN[dMPP *sizeQN];
-// QN.q27[dPPM ] = &QQN[dPPM *sizeQN];
-// QN.q27[dMMM ] = &QQN[dMMM *sizeQN];
-// QN.q27[dPMM ] = &QQN[dPMM *sizeQN];
-// QN.q27[dMPM ] = &QQN[dMPM *sizeQN];
-//
-// ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-// ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
-// int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
-// int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
-// int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
-// //real ON[27];
-// ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-//}
-//
-//////////////////////////////////////////////////////////////////////////////////
-//void findKforQSchlaff(int nx, int ny, unsigned int nnx, unsigned int nny, unsigned int nnz, int* geo_mat,
-// QforBoundaryConditions &QN, QforBoundaryConditions &QS, QforBoundaryConditions &QE, QforBoundaryConditions &QW)
-//{
-// ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-// ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
-// int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
-// int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
-// int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
-// real ON[27];
-// ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-// unsigned int i, j, k, m, mm, l;
-// real test = (real) 0.f;
-//
-// QN.numberOfBCnodes = 0;
-// QS.numberOfBCnodes = 0;
-// QE.numberOfBCnodes = 0;
-// QW.numberOfBCnodes = 0;
-//
-// for(k=STARTOFFZ+1 ; k<=nnz+STARTOFFZ-2 ; k++){
-// for(j=STARTOFFY+1 ; j<=nny+STARTOFFY-2 ; j++){
-// for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
-// m = nx*(ny*k + j) + i;
-// if(geo_mat[m]==GEO_FLUID){
-// test = (real)0.f;
-// for(l=0;l<=26;l++){
-// mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
-// if(ez[l]==1){
-// ON[l] = (real) 1.f;
-// }
-// else{
-// ON[l] = (real) 0.f;
-// }
-// test += ON[l];
-// }
-// if (test>0)
-// {
-// QN.numberOfBCnodes++;
-// }
-// }
-// }
-// }
-// }
-//}
-
-
-
-////////////////////////////////////////////////////////////////////////////////
-void findQPressX0(Parameter* para, int lev)
-{
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
- VF_LOG_CRITICAL("findKforQPressX0() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
- //int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
- //int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
- //int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m;
- int nx = para->getParH(lev)->nx;
- int ny = para->getParH(lev)->ny;
- unsigned int nnx = para->getParH(lev)->gridNX;
- unsigned int nny = para->getParH(lev)->gridNY;
- unsigned int nnz = para->getParH(lev)->gridNZ;
- int* geo_mat = para->getParH(lev)->geo;
- unsigned int* kk = para->getParH(lev)->k;
- //unsigned int sizeQ = para->getParH(lev)->outflowBC.numberOfBCnodes;
- unsigned int sizeQ = para->getParH(lev)->QpressX0.numberOfBCnodes;
- real* rhoBC = para->getParH(lev)->QpressX0.RhoBC;
- real u0 = para->getVelocity();
- real* vx = para->getParH(lev)->QpressX0.Vx;
- real* vy = para->getParH(lev)->QpressX0.Vy;
- real* vz = para->getParH(lev)->QpressX0.Vz;
- real*deltaVz = para->getParH(lev)->QpressX0.deltaVz;
- real* QQ = para->getParH(lev)->QpressX0.q27[0];
- QforBoundaryConditions &QIN = para->getParH(lev)->QpressX0;
- //unsigned int nxny = nx*ny;
- QIN.numberOfBCnodes = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- QforBoundaryConditions Q;
- Q.q27[dP00 ] = &QQ[dP00 *sizeQ];
- Q.q27[dM00 ] = &QQ[dM00 *sizeQ];
- Q.q27[d0P0 ] = &QQ[d0P0 *sizeQ];
- Q.q27[d0M0 ] = &QQ[d0M0 *sizeQ];
- Q.q27[d00P ] = &QQ[d00P *sizeQ];
- Q.q27[d00M ] = &QQ[d00M *sizeQ];
- Q.q27[dPP0 ] = &QQ[dPP0 *sizeQ];
- Q.q27[dMM0 ] = &QQ[dMM0 *sizeQ];
- Q.q27[dPM0 ] = &QQ[dPM0 *sizeQ];
- Q.q27[dMP0 ] = &QQ[dMP0 *sizeQ];
- Q.q27[dP0P ] = &QQ[dP0P *sizeQ];
- Q.q27[dM0M ] = &QQ[dM0M *sizeQ];
- Q.q27[dP0M ] = &QQ[dP0M *sizeQ];
- Q.q27[dM0P ] = &QQ[dM0P *sizeQ];
- Q.q27[d0PP ] = &QQ[d0PP *sizeQ];
- Q.q27[d0MM ] = &QQ[d0MM *sizeQ];
- Q.q27[d0PM ] = &QQ[d0PM *sizeQ];
- Q.q27[d0MP ] = &QQ[d0MP *sizeQ];
- Q.q27[d000] = &QQ[d000*sizeQ];
- Q.q27[dPPP ] = &QQ[dPPP *sizeQ];
- Q.q27[dMMP ] = &QQ[dMMP *sizeQ];
- Q.q27[dPMP ] = &QQ[dPMP *sizeQ];
- Q.q27[dMPP ] = &QQ[dMPP *sizeQ];
- Q.q27[dPPM ] = &QQ[dPPM *sizeQ];
- Q.q27[dMMM ] = &QQ[dMMM *sizeQ];
- Q.q27[dPMM ] = &QQ[dPMM *sizeQ];
- Q.q27[dMPM ] = &QQ[dMPM *sizeQ];
-
-
- //unsigned int li = ((nnx+STARTOFFX-2)-(STARTOFFX+1)-1);
- //unsigned int lj = ((nny+STARTOFFY-2)-(STARTOFFY+1)-1);
-
- i=STARTOFFX+1;
- //k=nnz+STARTOFFZ-3;
- for(k=STARTOFFZ+1 ; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY+1 ; j<=nny+STARTOFFY-2 ; j++){
- //for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- QIN.k[QIN.numberOfBCnodes] = kk[m];
- QIN.kN[QIN.numberOfBCnodes] = kk[m+1];
- rhoBC[QIN.numberOfBCnodes] = (real)0.f;
- vx[QIN.numberOfBCnodes] = (real)0.f;
- vy[QIN.numberOfBCnodes] = (real)0.f;
- //vz[QIN.numberOfBCnodes] = u0;
- vz[QIN.numberOfBCnodes] = (real)(u0*2.f)*((-4.f*i*i + nnx*(-2.f - 4.f*STARTOFFX) - 4.f*(-1.5f + STARTOFFX)*(0.5f + STARTOFFX) + i*(-4.f + 4.f*nnx + 8.f*STARTOFFX))*(-4.f*j*j + nny*(-2.f - 4.f*STARTOFFY) - 4.f*(-1.5f + STARTOFFY)*(0.5f + STARTOFFY) + j*(-4.f + 4.f*nny + 8.f*STARTOFFY)))/((2.f - nnx)*(2.f - nnx)*(2.f - nny)*(2.f - nny));
- //vz[QIN.numberOfBCnodes] = (real)(16.f*(u0*2.f)*(i-(STARTOFFX+1)-0.5f)*(li-1.5f-(i-(STARTOFFX+1)))*(j-(STARTOFFY+1)-0.5f)*(lj-1.5f-(j-(STARTOFFY+1))))/(li*lj*li*lj);
- //vz[QIN.numberOfBCnodes] = (real)(16.f*(u0*2.f)*i*j*(nx-i)*(ny-j))/(nx*nx*ny*ny);
- deltaVz[QIN.numberOfBCnodes] = (real)0.f;
- Q.q27[dP00 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dM00 ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[d0P0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0M0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d00P ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d00M ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPP0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMM0 ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dPM0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMP0 ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dP0P ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dM0M ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dP0M ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dM0P ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[d0PP ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0MM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0PM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0MP ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d000][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPPP ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMMP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dPMP ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMPP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dPPM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMMM ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dPMM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dMPM ][QIN.numberOfBCnodes] = (real)1.f;
- QIN.numberOfBCnodes++;
- }
- }
- }
-}
-
-////////////////////////////////////////////////////////////////////////////////
-void findKforQPressX0(Parameter* para, int lev)
-{
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
- VF_LOG_CRITICAL("findKforQPressX0() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
- //int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
- //int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
- int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
- real ON[27];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //unsigned int mm;
- unsigned int i, j, k, m, l;
- real test = (real) 0.f;
- int nx = para->getParH(lev)->nx;
- int ny = para->getParH(lev)->ny;
- //unsigned int nnx = para->getParH(lev)->gridNX;
- unsigned int nny = para->getParH(lev)->gridNY;
- unsigned int nnz = para->getParH(lev)->gridNZ;
- int* geo_mat = para->getParH(lev)->geo;
- QforBoundaryConditions &QIN = para->getParH(lev)->QpressX0;
- QIN.numberOfBCnodes = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- i=STARTOFFX+1;
- //k=nnz+STARTOFFZ-3;
- {
- for(k=STARTOFFZ+1 ; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY+1 ; j<=nny+STARTOFFY-2 ; j++){
- //for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- test = (real)0.f;
- for(l=0;l<=26;l++){
- //mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if(ez[l]==1){
- ON[l] = (real) 1.f;
- }
- else{
- ON[l] = (real) 0.f;
- }
- test += ON[l];
- }
- if (test>0)
- {
- QIN.numberOfBCnodes++;
- }
- }
- }
- }
- }
-}
-
-
-////////////////////////////////////////////////////////////////////////////////
-void findQPressX1(Parameter* para, int lev)
-{
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
- VF_LOG_CRITICAL("findQPressX1() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
- //int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
- //int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
- //int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m;
- int nx = para->getParH(lev)->nx;
- int ny = para->getParH(lev)->ny;
- unsigned int nnx = para->getParH(lev)->gridNX;
- unsigned int nny = para->getParH(lev)->gridNY;
- unsigned int nnz = para->getParH(lev)->gridNZ;
- int* geo_mat = para->getParH(lev)->geo;
- unsigned int* kk = para->getParH(lev)->k;
- //unsigned int sizeQ = para->getParH(lev)->outflowBC.numberOfBCnodes;
- unsigned int sizeQ = para->getParH(lev)->QpressX1.numberOfBCnodes;
- real* rhoBC = para->getParH(lev)->QpressX1.RhoBC;
- real u0 = para->getVelocity();
- real* vx = para->getParH(lev)->QpressX1.Vx;
- real* vy = para->getParH(lev)->QpressX1.Vy;
- real* vz = para->getParH(lev)->QpressX1.Vz;
- real*deltaVz = para->getParH(lev)->QpressX1.deltaVz;
- real* QQ = para->getParH(lev)->QpressX1.q27[0];
- QforBoundaryConditions &QIN = para->getParH(lev)->QpressX1;
- //unsigned int nxny = nx*ny;
- QIN.numberOfBCnodes = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- QforBoundaryConditions Q;
- Q.q27[dP00 ] = &QQ[dP00 *sizeQ];
- Q.q27[dM00 ] = &QQ[dM00 *sizeQ];
- Q.q27[d0P0 ] = &QQ[d0P0 *sizeQ];
- Q.q27[d0M0 ] = &QQ[d0M0 *sizeQ];
- Q.q27[d00P ] = &QQ[d00P *sizeQ];
- Q.q27[d00M ] = &QQ[d00M *sizeQ];
- Q.q27[dPP0 ] = &QQ[dPP0 *sizeQ];
- Q.q27[dMM0 ] = &QQ[dMM0 *sizeQ];
- Q.q27[dPM0 ] = &QQ[dPM0 *sizeQ];
- Q.q27[dMP0 ] = &QQ[dMP0 *sizeQ];
- Q.q27[dP0P ] = &QQ[dP0P *sizeQ];
- Q.q27[dM0M ] = &QQ[dM0M *sizeQ];
- Q.q27[dP0M ] = &QQ[dP0M *sizeQ];
- Q.q27[dM0P ] = &QQ[dM0P *sizeQ];
- Q.q27[d0PP ] = &QQ[d0PP *sizeQ];
- Q.q27[d0MM ] = &QQ[d0MM *sizeQ];
- Q.q27[d0PM ] = &QQ[d0PM *sizeQ];
- Q.q27[d0MP ] = &QQ[d0MP *sizeQ];
- Q.q27[d000] = &QQ[d000*sizeQ];
- Q.q27[dPPP ] = &QQ[dPPP *sizeQ];
- Q.q27[dMMP ] = &QQ[dMMP *sizeQ];
- Q.q27[dPMP ] = &QQ[dPMP *sizeQ];
- Q.q27[dMPP ] = &QQ[dMPP *sizeQ];
- Q.q27[dPPM ] = &QQ[dPPM *sizeQ];
- Q.q27[dMMM ] = &QQ[dMMM *sizeQ];
- Q.q27[dPMM ] = &QQ[dPMM *sizeQ];
- Q.q27[dMPM ] = &QQ[dMPM *sizeQ];
-
-
- //unsigned int li = ((nnx+STARTOFFX-2)-(STARTOFFX+1)-1);
- //unsigned int lj = ((nny+STARTOFFY-2)-(STARTOFFY+1)-1);
-
- i=nnx+STARTOFFX-3;
- //k=nnz+STARTOFFZ-3;
- for(k=STARTOFFZ+1 ; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY+1 ; j<=nny+STARTOFFY-2 ; j++){
- //for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- QIN.k[QIN.numberOfBCnodes] = kk[m];
- QIN.kN[QIN.numberOfBCnodes] = kk[m-1];
- rhoBC[QIN.numberOfBCnodes] = (real)0.f;
- vx[QIN.numberOfBCnodes] = (real)0.f;
- vy[QIN.numberOfBCnodes] = (real)0.f;
- //vz[QIN.numberOfBCnodes] = u0;
- vz[QIN.numberOfBCnodes] = (real)(u0*2.f)*((-4.f*i*i + nnx*(-2.f - 4.f*STARTOFFX) - 4.f*(-1.5f + STARTOFFX)*(0.5f + STARTOFFX) + i*(-4.f + 4.f*nnx + 8.f*STARTOFFX))*(-4.f*j*j + nny*(-2.f - 4.f*STARTOFFY) - 4.f*(-1.5f + STARTOFFY)*(0.5f + STARTOFFY) + j*(-4.f + 4.f*nny + 8.f*STARTOFFY)))/((2.f - nnx)*(2.f - nnx)*(2.f - nny)*(2.f - nny));
- //vz[QIN.numberOfBCnodes] = (real)(16.f*(u0*2.f)*(i-(STARTOFFX+1)-0.5f)*(li-1.5f-(i-(STARTOFFX+1)))*(j-(STARTOFFY+1)-0.5f)*(lj-1.5f-(j-(STARTOFFY+1))))/(li*lj*li*lj);
- //vz[QIN.numberOfBCnodes] = (real)(16.f*(u0*2.f)*i*j*(nx-i)*(ny-j))/(nx*nx*ny*ny);
- deltaVz[QIN.numberOfBCnodes] = (real)0.f;
- Q.q27[dP00 ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dM00 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0P0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0M0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d00P ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d00M ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPP0 ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dMM0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPM0 ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dMP0 ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dP0P ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dM0M ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dP0M ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dM0P ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0PP ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0MM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0PM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d0MP ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[d000][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPPP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dMMP ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPMP ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dMPP ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPPM ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dMMM ][QIN.numberOfBCnodes] = (real)-1.f;
- Q.q27[dPMM ][QIN.numberOfBCnodes] = (real)1.f;
- Q.q27[dMPM ][QIN.numberOfBCnodes] = (real)-1.f;
- QIN.numberOfBCnodes++;
- }
- }
- }
-}
-
-////////////////////////////////////////////////////////////////////////////////
-void findKforQPressX1(Parameter* para, int lev)
-{
- // ! CAUTION ! Do not use this function!
- // As the order of the distributions was changed in July 2022, this does not work anymore.
- // https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/14
- VF_LOG_CRITICAL("findKforQPressX1() is deprecated! - see comment above for more information");
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// dP00 dM00 d0P0 d0M0 d00P d00M dPP0 dMM0 dPM0 dMP0 dP0P dM0M dP0M dM0P d0PP d0MM d0PM d0MP ZERO dPPP dPPM dPMP dPMM dMPP dMPM dMMP dMMM ////////////////////////
- //int ex[27]={ 1, -1, 0, 0, 0, 0, 1, -1, 1, -1, 1, -1, 1, -1, 0, 0, 0, 0, 0, 1, 1, 1, 1, -1, -1, -1, -1};
- //int ey[27]={ 0, 0, 1, -1, 0, 0, 1, -1, -1, 1, 0, 0, 0, 0, 1, -1, 1, -1, 0, 1, 1, -1, -1, 1, 1, -1, -1};
- int ez[27]={ 0, 0, 0, 0, 1, -1, 0, 0, 0, 0, 1, -1, -1, 1, 1, -1, -1, 1, 0, 1, -1, 1, -1, 1, -1, 1, -1};
- real ON[27];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //unsigned int mm;
- unsigned int i, j, k, m, l;
- real test = (real) 0.f;
- int nx = para->getParH(lev)->nx;
- int ny = para->getParH(lev)->ny;
- unsigned int nnx = para->getParH(lev)->gridNX;
- unsigned int nny = para->getParH(lev)->gridNY;
- unsigned int nnz = para->getParH(lev)->gridNZ;
- int* geo_mat = para->getParH(lev)->geo;
- QforBoundaryConditions &QIN = para->getParH(lev)->QpressX1;
- QIN.numberOfBCnodes = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- i=nnx+STARTOFFX-3;
- //k=nnz+STARTOFFZ-3;
- {
- for(k=STARTOFFZ+1 ; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY+1 ; j<=nny+STARTOFFY-2 ; j++){
- //for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- test = (real)0.f;
- for(l=0;l<=26;l++){
- //mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if(ez[l]==1){
- ON[l] = (real) 1.f;
- }
- else{
- ON[l] = (real) 0.f;
- }
- test += ON[l];
- }
- if (test>0)
- {
- QIN.numberOfBCnodes++;
- }
- }
- }
- }
- }
-}
diff --git a/src/gpu/core/FindQ/FindQ.h b/src/gpu/core/FindQ/FindQ.h
deleted file mode 100644
index 551205bd54d9685e9aa6ab8be47ac9e274546f40..0000000000000000000000000000000000000000
--- a/src/gpu/core/FindQ/FindQ.h
+++ /dev/null
@@ -1,46 +0,0 @@
-#ifndef FIND_Q_H
-#define FIND_Q_H
-
-#include "LBM/LB.h"
-#include "lbm/constants/D3Q27.h"
-#include "Parameter/Parameter.h"
-
-void findQ(Parameter* para, int lev);
-
-void findKforQ(Parameter* para, int lev);
-
-void findQ_MG(int nx, int ny, unsigned int nnx, unsigned int nny, unsigned int nnz, int* geo_mat, unsigned int* kk, unsigned int sizeQ, real* QQ, QforBoundaryConditions &QIN);
-
-void findKforQ_MG(int nx, int ny, unsigned int nnx, unsigned int nny, unsigned int nnz, int* geo_mat, QforBoundaryConditions &QIN);
-
-void findQInflow(Parameter* para);
-
-void findKforQInflow(Parameter* para);
-
-void findQPressInflow(Parameter* para);
-
-void findKforQPressInflow(Parameter* para);
-
-void findQOutflow(Parameter* para);
-
-void findKforQOutflow(Parameter* para);
-
-// TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
-//void findQSchlaff( int nx, int ny, unsigned int nnx, unsigned int nny, unsigned int nnz, int* geo_mat, unsigned int* kk,
-// unsigned int sizeQN, real* vxN, real* vyN, real* vzN, real*deltaVN, real* QQN, QforBoundaryConditions &QNin,
-// unsigned int sizeQS, real* vxS, real* vyS, real* vzS, real*deltaVS, real* QQS, QforBoundaryConditions &QSin,
-// unsigned int sizeQE, real* vxE, real* vyE, real* vzE, real*deltaVE, real* QQE, QforBoundaryConditions &QEin,
-// unsigned int sizeQW, real* vxW, real* vyW, real* vzW, real*deltaVW, real* QQW, QforBoundaryConditions &QWin);
-//
-//void findKforQSchlaff(int nx, int ny, unsigned int nnx, unsigned int nny, unsigned int nnz, int* geo_mat, QforBoundaryConditions &QN, QforBoundaryConditions &QS, QforBoundaryConditions &QE, QforBoundaryConditions &QW);
-
-
-void findKforQPressX1(Parameter* para, int lev);
-
-void findQPressX1(Parameter* para, int lev);
-
-void findKforQPressX0(Parameter* para, int lev);
-
-void findQPressX0(Parameter* para, int lev);
-
-#endif
diff --git a/src/gpu/core/GPU/CudaMemoryManager.cpp b/src/gpu/core/GPU/CudaMemoryManager.cpp
index 450e1faaef6ff08b6fd07a1f58d4112e5ebff9cb..211d8f070a1d3cde7579cfedd427bd7436827365 100644
--- a/src/gpu/core/GPU/CudaMemoryManager.cpp
+++ b/src/gpu/core/GPU/CudaMemoryManager.cpp
@@ -2279,94 +2279,6 @@ void CudaMemoryManager::cudaFreeCpBottom2(int lev)
checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->cpBottom2Index));
}
//////////////////////////////////////////////////////////////////////////
-//particles
-void CudaMemoryManager::cudaAllocParticles(int lev)
-{
- //Host
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.coordXlocal), parameter->getParH(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.coordYlocal), parameter->getParH(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.coordZlocal), parameter->getParH(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.coordXabsolut), parameter->getParH(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.coordYabsolut), parameter->getParH(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.coordZabsolut), parameter->getParH(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.veloX), parameter->getParH(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.veloY), parameter->getParH(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.veloZ), parameter->getParH(lev)->plp.memSizerealAll ));
- //checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.randomLocationInit), parameter->getParH(lev)->plp.memSizereal ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.ID), parameter->getParH(lev)->plp.memSizeID ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.cellBaseID), parameter->getParH(lev)->plp.memSizeID ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.timestep), parameter->getParH(lev)->plp.memSizeTimestep ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.stuck), parameter->getParH(lev)->plp.memSizeBool ));
- checkCudaErrors( cudaMallocHost((void**) &(parameter->getParH(lev)->plp.hot), parameter->getParH(lev)->plp.memSizeBoolBC ));
-
- //Device
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.coordXlocal), parameter->getParD(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.coordYlocal), parameter->getParD(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.coordZlocal), parameter->getParD(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.coordXabsolut), parameter->getParD(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.coordYabsolut), parameter->getParD(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.coordZabsolut), parameter->getParD(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.veloX), parameter->getParD(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.veloY), parameter->getParD(lev)->plp.memSizerealAll ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.veloZ), parameter->getParD(lev)->plp.memSizerealAll ));
- //checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.randomLocationInit), parameter->getParD(lev)->plp.memSizereal ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.ID), parameter->getParD(lev)->plp.memSizeID ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.cellBaseID), parameter->getParD(lev)->plp.memSizeID ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.timestep), parameter->getParD(lev)->plp.memSizeTimestep ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.stuck), parameter->getParD(lev)->plp.memSizeBool ));
- checkCudaErrors( cudaMalloc((void**) &(parameter->getParD(lev)->plp.hot), parameter->getParD(lev)->plp.memSizeBoolBC ));
-
- //////////////////////////////////////////////////////////////////////////
- double tmp =
- (double)parameter->getParD(lev)->plp.memSizerealAll * (double)9.0 +
- (double)parameter->getParD(lev)->plp.memSizeID * (double)2.0 +
- (double)parameter->getParD(lev)->plp.memSizeTimestep +
- (double)parameter->getParD(lev)->plp.memSizeBool +
- (double)parameter->getParD(lev)->plp.memSizeBoolBC;
- setMemsizeGPU(tmp, false);
-}
-void CudaMemoryManager::cudaCopyParticles(int lev)
-{
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.coordXlocal, parameter->getParD(lev)->plp.coordXlocal, parameter->getParH(lev)->plp.memSizerealAll, cudaMemcpyDeviceToHost));
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.coordYlocal, parameter->getParD(lev)->plp.coordYlocal, parameter->getParH(lev)->plp.memSizerealAll, cudaMemcpyDeviceToHost));
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.coordZlocal, parameter->getParD(lev)->plp.coordZlocal, parameter->getParH(lev)->plp.memSizerealAll, cudaMemcpyDeviceToHost));
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.coordXabsolut, parameter->getParD(lev)->plp.coordXabsolut, parameter->getParH(lev)->plp.memSizerealAll, cudaMemcpyDeviceToHost));
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.coordYabsolut, parameter->getParD(lev)->plp.coordYabsolut, parameter->getParH(lev)->plp.memSizerealAll, cudaMemcpyDeviceToHost));
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.coordZabsolut, parameter->getParD(lev)->plp.coordZabsolut, parameter->getParH(lev)->plp.memSizerealAll, cudaMemcpyDeviceToHost));
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.veloX, parameter->getParD(lev)->plp.veloX, parameter->getParH(lev)->plp.memSizerealAll, cudaMemcpyDeviceToHost));
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.veloY, parameter->getParD(lev)->plp.veloY, parameter->getParH(lev)->plp.memSizerealAll, cudaMemcpyDeviceToHost));
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.veloZ, parameter->getParD(lev)->plp.veloZ, parameter->getParH(lev)->plp.memSizerealAll, cudaMemcpyDeviceToHost));
- //checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.randomLocationInit, parameter->getParD(lev)->plp.randomLocationInit, parameter->getParH(lev)->plp.memSizereal, cudaMemcpyDeviceToHost));
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.ID, parameter->getParD(lev)->plp.ID, parameter->getParH(lev)->plp.memSizeID, cudaMemcpyDeviceToHost));
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.cellBaseID, parameter->getParD(lev)->plp.cellBaseID, parameter->getParH(lev)->plp.memSizeID, cudaMemcpyDeviceToHost));
- checkCudaErrors( cudaMemcpy(parameter->getParH(lev)->plp.timestep, parameter->getParD(lev)->plp.timestep, parameter->getParH(lev)->plp.memSizeTimestep, cudaMemcpyDeviceToHost));
-}
-void CudaMemoryManager::cudaFreeParticles(int lev)
-{
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.coordXlocal) );
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.coordYlocal) );
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.coordZlocal) );
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.coordXabsolut) );
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.coordYabsolut) );
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.coordZabsolut) );
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.veloX) );
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.veloY) );
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.veloZ) );
- //checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.randomLocationInit));
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.ID) );
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.cellBaseID) );
- checkCudaErrors( cudaFreeHost(parameter->getParH(lev)->plp.timestep) );
-}
-//random values
-void CudaMemoryManager::cudaAllocRandomValues()
-{
- //Device
- checkCudaErrors( cudaMalloc((void**)(parameter->getRandomState()), (sizeof(curandState)*parameter->getParD(parameter->getFine())->plp.numberOfParticles) ));
- //////////////////////////////////////////////////////////////////////////
- double tmp = (double)(sizeof(curandState) * parameter->getParD(parameter->getFine())->plp.numberOfParticles);
- setMemsizeGPU(tmp, false);
-}
-//////////////////////////////////////////////////////////////////////////
//advection diffusion
void CudaMemoryManager::cudaAllocConcentration(int lev)
{
diff --git a/src/gpu/core/GPU/CudaMemoryManager.h b/src/gpu/core/GPU/CudaMemoryManager.h
index 89fed68436e4d40be2bf1abc9959825301a41488..6d67b671ddcd9b906c081f706cde2249b1220399 100644
--- a/src/gpu/core/GPU/CudaMemoryManager.h
+++ b/src/gpu/core/GPU/CudaMemoryManager.h
@@ -287,13 +287,6 @@ public:
void cudaCopy2ndOrderDerivitivesIsoTestHD(int lev);
void cudaFree2ndOrderDerivitivesIsoTest(int lev);
-
- void cudaAllocParticles(int lev);
- void cudaCopyParticles(int lev);
- void cudaFreeParticles(int lev);
-
- void cudaAllocRandomValues();
-
void cudaAllocConcentration(int lev);
void cudaCopyConcentrationDeviceToHost(int lev);
void cudaCopyConcentrationHostToDevice(int lev);
diff --git a/src/gpu/core/GPU/GPU_Interface.h b/src/gpu/core/GPU/GPU_Interface.h
index 3ef4a7d13899fee0fad5f8da94808de0cdf62558..e6825d7b0494e2bfdf8808f300688b46d48dea0f 100644
--- a/src/gpu/core/GPU/GPU_Interface.h
+++ b/src/gpu/core/GPU/GPU_Interface.h
@@ -323,187 +323,6 @@ void BcPress27(int nx,
unsigned long long numberOfLBnodes,
bool isEvenTimestep);
-void BcVel27(int nx,
- int ny,
- int nz,
- int itz,
- unsigned int grid_nx,
- unsigned int grid_ny,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* DD,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep,
- real u0x,
- real om);
-
-void QDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
-
-void QDevComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
-
-void QDevCompThinWalls27(unsigned int numberOfThreads,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* geom,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QDev3rdMomentsComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
-
-void QDevIncompHighNu27( unsigned int numberOfThreads,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QDevCompHighNu27(unsigned int numberOfThreads,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QVelDevicePlainBB27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
-
-void QVelDeviceCouette27(unsigned int numberOfThreads,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QVelDevice1h27( unsigned int numberOfThreads,
- int nx,
- int ny,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- real Phi,
- real angularVelocity,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* coordX,
- real* coordY,
- real* coordZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QVelDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
-
-void QVelDevCompPlusSlip27(unsigned int numberOfThreads,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QVelDevComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
-
-void QVelDevCompThinWalls27(unsigned int numberOfThreads,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* geom,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QVelDevCompZeroPress27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
-
-void QVelDevIncompHighNu27( unsigned int numberOfThreads,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QVelDevCompHighNu27(unsigned int numberOfThreads,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QVeloDevEQ27(unsigned int numberOfThreads,
- real* VeloX,
- real* VeloY,
- real* VeloZ,
- real* DD,
- int* k_Q,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
void QSlipDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
void QSlipDevComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
@@ -550,135 +369,6 @@ void BBStressDev27(Parameter *para, QforBoundaryConditions* boundaryCondition,
void BBStressPressureDev27(Parameter *para, QforBoundaryConditions* boundaryCondition, const int level);
-void QPressDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
-
-void QPressDevFixBackflow27(unsigned int numberOfThreads,
- real* rhoBC,
- real* DD,
- int* k_Q,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QPressDevDirDepBot27(unsigned int numberOfThreads,
- real* rhoBC,
- real* DD,
- int* k_Q,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QInflowScaleByPressDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
-
-void QPressDevOld27(unsigned int numberOfThreads,
- real* rhoBC,
- real* DD,
- int* k_Q,
- int* k_N,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QPressDevEQZ27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
-
-void QPressDevZero27(unsigned int numberOfThreads,
- real* DD,
- int* k_Q,
- unsigned int numberOfBCnodes,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QPressDevFake27( unsigned int numberOfThreads,
- real* rhoBC,
- real* DD,
- int* k_Q,
- int* k_N,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void BBDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition);
-
-void QPressDev27_IntBB( unsigned int numberOfThreads,
- real* rho,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void QPressDevAntiBB27( unsigned int numberOfThreads,
- real* rhoBC,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void PressSchlaffer27(unsigned int numberOfThreads,
- real* rhoBC,
- real* DD,
- real* vx0,
- real* vy0,
- real* vz0,
- real* deltaVz0,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-void VelSchlaffer27( unsigned int numberOfThreads,
- int t,
- real* DD,
- real* vz0,
- real* deltaVz0,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
void QPrecursorDevCompZeroPress(LBMSimulationParameter* parameterDevice, QforPrecursorBoundaryConditions* boundaryCondition, real tRatio, real velocityRatio);
void PrecursorDevEQ27(LBMSimulationParameter* parameterDevice, QforPrecursorBoundaryConditions* boundaryCondition, real tRatio, real velocityRatio);
@@ -1859,69 +1549,6 @@ void GetVelotoForce27(unsigned int numberOfThreads,
unsigned long long numberOfLBnodes,
bool isEvenTimestep);
-void InitParticlesDevice(real* coordX,
- real* coordY,
- real* coordZ,
- real* coordParticleXlocal,
- real* coordParticleYlocal,
- real* coordParticleZlocal,
- real* coordParticleXglobal,
- real* coordParticleYglobal,
- real* coordParticleZglobal,
- real* veloParticleX,
- real* veloParticleY,
- real* veloParticleZ,
- real* randArray,
- unsigned int* particleID,
- unsigned int* cellBaseID,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- int level,
- unsigned int numberOfParticles,
- unsigned long long numberOfLBnodes,
- unsigned int numberOfThreads);
-
-void MoveParticlesDevice(real* coordX,
- real* coordY,
- real* coordZ,
- real* coordParticleXlocal,
- real* coordParticleYlocal,
- real* coordParticleZlocal,
- real* coordParticleXglobal,
- real* coordParticleYglobal,
- real* coordParticleZglobal,
- real* veloParticleX,
- real* veloParticleY,
- real* veloParticleZ,
- real* DD,
- real omega,
- unsigned int* particleID,
- unsigned int* cellBaseID,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- int level,
- unsigned int timestep,
- unsigned int numberOfTimesteps,
- unsigned int numberOfParticles,
- unsigned long long numberOfLBnodes,
- unsigned int numberOfThreads,
- bool isEvenTimestep);
-
-void initRandomDevice(curandState* state,
- unsigned long long numberOfLBnodes,
- unsigned int numberOfThreads);
-
-void generateRandomValuesDevice(curandState* state,
- unsigned long long numberOfLBnodes,
- real* randArray,
- unsigned int numberOfThreads);
-
void CalcTurbulenceIntensityDevice(
real* vxx,
real* vyy,
diff --git a/src/gpu/core/GPU/GPU_Kernels.cuh b/src/gpu/core/GPU/GPU_Kernels.cuh
index 20e0fd53e24957d7a2a62d087c2ee3fe875a092b..842edadf9c605f707f81c19886b86309d7bb07cf 100644
--- a/src/gpu/core/GPU/GPU_Kernels.cuh
+++ b/src/gpu/core/GPU/GPU_Kernels.cuh
@@ -8,12 +8,6 @@
#ifndef D3Q27_KERNELS_H
#define D3Q27_KERNELS_H
-//random numbers
-#include <curand.h>
-#include <curand_kernel.h>
-#include <cuda.h>
-#include <cuda_runtime.h>
-
#include "LBM/LB.h"
@@ -277,279 +271,6 @@ __global__ void LBCalcMeasurePoints(real* vxMP,
real* DD,
bool isEvenTimestep);
-__global__ void LB_BC_Press_East27( int nx,
- int ny,
- int tz,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* DD,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep) ;
-
-__global__ void LB_BC_Vel_West_27( int nx,
- int ny,
- int nz,
- int itz,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* DD,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep,
- real u0x,
- unsigned int grid_nx,
- unsigned int grid_ny,
- real om);
-
-//no Slip BCs
-__global__ void QDevice27(real* distributions,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- real omega,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QDeviceComp27(
- real* distributions,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- real omega,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QDeviceCompThinWallsPartOne27(real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QDevice3rdMomentsComp27( real* distributions,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- real omega,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QDeviceIncompHighNu27(real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QDeviceCompHighNu27( real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-//Velocity BCs
-__global__ void QVelDevPlainBB27(
- real* velocityX,
- real* velocityY,
- real* velocityZ,
- real* distributions,
- int* subgridDistanceIndices,
- real* subgridDistances,
- uint numberOfBCnodes,
- uint* neighborX,
- uint* neighborY,
- uint* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QVelDevCouette27(real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QVelDev1h27( int inx,
- int iny,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- real Phi,
- real angularVelocity,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* coordX,
- real* coordY,
- real* coordZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QVelDevice27(int inx,
- int iny,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QVelDeviceCompPlusSlip27(real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QVelDeviceComp27(real* velocityX,
- real* velocityY,
- real* velocityZ,
- real* distribution,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- real omega,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QVelDeviceCompThinWallsPartOne27(
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- uint numberOfBCnodes,
- real om1,
- uint* neighborX,
- uint* neighborY,
- uint* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QThinWallsPartTwo27(
- real* DD,
- int* k_Q,
- real* QQ,
- uint numberOfBCnodes,
- uint* geom,
- uint* neighborX,
- uint* neighborY,
- uint* neighborZ,
- uint* neighborWSB,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QVelDeviceCompZeroPress27(
- real* velocityX,
- real* velocityY,
- real* velocityZ,
- real* distribution,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- real omega,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QVelDeviceIncompHighNu27(real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QVelDeviceCompHighNu27( real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QVeloDeviceEQ27(real* VeloX,
- real* VeloY,
- real* VeloZ,
- real* DD,
- int* k_Q,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
//Slip BCs
__global__ void QSlipDevice27(real* DD,
int* k_Q,
@@ -731,169 +452,6 @@ __global__ void BBStressPressureDevice27( real* DD,
unsigned long long numberOfLBnodes,
bool isEvenTimestep);
-//Pressure BCs
-__global__ void QPressDevice27( real* rhoBC,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QPressDeviceAntiBB27( real* rhoBC,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QPressDeviceFixBackflow27( real* rhoBC,
- real* DD,
- int* k_Q,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QPressDeviceDirDepBot27( real* rhoBC,
- real* DD,
- int* k_Q,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QInflowScaleByPressDevice27( real* rhoBC,
- real* DD,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QPressDeviceOld27(real* rhoBC,
- real* DD,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QPressDeviceEQZ27(real* rhoBC,
- real* DD,
- int* k_Q,
- int* k_N,
- real* kTestRE,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QPressDeviceZero27( real* DD,
- int* k_Q,
- unsigned int numberOfBCnodes,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QPressDeviceFake27(real* rhoBC,
- real* DD,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void BBDevice27(real* distributions,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void QPressDevice27_IntBB(real* rho,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-// TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
-//Schlaffer BCs
-__global__ void PressSchlaff27(real* rhoBC,
- real* DD,
- real* vx0,
- real* vy0,
- real* vz0,
- real* deltaVz0,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-// TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
-__global__ void VelSchlaff27( int t,
- real* DD,
- real* vz0,
- real* deltaVz0,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
__global__ void QPrecursorDeviceCompZeroPress( int* subgridDistanceIndices,
int numberOfBCnodes,
int numberOfPrecursorNodes,
@@ -2167,91 +1725,6 @@ __global__ void GetVeloforForcing27( real* DD,
unsigned long long numberOfLBnodes,
bool isEvenTimestep);
-__global__ void InitParticles( real* coordX,
- real* coordY,
- real* coordZ,
- real* coordParticleXlocal,
- real* coordParticleYlocal,
- real* coordParticleZlocal,
- real* coordParticleXglobal,
- real* coordParticleYglobal,
- real* coordParticleZglobal,
- real* veloParticleX,
- real* veloParticleY,
- real* veloParticleZ,
- real* randArray,
- unsigned int* particleID,
- unsigned int* cellBaseID,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- int level,
- unsigned int numberOfParticles,
- unsigned long long numberOfLBnodes);
-
-__global__ void MoveParticles( real* coordX,
- real* coordY,
- real* coordZ,
- real* coordParticleXlocal,
- real* coordParticleYlocal,
- real* coordParticleZlocal,
- real* coordParticleXglobal,
- real* coordParticleYglobal,
- real* coordParticleZglobal,
- real* veloParticleX,
- real* veloParticleY,
- real* veloParticleZ,
- real* DD,
- real omega,
- unsigned int* particleID,
- unsigned int* cellBaseID,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- int level,
- unsigned int timestep,
- unsigned int numberOfTimesteps,
- unsigned int numberOfParticles,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void MoveParticlesWithoutBCs( real* coordX,
- real* coordY,
- real* coordZ,
- real* coordParticleXlocal,
- real* coordParticleYlocal,
- real* coordParticleZlocal,
- real* coordParticleXglobal,
- real* coordParticleYglobal,
- real* coordParticleZglobal,
- real* veloParticleX,
- real* veloParticleY,
- real* veloParticleZ,
- real* DD,
- real omega,
- unsigned int* particleID,
- unsigned int* cellBaseID,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- int level,
- unsigned int timestep,
- unsigned int numberOfTimesteps,
- unsigned int numberOfParticles,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep);
-
-__global__ void initRandom(curandState* state);
-
-__global__ void generateRandomValues(curandState* state,
- real* randArray);
-
__global__ void CalcTurbulenceIntensity(
real* vxx,
real* vyy,
diff --git a/src/gpu/core/GPU/LBMKernel.cu b/src/gpu/core/GPU/LBMKernel.cu
index 6594d882565675655bbca64e67fcda7170af6f04..501fdc5bb220c5f33dca7ec20105ba377b39b0b4 100644
--- a/src/gpu/core/GPU/LBMKernel.cu
+++ b/src/gpu/core/GPU/LBMKernel.cu
@@ -675,76 +675,6 @@ void LBCalcMeasurePoints27(
getLastCudaError("LBCalcMeasurePoints execution failed");
}
//////////////////////////////////////////////////////////////////////////
-void BcPress27(
- int nx,
- int ny,
- int tz,
- unsigned int grid_nx,
- unsigned int grid_ny,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* DD,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- dim3 threads ( grid_nx, 1, 1 );
- dim3 grid ( grid_ny, 1 );
-
- LB_BC_Press_East27<<< grid, threads >>> (
- nx,
- ny,
- tz,
- bcMatD,
- neighborX,
- neighborY,
- neighborZ,
- DD,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("LB_BC_Press_East27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void BcVel27(
- int nx,
- int ny,
- int nz,
- int itz,
- unsigned int grid_nx,
- unsigned int grid_ny,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* DD,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep,
- real u0x,
- real om)
-{
- dim3 threads ( grid_nx, 1, 1 );
- dim3 grid ( grid_ny, 1 );
-
- LB_BC_Vel_West_27<<< grid, threads >>> (
- nx,
- ny,
- nz,
- itz,
- bcMatD,
- neighborX,
- neighborY,
- neighborZ,
- DD,
- numberOfLBnodes,
- isEvenTimestep,
- u0x,
- grid_nx,
- grid_ny,
- om);
- getLastCudaError("LB_BC_Vel_West_27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
void QADPressDev7(
unsigned int numberOfThreads,
real* DD,
@@ -1286,12 +1216,12 @@ void QADPressIncompDev27(
getLastCudaError("QADPressIncomp27 execution failed");
}
//////////////////////////////////////////////////////////////////////////
-void QDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+void QSlipDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
dim3 threads(parameterDevice->numberofthreads, 1, 1 );
- QDevice27<<< grid, threads >>> (
+ QSlipDevice27<<< grid, threads >>> (
parameterDevice->distributions.f[0],
boundaryCondition->k,
boundaryCondition->q27[0],
@@ -1302,79 +1232,15 @@ void QDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* bou
parameterDevice->neighborZ,
parameterDevice->numberOfNodes,
parameterDevice->isEvenTimestep);
- getLastCudaError("QDevice27 execution failed");
+ getLastCudaError("QSlipDevice27 execution failed");
}
//////////////////////////////////////////////////////////////////////////
-void QDevComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+void QSlipDevCompTurbulentViscosity27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
dim3 threads(parameterDevice->numberofthreads, 1, 1 );
- QDeviceComp27<<< grid, threads >>> (
- parameterDevice->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- parameterDevice->omega,
- parameterDevice->neighborX,
- parameterDevice->neighborY,
- parameterDevice->neighborZ,
- parameterDevice->numberOfNodes,
- parameterDevice->isEvenTimestep);
- getLastCudaError("QDeviceComp27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QDevCompThinWalls27(
- unsigned int numberOfThreads,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* geom,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QDeviceCompThinWallsPartOne27 <<< grid.grid, grid.threads >>> (
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QDeviceCompThinWallsPartOne27 execution failed");
-
- QThinWallsPartTwo27 <<< grid.grid, grid.threads >>> (
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- geom,
- neighborX,
- neighborY,
- neighborZ,
- neighborWSB,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QThinWallsPartTwo27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QDev3rdMomentsComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
-{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(parameterDevice->numberofthreads, 1, 1);
-
- QDevice3rdMomentsComp27<<< grid, threads >>> (
+ QSlipDeviceComp27TurbViscosity<<< grid, threads >>> (
parameterDevice->distributions.f[0],
boundaryCondition->k,
boundaryCondition->q27[0],
@@ -1383,496 +1249,38 @@ void QDev3rdMomentsComp27(LBMSimulationParameter* parameterDevice, QforBoundaryC
parameterDevice->neighborX,
parameterDevice->neighborY,
parameterDevice->neighborZ,
+ parameterDevice->turbViscosity,
parameterDevice->numberOfNodes,
parameterDevice->isEvenTimestep);
- getLastCudaError("QDevice3rdMomentsComp27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QDevIncompHighNu27(
- unsigned int numberOfThreads,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QDeviceIncompHighNu27<<< grid.grid, grid.threads >>> (
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QDeviceIncompHighNu27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QDevCompHighNu27(
- unsigned int numberOfThreads,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QDeviceCompHighNu27<<< grid.grid, grid.threads >>> (
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QDeviceCompHighNu27 execution failed");
+ getLastCudaError("QSlipDeviceComp27TurbViscosity execution failed");
}
//////////////////////////////////////////////////////////////////////////
-void QVelDevicePlainBB27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+void QSlipPressureDevCompTurbulentViscosity27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
dim3 threads(parameterDevice->numberofthreads, 1, 1 );
- QVelDevPlainBB27<<< grid, threads >>> (
- boundaryCondition->Vx,
- boundaryCondition->Vy,
- boundaryCondition->Vz,
+ QSlipPressureDeviceComp27TurbViscosity<<< grid, threads >>> (
parameterDevice->distributions.f[0],
boundaryCondition->k,
boundaryCondition->q27[0],
boundaryCondition->numberOfBCnodes,
+ parameterDevice->omega,
parameterDevice->neighborX,
parameterDevice->neighborY,
parameterDevice->neighborZ,
+ parameterDevice->turbViscosity,
parameterDevice->numberOfNodes,
parameterDevice->isEvenTimestep);
- getLastCudaError("QVelDevicePlainBB27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QVelDeviceCouette27(
- unsigned int numberOfThreads,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QVelDevCouette27<<< grid.grid, grid.threads >>> (
- vx,
- vy,
- vz,
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QVelDevCouette27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QVelDevice1h27(
- unsigned int numberOfThreads,
- int nx,
- int ny,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- real Phi,
- real angularVelocity,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* coordX,
- real* coordY,
- real* coordZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QVelDev1h27<<< grid.grid, grid.threads >>> (
- nx,
- ny,
- vx,
- vy,
- vz,
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- Phi,
- angularVelocity,
- neighborX,
- neighborY,
- neighborZ,
- coordX,
- coordY,
- coordZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QVelDev1h27 execution failed");
+ getLastCudaError("QSlipDeviceComp27TurbViscosity execution failed");
}
//////////////////////////////////////////////////////////////////////////
-void QVelDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+void QSlipDevComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
dim3 threads(parameterDevice->numberofthreads, 1, 1 );
- QVelDevice27<<< grid, threads >>> (
- parameterDevice->nx,
- parameterDevice->ny,
- boundaryCondition->Vx,
- boundaryCondition->Vy,
- boundaryCondition->Vz,
- parameterDevice->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- parameterDevice->omega,
- parameterDevice->neighborX,
- parameterDevice->neighborY,
- parameterDevice->neighborZ,
- parameterDevice->numberOfNodes,
- parameterDevice->isEvenTimestep);
- getLastCudaError("QVelDevice27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QVelDevCompPlusSlip27(
- unsigned int numberOfThreads,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QVelDeviceCompPlusSlip27<<< grid.grid, grid.threads >>> (
- vx,
- vy,
- vz,
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QVelDeviceCompPlusSlip27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QVelDevComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
-{
- dim3 grid = vf::cuda::getCudaGrid(parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(parameterDevice->numberofthreads, 1, 1 );
-
- QVelDeviceComp27<<< grid, threads >>> (
- boundaryCondition->Vx,
- boundaryCondition->Vy,
- boundaryCondition->Vz,
- parameterDevice->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- parameterDevice->omega,
- parameterDevice->neighborX,
- parameterDevice->neighborY,
- parameterDevice->neighborZ,
- parameterDevice->numberOfNodes,
- parameterDevice->isEvenTimestep);
- getLastCudaError("QVelDeviceComp27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QVelDevCompThinWalls27(
- unsigned int numberOfThreads,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* geom,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QVelDeviceCompThinWallsPartOne27<<< grid.grid, grid.threads >>> (
- vx,
- vy,
- vz,
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QVelDeviceCompThinWallsPartOne27 execution failed");
-
- QThinWallsPartTwo27 <<< grid.grid, grid.threads >>> (
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- geom,
- neighborX,
- neighborY,
- neighborZ,
- neighborWSB,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QThinWallsPartTwo27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QVelDevCompZeroPress27(LBMSimulationParameter *parameterDevice, QforBoundaryConditions *boundaryCondition)
-{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(parameterDevice->numberofthreads, 1, 1 );
-
- QVelDeviceCompZeroPress27<<< grid, threads >>> (
- boundaryCondition->Vx,
- boundaryCondition->Vy,
- boundaryCondition->Vz,
- parameterDevice->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- parameterDevice->omega,
- parameterDevice->neighborX,
- parameterDevice->neighborY,
- parameterDevice->neighborZ,
- parameterDevice->numberOfNodes,
- parameterDevice->isEvenTimestep);
- getLastCudaError("QVelDeviceCompZeroPress27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QVelDevIncompHighNu27(
- unsigned int numberOfThreads,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QVelDeviceIncompHighNu27<<< grid.grid, grid.threads >>> (
- vx,
- vy,
- vz,
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QVelDeviceIncompHighNu27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QVelDevCompHighNu27(
- unsigned int numberOfThreads,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QVelDeviceCompHighNu27<<< grid.grid, grid.threads >>> (
- vx,
- vy,
- vz,
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QVelDeviceComp27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QVeloDevEQ27(
- unsigned int numberOfThreads,
- real* VeloX,
- real* VeloY,
- real* VeloZ,
- real* DD,
- int* k_Q,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QVeloDeviceEQ27<<< grid.grid, grid.threads >>> (
- VeloX,
- VeloY,
- VeloZ,
- DD,
- k_Q,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QVeloDeviceEQ27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QSlipDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
-{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(parameterDevice->numberofthreads, 1, 1 );
-
- QSlipDevice27<<< grid, threads >>> (
- parameterDevice->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- parameterDevice->omega,
- parameterDevice->neighborX,
- parameterDevice->neighborY,
- parameterDevice->neighborZ,
- parameterDevice->numberOfNodes,
- parameterDevice->isEvenTimestep);
- getLastCudaError("QSlipDevice27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QSlipDevCompTurbulentViscosity27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
-{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(parameterDevice->numberofthreads, 1, 1 );
-
- QSlipDeviceComp27TurbViscosity<<< grid, threads >>> (
- parameterDevice->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- parameterDevice->omega,
- parameterDevice->neighborX,
- parameterDevice->neighborY,
- parameterDevice->neighborZ,
- parameterDevice->turbViscosity,
- parameterDevice->numberOfNodes,
- parameterDevice->isEvenTimestep);
- getLastCudaError("QSlipDeviceComp27TurbViscosity execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QSlipPressureDevCompTurbulentViscosity27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
-{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(parameterDevice->numberofthreads, 1, 1 );
-
- QSlipPressureDeviceComp27TurbViscosity<<< grid, threads >>> (
- parameterDevice->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- parameterDevice->omega,
- parameterDevice->neighborX,
- parameterDevice->neighborY,
- parameterDevice->neighborZ,
- parameterDevice->turbViscosity,
- parameterDevice->numberOfNodes,
- parameterDevice->isEvenTimestep);
- getLastCudaError("QSlipDeviceComp27TurbViscosity execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QSlipDevComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
-{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(parameterDevice->numberofthreads, 1, 1 );
-
- QSlipDeviceComp27<<< grid, threads >>> (
+ QSlipDeviceComp27<<< grid, threads >>> (
parameterDevice->distributions.f[0],
boundaryCondition->k,
boundaryCondition->q27[0],
@@ -1886,433 +1294,69 @@ void QSlipDevComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditi
getLastCudaError("QSlipDeviceComp27 execution failed");
}
//////////////////////////////////////////////////////////////////////////
-void BBSlipDevComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
-{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(parameterDevice->numberofthreads, 1, 1 );
-
- BBSlipDeviceComp27<<< grid, threads >>> (
- parameterDevice->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- parameterDevice->neighborX,
- parameterDevice->neighborY,
- parameterDevice->neighborZ,
- parameterDevice->numberOfNodes,
- parameterDevice->isEvenTimestep);
- getLastCudaError("BBSlipDeviceComp27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QSlipGeomDevComp27(
- unsigned int numberOfThreads,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- real* NormalX,
- real* NormalY,
- real* NormalZ,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid(numberOfThreads, numberOfBCnodes);
-
- QSlipGeomDeviceComp27<<< grid.grid, grid.threads >>> (
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- NormalX,
- NormalY,
- NormalZ,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QSlipGeomDeviceComp27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QSlipNormDevComp27(
- unsigned int numberOfThreads,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- real* NormalX,
- real* NormalY,
- real* NormalZ,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QSlipNormDeviceComp27<<< grid.grid, grid.threads >>> (
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- NormalX,
- NormalY,
- NormalZ,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QSlipNormDeviceComp27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QStressDevComp27(Parameter *para, QforBoundaryConditions* boundaryCondition, const int level)
-{
- dim3 grid = vf::cuda::getCudaGrid( para->getParD(level)->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(para->getParD(level)->numberofthreads, 1, 1 );
-
- QStressDeviceComp27<<< grid, threads >>> (
- para->getParD(level)->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->kN,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- para->getParD(level)->omega,
- para->getParD(level)->turbViscosity,
- para->getParD(level)->velocityX,
- para->getParD(level)->velocityY,
- para->getParD(level)->velocityY,
- boundaryCondition->normalX,
- boundaryCondition->normalY,
- boundaryCondition->normalZ,
- boundaryCondition->Vx,
- boundaryCondition->Vy,
- boundaryCondition->Vz,
- boundaryCondition->Vx1,
- boundaryCondition->Vy1,
- boundaryCondition->Vz1,
- para->getParD(level)->wallModel.samplingOffset,
- para->getParD(level)->wallModel.z0,
- para->getHasWallModelMonitor(),
- para->getParD(level)->wallModel.u_star,
- para->getParD(level)->wallModel.Fx,
- para->getParD(level)->wallModel.Fy,
- para->getParD(level)->wallModel.Fz,
- para->getParD(level)->neighborX,
- para->getParD(level)->neighborY,
- para->getParD(level)->neighborZ,
- para->getParD(level)->numberOfNodes,
- para->getParD(level)->isEvenTimestep);
- getLastCudaError("QStressDeviceComp27 execution failed");
-}
-
-//////////////////////////////////////////////////////////////////////////
-void BBStressDev27(Parameter *para, QforBoundaryConditions* boundaryCondition, const int level)
-{
- dim3 grid = vf::cuda::getCudaGrid( para->getParD(level)->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(para->getParD(level)->numberofthreads, 1, 1 );
-
- BBStressDevice27<<< grid, threads >>> (
- para->getParD(level)->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->kN,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- para->getParD(level)->velocityX,
- para->getParD(level)->velocityY,
- para->getParD(level)->velocityY,
- boundaryCondition->normalX,
- boundaryCondition->normalY,
- boundaryCondition->normalZ,
- boundaryCondition->Vx,
- boundaryCondition->Vy,
- boundaryCondition->Vz,
- boundaryCondition->Vx1,
- boundaryCondition->Vy1,
- boundaryCondition->Vz1,
- para->getParD(level)->wallModel.samplingOffset,
- para->getParD(level)->wallModel.z0,
- para->getHasWallModelMonitor(),
- para->getParD(level)->wallModel.u_star,
- para->getParD(level)->wallModel.Fx,
- para->getParD(level)->wallModel.Fy,
- para->getParD(level)->wallModel.Fz,
- para->getParD(level)->neighborX,
- para->getParD(level)->neighborY,
- para->getParD(level)->neighborZ,
- para->getParD(level)->numberOfNodes,
- para->getParD(level)->isEvenTimestep);
- getLastCudaError("BBStressDevice27 execution failed");
-}
-
-//////////////////////////////////////////////////////////////////////////
-void BBStressPressureDev27(Parameter *para, QforBoundaryConditions* boundaryCondition, const int level)
-{
- dim3 grid = vf::cuda::getCudaGrid( para->getParD(level)->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(para->getParD(level)->numberofthreads, 1, 1 );
-
- BBStressPressureDevice27<<< grid, threads >>> (
- para->getParD(level)->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->kN,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- para->getParD(level)->velocityX,
- para->getParD(level)->velocityY,
- para->getParD(level)->velocityY,
- boundaryCondition->normalX,
- boundaryCondition->normalY,
- boundaryCondition->normalZ,
- boundaryCondition->Vx,
- boundaryCondition->Vy,
- boundaryCondition->Vz,
- boundaryCondition->Vx1,
- boundaryCondition->Vy1,
- boundaryCondition->Vz1,
- para->getParD(level)->wallModel.samplingOffset,
- para->getParD(level)->wallModel.z0,
- para->getHasWallModelMonitor(),
- para->getParD(level)->wallModel.u_star,
- para->getParD(level)->wallModel.Fx,
- para->getParD(level)->wallModel.Fy,
- para->getParD(level)->wallModel.Fz,
- para->getParD(level)->neighborX,
- para->getParD(level)->neighborY,
- para->getParD(level)->neighborZ,
- para->getParD(level)->numberOfNodes,
- para->getParD(level)->isEvenTimestep);
- getLastCudaError("BBStressPressureDevice27 execution failed");
-}
-
-//////////////////////////////////////////////////////////////////////////
-void QPressDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
-{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(parameterDevice->numberofthreads, 1, 1 );
-
- QPressDevice27<<< grid, threads >>> (
- boundaryCondition->RhoBC,
- parameterDevice->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->q27[0],
- boundaryCondition->numberOfBCnodes,
- parameterDevice->omega,
- parameterDevice->neighborX,
- parameterDevice->neighborY,
- parameterDevice->neighborZ,
- parameterDevice->numberOfNodes,
- parameterDevice->isEvenTimestep);
- getLastCudaError("QPressDevice27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QPressDevAntiBB27(
- unsigned int numberOfThreads,
- real* rhoBC,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QPressDeviceAntiBB27<<< grid.grid, grid.threads >>>(
- rhoBC,
- vx,
- vy,
- vz,
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QPressDeviceAntiBB27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QPressDevFixBackflow27(
- unsigned int numberOfThreads,
- real* rhoBC,
- real* DD,
- int* k_Q,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QPressDeviceFixBackflow27<<< grid.grid, grid.threads >>> (
- rhoBC,
- DD,
- k_Q,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QPressDeviceFixBackflow27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QPressDevDirDepBot27(
- unsigned int numberOfThreads,
- real* rhoBC,
- real* DD,
- int* k_Q,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QPressDeviceDirDepBot27<<< grid.grid, grid.threads >>> (
- rhoBC,
- DD,
- k_Q,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QPressDeviceDirDepBot27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QInflowScaleByPressDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
-{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(parameterDevice->numberofthreads, 1, 1 );
-
- QInflowScaleByPressDevice27<<< grid, threads >>> (
- boundaryCondition->RhoBC,
- parameterDevice->distributions.f[0],
- boundaryCondition->k,
- boundaryCondition->kN,
- boundaryCondition->numberOfBCnodes,
- parameterDevice->omega,
- parameterDevice->neighborX,
- parameterDevice->neighborY,
- parameterDevice->neighborZ,
- parameterDevice->numberOfNodes,
- parameterDevice->isEvenTimestep);
- getLastCudaError("QInflowScaleByPressDevice27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QPressDevOld27(
- unsigned int numberOfThreads,
- real* rhoBC,
- real* DD,
- int* k_Q,
- int* k_N,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QPressDeviceOld27<<< grid.grid, grid.threads >>> (
- rhoBC,
- DD,
- k_Q,
- k_N,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QPressDeviceOld27 execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void QPressDevEQZ27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+void BBSlipDevComp27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
dim3 threads(parameterDevice->numberofthreads, 1, 1 );
- QPressDeviceEQZ27<<< grid, threads >>> (
- boundaryCondition->RhoBC,
+ BBSlipDeviceComp27<<< grid, threads >>> (
parameterDevice->distributions.f[0],
boundaryCondition->k,
- boundaryCondition->kN,
- parameterDevice->kDistTestRE.f[0],
+ boundaryCondition->q27[0],
boundaryCondition->numberOfBCnodes,
- parameterDevice->omega,
parameterDevice->neighborX,
parameterDevice->neighborY,
parameterDevice->neighborZ,
parameterDevice->numberOfNodes,
parameterDevice->isEvenTimestep);
- getLastCudaError("QPressDeviceEQZ27 execution failed");
+ getLastCudaError("BBSlipDeviceComp27 execution failed");
}
//////////////////////////////////////////////////////////////////////////
-void QPressDevZero27(
+void QSlipGeomDevComp27(
unsigned int numberOfThreads,
real* DD,
int* k_Q,
+ real* QQ,
unsigned int numberOfBCnodes,
+ real om1,
+ real* NormalX,
+ real* NormalY,
+ real* NormalZ,
unsigned int* neighborX,
unsigned int* neighborY,
unsigned int* neighborZ,
unsigned long long numberOfLBnodes,
bool isEvenTimestep)
{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
+ vf::cuda::CudaGrid grid(numberOfThreads, numberOfBCnodes);
- QPressDeviceZero27<<< grid.grid, grid.threads >>> (
+ QSlipGeomDeviceComp27<<< grid.grid, grid.threads >>> (
DD,
k_Q,
+ QQ,
numberOfBCnodes,
+ om1,
+ NormalX,
+ NormalY,
+ NormalZ,
neighborX,
neighborY,
neighborZ,
numberOfLBnodes,
isEvenTimestep);
- getLastCudaError("QPressDeviceOld27 execution failed");
+ getLastCudaError("QSlipGeomDeviceComp27 execution failed");
}
//////////////////////////////////////////////////////////////////////////
-void QPressDevFake27(
+void QSlipNormDevComp27(
unsigned int numberOfThreads,
- real* rhoBC,
real* DD,
int* k_Q,
- int* k_N,
+ real* QQ,
unsigned int numberOfBCnodes,
real om1,
+ real* NormalX,
+ real* NormalY,
+ real* NormalZ,
unsigned int* neighborX,
unsigned int* neighborY,
unsigned int* neighborZ,
@@ -2321,145 +1365,139 @@ void QPressDevFake27(
{
vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
-
- QPressDeviceFake27<<< grid.grid, grid.threads >>> (
- rhoBC,
+ QSlipNormDeviceComp27<<< grid.grid, grid.threads >>> (
DD,
k_Q,
- k_N,
+ QQ,
numberOfBCnodes,
om1,
+ NormalX,
+ NormalY,
+ NormalZ,
neighborX,
neighborY,
neighborZ,
numberOfLBnodes,
isEvenTimestep);
- getLastCudaError("QPressDeviceFake27 execution failed");
+ getLastCudaError("QSlipNormDeviceComp27 execution failed");
}
//////////////////////////////////////////////////////////////////////////
-void BBDev27(LBMSimulationParameter* parameterDevice, QforBoundaryConditions* boundaryCondition)
+void QStressDevComp27(Parameter *para, QforBoundaryConditions* boundaryCondition, const int level)
{
- dim3 grid = vf::cuda::getCudaGrid( parameterDevice->numberofthreads, boundaryCondition->numberOfBCnodes);
- dim3 threads(parameterDevice->numberofthreads, 1, 1 );
+ dim3 grid = vf::cuda::getCudaGrid( para->getParD(level)->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 threads(para->getParD(level)->numberofthreads, 1, 1 );
- BBDevice27<<< grid, threads >>> (
- parameterDevice->distributions.f[0],
+ QStressDeviceComp27<<< grid, threads >>> (
+ para->getParD(level)->distributions.f[0],
boundaryCondition->k,
+ boundaryCondition->kN,
boundaryCondition->q27[0],
boundaryCondition->numberOfBCnodes,
- parameterDevice->neighborX,
- parameterDevice->neighborY,
- parameterDevice->neighborZ,
- parameterDevice->numberOfNodes,
- parameterDevice->isEvenTimestep);
- getLastCudaError("BBDevice27 execution failed");
+ para->getParD(level)->omega,
+ para->getParD(level)->turbViscosity,
+ para->getParD(level)->velocityX,
+ para->getParD(level)->velocityY,
+ para->getParD(level)->velocityY,
+ boundaryCondition->normalX,
+ boundaryCondition->normalY,
+ boundaryCondition->normalZ,
+ boundaryCondition->Vx,
+ boundaryCondition->Vy,
+ boundaryCondition->Vz,
+ boundaryCondition->Vx1,
+ boundaryCondition->Vy1,
+ boundaryCondition->Vz1,
+ para->getParD(level)->wallModel.samplingOffset,
+ para->getParD(level)->wallModel.z0,
+ para->getHasWallModelMonitor(),
+ para->getParD(level)->wallModel.u_star,
+ para->getParD(level)->wallModel.Fx,
+ para->getParD(level)->wallModel.Fy,
+ para->getParD(level)->wallModel.Fz,
+ para->getParD(level)->neighborX,
+ para->getParD(level)->neighborY,
+ para->getParD(level)->neighborZ,
+ para->getParD(level)->numberOfNodes,
+ para->getParD(level)->isEvenTimestep);
+ getLastCudaError("QStressDeviceComp27 execution failed");
}
-//////////////////////////////////////////////////////////////////////////
-void QPressDev27_IntBB(
- unsigned int numberOfThreads,
- real* rho,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
- QPressDevice27_IntBB<<< grid.grid, grid.threads >>> (
- rho,
- DD,
- k_Q,
- QQ,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("QPressDevice27_IntBB execution failed");
-}
-// TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
//////////////////////////////////////////////////////////////////////////
-void PressSchlaffer27(
- unsigned int numberOfThreads,
- real* rhoBC,
- real* DD,
- real* vx0,
- real* vy0,
- real* vz0,
- real* deltaVz0,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
+void BBStressDev27(Parameter *para, QforBoundaryConditions* boundaryCondition, const int level)
{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
+ dim3 grid = vf::cuda::getCudaGrid( para->getParD(level)->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 threads(para->getParD(level)->numberofthreads, 1, 1 );
- PressSchlaff27<<< grid.grid, grid.threads >>>(
- rhoBC,
- DD,
- vx0,
- vy0,
- vz0,
- deltaVz0,
- k_Q,
- k_N,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("PressSchlaff27 execution failed");
+ BBStressDevice27<<< grid, threads >>> (
+ para->getParD(level)->distributions.f[0],
+ boundaryCondition->k,
+ boundaryCondition->kN,
+ boundaryCondition->q27[0],
+ boundaryCondition->numberOfBCnodes,
+ para->getParD(level)->velocityX,
+ para->getParD(level)->velocityY,
+ para->getParD(level)->velocityY,
+ boundaryCondition->normalX,
+ boundaryCondition->normalY,
+ boundaryCondition->normalZ,
+ boundaryCondition->Vx,
+ boundaryCondition->Vy,
+ boundaryCondition->Vz,
+ boundaryCondition->Vx1,
+ boundaryCondition->Vy1,
+ boundaryCondition->Vz1,
+ para->getParD(level)->wallModel.samplingOffset,
+ para->getParD(level)->wallModel.z0,
+ para->getHasWallModelMonitor(),
+ para->getParD(level)->wallModel.u_star,
+ para->getParD(level)->wallModel.Fx,
+ para->getParD(level)->wallModel.Fy,
+ para->getParD(level)->wallModel.Fz,
+ para->getParD(level)->neighborX,
+ para->getParD(level)->neighborY,
+ para->getParD(level)->neighborZ,
+ para->getParD(level)->numberOfNodes,
+ para->getParD(level)->isEvenTimestep);
+ getLastCudaError("BBStressDevice27 execution failed");
}
-// TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
+
//////////////////////////////////////////////////////////////////////////
-void VelSchlaffer27(
- unsigned int numberOfThreads,
- int t,
- real* DD,
- real* vz0,
- real* deltaVz0,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
+void BBStressPressureDev27(Parameter *para, QforBoundaryConditions* boundaryCondition, const int level)
{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfBCnodes);
+ dim3 grid = vf::cuda::getCudaGrid( para->getParD(level)->numberofthreads, boundaryCondition->numberOfBCnodes);
+ dim3 threads(para->getParD(level)->numberofthreads, 1, 1 );
- VelSchlaff27<<< grid.grid, grid.threads >>>(
- t,
- DD,
- vz0,
- deltaVz0,
- k_Q,
- k_N,
- numberOfBCnodes,
- om1,
- neighborX,
- neighborY,
- neighborZ,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("VelSchlaff27 execution failed");
+ BBStressPressureDevice27<<< grid, threads >>> (
+ para->getParD(level)->distributions.f[0],
+ boundaryCondition->k,
+ boundaryCondition->kN,
+ boundaryCondition->q27[0],
+ boundaryCondition->numberOfBCnodes,
+ para->getParD(level)->velocityX,
+ para->getParD(level)->velocityY,
+ para->getParD(level)->velocityY,
+ boundaryCondition->normalX,
+ boundaryCondition->normalY,
+ boundaryCondition->normalZ,
+ boundaryCondition->Vx,
+ boundaryCondition->Vy,
+ boundaryCondition->Vz,
+ boundaryCondition->Vx1,
+ boundaryCondition->Vy1,
+ boundaryCondition->Vz1,
+ para->getParD(level)->wallModel.samplingOffset,
+ para->getParD(level)->wallModel.z0,
+ para->getHasWallModelMonitor(),
+ para->getParD(level)->wallModel.u_star,
+ para->getParD(level)->wallModel.Fx,
+ para->getParD(level)->wallModel.Fy,
+ para->getParD(level)->wallModel.Fz,
+ para->getParD(level)->neighborX,
+ para->getParD(level)->neighborY,
+ para->getParD(level)->neighborZ,
+ para->getParD(level)->numberOfNodes,
+ para->getParD(level)->isEvenTimestep);
+ getLastCudaError("BBStressPressureDevice27 execution failed");
}
//////////////////////////////////////////////////////////////////////////
void QPrecursorDevCompZeroPress(LBMSimulationParameter* parameterDevice,
@@ -4794,145 +3832,6 @@ void GetVelotoForce27(
getLastCudaError("GetVeloforForcing27 execution failed");
}
//////////////////////////////////////////////////////////////////////////
-void InitParticlesDevice(
- real* coordX,
- real* coordY,
- real* coordZ,
- real* coordParticleXlocal,
- real* coordParticleYlocal,
- real* coordParticleZlocal,
- real* coordParticleXglobal,
- real* coordParticleYglobal,
- real* coordParticleZglobal,
- real* veloParticleX,
- real* veloParticleY,
- real* veloParticleZ,
- real* randArray,
- unsigned int* particleID,
- unsigned int* cellBaseID,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- int level,
- unsigned int numberOfParticles,
- unsigned long long numberOfLBnodes,
- unsigned int numberOfThreads)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfParticles);
-
- InitParticles<<< grid.grid, grid.threads >>> (
- coordX,
- coordY,
- coordZ,
- coordParticleXlocal,
- coordParticleYlocal,
- coordParticleZlocal,
- coordParticleXglobal,
- coordParticleYglobal,
- coordParticleZglobal,
- veloParticleX,
- veloParticleY,
- veloParticleZ,
- randArray,
- particleID,
- cellBaseID,
- bcMatD,
- neighborX,
- neighborY,
- neighborZ,
- neighborWSB,
- level,
- numberOfParticles,
- numberOfLBnodes);
- getLastCudaError("InitParticles execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void MoveParticlesDevice(
- real* coordX,
- real* coordY,
- real* coordZ,
- real* coordParticleXlocal,
- real* coordParticleYlocal,
- real* coordParticleZlocal,
- real* coordParticleXglobal,
- real* coordParticleYglobal,
- real* coordParticleZglobal,
- real* veloParticleX,
- real* veloParticleY,
- real* veloParticleZ,
- real* DD,
- real omega,
- unsigned int* particleID,
- unsigned int* cellBaseID,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- int level,
- unsigned int timestep,
- unsigned int numberOfTimesteps,
- unsigned int numberOfParticles,
- unsigned long long numberOfLBnodes,
- unsigned int numberOfThreads,
- bool isEvenTimestep)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfParticles);
-
- MoveParticles<<< grid.grid, grid.threads >>> (
- coordX,
- coordY,
- coordZ,
- coordParticleXlocal,
- coordParticleYlocal,
- coordParticleZlocal,
- coordParticleXglobal,
- coordParticleYglobal,
- coordParticleZglobal,
- veloParticleX,
- veloParticleY,
- veloParticleZ,
- DD,
- omega,
- particleID,
- cellBaseID,
- bcMatD,
- neighborX,
- neighborY,
- neighborZ,
- neighborWSB,
- level,
- timestep,
- numberOfTimesteps,
- numberOfParticles,
- numberOfLBnodes,
- isEvenTimestep);
- getLastCudaError("MoveParticles execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void initRandomDevice(
- curandState* state,
- unsigned long long numberOfLBnodes,
- unsigned int numberOfThreads)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfLBnodes);
- initRandom<<< grid.grid, grid.threads >>> (state);
- getLastCudaError("initRandom execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
-void generateRandomValuesDevice(
- curandState* state,
- unsigned long long numberOfLBnodes,
- real* randArray,
- unsigned int numberOfThreads)
-{
- vf::cuda::CudaGrid grid = vf::cuda::CudaGrid(numberOfThreads, numberOfLBnodes);
- generateRandomValues<<< grid.grid, grid.threads >>> (state,randArray);
- getLastCudaError("generateRandomValues execution failed");
-}
-//////////////////////////////////////////////////////////////////////////
void CalcTurbulenceIntensityDevice(
real* vxx,
real* vyy,
diff --git a/src/gpu/core/GPU/NoSlipBCs27.cu b/src/gpu/core/GPU/NoSlipBCs27.cu
deleted file mode 100644
index 1668f33adbded6f0fb324ea7beb424dbe7ffe823..0000000000000000000000000000000000000000
--- a/src/gpu/core/GPU/NoSlipBCs27.cu
+++ /dev/null
@@ -1,2548 +0,0 @@
-//=======================================================================================
-// ____ ____ __ ______ __________ __ __ __ __
-// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
-// \ \ | | | | | |_) | | | | | | | / \ | |
-// \ \ | | | | | _ / | | | | | | / /\ \ | |
-// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
-// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
-// \ \ | | ________________________________________________________________
-// \ \ | | | ______________________________________________________________|
-// \ \| | | | __ __ __ __ ______ _______
-// \ | | |_____ | | | | | | | | | _ \ / _____)
-// \ | | _____| | | | | | | | | | | \ \ \_______
-// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
-// \ _____| |__| |________| \_______/ |__| |______/ (_______/
-//
-// This file is part of VirtualFluids. VirtualFluids is free software: you can
-// redistribute it and/or modify it under the terms of the GNU General Public
-// License as published by the Free Software Foundation, either version 3 of
-// the License, or (at your option) any later version.
-//
-// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
-// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
-// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
-// for more details.
-//
-// You should have received a copy of the GNU General Public License along
-// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
-//
-//! \file NoSlipBCs27.cu
-//! \ingroup GPU
-//! \author Martin Schoenherr, Anna Wellmann
-//======================================================================================
-#include "LBM/LB.h"
-#include "lbm/constants/D3Q27.h"
-#include <basics/constants/NumericConstants.h>
-#include "LBM/GPUHelperFunctions/KernelUtilities.h"
-
-using namespace vf::basics::constant;
-using namespace vf::lbm::dir;
-using namespace vf::gpu;
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QDevice3rdMomentsComp27(
- real* distributions,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- real omega,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &distributions[dP00 * numberOfLBnodes];
- D.f[dM00] = &distributions[dM00 * numberOfLBnodes];
- D.f[d0P0] = &distributions[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &distributions[d0M0 * numberOfLBnodes];
- D.f[d00P] = &distributions[d00P * numberOfLBnodes];
- D.f[d00M] = &distributions[d00M * numberOfLBnodes];
- D.f[dPP0] = &distributions[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &distributions[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &distributions[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &distributions[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &distributions[dP0P * numberOfLBnodes];
- D.f[dM0M] = &distributions[dM0M * numberOfLBnodes];
- D.f[dP0M] = &distributions[dP0M * numberOfLBnodes];
- D.f[dM0P] = &distributions[dM0P * numberOfLBnodes];
- D.f[d0PP] = &distributions[d0PP * numberOfLBnodes];
- D.f[d0MM] = &distributions[d0MM * numberOfLBnodes];
- D.f[d0PM] = &distributions[d0PM * numberOfLBnodes];
- D.f[d0MP] = &distributions[d0MP * numberOfLBnodes];
- D.f[d000] = &distributions[d000 * numberOfLBnodes];
- D.f[dPPP] = &distributions[dPPP * numberOfLBnodes];
- D.f[dMMP] = &distributions[dMMP * numberOfLBnodes];
- D.f[dPMP] = &distributions[dPMP * numberOfLBnodes];
- D.f[dMPP] = &distributions[dMPP * numberOfLBnodes];
- D.f[dPPM] = &distributions[dPPM * numberOfLBnodes];
- D.f[dMMM] = &distributions[dMMM * numberOfLBnodes];
- D.f[dPMM] = &distributions[dPMM * numberOfLBnodes];
- D.f[dMPM] = &distributions[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &distributions[dP00 * numberOfLBnodes];
- D.f[dP00] = &distributions[dM00 * numberOfLBnodes];
- D.f[d0M0] = &distributions[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &distributions[d0M0 * numberOfLBnodes];
- D.f[d00M] = &distributions[d00P * numberOfLBnodes];
- D.f[d00P] = &distributions[d00M * numberOfLBnodes];
- D.f[dMM0] = &distributions[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &distributions[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &distributions[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &distributions[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &distributions[dP0P * numberOfLBnodes];
- D.f[dP0P] = &distributions[dM0M * numberOfLBnodes];
- D.f[dM0P] = &distributions[dP0M * numberOfLBnodes];
- D.f[dP0M] = &distributions[dM0P * numberOfLBnodes];
- D.f[d0MM] = &distributions[d0PP * numberOfLBnodes];
- D.f[d0PP] = &distributions[d0MM * numberOfLBnodes];
- D.f[d0MP] = &distributions[d0PM * numberOfLBnodes];
- D.f[d0PM] = &distributions[d0MP * numberOfLBnodes];
- D.f[d000] = &distributions[d000 * numberOfLBnodes];
- D.f[dPPP] = &distributions[dMMM * numberOfLBnodes];
- D.f[dMMP] = &distributions[dPPM * numberOfLBnodes];
- D.f[dPMP] = &distributions[dMPM * numberOfLBnodes];
- D.f[dMPP] = &distributions[dPMM * numberOfLBnodes];
- D.f[dPPM] = &distributions[dMMP * numberOfLBnodes];
- D.f[dMMM] = &distributions[dPPP * numberOfLBnodes];
- D.f[dPMM] = &distributions[dMPP * numberOfLBnodes];
- D.f[dMPM] = &distributions[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k < numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &subgridDistances[dP00 * numberOfBCnodes];
- q_dirW = &subgridDistances[dM00 * numberOfBCnodes];
- q_dirN = &subgridDistances[d0P0 * numberOfBCnodes];
- q_dirS = &subgridDistances[d0M0 * numberOfBCnodes];
- q_dirT = &subgridDistances[d00P * numberOfBCnodes];
- q_dirB = &subgridDistances[d00M * numberOfBCnodes];
- q_dirNE = &subgridDistances[dPP0 * numberOfBCnodes];
- q_dirSW = &subgridDistances[dMM0 * numberOfBCnodes];
- q_dirSE = &subgridDistances[dPM0 * numberOfBCnodes];
- q_dirNW = &subgridDistances[dMP0 * numberOfBCnodes];
- q_dirTE = &subgridDistances[dP0P * numberOfBCnodes];
- q_dirBW = &subgridDistances[dM0M * numberOfBCnodes];
- q_dirBE = &subgridDistances[dP0M * numberOfBCnodes];
- q_dirTW = &subgridDistances[dM0P * numberOfBCnodes];
- q_dirTN = &subgridDistances[d0PP * numberOfBCnodes];
- q_dirBS = &subgridDistances[d0MM * numberOfBCnodes];
- q_dirBN = &subgridDistances[d0PM * numberOfBCnodes];
- q_dirTS = &subgridDistances[d0MP * numberOfBCnodes];
- q_dirTNE = &subgridDistances[dPPP * numberOfBCnodes];
- q_dirTSW = &subgridDistances[dMMP * numberOfBCnodes];
- q_dirTSE = &subgridDistances[dPMP * numberOfBCnodes];
- q_dirTNW = &subgridDistances[dMPP * numberOfBCnodes];
- q_dirBNE = &subgridDistances[dPPM * numberOfBCnodes];
- q_dirBSW = &subgridDistances[dMMM * numberOfBCnodes];
- q_dirBSE = &subgridDistances[dPMM * numberOfBCnodes];
- q_dirBNW = &subgridDistances[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int numberOfNodesK = subgridDistanceIndices[k];
- unsigned int kzero= numberOfNodesK;
- unsigned int ke = numberOfNodesK;
- unsigned int kw = neighborX[numberOfNodesK];
- unsigned int kn = numberOfNodesK;
- unsigned int ks = neighborY[numberOfNodesK];
- unsigned int kt = numberOfNodesK;
- unsigned int kb = neighborZ[numberOfNodesK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = numberOfNodesK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = numberOfNodesK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = numberOfNodesK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = numberOfNodesK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
- f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
-
- f_W = (D.f[dP00])[ke ];
- f_E = (D.f[dM00])[kw ];
- f_S = (D.f[d0P0])[kn ];
- f_N = (D.f[d0M0])[ks ];
- f_B = (D.f[d00P])[kt ];
- f_T = (D.f[d00M])[kb ];
- f_SW = (D.f[dPP0])[kne ];
- f_NE = (D.f[dMM0])[ksw ];
- f_NW = (D.f[dPM0])[kse ];
- f_SE = (D.f[dMP0])[knw ];
- f_BW = (D.f[dP0P])[kte ];
- f_TE = (D.f[dM0M])[kbw ];
- f_TW = (D.f[dP0M])[kbe ];
- f_BE = (D.f[dM0P])[ktw ];
- f_BS = (D.f[d0PP])[ktn ];
- f_TN = (D.f[d0MM])[kbs ];
- f_TS = (D.f[d0PM])[kbn ];
- f_BN = (D.f[d0MP])[kts ];
- f_BSW = (D.f[dPPP])[ktne ];
- f_BNE = (D.f[dMMP])[ktsw ];
- f_BNW = (D.f[dPMP])[ktse ];
- f_BSE = (D.f[dMPP])[ktnw ];
- f_TSW = (D.f[dPPM])[kbne ];
- f_TNE = (D.f[dMMM])[kbsw ];
- f_TNW = (D.f[dPMM])[kbse ];
- f_TSE = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////
- real vx1, vx2, vx3, drho, feq, q, m3;
- drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
-
- vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W)) / (c1o1 + drho);
-
-
- vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S)) / (c1o1 + drho);
-
- vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B)) / (c1o1 + drho);
-
- real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3) * (c1o1 + drho);
-
- //////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &distributions[dP00 * numberOfLBnodes];
- D.f[dM00] = &distributions[dM00 * numberOfLBnodes];
- D.f[d0P0] = &distributions[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &distributions[d0M0 * numberOfLBnodes];
- D.f[d00P] = &distributions[d00P * numberOfLBnodes];
- D.f[d00M] = &distributions[d00M * numberOfLBnodes];
- D.f[dPP0] = &distributions[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &distributions[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &distributions[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &distributions[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &distributions[dP0P * numberOfLBnodes];
- D.f[dM0M] = &distributions[dM0M * numberOfLBnodes];
- D.f[dP0M] = &distributions[dP0M * numberOfLBnodes];
- D.f[dM0P] = &distributions[dM0P * numberOfLBnodes];
- D.f[d0PP] = &distributions[d0PP * numberOfLBnodes];
- D.f[d0MM] = &distributions[d0MM * numberOfLBnodes];
- D.f[d0PM] = &distributions[d0PM * numberOfLBnodes];
- D.f[d0MP] = &distributions[d0MP * numberOfLBnodes];
- D.f[d000] = &distributions[d000 * numberOfLBnodes];
- D.f[dPPP] = &distributions[dPPP * numberOfLBnodes];
- D.f[dMMP] = &distributions[dMMP * numberOfLBnodes];
- D.f[dPMP] = &distributions[dPMP * numberOfLBnodes];
- D.f[dMPP] = &distributions[dMPP * numberOfLBnodes];
- D.f[dPPM] = &distributions[dPPM * numberOfLBnodes];
- D.f[dMMM] = &distributions[dMMM * numberOfLBnodes];
- D.f[dPMM] = &distributions[dPMM * numberOfLBnodes];
- D.f[dMPM] = &distributions[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &distributions[dP00 * numberOfLBnodes];
- D.f[dP00] = &distributions[dM00 * numberOfLBnodes];
- D.f[d0M0] = &distributions[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &distributions[d0M0 * numberOfLBnodes];
- D.f[d00M] = &distributions[d00P * numberOfLBnodes];
- D.f[d00P] = &distributions[d00M * numberOfLBnodes];
- D.f[dMM0] = &distributions[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &distributions[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &distributions[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &distributions[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &distributions[dP0P * numberOfLBnodes];
- D.f[dP0P] = &distributions[dM0M * numberOfLBnodes];
- D.f[dM0P] = &distributions[dP0M * numberOfLBnodes];
- D.f[dP0M] = &distributions[dM0P * numberOfLBnodes];
- D.f[d0MM] = &distributions[d0PP * numberOfLBnodes];
- D.f[d0PP] = &distributions[d0MM * numberOfLBnodes];
- D.f[d0MP] = &distributions[d0PM * numberOfLBnodes];
- D.f[d0PM] = &distributions[d0MP * numberOfLBnodes];
- D.f[d000] = &distributions[d000 * numberOfLBnodes];
- D.f[dPPP] = &distributions[dMMM * numberOfLBnodes];
- D.f[dMMP] = &distributions[dPPM * numberOfLBnodes];
- D.f[dPMP] = &distributions[dMPM * numberOfLBnodes];
- D.f[dMPP] = &distributions[dPMM * numberOfLBnodes];
- D.f[dPPM] = &distributions[dMMP * numberOfLBnodes];
- D.f[dMMM] = &distributions[dPPP * numberOfLBnodes];
- D.f[dPMM] = &distributions[dMPP * numberOfLBnodes];
- D.f[dMPM] = &distributions[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //Test
- //(D.f[d000])[k]=c1o10;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
- //ToDo anders klammern !!!!!!
-
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_E - f_W - c2o1 * drho * c2o27 * (c3o1*( vx1 ));
- feq=c2o27* (drho/*+three*( vx1 )*/+c9o2*( vx1 )*( vx1 ) * (c1o1 + drho)-cu_sq);
- (D.f[dM00])[kw]=(c1o1-q)/(c1o1+q)*(f_E-f_W-m3+(f_E+f_W-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_E+f_W))/(c1o1+q)+(m3*c1o2);
- //(D.f[dM00])[kw]=zero;
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_W - f_E - c2o1 * drho * c2o27 * (c3o1*(-vx1 ));
- feq=c2o27* (drho/*+three*(-vx1 )*/+c9o2*(-vx1 )*(-vx1 ) * (c1o1 + drho)-cu_sq);
- (D.f[dP00])[ke]=(c1o1-q)/(c1o1+q)*(f_W-f_E-m3+(f_W+f_E-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_W+f_E))/(c1o1+q)+(m3*c1o2);
- //(D.f[dP00])[ke]=zero;
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_N - f_S - c2o1 * drho * c2o27 * (c3o1*( vx2 ));
- feq=c2o27* (drho/*+three*( vx2 )*/+c9o2*( vx2 )*( vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[d0M0])[ks]=(c1o1-q)/(c1o1+q)*(f_N-f_S-m3+(f_N+f_S-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_N+f_S))/(c1o1+q)+(m3*c1o2);
- //(D.f[d0M0])[ks]=zero;
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_S - f_N - c2o1 * drho * c2o27 * (c3o1*( -vx2 ));
- feq=c2o27* (drho/*+three*( -vx2 )*/+c9o2*( -vx2 )*( -vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[d0P0])[kn]=(c1o1-q)/(c1o1+q)*(f_S-f_N-m3+(f_S+f_N-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_S+f_N))/(c1o1+q)+(m3*c1o2);
- //(D.f[d0P0])[kn]=zero;
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_T - f_B - c2o1 * drho * c2o27 * (c3o1*( vx3));
- feq=c2o27* (drho/*+three*( vx3)*/+c9o2*( vx3)*( vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d00M])[kb]=(c1o1-q)/(c1o1+q)*(f_T-f_B-m3+(f_T+f_B-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_T+f_B))/(c1o1+q)+(m3*c1o2);
- //(D.f[d00M])[kb]=one;
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_B - f_T - c2o1 * drho * c2o27 * (c3o1*( -vx3));
- feq=c2o27* (drho/*+three*( -vx3)*/+c9o2*( -vx3)*( -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d00P])[kt]=(c1o1-q)/(c1o1+q)*(f_B-f_T-m3+(f_B+f_T-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_B+f_T))/(c1o1+q)+(m3*c1o2);
- //(D.f[d00P])[kt]=zero;
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_NE - f_SW - c2o1 * drho * c1o54 * (c3o1*( vx1+vx2 ));
- feq=c1o54* (drho/*+three*( vx1+vx2 )*/+c9o2*( vx1+vx2 )*( vx1+vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dMM0])[ksw]=(c1o1-q)/(c1o1+q)*(f_NE-f_SW-m3+(f_NE+f_SW-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_NE+f_SW))/(c1o1+q)+(m3*c1o2);
- //(D.f[dMM0])[ksw]=zero;
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_SW - f_NE - c2o1 * drho * c1o54 * (c3o1*(-vx1-vx2 ));
- feq=c1o54* (drho/*+three*(-vx1-vx2 )*/+c9o2*(-vx1-vx2 )*(-vx1-vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dPP0])[kne]=(c1o1-q)/(c1o1+q)*(f_SW-f_NE-m3+(f_SW+f_NE-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_SW+f_NE))/(c1o1+q)+(m3*c1o2);
- //(D.f[dPP0])[kne]=zero;
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_SE - f_NW - c2o1 * drho * c1o54 * (c3o1*( vx1-vx2 ));
- feq=c1o54* (drho/*+three*( vx1-vx2 )*/+c9o2*( vx1-vx2 )*( vx1-vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dMP0])[knw]=(c1o1-q)/(c1o1+q)*(f_SE-f_NW-m3+(f_SE+f_NW-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_SE+f_NW))/(c1o1+q)+(m3*c1o2);
- //(D.f[dMP0])[knw]=zero;
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_NW - f_SE - c2o1 * drho * c1o54 * (c3o1*(-vx1+vx2 ));
- feq=c1o54* (drho/*+three*(-vx1+vx2 )*/+c9o2*(-vx1+vx2 )*(-vx1+vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dPM0])[kse]=(c1o1-q)/(c1o1+q)*(f_NW-f_SE-m3+(f_NW+f_SE-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_NW+f_SE))/(c1o1+q)+(m3*c1o2);
- //(D.f[dPM0])[kse]=zero;
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_TE - f_BW - c2o1 * drho * c1o54 * (c3o1*( vx1 +vx3));
- feq=c1o54* (drho/*+three*( vx1 +vx3)*/+c9o2*( vx1 +vx3)*( vx1 +vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dM0M])[kbw]=(c1o1-q)/(c1o1+q)*(f_TE-f_BW-m3+(f_TE+f_BW-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_TE+f_BW))/(c1o1+q)+(m3*c1o2);
- //(D.f[dM0M])[kbw]=zero;
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_BW - f_TE - c2o1 * drho * c1o54 * (c3o1*(-vx1 -vx3));
- feq=c1o54* (drho/*+three*(-vx1 -vx3)*/+c9o2*(-vx1 -vx3)*(-vx1 -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dP0P])[kte]=(c1o1-q)/(c1o1+q)*(f_BW-f_TE-m3+(f_BW+f_TE-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_BW+f_TE))/(c1o1+q)+(m3*c1o2);
- //(D.f[dP0P])[kte]=zero;
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_BE - f_TW - c2o1 * drho * c1o54 * (c3o1*( vx1 -vx3));
- feq=c1o54* (drho/*+three*( vx1 -vx3)*/+c9o2*( vx1 -vx3)*( vx1 -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dM0P])[ktw]=(c1o1-q)/(c1o1+q)*(f_BE-f_TW-m3+(f_BE+f_TW-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_BE+f_TW))/(c1o1+q)+(m3*c1o2);
- //(D.f[dM0P])[ktw]=zero;
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_TW - f_BE - c2o1 * drho * c1o54 * (c3o1*(-vx1 +vx3));
- feq=c1o54* (drho/*+three*(-vx1 +vx3)*/+c9o2*(-vx1 +vx3)*(-vx1 +vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dP0M])[kbe]=(c1o1-q)/(c1o1+q)*(f_TW-f_BE-m3+(f_TW+f_BE-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_TW+f_BE))/(c1o1+q)+(m3*c1o2);
- //(D.f[dP0M])[kbe]=zero;
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_TN - f_BS - c2o1 * drho * c1o54 * (c3o1*( vx2+vx3));
- feq=c1o54* (drho/*+three*( vx2+vx3)*/+c9o2*( vx2+vx3)*( vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0MM])[kbs]=(c1o1-q)/(c1o1+q)*(f_TN-f_BS-m3+(f_TN+f_BS-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_TN+f_BS))/(c1o1+q)+(m3*c1o2);
- //(D.f[d0MM])[kbs]=zero;
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_BS - f_TN - c2o1 * drho * c1o54 * (c3o1*( -vx2-vx3));
- feq=c1o54* (drho/*+three*( -vx2-vx3)*/+c9o2*( -vx2-vx3)*( -vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0PP])[ktn]=(c1o1-q)/(c1o1+q)*(f_BS-f_TN-m3+(f_BS+f_TN-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_BS+f_TN))/(c1o1+q)+(m3*c1o2);
- //(D.f[d0PP])[ktn]=zero;
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_BN - f_TS - c2o1 * drho * c1o54 * (c3o1*( vx2-vx3));
- feq=c1o54* (drho/*+three*( vx2-vx3)*/+c9o2*( vx2-vx3)*( vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0MP])[kts]=(c1o1-q)/(c1o1+q)*(f_BN-f_TS-m3+(f_BN+f_TS-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_BN+f_TS))/(c1o1+q)+(m3*c1o2);
- //(D.f[d0MP])[kts]=zero;
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_TS - f_BN - c2o1 * drho * c1o54 * (c3o1*( -vx2+vx3));
- feq=c1o54* (drho/*+three*( -vx2+vx3)*/+c9o2*( -vx2+vx3)*( -vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0PM])[kbn]=(c1o1-q)/(c1o1+q)*(f_TS-f_BN-m3+(f_TS+f_BN-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_TS+f_BN))/(c1o1+q)+(m3*c1o2);
- //(D.f[d0PM])[kbn]=zero;
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_TNE - f_BSW - c2o1 * drho * c1o216 * (c3o1*( vx1+vx2+vx3));
- feq=c1o216*(drho/*+three*( vx1+vx2+vx3)*/+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMMM])[kbsw]=(c1o1-q)/(c1o1+q)*(f_TNE-f_BSW-m3+(f_TNE+f_BSW-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_TNE+f_BSW))/(c1o1+q)+(m3*c1o2);
- //(D.f[dMMM])[kbsw]=zero;
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_BSW - f_TNE - c2o1 * drho * c1o216 * (c3o1*(-vx1-vx2-vx3));
- feq=c1o216*(drho/*+three*(-vx1-vx2-vx3)*/+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPPP])[ktne]=(c1o1-q)/(c1o1+q)*(f_BSW-f_TNE-m3+(f_BSW+f_TNE-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_BSW+f_TNE))/(c1o1+q)+(m3*c1o2);
- //(D.f[dPPP])[ktne]=zero;
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_BNE - f_TSW - c2o1 * drho * c1o216 * (c3o1*( vx1+vx2-vx3));
- feq=c1o216*(drho/*+three*( vx1+vx2-vx3)*/+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMMP])[ktsw]=(c1o1-q)/(c1o1+q)*(f_BNE-f_TSW-m3+(f_BNE+f_TSW-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_BNE+f_TSW))/(c1o1+q)+(m3*c1o2);
- //(D.f[dMMP])[ktsw]=zero;
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_TSW - f_BNE - c2o1 * drho * c1o216 * (c3o1*(-vx1-vx2+vx3));
- feq=c1o216*(drho/*+three*(-vx1-vx2+vx3)*/+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPPM])[kbne]=(c1o1-q)/(c1o1+q)*(f_TSW-f_BNE-m3+(f_TSW+f_BNE-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_TSW+f_BNE))/(c1o1+q)+(m3*c1o2);
- //(D.f[dPPM])[kbne]=zero;
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_TSE - f_BNW - c2o1 * drho * c1o216 * (c3o1*( vx1-vx2+vx3));
- feq=c1o216*(drho/*+three*( vx1-vx2+vx3)*/+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMPM])[kbnw]=(c1o1-q)/(c1o1+q)*(f_TSE-f_BNW-m3+(f_TSE+f_BNW-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_TSE+f_BNW))/(c1o1+q)+(m3*c1o2);
- //(D.f[dMPM])[kbnw]=zero;
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_BNW - f_TSE - c2o1 * drho * c1o216 * (c3o1*(-vx1+vx2-vx3));
- feq=c1o216*(drho/*+three*(-vx1+vx2-vx3)*/+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPMP])[ktse]=(c1o1-q)/(c1o1+q)*(f_BNW-f_TSE-m3+(f_BNW+f_TSE-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_BNW+f_TSE))/(c1o1+q)+(m3*c1o2);
- //(D.f[dPMP])[ktse]=zero;
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_BSE - f_TNW - c2o1 * drho * c1o216 * (c3o1*( vx1-vx2-vx3));
- feq=c1o216*(drho/*+three*( vx1-vx2-vx3)*/+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMPP])[ktnw]=(c1o1-q)/(c1o1+q)*(f_BSE-f_TNW-m3+(f_BSE+f_TNW-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_BSE+f_TNW))/(c1o1+q)+(m3*c1o2);
- //(D.f[dMPP])[ktnw]=zero;
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- m3 = f_TNW - f_BSE - c2o1 * drho * c1o216 * (c3o1*(-vx1+vx2+vx3));
- feq=c1o216*(drho/*+three*(-vx1+vx2+vx3)*/+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPMM])[kbse]=(c1o1-q)/(c1o1+q)*(f_TNW-f_BSE-m3+(f_TNW+f_BSE-c2o1*feq*omega)/(c1o1-omega))*c1o2+(q*(f_TNW+f_BSE))/(c1o1+q)+(m3*c1o2);
- //(D.f[dPMM])[kbse]=zero;
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QDeviceIncompHighNu27(
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int numberOfNodesK = k_Q[k];
- unsigned int kzero= numberOfNodesK;
- unsigned int ke = numberOfNodesK;
- unsigned int kw = neighborX[numberOfNodesK];
- unsigned int kn = numberOfNodesK;
- unsigned int ks = neighborY[numberOfNodesK];
- unsigned int kt = numberOfNodesK;
- unsigned int kb = neighborZ[numberOfNodesK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = numberOfNodesK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = numberOfNodesK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = numberOfNodesK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = numberOfNodesK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
- f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
-
- f_E = (D.f[dP00])[ke ];
- f_W = (D.f[dM00])[kw ];
- f_N = (D.f[d0P0])[kn ];
- f_S = (D.f[d0M0])[ks ];
- f_T = (D.f[d00P])[kt ];
- f_B = (D.f[d00M])[kb ];
- f_NE = (D.f[dPP0])[kne ];
- f_SW = (D.f[dMM0])[ksw ];
- f_SE = (D.f[dPM0])[kse ];
- f_NW = (D.f[dMP0])[knw ];
- f_TE = (D.f[dP0P])[kte ];
- f_BW = (D.f[dM0M])[kbw ];
- f_BE = (D.f[dP0M])[kbe ];
- f_TW = (D.f[dM0P])[ktw ];
- f_TN = (D.f[d0PP])[ktn ];
- f_BS = (D.f[d0MM])[kbs ];
- f_BN = (D.f[d0PM])[kbn ];
- f_TS = (D.f[d0MP])[kts ];
- f_TNE = (D.f[dPPP])[ktne ];
- f_TSW = (D.f[dMMP])[ktsw ];
- f_TSE = (D.f[dPMP])[ktse ];
- f_TNW = (D.f[dMPP])[ktnw ];
- f_BNE = (D.f[dPPM])[kbne ];
- f_BSW = (D.f[dMMM])[kbsw ];
- f_BSE = (D.f[dPMM])[kbse ];
- f_BNW = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////
- real vx1, vx2, vx3, drho, feq, q;
- drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
-
- vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W));// / (one + drho);
-
-
- vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S));// / (one + drho);
-
- vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B));// / (one + drho);
-
- real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);// * (one + drho);
-
- //////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //Test
- //(D.f[d000])[k]=c1o10;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real VeloX = c0o1;
- real VeloY = c0o1;
- real VeloZ = c0o1;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
- //ToDo anders klammern !!!!!!
-
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx1 )*/+c9o2*( vx1 )*( vx1 ) /** (one + drho)*/-cu_sq);
- (D.f[dM00])[kw]=((c1o1 - q) * f_E + q * ((f_E + f_W) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloX )) / (q + c1o1) ;
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*(-vx1 )*/+c9o2*(-vx1 )*(-vx1 ) /** (one + drho)*/-cu_sq);
- (D.f[dP00])[ke]=((c1o1 - q) * f_W + q * ((f_W + f_E) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloX )) / (q + c1o1) ;
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx2 )*/+c9o2*( vx2 )*( vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[d0M0])[ks]=((c1o1 - q) * f_N + q * ((f_N + f_S) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloY )) / (q + c1o1) ;
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx2 )*/+c9o2*( -vx2 )*( -vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[d0P0])[kn]=((c1o1 - q) * f_S + q * ((f_S + f_N) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloY )) / (q + c1o1) ;
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx3)*/+c9o2*( vx3)*( vx3) /** (one + drho)*/-cu_sq);
- (D.f[d00M])[kb]=((c1o1 - q) * f_T + q * ((f_T + f_B) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloZ )) / (q + c1o1) ;
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx3)*/+c9o2*( -vx3)*( -vx3) /** (one + drho)*/-cu_sq);
- (D.f[d00P])[kt]=((c1o1 - q) * f_B + q * ((f_B + f_T) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloZ )) / (q + c1o1) ;
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1+vx2 )*/+c9o2*( vx1+vx2 )*( vx1+vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[dMM0])[ksw]=((c1o1 - q) * f_NE + q * ((f_NE + f_SW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX+VeloY)) / (q + c1o1) ;
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1-vx2 )*/+c9o2*(-vx1-vx2 )*(-vx1-vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[dPP0])[kne]=((c1o1 - q) * f_SW + q * ((f_SW + f_NE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX-VeloY)) / (q + c1o1) ;
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1-vx2 )*/+c9o2*( vx1-vx2 )*( vx1-vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[dMP0])[knw]=((c1o1 - q) * f_SE + q * ((f_SE + f_NW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX-VeloY)) / (q + c1o1) ;
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1+vx2 )*/+c9o2*(-vx1+vx2 )*(-vx1+vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[dPM0])[kse]=((c1o1 - q) * f_NW + q * ((f_NW + f_SE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX+VeloY)) / (q + c1o1) ;
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 +vx3)*/+c9o2*( vx1 +vx3)*( vx1 +vx3) /** (one + drho)*/-cu_sq);
- (D.f[dM0M])[kbw]=((c1o1 - q) * f_TE + q * ((f_TE + f_BW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 -vx3)*/+c9o2*(-vx1 -vx3)*(-vx1 -vx3) /** (one + drho)*/-cu_sq);
- (D.f[dP0P])[kte]=((c1o1 - q) * f_BW + q * ((f_BW + f_TE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 -vx3)*/+c9o2*( vx1 -vx3)*( vx1 -vx3) /** (one + drho)*/-cu_sq);
- (D.f[dM0P])[ktw]=((c1o1 - q) * f_BE + q * ((f_BE + f_TW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 +vx3)*/+c9o2*(-vx1 +vx3)*(-vx1 +vx3) /** (one + drho)*/-cu_sq);
- (D.f[dP0M])[kbe]=((c1o1 - q) * f_TW + q * ((f_TW + f_BE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2+vx3)*/+c9o2*( vx2+vx3)*( vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[d0MM])[kbs]=((c1o1 - q) * f_TN + q * ((f_TN + f_BS) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloY+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2-vx3)*/+c9o2*( -vx2-vx3)*( -vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[d0PP])[ktn]=((c1o1 - q) * f_BS + q * ((f_BS + f_TN) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2-vx3)*/+c9o2*( vx2-vx3)*( vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[d0MP])[kts]=((c1o1 - q) * f_BN + q * ((f_BN + f_TS) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2+vx3)*/+c9o2*( -vx2+vx3)*( -vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[d0PM])[kbn]=((c1o1 - q) * f_TS + q * ((f_TS + f_BN) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloY+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2+vx3)*/+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[dMMM])[kbsw]=((c1o1 - q) * f_TNE + q * ((f_TNE + f_BSW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX+VeloY+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2-vx3)*/+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[dPPP])[ktne]=((c1o1 - q) * f_BSW + q * ((f_BSW + f_TNE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX-VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2-vx3)*/+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[dMMP])[ktsw]=((c1o1 - q) * f_BNE + q * ((f_BNE + f_TSW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX+VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2+vx3)*/+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[dPPM])[kbne]=((c1o1 - q) * f_TSW + q * ((f_TSW + f_BNE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX-VeloY+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2+vx3)*/+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[dMPM])[kbnw]=((c1o1 - q) * f_TSE + q * ((f_TSE + f_BNW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX-VeloY+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2-vx3)*/+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[dPMP])[ktse]=((c1o1 - q) * f_BNW + q * ((f_BNW + f_TSE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX+VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2-vx3)*/+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[dMPP])[ktnw]=((c1o1 - q) * f_BSE + q * ((f_BSE + f_TNW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX-VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2+vx3)*/+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[dPMM])[kbse]=((c1o1 - q) * f_TNW + q * ((f_TNW + f_BSE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX+VeloY+VeloZ)) / (q + c1o1) ;
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QDeviceCompHighNu27(
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int numberOfNodesK = k_Q[k];
- unsigned int kzero= numberOfNodesK;
- unsigned int ke = numberOfNodesK;
- unsigned int kw = neighborX[numberOfNodesK];
- unsigned int kn = numberOfNodesK;
- unsigned int ks = neighborY[numberOfNodesK];
- unsigned int kt = numberOfNodesK;
- unsigned int kb = neighborZ[numberOfNodesK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = numberOfNodesK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = numberOfNodesK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = numberOfNodesK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = numberOfNodesK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
- f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
-
- f_E = (D.f[dP00])[ke ];
- f_W = (D.f[dM00])[kw ];
- f_N = (D.f[d0P0])[kn ];
- f_S = (D.f[d0M0])[ks ];
- f_T = (D.f[d00P])[kt ];
- f_B = (D.f[d00M])[kb ];
- f_NE = (D.f[dPP0])[kne ];
- f_SW = (D.f[dMM0])[ksw ];
- f_SE = (D.f[dPM0])[kse ];
- f_NW = (D.f[dMP0])[knw ];
- f_TE = (D.f[dP0P])[kte ];
- f_BW = (D.f[dM0M])[kbw ];
- f_BE = (D.f[dP0M])[kbe ];
- f_TW = (D.f[dM0P])[ktw ];
- f_TN = (D.f[d0PP])[ktn ];
- f_BS = (D.f[d0MM])[kbs ];
- f_BN = (D.f[d0PM])[kbn ];
- f_TS = (D.f[d0MP])[kts ];
- f_TNE = (D.f[dPPP])[ktne ];
- f_TSW = (D.f[dMMP])[ktsw ];
- f_TSE = (D.f[dPMP])[ktse ];
- f_TNW = (D.f[dMPP])[ktnw ];
- f_BNE = (D.f[dPPM])[kbne ];
- f_BSW = (D.f[dMMM])[kbsw ];
- f_BSE = (D.f[dPMM])[kbse ];
- f_BNW = (D.f[dMPM])[kbnw ];
- //f_W = (D.f[dP00])[ke ];
- //f_E = (D.f[dM00])[kw ];
- //f_S = (D.f[d0P0])[kn ];
- //f_N = (D.f[d0M0])[ks ];
- //f_B = (D.f[d00P])[kt ];
- //f_T = (D.f[d00M])[kb ];
- //f_SW = (D.f[dPP0])[kne ];
- //f_NE = (D.f[dMM0])[ksw ];
- //f_NW = (D.f[dPM0])[kse ];
- //f_SE = (D.f[dMP0])[knw ];
- //f_BW = (D.f[dP0P])[kte ];
- //f_TE = (D.f[dM0M])[kbw ];
- //f_TW = (D.f[dP0M])[kbe ];
- //f_BE = (D.f[dM0P])[ktw ];
- //f_BS = (D.f[d0PP])[ktn ];
- //f_TN = (D.f[d0MM])[kbs ];
- //f_TS = (D.f[d0PM])[kbn ];
- //f_BN = (D.f[d0MP])[kts ];
- //f_BSW = (D.f[dPPP])[ktne ];
- //f_BNE = (D.f[dMMP])[ktsw ];
- //f_BNW = (D.f[dPMP])[ktse ];
- //f_BSE = (D.f[dMPP])[ktnw ];
- //f_TSW = (D.f[dPPM])[kbne ];
- //f_TNE = (D.f[dMMM])[kbsw ];
- //f_TNW = (D.f[dPMM])[kbse ];
- //f_TSE = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////
- real vx1, vx2, vx3, drho, feq, q;
- drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
-
- vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W)) / (c1o1 + drho);
-
-
- vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S)) / (c1o1 + drho);
-
- vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B)) / (c1o1 + drho);
-
- real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3) * (c1o1 + drho);
-
- //////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //Test
- //(D.f[d000])[k]=c1o10;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real VeloX = c0o1;
- real VeloY = c0o1;
- real VeloZ = c0o1;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
- //ToDo anders klammern !!!!!!
-
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx1 )*/+c9o2*( vx1 )*( vx1 ) * (c1o1 + drho)-cu_sq);
- (D.f[dM00])[kw]=((c1o1 - q) * f_E + q * ((f_E + f_W) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloX )) / (q + c1o1) ;
- //(D.f[dM00])[kw]=(one-q)/(one+q)*(f_E-f_W+(f_E+f_W-two*feq*om1)/(one-om1))*c1o2+(q*(f_E+f_W)-six*c2over27*( VeloX ))/(one+q) - c2over27 * drho;
- //(D.f[dM00])[kw]=zero;
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*(-vx1 )*/+c9o2*(-vx1 )*(-vx1 ) * (c1o1 + drho)-cu_sq);
- (D.f[dP00])[ke]=((c1o1 - q) * f_W + q * ((f_W + f_E) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloX )) / (q + c1o1) ;
- //(D.f[dP00])[ke]=(one-q)/(one+q)*(f_W-f_E+(f_W+f_E-two*feq*om1)/(one-om1))*c1o2+(q*(f_W+f_E)-six*c2over27*(-VeloX ))/(one+q) - c2over27 * drho;
- //(D.f[dP00])[ke]=zero;
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx2 )*/+c9o2*( vx2 )*( vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[d0M0])[ks]=((c1o1 - q) * f_N + q * ((f_N + f_S) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloY )) / (q + c1o1) ;
- //(D.f[d0M0])[ks]=(one-q)/(one+q)*(f_N-f_S+(f_N+f_S-two*feq*om1)/(one-om1))*c1o2+(q*(f_N+f_S)-six*c2over27*( VeloY ))/(one+q) - c2over27 * drho;
- //(D.f[d0M0])[ks]=zero;
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx2 )*/+c9o2*( -vx2 )*( -vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[d0P0])[kn]=((c1o1 - q) * f_S + q * ((f_S + f_N) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloY )) / (q + c1o1) ;
- //(D.f[d0P0])[kn]=(one-q)/(one+q)*(f_S-f_N+(f_S+f_N-two*feq*om1)/(one-om1))*c1o2+(q*(f_S+f_N)-six*c2over27*(-VeloY ))/(one+q) - c2over27 * drho;
- //(D.f[d0P0])[kn]=zero;
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx3)*/+c9o2*( vx3)*( vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d00M])[kb]=((c1o1 - q) * f_T + q * ((f_T + f_B) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloZ )) / (q + c1o1) ;
- //(D.f[d00M])[kb]=(one-q)/(one+q)*(f_T-f_B+(f_T+f_B-two*feq*om1)/(one-om1))*c1o2+(q*(f_T+f_B)-six*c2over27*( VeloZ ))/(one+q) - c2over27 * drho;
- //(D.f[d00M])[kb]=one;
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx3)*/+c9o2*( -vx3)*( -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d00P])[kt]=((c1o1 - q) * f_B + q * ((f_B + f_T) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloZ )) / (q + c1o1) ;
- //(D.f[d00P])[kt]=(one-q)/(one+q)*(f_B-f_T+(f_B+f_T-two*feq*om1)/(one-om1))*c1o2+(q*(f_B+f_T)-six*c2over27*(-VeloZ ))/(one+q) - c2over27 * drho;
- //(D.f[d00P])[kt]=zero;
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1+vx2 )*/+c9o2*( vx1+vx2 )*( vx1+vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dMM0])[ksw]=((c1o1 - q) * f_NE + q * ((f_NE + f_SW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX+VeloY)) / (q + c1o1) ;
- //(D.f[dMM0])[ksw]=(one-q)/(one+q)*(f_NE-f_SW+(f_NE+f_SW-two*feq*om1)/(one-om1))*c1o2+(q*(f_NE+f_SW)-six*c1over54*(VeloX+VeloY))/(one+q) - c1over54 * drho;
- //(D.f[dMM0])[ksw]=zero;
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1-vx2 )*/+c9o2*(-vx1-vx2 )*(-vx1-vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dPP0])[kne]=((c1o1 - q) * f_SW + q * ((f_SW + f_NE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX-VeloY)) / (q + c1o1) ;
- //(D.f[dPP0])[kne]=(one-q)/(one+q)*(f_SW-f_NE+(f_SW+f_NE-two*feq*om1)/(one-om1))*c1o2+(q*(f_SW+f_NE)-six*c1over54*(-VeloX-VeloY))/(one+q) - c1over54 * drho;
- //(D.f[dPP0])[kne]=zero;
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1-vx2 )*/+c9o2*( vx1-vx2 )*( vx1-vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dMP0])[knw]=((c1o1 - q) * f_SE + q * ((f_SE + f_NW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX-VeloY)) / (q + c1o1) ;
- //(D.f[dMP0])[knw]=(one-q)/(one+q)*(f_SE-f_NW+(f_SE+f_NW-two*feq*om1)/(one-om1))*c1o2+(q*(f_SE+f_NW)-six*c1over54*( VeloX-VeloY))/(one+q) - c1over54 * drho;
- //(D.f[dMP0])[knw]=zero;
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1+vx2 )*/+c9o2*(-vx1+vx2 )*(-vx1+vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dPM0])[kse]=((c1o1 - q) * f_NW + q * ((f_NW + f_SE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX+VeloY)) / (q + c1o1) ;
- //(D.f[dPM0])[kse]=(one-q)/(one+q)*(f_NW-f_SE+(f_NW+f_SE-two*feq*om1)/(one-om1))*c1o2+(q*(f_NW+f_SE)-six*c1over54*(-VeloX+VeloY))/(one+q) - c1over54 * drho;
- //(D.f[dPM0])[kse]=zero;
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 +vx3)*/+c9o2*( vx1 +vx3)*( vx1 +vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dM0M])[kbw]=((c1o1 - q) * f_TE + q * ((f_TE + f_BW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX+VeloZ)) / (q + c1o1) ;
- //(D.f[dM0M])[kbw]=(one-q)/(one+q)*(f_TE-f_BW+(f_TE+f_BW-two*feq*om1)/(one-om1))*c1o2+(q*(f_TE+f_BW)-six*c1over54*( VeloX+VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[dM0M])[kbw]=zero;
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 -vx3)*/+c9o2*(-vx1 -vx3)*(-vx1 -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dP0P])[kte]=((c1o1 - q) * f_BW + q * ((f_BW + f_TE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX-VeloZ)) / (q + c1o1) ;
- //(D.f[dP0P])[kte]=(one-q)/(one+q)*(f_BW-f_TE+(f_BW+f_TE-two*feq*om1)/(one-om1))*c1o2+(q*(f_BW+f_TE)-six*c1over54*(-VeloX-VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[dP0P])[kte]=zero;
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 -vx3)*/+c9o2*( vx1 -vx3)*( vx1 -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dM0P])[ktw]=((c1o1 - q) * f_BE + q * ((f_BE + f_TW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX-VeloZ)) / (q + c1o1) ;
- //(D.f[dM0P])[ktw]=(one-q)/(one+q)*(f_BE-f_TW+(f_BE+f_TW-two*feq*om1)/(one-om1))*c1o2+(q*(f_BE+f_TW)-six*c1over54*( VeloX-VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[dM0P])[ktw]=zero;
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 +vx3)*/+c9o2*(-vx1 +vx3)*(-vx1 +vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dP0M])[kbe]=((c1o1 - q) * f_TW + q * ((f_TW + f_BE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX+VeloZ)) / (q + c1o1) ;
- //(D.f[dP0M])[kbe]=(one-q)/(one+q)*(f_TW-f_BE+(f_TW+f_BE-two*feq*om1)/(one-om1))*c1o2+(q*(f_TW+f_BE)-six*c1over54*(-VeloX+VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[dP0M])[kbe]=zero;
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2+vx3)*/+c9o2*( vx2+vx3)*( vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0MM])[kbs]=((c1o1 - q) * f_TN + q * ((f_TN + f_BS) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[d0MM])[kbs]=(one-q)/(one+q)*(f_TN-f_BS+(f_TN+f_BS-two*feq*om1)/(one-om1))*c1o2+(q*(f_TN+f_BS)-six*c1over54*( VeloY+VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[d0MM])[kbs]=zero;
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2-vx3)*/+c9o2*( -vx2-vx3)*( -vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0PP])[ktn]=((c1o1 - q) * f_BS + q * ((f_BS + f_TN) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[d0PP])[ktn]=(one-q)/(one+q)*(f_BS-f_TN+(f_BS+f_TN-two*feq*om1)/(one-om1))*c1o2+(q*(f_BS+f_TN)-six*c1over54*( -VeloY-VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[d0PP])[ktn]=zero;
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2-vx3)*/+c9o2*( vx2-vx3)*( vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0MP])[kts]=((c1o1 - q) * f_BN + q * ((f_BN + f_TS) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[d0MP])[kts]=(one-q)/(one+q)*(f_BN-f_TS+(f_BN+f_TS-two*feq*om1)/(one-om1))*c1o2+(q*(f_BN+f_TS)-six*c1over54*( VeloY-VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[d0MP])[kts]=zero;
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2+vx3)*/+c9o2*( -vx2+vx3)*( -vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0PM])[kbn]=((c1o1 - q) * f_TS + q * ((f_TS + f_BN) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[d0PM])[kbn]=(one-q)/(one+q)*(f_TS-f_BN+(f_TS+f_BN-two*feq*om1)/(one-om1))*c1o2+(q*(f_TS+f_BN)-six*c1over54*( -VeloY+VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[d0PM])[kbn]=zero;
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2+vx3)*/+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMMM])[kbsw]=((c1o1 - q) * f_TNE + q * ((f_TNE + f_BSW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX+VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[dMMM])[kbsw]=(one-q)/(one+q)*(f_TNE-f_BSW+(f_TNE+f_BSW-two*feq*om1)/(one-om1))*c1o2+(q*(f_TNE+f_BSW)-six*c1over216*( VeloX+VeloY+VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dMMM])[kbsw]=zero;
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2-vx3)*/+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPPP])[ktne]=((c1o1 - q) * f_BSW + q * ((f_BSW + f_TNE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX-VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[dPPP])[ktne]=(one-q)/(one+q)*(f_BSW-f_TNE+(f_BSW+f_TNE-two*feq*om1)/(one-om1))*c1o2+(q*(f_BSW+f_TNE)-six*c1over216*(-VeloX-VeloY-VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dPPP])[ktne]=zero;
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2-vx3)*/+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMMP])[ktsw]=((c1o1 - q) * f_BNE + q * ((f_BNE + f_TSW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX+VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[dMMP])[ktsw]=(one-q)/(one+q)*(f_BNE-f_TSW+(f_BNE+f_TSW-two*feq*om1)/(one-om1))*c1o2+(q*(f_BNE+f_TSW)-six*c1over216*( VeloX+VeloY-VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dMMP])[ktsw]=zero;
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2+vx3)*/+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPPM])[kbne]=((c1o1 - q) * f_TSW + q * ((f_TSW + f_BNE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX-VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[dPPM])[kbne]=(one-q)/(one+q)*(f_TSW-f_BNE+(f_TSW+f_BNE-two*feq*om1)/(one-om1))*c1o2+(q*(f_TSW+f_BNE)-six*c1over216*(-VeloX-VeloY+VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dPPM])[kbne]=zero;
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2+vx3)*/+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMPM])[kbnw]=((c1o1 - q) * f_TSE + q * ((f_TSE + f_BNW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX-VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[dMPM])[kbnw]=(one-q)/(one+q)*(f_TSE-f_BNW+(f_TSE+f_BNW-two*feq*om1)/(one-om1))*c1o2+(q*(f_TSE+f_BNW)-six*c1over216*( VeloX-VeloY+VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dMPM])[kbnw]=zero;
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2-vx3)*/+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPMP])[ktse]=((c1o1 - q) * f_BNW + q * ((f_BNW + f_TSE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX+VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[dPMP])[ktse]=(one-q)/(one+q)*(f_BNW-f_TSE+(f_BNW+f_TSE-two*feq*om1)/(one-om1))*c1o2+(q*(f_BNW+f_TSE)-six*c1over216*(-VeloX+VeloY-VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dPMP])[ktse]=zero;
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2-vx3)*/+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMPP])[ktnw]=((c1o1 - q) * f_BSE + q * ((f_BSE + f_TNW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX-VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[dMPP])[ktnw]=(one-q)/(one+q)*(f_BSE-f_TNW+(f_BSE+f_TNW-two*feq*om1)/(one-om1))*c1o2+(q*(f_BSE+f_TNW)-six*c1over216*( VeloX-VeloY-VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dMPP])[ktnw]=zero;
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2+vx3)*/+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPMM])[kbse]=((c1o1 - q) * f_TNW + q * ((f_TNW + f_BSE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX+VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[dPMM])[kbse]=(one-q)/(one+q)*(f_TNW-f_BSE+(f_TNW+f_BSE-two*feq*om1)/(one-om1))*c1o2+(q*(f_TNW+f_BSE)-six*c1over216*(-VeloX+VeloY+VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dPMM])[kbse]=zero;
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QDeviceComp27(
- real* distributions,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- real omega,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- //////////////////////////////////////////////////////////////////////////
- //! The no-slip boundary condition is executed in the following steps
- //!
- ////////////////////////////////////////////////////////////////////////////////
- //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
- //!
- const unsigned nodeIndex = getNodeIndex();
-
- if(nodeIndex < numberOfBCnodes)
- {
- //////////////////////////////////////////////////////////////////////////
- //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
- //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
- //!
- Distributions27 dist;
- getPointersToDistributions(dist, distributions, numberOfLBnodes, isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local subgrid distances (q's)
- //!
- SubgridDistances27 subgridD;
- getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set neighbor indices (necessary for indirect addressing)
- //!
- unsigned int indexOfBCnode = subgridDistanceIndices[nodeIndex];
- unsigned int kzero= indexOfBCnode;
- unsigned int ke = indexOfBCnode;
- unsigned int kw = neighborX[indexOfBCnode];
- unsigned int kn = indexOfBCnode;
- unsigned int ks = neighborY[indexOfBCnode];
- unsigned int kt = indexOfBCnode;
- unsigned int kb = neighborZ[indexOfBCnode];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = indexOfBCnode;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = indexOfBCnode;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = indexOfBCnode;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = indexOfBCnode;
- unsigned int kbsw = neighborZ[ksw];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local distributions
- //!
- real f_W = (dist.f[dP00])[ke ];
- real f_E = (dist.f[dM00])[kw ];
- real f_S = (dist.f[d0P0])[kn ];
- real f_N = (dist.f[d0M0])[ks ];
- real f_B = (dist.f[d00P])[kt ];
- real f_T = (dist.f[d00M])[kb ];
- real f_SW = (dist.f[dPP0])[kne ];
- real f_NE = (dist.f[dMM0])[ksw ];
- real f_NW = (dist.f[dPM0])[kse ];
- real f_SE = (dist.f[dMP0])[knw ];
- real f_BW = (dist.f[dP0P])[kte ];
- real f_TE = (dist.f[dM0M])[kbw ];
- real f_TW = (dist.f[dP0M])[kbe ];
- real f_BE = (dist.f[dM0P])[ktw ];
- real f_BS = (dist.f[d0PP])[ktn ];
- real f_TN = (dist.f[d0MM])[kbs ];
- real f_TS = (dist.f[d0PM])[kbn ];
- real f_BN = (dist.f[d0MP])[kts ];
- real f_BSW = (dist.f[dPPP])[ktne ];
- real f_BNE = (dist.f[dMMP])[ktsw ];
- real f_BNW = (dist.f[dPMP])[ktse ];
- real f_BSE = (dist.f[dMPP])[ktnw ];
- real f_TSW = (dist.f[dPPM])[kbne ];
- real f_TNE = (dist.f[dMMM])[kbsw ];
- real f_TNW = (dist.f[dPMM])[kbse ];
- real f_TSE = (dist.f[dMPM])[kbnw ];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Calculate macroscopic quantities
- //!
- real drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((dist.f[d000])[kzero]);
-
- real vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W)) / (c1o1 + drho);
-
- real vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S)) / (c1o1 + drho);
-
- real vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B)) / (c1o1 + drho);
-
- real cu_sq = c3o2 * (vx1 * vx1 + vx2 * vx2 + vx3 * vx3) * (c1o1 + drho);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - change the pointer to write the results in the correct array
- //!
- getPointersToDistributions(dist, distributions, numberOfLBnodes, !isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Update distributions with subgrid distance (q) between zero and one
- real feq, q, velocityLB;
- q = (subgridD.q[dP00])[nodeIndex];
- if (q>=c0o1 && q<=c1o1) // only update distribution for q between zero and one
- {
- velocityLB = vx1;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[dM00])[kw] = getInterpolatedDistributionForNoSlipBC(q, f_E, f_W, feq, omega);
- }
-
- q = (subgridD.q[dM00])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[dP00])[ke] = getInterpolatedDistributionForNoSlipBC(q, f_W, f_E, feq, omega);
- }
-
- q = (subgridD.q[d0P0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[d0M0])[ks] = getInterpolatedDistributionForNoSlipBC(q, f_N, f_S, feq, omega);
- }
-
- q = (subgridD.q[d0M0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[d0P0])[kn] = getInterpolatedDistributionForNoSlipBC(q, f_S, f_N, feq, omega);
- }
-
- q = (subgridD.q[d00P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[d00M])[kb] = getInterpolatedDistributionForNoSlipBC(q, f_T, f_B, feq, omega);
- }
-
- q = (subgridD.q[d00M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[d00P])[kt] = getInterpolatedDistributionForNoSlipBC(q, f_B, f_T, feq, omega);
- }
-
- q = (subgridD.q[dPP0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dMM0])[ksw] = getInterpolatedDistributionForNoSlipBC(q, f_NE, f_SW, feq, omega);
- }
-
- q = (subgridD.q[dMM0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dPP0])[kne] = getInterpolatedDistributionForNoSlipBC(q, f_SW, f_NE, feq, omega);
- }
-
- q = (subgridD.q[dPM0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dMP0])[knw] = getInterpolatedDistributionForNoSlipBC(q, f_SE, f_NW, feq, omega);
- }
-
- q = (subgridD.q[dMP0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dPM0])[kse] = getInterpolatedDistributionForNoSlipBC(q, f_NW, f_SE, feq, omega);
- }
-
- q = (subgridD.q[dP0P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dM0M])[kbw] = getInterpolatedDistributionForNoSlipBC(q, f_TE, f_BW, feq, omega);
- }
-
- q = (subgridD.q[dM0M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dP0P])[kte] = getInterpolatedDistributionForNoSlipBC(q, f_BW, f_TE, feq, omega);
- }
-
- q = (subgridD.q[dP0M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dM0P])[ktw] = getInterpolatedDistributionForNoSlipBC(q, f_BE, f_TW, feq, omega);
- }
-
- q = (subgridD.q[dM0P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dP0M])[kbe] = getInterpolatedDistributionForNoSlipBC(q, f_TW, f_BE, feq, omega);
- }
-
- q = (subgridD.q[d0PP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[d0MM])[kbs] = getInterpolatedDistributionForNoSlipBC(q, f_TN, f_BS, feq, omega);
- }
-
- q = (subgridD.q[d0MM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[d0PP])[ktn] = getInterpolatedDistributionForNoSlipBC(q, f_BS, f_TN, feq, omega);
- }
-
- q = (subgridD.q[d0PM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[d0MP])[kts] = getInterpolatedDistributionForNoSlipBC(q, f_BN, f_TS, feq, omega);
- }
-
- q = (subgridD.q[d0MP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[d0PM])[kbn] = getInterpolatedDistributionForNoSlipBC(q, f_TS, f_BN, feq, omega);
- }
-
- q = (subgridD.q[dPPP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dMMM])[kbsw] = getInterpolatedDistributionForNoSlipBC(q, f_TNE, f_BSW, feq, omega);
- }
-
- q = (subgridD.q[dMMM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dPPP])[ktne] = getInterpolatedDistributionForNoSlipBC(q, f_BSW, f_TNE, feq, omega);
- }
-
- q = (subgridD.q[dPPM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dMMP])[ktsw] = getInterpolatedDistributionForNoSlipBC(q, f_BNE, f_TSW, feq, omega);
- }
-
- q = (subgridD.q[dMMP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dPPM])[kbne] = getInterpolatedDistributionForNoSlipBC(q, f_TSW, f_BNE, feq, omega);
- }
-
- q = (subgridD.q[dPMP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dMPM])[kbnw] = getInterpolatedDistributionForNoSlipBC(q, f_TSE, f_BNW, feq, omega);
- }
-
- q = (subgridD.q[dMPM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dPMP])[ktse] = getInterpolatedDistributionForNoSlipBC(q, f_BNW, f_TSE, feq, omega);
- }
-
- q = (subgridD.q[dPMM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dMPP])[ktnw] = getInterpolatedDistributionForNoSlipBC(q, f_BSE, f_TNW, feq, omega);
- }
-
- q = (subgridD.q[dMPP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dPMM])[kbse] = getInterpolatedDistributionForNoSlipBC(q, f_TNW, f_BSE, feq, omega);
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QDevice27(
- real* distributions,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- real omega,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- //////////////////////////////////////////////////////////////////////////
- //! The no-slip boundary condition is executed in the following steps
- //!
- ////////////////////////////////////////////////////////////////////////////////
- //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
- //!
- const unsigned nodeIndex = getNodeIndex();
-
- //////////////////////////////////////////////////////////////////////////
- //! - Run for all indices in size of boundary condition (numberOfBCnodes)
- //!
- if(nodeIndex < numberOfBCnodes)
- {
-
- //////////////////////////////////////////////////////////////////////////
- //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
- //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
- //!
- Distributions27 dist;
- getPointersToDistributions(dist, distributions, numberOfLBnodes, isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local subgrid distances (q's)
- //!
- SubgridDistances27 subgridD;
- getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set neighbor indices (necessary for indirect addressing)
- //!
- unsigned int indexOfBCnode = subgridDistanceIndices[nodeIndex];
- unsigned int kzero= indexOfBCnode;
- unsigned int ke = indexOfBCnode;
- unsigned int kw = neighborX[indexOfBCnode];
- unsigned int kn = indexOfBCnode;
- unsigned int ks = neighborY[indexOfBCnode];
- unsigned int kt = indexOfBCnode;
- unsigned int kb = neighborZ[indexOfBCnode];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = indexOfBCnode;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = indexOfBCnode;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = indexOfBCnode;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = indexOfBCnode;
- unsigned int kbsw = neighborZ[ksw];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local distributions
- //!
- real f_W = (dist.f[dP00])[ke ];
- real f_E = (dist.f[dM00])[kw ];
- real f_S = (dist.f[d0P0])[kn ];
- real f_N = (dist.f[d0M0])[ks ];
- real f_B = (dist.f[d00P])[kt ];
- real f_T = (dist.f[d00M])[kb ];
- real f_SW = (dist.f[dPP0])[kne ];
- real f_NE = (dist.f[dMM0])[ksw ];
- real f_NW = (dist.f[dPM0])[kse ];
- real f_SE = (dist.f[dMP0])[knw ];
- real f_BW = (dist.f[dP0P])[kte ];
- real f_TE = (dist.f[dM0M])[kbw ];
- real f_TW = (dist.f[dP0M])[kbe ];
- real f_BE = (dist.f[dM0P])[ktw ];
- real f_BS = (dist.f[d0PP])[ktn ];
- real f_TN = (dist.f[d0MM])[kbs ];
- real f_TS = (dist.f[d0PM])[kbn ];
- real f_BN = (dist.f[d0MP])[kts ];
- real f_BSW = (dist.f[dPPP])[ktne ];
- real f_BNE = (dist.f[dMMP])[ktsw ];
- real f_BNW = (dist.f[dPMP])[ktse ];
- real f_BSE = (dist.f[dMPP])[ktnw ];
- real f_TSW = (dist.f[dPPM])[kbne ];
- real f_TNE = (dist.f[dMMM])[kbsw ];
- real f_TNW = (dist.f[dPMM])[kbse ];
- real f_TSE = (dist.f[dMPM])[kbnw ];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Calculate macroscopic quantities
- //!
- real drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((dist.f[d000])[kzero]);
-
- real vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W));
-
- real vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S));
-
- real vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B));
-
- real cu_sq = c3o2 * (vx1 * vx1 + vx2 * vx2 + vx3 * vx3);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - change the pointer to write the results in the correct array
- //!
- getPointersToDistributions(dist, distributions, numberOfLBnodes, !isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Update distributions with subgrid distance (q) between zero and one
- //!
- real feq, q, velocityLB;
- q = (subgridD.q[dP00])[nodeIndex];
- if (q>=c0o1 && q<=c1o1) // only update distribution for q between zero and one
- {
- velocityLB = vx1;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[dM00])[kw] = getInterpolatedDistributionForNoSlipBC(q, f_E, f_W, feq, omega);
- }
-
- q = (subgridD.q[dM00])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[dP00])[ke] = getInterpolatedDistributionForNoSlipBC(q, f_W, f_E, feq, omega);
- }
-
- q = (subgridD.q[d0P0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[d0M0])[ks] = getInterpolatedDistributionForNoSlipBC(q, f_N, f_S, feq, omega);
- }
-
- q = (subgridD.q[d0M0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[d0P0])[kn] = getInterpolatedDistributionForNoSlipBC(q, f_S, f_N, feq, omega);
- }
-
- q = (subgridD.q[d00P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[d00M])[kb] = getInterpolatedDistributionForNoSlipBC(q, f_T, f_B, feq, omega);
- }
-
- q = (subgridD.q[d00M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- (dist.f[d00P])[kt] = getInterpolatedDistributionForNoSlipBC(q, f_B, f_T, feq, omega);
- }
-
- q = (subgridD.q[dPP0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dMM0])[ksw] = getInterpolatedDistributionForNoSlipBC(q, f_NE, f_SW, feq, omega);
- }
-
- q = (subgridD.q[dMM0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dPP0])[kne] = getInterpolatedDistributionForNoSlipBC(q, f_SW, f_NE, feq, omega);
- }
-
- q = (subgridD.q[dPM0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dMP0])[knw] = getInterpolatedDistributionForNoSlipBC(q, f_SE, f_NW, feq, omega);
- }
-
- q = (subgridD.q[dMP0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dPM0])[kse] = getInterpolatedDistributionForNoSlipBC(q, f_NW, f_SE, feq, omega);
- }
-
- q = (subgridD.q[dP0P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dM0M])[kbw] = getInterpolatedDistributionForNoSlipBC(q, f_TE, f_BW, feq, omega);
- }
-
- q = (subgridD.q[dM0M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dP0P])[kte] = getInterpolatedDistributionForNoSlipBC(q, f_BW, f_TE, feq, omega);
- }
-
- q = (subgridD.q[dP0M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dM0P])[ktw] = getInterpolatedDistributionForNoSlipBC(q, f_BE, f_TW, feq, omega);
- }
-
- q = (subgridD.q[dM0P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[dP0M])[kbe] = getInterpolatedDistributionForNoSlipBC(q, f_TW, f_BE, feq, omega);
- }
-
- q = (subgridD.q[d0PP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[d0MM])[kbs] = getInterpolatedDistributionForNoSlipBC(q, f_TN, f_BS, feq, omega);
- }
-
- q = (subgridD.q[d0MM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[d0PP])[ktn] = getInterpolatedDistributionForNoSlipBC(q, f_BS, f_TN, feq, omega);
- }
-
- q = (subgridD.q[d0PM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[d0MP])[kts] = getInterpolatedDistributionForNoSlipBC(q, f_BN, f_TS, feq, omega);
- }
-
- q = (subgridD.q[d0MP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- (dist.f[d0PM])[kbn] = getInterpolatedDistributionForNoSlipBC(q, f_TS, f_BN, feq, omega);
- }
-
- q = (subgridD.q[dPPP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dMMM])[kbsw] = getInterpolatedDistributionForNoSlipBC(q, f_TNE, f_BSW, feq, omega);
- }
-
- q = (subgridD.q[dMMM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dPPP])[ktne] = getInterpolatedDistributionForNoSlipBC(q, f_BSW, f_TNE, feq, omega);
- }
-
- q = (subgridD.q[dPPM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dMMP])[ktsw] = getInterpolatedDistributionForNoSlipBC(q, f_BNE, f_TSW, feq, omega);
- }
-
- q = (subgridD.q[dMMP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dPPM])[kbne] = getInterpolatedDistributionForNoSlipBC(q, f_TSW, f_BNE, feq, omega);
- }
-
- q = (subgridD.q[dPMP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dMPM])[kbnw] = getInterpolatedDistributionForNoSlipBC(q, f_TSE, f_BNW, feq, omega);
- }
-
- q = (subgridD.q[dMPM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dPMP])[ktse] = getInterpolatedDistributionForNoSlipBC(q, f_BNW, f_TSE, feq, omega);
- }
-
- q = (subgridD.q[dPMM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dMPP])[ktnw] = getInterpolatedDistributionForNoSlipBC(q, f_BSE, f_TNW, feq, omega);
- }
-
- q = (subgridD.q[dMPP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- (dist.f[dPMM])[kbse] = getInterpolatedDistributionForNoSlipBC(q, f_TNW, f_BSE, feq, omega);
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void BBDevice27(
- real* distributions,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- //////////////////////////////////////////////////////////////////////////
- //! The no-slip boundary condition is executed in the following steps
- //!
- ////////////////////////////////////////////////////////////////////////////////
- //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
- //!
- const unsigned nodeIndex = getNodeIndex();
-
- //////////////////////////////////////////////////////////////////////////
- // run for all indices in size of boundary condition (numberOfBCnodes)
- if(nodeIndex < numberOfBCnodes)
- {
- //////////////////////////////////////////////////////////////////////////
- //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
- //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
- //!
- Distributions27 dist;
- getPointersToDistributions(dist, distributions, numberOfLBnodes, isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local subgrid distances (q's)
- //!
- SubgridDistances27 subgridD;
- getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set neighbor indices (necessary for indirect addressing)
- //!
- unsigned int indexOfBCnode = subgridDistanceIndices[nodeIndex];
- unsigned int ke = indexOfBCnode;
- unsigned int kw = neighborX[indexOfBCnode];
- unsigned int kn = indexOfBCnode;
- unsigned int ks = neighborY[indexOfBCnode];
- unsigned int kt = indexOfBCnode;
- unsigned int kb = neighborZ[indexOfBCnode];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = indexOfBCnode;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = indexOfBCnode;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = indexOfBCnode;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = indexOfBCnode;
- unsigned int kbsw = neighborZ[ksw];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local distributions
- //!
- real f_W = (dist.f[dP00])[ke ];
- real f_E = (dist.f[dM00])[kw ];
- real f_S = (dist.f[d0P0])[kn ];
- real f_N = (dist.f[d0M0])[ks ];
- real f_B = (dist.f[d00P])[kt ];
- real f_T = (dist.f[d00M])[kb ];
- real f_SW = (dist.f[dPP0])[kne ];
- real f_NE = (dist.f[dMM0])[ksw ];
- real f_NW = (dist.f[dPM0])[kse ];
- real f_SE = (dist.f[dMP0])[knw ];
- real f_BW = (dist.f[dP0P])[kte ];
- real f_TE = (dist.f[dM0M])[kbw ];
- real f_TW = (dist.f[dP0M])[kbe ];
- real f_BE = (dist.f[dM0P])[ktw ];
- real f_BS = (dist.f[d0PP])[ktn ];
- real f_TN = (dist.f[d0MM])[kbs ];
- real f_TS = (dist.f[d0PM])[kbn ];
- real f_BN = (dist.f[d0MP])[kts ];
- real f_BSW = (dist.f[dPPP])[ktne ];
- real f_BNE = (dist.f[dMMP])[ktsw ];
- real f_BNW = (dist.f[dPMP])[ktse ];
- real f_BSE = (dist.f[dMPP])[ktnw ];
- real f_TSW = (dist.f[dPPM])[kbne ];
- real f_TNE = (dist.f[dMMM])[kbsw ];
- real f_TNW = (dist.f[dPMM])[kbse ];
- real f_TSE = (dist.f[dMPM])[kbnw ];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - change the pointer to write the results in the correct array
- //!
- getPointersToDistributions(dist, distributions, numberOfLBnodes, !isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - rewrite distributions if there is a sub-grid distance (q) in same direction
- real q;
- q = (subgridD.q[dP00])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM00])[kw ]=f_E ;
- q = (subgridD.q[dM00])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP00])[ke ]=f_W ;
- q = (subgridD.q[d0P0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0M0])[ks ]=f_N ;
- q = (subgridD.q[d0M0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0P0])[kn ]=f_S ;
- q = (subgridD.q[d00P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d00M])[kb ]=f_T ;
- q = (subgridD.q[d00M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d00P])[kt ]=f_B ;
- q = (subgridD.q[dPP0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMM0])[ksw ]=f_NE ;
- q = (subgridD.q[dMM0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPP0])[kne ]=f_SW ;
- q = (subgridD.q[dPM0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMP0])[knw ]=f_SE ;
- q = (subgridD.q[dMP0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPM0])[kse ]=f_NW ;
- q = (subgridD.q[dP0P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM0M])[kbw ]=f_TE ;
- q = (subgridD.q[dM0M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP0P])[kte ]=f_BW ;
- q = (subgridD.q[dP0M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM0P])[ktw ]=f_BE ;
- q = (subgridD.q[dM0P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP0M])[kbe ]=f_TW ;
- q = (subgridD.q[d0PP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0MM])[kbs ]=f_TN ;
- q = (subgridD.q[d0MM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0PP])[ktn ]=f_BS ;
- q = (subgridD.q[d0PM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0MP])[kts ]=f_BN ;
- q = (subgridD.q[d0MP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0PM])[kbn ]=f_TS ;
- q = (subgridD.q[dPPP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMMM])[kbsw]=f_TNE;
- q = (subgridD.q[dMMM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPPP])[ktne]=f_BSW;
- q = (subgridD.q[dPPM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMMP])[ktsw]=f_BNE;
- q = (subgridD.q[dMMP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPPM])[kbne]=f_TSW;
- q = (subgridD.q[dPMP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMPM])[kbnw]=f_TSE;
- q = (subgridD.q[dMPM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPMP])[ktse]=f_BNW;
- q = (subgridD.q[dPMM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMPP])[ktnw]=f_BSE;
- q = (subgridD.q[dMPP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPMM])[kbse]=f_TNW;
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
diff --git a/src/gpu/core/GPU/Particles.cu b/src/gpu/core/GPU/Particles.cu
deleted file mode 100644
index aec8f029ef58d46f1527b58a4f4746429bf94f2a..0000000000000000000000000000000000000000
--- a/src/gpu/core/GPU/Particles.cu
+++ /dev/null
@@ -1,2303 +0,0 @@
-/* Device code */
-#include "LBM/LB.h"
-#include "lbm/constants/D3Q27.h"
-#include <basics/constants/NumericConstants.h>
-
-using namespace vf::basics::constant;
-using namespace vf::lbm::dir;
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void InitParticles( real* coordX,
- real* coordY,
- real* coordZ,
- real* coordParticleXlocal,
- real* coordParticleYlocal,
- real* coordParticleZlocal,
- real* coordParticleXglobal,
- real* coordParticleYglobal,
- real* coordParticleZglobal,
- real* veloParticleX,
- real* veloParticleY,
- real* veloParticleZ,
- real* randArray,
- unsigned int* particleID,
- unsigned int* cellBaseID,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- int level,
- unsigned int numberOfParticles,
- unsigned long long numberOfLBnodes)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k < numberOfParticles)
- {
- // real centerX = one; //uebergabeparameter
- // real centerY = 10.5f; //uebergabeparameter
- //real centerZ = 10.5f; //uebergabeparameter
- //real diameter = 21.0f; //uebergabeparameter
- //unsigned int numberOfParticleSizes = 41; //uebergabeparameter
- //unsigned int nops = (unsigned int)(randArray[k]*numberOfParticleSizes);
- //real xCoordPart = one;
- //real yCoordPart = (real)(randArray[k]*diameter);
- //real zCoordPart = one;
- //if (k==0)
- //{
- // zCoordPart = (real)(randArray[k+1]*diameter);
- //}
- //else
- //{
- // zCoordPart = (real)(randArray[k-1]*diameter);
- //}
- //real distance = powf((zCoordPart-centerZ),2) + powf((yCoordPart-centerY),2);
- //real refDistance = powf((diameter*c1o2),2);
- //if (distance > refDistance)
- //{
- // zCoordPart = sqrtf(powf((diameter*c1o2),2) - powf((yCoordPart-centerY),2)) + centerZ;
- //}
-
-
-
- ////////////////////////////////////////////////////////////////////////////////
- //find random node of the fluid domain
- unsigned int cbID = (unsigned int)(randArray[k]*numberOfLBnodes);
- for(int i = 0; i < numberOfLBnodes;i++)
- {
- //if (coordX[cbID] < 15 && coordX[cbID] > 5 && coordY[cbID] < 15 && coordY[cbID] > 5 && coordZ[cbID] < 15 && coordZ[cbID] > 5) break;
- if (coordX[cbID] < 5 && coordX[cbID] > 2) break;
- cbID = (unsigned int)(randArray[k]*(numberOfLBnodes - i));
- }
-
- real coordinateX;
- real coordinateY;
- real coordinateZ;
-
- unsigned int BC = bcMatD[cbID];
- unsigned int BCx = bcMatD[neighborX[cbID]];
- unsigned int BCy = bcMatD[neighborY[cbID]];
- unsigned int BCz = bcMatD[neighborZ[cbID]];
-
- if( (BC == GEO_FLUID) && (BCx == GEO_FLUID) && (BCy == GEO_FLUID) && (BCz == GEO_FLUID))
- {
- coordinateX = coordX[cbID];
- coordinateY = coordY[cbID];
- coordinateZ = coordZ[cbID];
-
- }
- else if(BC == GEO_FLUID)
- {
- cbID = neighborWSB[neighborWSB[cbID]];
- coordinateX = coordX[cbID];
- coordinateY = coordY[cbID];
- coordinateZ = coordZ[cbID];
- }
- else
- {
- cbID = neighborZ[neighborY[neighborX[cbID]]];
- coordinateX = coordX[cbID];
- coordinateY = coordY[cbID];
- coordinateZ = coordZ[cbID];
- }
-
-
- real localX = randArray[k] / (real)(pow((double)c2o1, (double)level));
- real localY = randArray[k] / (real)(pow((double)c2o1, (double)level));
- real localZ = randArray[k] / (real)(pow((double)c2o1, (double)level));
-
- real globalX = coordinateX + localX;
- real globalY = coordinateY + localY;
- real globalZ = coordinateZ + localZ;
-
- real veloX = c0o1;
- real veloY = c0o1;
- real veloZ = c0o1;
-
- particleID[k] = k ;
- cellBaseID[k] = cbID ;
- veloParticleX[k] = veloX ;
- veloParticleY[k] = veloY ;
- veloParticleZ[k] = veloZ ;
- coordParticleXlocal[k] = localX ;
- coordParticleYlocal[k] = localY ;
- coordParticleZlocal[k] = localZ ;
- coordParticleXglobal[k] = globalX;
- coordParticleYglobal[k] = globalY;
- coordParticleZglobal[k] = globalZ;
- ////////////////////////////////////////////////////////////////////////////////
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void MoveParticles( real* coordX,
- real* coordY,
- real* coordZ,
- real* coordParticleXlocal,
- real* coordParticleYlocal,
- real* coordParticleZlocal,
- real* coordParticleXglobal,
- real* coordParticleYglobal,
- real* coordParticleZglobal,
- real* veloParticleX,
- real* veloParticleY,
- real* veloParticleZ,
- real* DD,
- real omega,
- unsigned int* particleID,
- unsigned int* cellBaseID,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- int level,
- unsigned int timestep,
- unsigned int numberOfTimesteps,
- unsigned int numberOfParticles,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned ix = threadIdx.x; // Globaler x-Index
- const unsigned iy = blockIdx.x; // Globaler y-Index
- const unsigned iz = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*iz + iy) + ix;
- //////////////////////////////////////////////////////////////////////////
-
- //real press;
- real vx1,vx2,vx3;
- real drho_SWT,vx1_SWT,vx2_SWT,vx3_SWT;
- real drho_NWT,vx1_NWT,vx2_NWT,vx3_NWT;
- real drho_NET,vx1_NET,vx2_NET,vx3_NET;
- real drho_SET,vx1_SET,vx2_SET,vx3_SET;
- real drho_SWB,vx1_SWB,vx2_SWB,vx3_SWB;
- real drho_NWB,vx1_NWB,vx2_NWB,vx3_NWB;
- real drho_NEB,vx1_NEB,vx2_NEB,vx3_NEB;
- real drho_SEB,vx1_SEB,vx2_SEB,vx3_SEB;
- real f_E,f_W,f_N,f_S,f_T,f_B,f_NE,f_SW,f_SE,f_NW,f_TE,f_BW,f_BE,f_TW,f_TN,f_BS,f_BN,f_TS,f_ZERO,f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
- real *feC, *fwC, *fnC, *fsC, *ftC, *fbC, *fneC, *fswC, *fseC, *fnwC, *fteC, *fbwC, *fbeC, *ftwC, *ftnC, *fbsC, *fbnC, *ftsC, *fzeroC, *ftneC, *ftswC, *ftseC, *ftnwC, *fbneC, *fbswC, *fbseC, *fbnwC;
- real kxyFromfcNEQ_SWT, kyzFromfcNEQ_SWT, kxzFromfcNEQ_SWT, kxxMyyFromfcNEQ_SWT, kxxMzzFromfcNEQ_SWT;
- real kxyFromfcNEQ_NWT, kyzFromfcNEQ_NWT, kxzFromfcNEQ_NWT, kxxMyyFromfcNEQ_NWT, kxxMzzFromfcNEQ_NWT;
- real kxyFromfcNEQ_NET, kyzFromfcNEQ_NET, kxzFromfcNEQ_NET, kxxMyyFromfcNEQ_NET, kxxMzzFromfcNEQ_NET;
- real kxyFromfcNEQ_SET, kyzFromfcNEQ_SET, kxzFromfcNEQ_SET, kxxMyyFromfcNEQ_SET, kxxMzzFromfcNEQ_SET;
- real kxyFromfcNEQ_SWB, kyzFromfcNEQ_SWB, kxzFromfcNEQ_SWB, kxxMyyFromfcNEQ_SWB, kxxMzzFromfcNEQ_SWB;
- real kxyFromfcNEQ_NWB, kyzFromfcNEQ_NWB, kxzFromfcNEQ_NWB, kxxMyyFromfcNEQ_NWB, kxxMzzFromfcNEQ_NWB;
- real kxyFromfcNEQ_NEB, kyzFromfcNEQ_NEB, kxzFromfcNEQ_NEB, kxxMyyFromfcNEQ_NEB, kxxMzzFromfcNEQ_NEB;
- real kxyFromfcNEQ_SEB, kyzFromfcNEQ_SEB, kxzFromfcNEQ_SEB, kxxMyyFromfcNEQ_SEB, kxxMzzFromfcNEQ_SEB;
- real a0, ax, ay, az, axx, ayy, azz, axy, axz, ayz, b0, bx, by, bz, bxx, byy, bzz, bxy, bxz, byz, c0, cx, cy, cz, cxx, cyy, czz, cxy, cxz, cyz, axyz, bxyz, cxyz;
- //real d0, dx, dy, dz, dxy, dxz, dyz, dxyz;
-
- real x,y,z;
-
- if(k < numberOfParticles)
- {
- /////////////////////////////////////////////////////////////
- unsigned int kTimeStep = k + (timestep * numberOfParticles);
- /////////////////////////////////////////////////////////////
- unsigned int kCellBaseID = cellBaseID[k];
- unsigned int BC000 = bcMatD[kCellBaseID];
- unsigned int BCx00 = bcMatD[neighborX[kCellBaseID]];
- unsigned int BC0y0 = bcMatD[neighborY[kCellBaseID]];
- unsigned int BC00z = bcMatD[neighborZ[kCellBaseID]];
- unsigned int BCxy0 = bcMatD[neighborY[neighborX[kCellBaseID]]];
- unsigned int BCx0z = bcMatD[neighborZ[neighborX[kCellBaseID]]];
- unsigned int BC0yz = bcMatD[neighborZ[neighborY[kCellBaseID]]];
- unsigned int BCxyz = bcMatD[neighborZ[neighborY[neighborX[kCellBaseID]]]];
- /////////////////////////////////////////////////////////////
- if( (BC000 >= GEO_FLUID) ||
- (BCx00 >= GEO_FLUID) ||
- (BC0y0 >= GEO_FLUID) ||
- (BC00z >= GEO_FLUID) ||
- (BCxy0 >= GEO_FLUID) ||
- (BCx0z >= GEO_FLUID) ||
- (BC0yz >= GEO_FLUID) ||
- (BCxyz >= GEO_FLUID) )
- {
- if (isEvenTimestep==true)
- {
- feC = &DD[dP00 * numberOfLBnodes];
- fwC = &DD[dM00 * numberOfLBnodes];
- fnC = &DD[d0P0 * numberOfLBnodes];
- fsC = &DD[d0M0 * numberOfLBnodes];
- ftC = &DD[d00P * numberOfLBnodes];
- fbC = &DD[d00M * numberOfLBnodes];
- fneC = &DD[dPP0 * numberOfLBnodes];
- fswC = &DD[dMM0 * numberOfLBnodes];
- fseC = &DD[dPM0 * numberOfLBnodes];
- fnwC = &DD[dMP0 * numberOfLBnodes];
- fteC = &DD[dP0P * numberOfLBnodes];
- fbwC = &DD[dM0M * numberOfLBnodes];
- fbeC = &DD[dP0M * numberOfLBnodes];
- ftwC = &DD[dM0P * numberOfLBnodes];
- ftnC = &DD[d0PP * numberOfLBnodes];
- fbsC = &DD[d0MM * numberOfLBnodes];
- fbnC = &DD[d0PM * numberOfLBnodes];
- ftsC = &DD[d0MP * numberOfLBnodes];
- fzeroC = &DD[d000 * numberOfLBnodes];
- ftneC = &DD[dPPP * numberOfLBnodes];
- ftswC = &DD[dMMP * numberOfLBnodes];
- ftseC = &DD[dPMP * numberOfLBnodes];
- ftnwC = &DD[dMPP * numberOfLBnodes];
- fbneC = &DD[dPPM * numberOfLBnodes];
- fbswC = &DD[dMMM * numberOfLBnodes];
- fbseC = &DD[dPMM * numberOfLBnodes];
- fbnwC = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- fwC = &DD[dP00 * numberOfLBnodes];
- feC = &DD[dM00 * numberOfLBnodes];
- fsC = &DD[d0P0 * numberOfLBnodes];
- fnC = &DD[d0M0 * numberOfLBnodes];
- fbC = &DD[d00P * numberOfLBnodes];
- ftC = &DD[d00M * numberOfLBnodes];
- fswC = &DD[dPP0 * numberOfLBnodes];
- fneC = &DD[dMM0 * numberOfLBnodes];
- fnwC = &DD[dPM0 * numberOfLBnodes];
- fseC = &DD[dMP0 * numberOfLBnodes];
- fbwC = &DD[dP0P * numberOfLBnodes];
- fteC = &DD[dM0M * numberOfLBnodes];
- ftwC = &DD[dP0M * numberOfLBnodes];
- fbeC = &DD[dM0P * numberOfLBnodes];
- fbsC = &DD[d0PP * numberOfLBnodes];
- ftnC = &DD[d0MM * numberOfLBnodes];
- ftsC = &DD[d0PM * numberOfLBnodes];
- fbnC = &DD[d0MP * numberOfLBnodes];
- fzeroC = &DD[d000 * numberOfLBnodes];
- fbswC = &DD[dPPP * numberOfLBnodes];
- fbneC = &DD[dMMP * numberOfLBnodes];
- fbnwC = &DD[dPMP * numberOfLBnodes];
- fbseC = &DD[dMPP * numberOfLBnodes];
- ftswC = &DD[dPPM * numberOfLBnodes];
- ftneC = &DD[dMMM * numberOfLBnodes];
- ftnwC = &DD[dPMM * numberOfLBnodes];
- ftseC = &DD[dMPM * numberOfLBnodes];
- }
-
- //////////////////////////////////////////////////////////////////////////
- //SWB//
- //////////////////////////////////////////////////////////////////////////
- //index 0
- unsigned int k0zero= cellBaseID[k];
- unsigned int k0w = neighborX[k0zero];
- unsigned int k0s = neighborY[k0zero];
- unsigned int k0b = neighborZ[k0zero];
- unsigned int k0sw = neighborY[k0w];
- unsigned int k0bw = neighborZ[k0w];
- unsigned int k0bs = neighborZ[k0s];
- unsigned int k0bsw = neighborZ[k0sw];
- //////////////////////////////////////////////////////////////////////////
- //index
- unsigned int kzero= k0zero;
- unsigned int kw = k0w;
- unsigned int ks = k0s;
- unsigned int kb = k0b;
- unsigned int ksw = k0sw;
- unsigned int kbw = k0bw;
- unsigned int kbs = k0bs;
- unsigned int kbsw = k0bsw;
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_SWB = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_SWB = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_SWB);
- vx2_SWB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_SWB);
- vx3_SWB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_SWB);
-
- kxyFromfcNEQ_SWB = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_SWB) - ((vx1_SWB*vx2_SWB)));
- kyzFromfcNEQ_SWB = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_SWB) - ((vx2_SWB*vx3_SWB)));
- kxzFromfcNEQ_SWB = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_SWB) - ((vx1_SWB*vx3_SWB)));
- kxxMyyFromfcNEQ_SWB = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_SWB) - ((vx1_SWB*vx1_SWB-vx2_SWB*vx2_SWB)));
- kxxMzzFromfcNEQ_SWB = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_SWB) - ((vx1_SWB*vx1_SWB-vx3_SWB*vx3_SWB)));
-
- //////////////////////////////////////////////////////////////////////////
- //SWT//
- //////////////////////////////////////////////////////////////////////////
- //index
- kzero= kb;
- kw = kbw;
- ks = kbs;
- kb = neighborZ[kb];
- ksw = kbsw;
- kbw = neighborZ[kbw];
- kbs = neighborZ[kbs];
- kbsw = neighborZ[kbsw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_SWT = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_SWT = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_SWT);
- vx2_SWT = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_SWT);
- vx3_SWT = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_SWT);
-
- kxyFromfcNEQ_SWT = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_SWT) - ((vx1_SWT*vx2_SWT)));
- kyzFromfcNEQ_SWT = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_SWT) - ((vx2_SWT*vx3_SWT)));
- kxzFromfcNEQ_SWT = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_SWT) - ((vx1_SWT*vx3_SWT)));
- kxxMyyFromfcNEQ_SWT = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_SWT) - ((vx1_SWT*vx1_SWT-vx2_SWT*vx2_SWT)));
- kxxMzzFromfcNEQ_SWT = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_SWT) - ((vx1_SWT*vx1_SWT-vx3_SWT*vx3_SWT)));
-
- //////////////////////////////////////////////////////////////////////////
- //SET//
- //////////////////////////////////////////////////////////////////////////
- //index
- kzero= kw;
- kw = neighborX[kw];
- ks = ksw;
- kb = kbw;
- ksw = neighborX[ksw];
- kbw = neighborX[kbw];
- kbs = kbsw;
- kbsw = neighborX[kbsw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_SET = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_SET = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_SET);
- vx2_SET = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_SET);
- vx3_SET = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_SET);
-
- kxyFromfcNEQ_SET = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_SET) - ((vx1_SET*vx2_SET)));
- kyzFromfcNEQ_SET = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_SET) - ((vx2_SET*vx3_SET)));
- kxzFromfcNEQ_SET = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_SET) - ((vx1_SET*vx3_SET)));
- kxxMyyFromfcNEQ_SET = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_SET) - ((vx1_SET*vx1_SET-vx2_SET*vx2_SET)));
- kxxMzzFromfcNEQ_SET = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_SET) - ((vx1_SET*vx1_SET-vx3_SET*vx3_SET)));
-
- //////////////////////////////////////////////////////////////////////////
- //SEB//
- //////////////////////////////////////////////////////////////////////////
- //index
- kb = kzero;
- kbw = kw;
- kbs = ks;
- kbsw = ksw;
- kzero= k0w;
- kw = neighborX[k0w];
- ks = k0sw;
- ksw = neighborX[k0sw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_SEB = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_SEB = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_SEB);
- vx2_SEB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_SEB);
- vx3_SEB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_SEB);
-
- kxyFromfcNEQ_SEB = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_SEB) - ((vx1_SEB*vx2_SEB)));
- kyzFromfcNEQ_SEB = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_SEB) - ((vx2_SEB*vx3_SEB)));
- kxzFromfcNEQ_SEB = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_SEB) - ((vx1_SEB*vx3_SEB)));
- kxxMyyFromfcNEQ_SEB = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_SEB) - ((vx1_SEB*vx1_SEB-vx2_SEB*vx2_SEB)));
- kxxMzzFromfcNEQ_SEB = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_SEB) - ((vx1_SEB*vx1_SEB-vx3_SEB*vx3_SEB)));
-
- //////////////////////////////////////////////////////////////////////////
- //NWB//
- //////////////////////////////////////////////////////////////////////////
- //index 0
- k0zero= k0s;
- k0w = k0sw;
- k0s = neighborY[k0s];
- k0b = k0bs;
- k0sw = neighborY[k0sw];
- k0bw = k0bsw;
- k0bs = neighborY[k0bs];
- k0bsw = neighborY[k0bsw];
- //////////////////////////////////////////////////////////////////////////
- //index
- kzero= k0zero;
- kw = k0w;
- ks = k0s;
- kb = k0b;
- ksw = k0sw;
- kbw = k0bw;
- kbs = k0bs;
- kbsw = k0bsw;
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_NWB = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_NWB = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_NWB);
- vx2_NWB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_NWB);
- vx3_NWB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_NWB);
-
- kxyFromfcNEQ_NWB = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_NWB) - ((vx1_NWB*vx2_NWB)));
- kyzFromfcNEQ_NWB = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_NWB) - ((vx2_NWB*vx3_NWB)));
- kxzFromfcNEQ_NWB = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_NWB) - ((vx1_NWB*vx3_NWB)));
- kxxMyyFromfcNEQ_NWB = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_NWB) - ((vx1_NWB*vx1_NWB-vx2_NWB*vx2_NWB)));
- kxxMzzFromfcNEQ_NWB = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_NWB) - ((vx1_NWB*vx1_NWB-vx3_NWB*vx3_NWB)));
-
- //////////////////////////////////////////////////////////////////////////
- //NWT//
- //////////////////////////////////////////////////////////////////////////
- //index
- kzero= kb;
- kw = kbw;
- ks = kbs;
- kb = neighborZ[kb];
- ksw = kbsw;
- kbw = neighborZ[kbw];
- kbs = neighborZ[kbs];
- kbsw = neighborZ[kbsw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_NWT = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_NWT = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_NWT);
- vx2_NWT = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_NWT);
- vx3_NWT = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_NWT);
-
- kxyFromfcNEQ_NWT = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_NWT) - ((vx1_NWT*vx2_NWT)));
- kyzFromfcNEQ_NWT = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_NWT) - ((vx2_NWT*vx3_NWT)));
- kxzFromfcNEQ_NWT = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_NWT) - ((vx1_NWT*vx3_NWT)));
- kxxMyyFromfcNEQ_NWT = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_NWT) - ((vx1_NWT*vx1_NWT-vx2_NWT*vx2_NWT)));
- kxxMzzFromfcNEQ_NWT = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_NWT) - ((vx1_NWT*vx1_NWT-vx3_NWT*vx3_NWT)));
-
- //////////////////////////////////////////////////////////////////////////
- //NET//
- //////////////////////////////////////////////////////////////////////////
- //index
- kzero= kw;
- kw = neighborX[kw];
- ks = ksw;
- kb = kbw;
- ksw = neighborX[ksw];
- kbw = neighborX[kbw];
- kbs = kbsw;
- kbsw = neighborX[kbsw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_NET = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_NET = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_NET);
- vx2_NET = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_NET);
- vx3_NET = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_NET);
-
- kxyFromfcNEQ_NET = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_NET) - ((vx1_NET*vx2_NET)));
- kyzFromfcNEQ_NET = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_NET) - ((vx2_NET*vx3_NET)));
- kxzFromfcNEQ_NET = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_NET) - ((vx1_NET*vx3_NET)));
- kxxMyyFromfcNEQ_NET = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_NET) - ((vx1_NET*vx1_NET-vx2_NET*vx2_NET)));
- kxxMzzFromfcNEQ_NET = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_NET) - ((vx1_NET*vx1_NET-vx3_NET*vx3_NET)));
-
- //////////////////////////////////////////////////////////////////////////
- //NEB//
- //////////////////////////////////////////////////////////////////////////
- //index
- kb = kzero;
- kbw = kw;
- kbs = ks;
- kbsw = ksw;
- kzero= k0w;
- kw = neighborX[k0w];
- ks = k0sw;
- ksw = neighborX[k0sw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_NEB = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_NEB = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_NEB);
- vx2_NEB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_NEB);
- vx3_NEB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_NEB);
-
- kxyFromfcNEQ_NEB = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_NEB) - ((vx1_NEB*vx2_NEB)));
- kyzFromfcNEQ_NEB = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_NEB) - ((vx2_NEB*vx3_NEB)));
- kxzFromfcNEQ_NEB = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_NEB) - ((vx1_NEB*vx3_NEB)));
- kxxMyyFromfcNEQ_NEB = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_NEB) - ((vx1_NEB*vx1_NEB-vx2_NEB*vx2_NEB)));
- kxxMzzFromfcNEQ_NEB = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_NEB) - ((vx1_NEB*vx1_NEB-vx3_NEB*vx3_NEB)));
-
- //////////////////////////////////////////////////////////////////////////
- //interpolate
- //////////////////////////////////////////////////////////////////////////
- a0 = (-kxxMyyFromfcNEQ_NEB - kxxMyyFromfcNEQ_NET + kxxMyyFromfcNEQ_NWB + kxxMyyFromfcNEQ_NWT -
- kxxMyyFromfcNEQ_SEB - kxxMyyFromfcNEQ_SET + kxxMyyFromfcNEQ_SWB + kxxMyyFromfcNEQ_SWT -
- kxxMzzFromfcNEQ_NEB - kxxMzzFromfcNEQ_NET + kxxMzzFromfcNEQ_NWB + kxxMzzFromfcNEQ_NWT -
- kxxMzzFromfcNEQ_SEB - kxxMzzFromfcNEQ_SET + kxxMzzFromfcNEQ_SWB + kxxMzzFromfcNEQ_SWT -
- c2o1*kxyFromfcNEQ_NEB - c2o1*kxyFromfcNEQ_NET - c2o1*kxyFromfcNEQ_NWB - c2o1*kxyFromfcNEQ_NWT +
- c2o1*kxyFromfcNEQ_SEB + c2o1*kxyFromfcNEQ_SET + c2o1*kxyFromfcNEQ_SWB + c2o1*kxyFromfcNEQ_SWT +
- c2o1*kxzFromfcNEQ_NEB - c2o1*kxzFromfcNEQ_NET + c2o1*kxzFromfcNEQ_NWB - c2o1*kxzFromfcNEQ_NWT +
- c2o1*kxzFromfcNEQ_SEB - c2o1*kxzFromfcNEQ_SET + c2o1*kxzFromfcNEQ_SWB - c2o1*kxzFromfcNEQ_SWT +
- c8o1*vx1_NEB + c8o1*vx1_NET + c8o1*vx1_NWB + c8o1*vx1_NWT + c8o1*vx1_SEB +
- c8o1*vx1_SET + c8o1*vx1_SWB + c8o1*vx1_SWT + c2o1*vx2_NEB + c2o1*vx2_NET -
- c2o1*vx2_NWB - c2o1*vx2_NWT - c2o1*vx2_SEB - c2o1*vx2_SET + c2o1*vx2_SWB +
- c2o1*vx2_SWT - c2o1*vx3_NEB + c2o1*vx3_NET + c2o1*vx3_NWB - c2o1*vx3_NWT -
- c2o1*vx3_SEB + c2o1*vx3_SET + c2o1*vx3_SWB - c2o1*vx3_SWT)/c64o1;
- b0 = (c2o1*kxxMyyFromfcNEQ_NEB + c2o1*kxxMyyFromfcNEQ_NET + c2o1*kxxMyyFromfcNEQ_NWB + c2o1*kxxMyyFromfcNEQ_NWT -
- c2o1*kxxMyyFromfcNEQ_SEB - c2o1*kxxMyyFromfcNEQ_SET - c2o1*kxxMyyFromfcNEQ_SWB - c2o1*kxxMyyFromfcNEQ_SWT -
- kxxMzzFromfcNEQ_NEB - kxxMzzFromfcNEQ_NET - kxxMzzFromfcNEQ_NWB - kxxMzzFromfcNEQ_NWT +
- kxxMzzFromfcNEQ_SEB + kxxMzzFromfcNEQ_SET + kxxMzzFromfcNEQ_SWB + kxxMzzFromfcNEQ_SWT -
- c2o1*kxyFromfcNEQ_NEB - c2o1*kxyFromfcNEQ_NET + c2o1*kxyFromfcNEQ_NWB + c2o1*kxyFromfcNEQ_NWT -
- c2o1*kxyFromfcNEQ_SEB - c2o1*kxyFromfcNEQ_SET + c2o1*kxyFromfcNEQ_SWB + c2o1*kxyFromfcNEQ_SWT +
- c2o1*kyzFromfcNEQ_NEB - c2o1*kyzFromfcNEQ_NET + c2o1*kyzFromfcNEQ_NWB - c2o1*kyzFromfcNEQ_NWT +
- c2o1*kyzFromfcNEQ_SEB - c2o1*kyzFromfcNEQ_SET + c2o1*kyzFromfcNEQ_SWB - c2o1*kyzFromfcNEQ_SWT +
- c2o1*vx1_NEB + c2o1*vx1_NET - c2o1*vx1_NWB - c2o1*vx1_NWT -
- c2o1*vx1_SEB - c2o1*vx1_SET + c2o1*vx1_SWB + c2o1*vx1_SWT +
- c8o1*vx2_NEB + c8o1*vx2_NET + c8o1*vx2_NWB + c8o1*vx2_NWT +
- c8o1*vx2_SEB + c8o1*vx2_SET + c8o1*vx2_SWB + c8o1*vx2_SWT -
- c2o1*vx3_NEB + c2o1*vx3_NET - c2o1*vx3_NWB + c2o1*vx3_NWT +
- c2o1*vx3_SEB - c2o1*vx3_SET + c2o1*vx3_SWB - c2o1*vx3_SWT)/c64o1;
-
- //b0 = ((eight*vx2_NEB + eight*vx2_SWT) + (eight*vx2_NET + eight*vx2_SWB) + (eight*vx2_NWB + eight*vx2_SET) + (eight*vx2_NWT + eight*vx2_SEB))/sixtyfour;
-
- c0 = (kxxMyyFromfcNEQ_NEB - kxxMyyFromfcNEQ_NET + kxxMyyFromfcNEQ_NWB - kxxMyyFromfcNEQ_NWT +
- kxxMyyFromfcNEQ_SEB - kxxMyyFromfcNEQ_SET + kxxMyyFromfcNEQ_SWB - kxxMyyFromfcNEQ_SWT -
- c2o1*kxxMzzFromfcNEQ_NEB + c2o1*kxxMzzFromfcNEQ_NET - c2o1*kxxMzzFromfcNEQ_NWB + c2o1*kxxMzzFromfcNEQ_NWT -
- c2o1*kxxMzzFromfcNEQ_SEB + c2o1*kxxMzzFromfcNEQ_SET - c2o1*kxxMzzFromfcNEQ_SWB + c2o1*kxxMzzFromfcNEQ_SWT -
- c2o1*kxzFromfcNEQ_NEB - c2o1*kxzFromfcNEQ_NET + c2o1*kxzFromfcNEQ_NWB + c2o1*kxzFromfcNEQ_NWT -
- c2o1*kxzFromfcNEQ_SEB - c2o1*kxzFromfcNEQ_SET + c2o1*kxzFromfcNEQ_SWB + c2o1*kxzFromfcNEQ_SWT -
- c2o1*kyzFromfcNEQ_NEB - c2o1*kyzFromfcNEQ_NET - c2o1*kyzFromfcNEQ_NWB - c2o1*kyzFromfcNEQ_NWT +
- c2o1*kyzFromfcNEQ_SEB + c2o1*kyzFromfcNEQ_SET + c2o1*kyzFromfcNEQ_SWB + c2o1*kyzFromfcNEQ_SWT -
- c2o1*vx1_NEB + c2o1*vx1_NET + c2o1*vx1_NWB - c2o1*vx1_NWT -
- c2o1*vx1_SEB + c2o1*vx1_SET + c2o1*vx1_SWB - c2o1*vx1_SWT -
- c2o1*vx2_NEB + c2o1*vx2_NET - c2o1*vx2_NWB + c2o1*vx2_NWT +
- c2o1*vx2_SEB - c2o1*vx2_SET + c2o1*vx2_SWB - c2o1*vx2_SWT +
- c8o1*vx3_NEB + c8o1*vx3_NET + c8o1*vx3_NWB + c8o1*vx3_NWT +
- c8o1*vx3_SEB + c8o1*vx3_SET + c8o1*vx3_SWB + c8o1*vx3_SWT)/c64o1;
- ax = (vx1_NEB + vx1_NET - vx1_NWB - vx1_NWT + vx1_SEB + vx1_SET - vx1_SWB - vx1_SWT)/c4o1;
- bx = (vx2_NEB + vx2_NET - vx2_NWB - vx2_NWT + vx2_SEB + vx2_SET - vx2_SWB - vx2_SWT)/c4o1;
- //bx = ((vx2_NEB - vx2_SWT) + (vx2_NET - vx2_SWB) + (vx2_SET - vx2_NWB) + (vx2_SEB - vx2_NWT))/four;
- cx = (vx3_NEB + vx3_NET - vx3_NWB - vx3_NWT + vx3_SEB + vx3_SET - vx3_SWB - vx3_SWT)/c4o1;
- axx= (kxxMyyFromfcNEQ_NEB + kxxMyyFromfcNEQ_NET - kxxMyyFromfcNEQ_NWB - kxxMyyFromfcNEQ_NWT +
- kxxMyyFromfcNEQ_SEB + kxxMyyFromfcNEQ_SET - kxxMyyFromfcNEQ_SWB - kxxMyyFromfcNEQ_SWT +
- kxxMzzFromfcNEQ_NEB + kxxMzzFromfcNEQ_NET - kxxMzzFromfcNEQ_NWB - kxxMzzFromfcNEQ_NWT +
- kxxMzzFromfcNEQ_SEB + kxxMzzFromfcNEQ_SET - kxxMzzFromfcNEQ_SWB - kxxMzzFromfcNEQ_SWT +
- c2o1*vx2_NEB + c2o1*vx2_NET - c2o1*vx2_NWB - c2o1*vx2_NWT -
- c2o1*vx2_SEB - c2o1*vx2_SET + c2o1*vx2_SWB + c2o1*vx2_SWT -
- c2o1*vx3_NEB + c2o1*vx3_NET + c2o1*vx3_NWB - c2o1*vx3_NWT -
- c2o1*vx3_SEB + c2o1*vx3_SET + c2o1*vx3_SWB - c2o1*vx3_SWT)/c16o1;
- bxx= (kxyFromfcNEQ_NEB + kxyFromfcNEQ_NET - kxyFromfcNEQ_NWB - kxyFromfcNEQ_NWT +
- kxyFromfcNEQ_SEB + kxyFromfcNEQ_SET - kxyFromfcNEQ_SWB - kxyFromfcNEQ_SWT -
- c2o1*vx1_NEB - c2o1*vx1_NET + c2o1*vx1_NWB + c2o1*vx1_NWT +
- c2o1*vx1_SEB + c2o1*vx1_SET - c2o1*vx1_SWB - c2o1*vx1_SWT)/c8o1;
- cxx= (kxzFromfcNEQ_NEB + kxzFromfcNEQ_NET - kxzFromfcNEQ_NWB - kxzFromfcNEQ_NWT +
- kxzFromfcNEQ_SEB + kxzFromfcNEQ_SET - kxzFromfcNEQ_SWB - kxzFromfcNEQ_SWT +
- c2o1*vx1_NEB - c2o1*vx1_NET - c2o1*vx1_NWB + c2o1*vx1_NWT +
- c2o1*vx1_SEB - c2o1*vx1_SET - c2o1*vx1_SWB + c2o1*vx1_SWT)/c8o1;
- ay = (vx1_NEB + vx1_NET + vx1_NWB + vx1_NWT - vx1_SEB - vx1_SET - vx1_SWB - vx1_SWT)/c4o1;
- by = (vx2_NEB + vx2_NET + vx2_NWB + vx2_NWT - vx2_SEB - vx2_SET - vx2_SWB - vx2_SWT)/c4o1;
- cy = (vx3_NEB + vx3_NET + vx3_NWB + vx3_NWT - vx3_SEB - vx3_SET - vx3_SWB - vx3_SWT)/c4o1;
- ayy= (kxyFromfcNEQ_NEB + kxyFromfcNEQ_NET + kxyFromfcNEQ_NWB + kxyFromfcNEQ_NWT -
- kxyFromfcNEQ_SEB - kxyFromfcNEQ_SET - kxyFromfcNEQ_SWB - kxyFromfcNEQ_SWT -
- c2o1*vx2_NEB - c2o1*vx2_NET + c2o1*vx2_NWB + c2o1*vx2_NWT +
- c2o1*vx2_SEB + c2o1*vx2_SET - c2o1*vx2_SWB - c2o1*vx2_SWT)/c8o1;
- byy= (-c2o1*kxxMyyFromfcNEQ_NEB - c2o1*kxxMyyFromfcNEQ_NET - c2o1*kxxMyyFromfcNEQ_NWB - c2o1*kxxMyyFromfcNEQ_NWT +
- c2o1*kxxMyyFromfcNEQ_SEB + c2o1*kxxMyyFromfcNEQ_SET + c2o1*kxxMyyFromfcNEQ_SWB + c2o1*kxxMyyFromfcNEQ_SWT +
- kxxMzzFromfcNEQ_NEB + kxxMzzFromfcNEQ_NET + kxxMzzFromfcNEQ_NWB + kxxMzzFromfcNEQ_NWT -
- kxxMzzFromfcNEQ_SEB - kxxMzzFromfcNEQ_SET - kxxMzzFromfcNEQ_SWB - kxxMzzFromfcNEQ_SWT +
- c2o1*vx1_NEB + c2o1*vx1_NET - c2o1*vx1_NWB - c2o1*vx1_NWT -
- c2o1*vx1_SEB - c2o1*vx1_SET + c2o1*vx1_SWB + c2o1*vx1_SWT -
- c2o1*vx3_NEB + c2o1*vx3_NET - c2o1*vx3_NWB + c2o1*vx3_NWT +
- c2o1*vx3_SEB - c2o1*vx3_SET + c2o1*vx3_SWB - c2o1*vx3_SWT)/c16o1;
- cyy= (kyzFromfcNEQ_NEB + kyzFromfcNEQ_NET + kyzFromfcNEQ_NWB + kyzFromfcNEQ_NWT -
- kyzFromfcNEQ_SEB - kyzFromfcNEQ_SET - kyzFromfcNEQ_SWB - kyzFromfcNEQ_SWT +
- c2o1*vx2_NEB - c2o1*vx2_NET + c2o1*vx2_NWB - c2o1*vx2_NWT -
- c2o1*vx2_SEB + c2o1*vx2_SET - c2o1*vx2_SWB + c2o1*vx2_SWT)/c8o1;
- az = (-vx1_NEB + vx1_NET - vx1_NWB + vx1_NWT - vx1_SEB + vx1_SET - vx1_SWB + vx1_SWT)/c4o1;
- //bz = (-vx2_NEB + vx2_NET - vx2_NWB + vx2_NWT - vx2_SEB + vx2_SET - vx2_SWB + vx2_SWT)/four;
- bz = ((vx2_SWT - vx2_NEB) + (vx2_NET - vx2_SWB) + (vx2_SET - vx2_NWB) + (vx2_NWT - vx2_SEB))/c4o1;
- cz = (-vx3_NEB + vx3_NET - vx3_NWB + vx3_NWT - vx3_SEB + vx3_SET - vx3_SWB + vx3_SWT)/c4o1;
- azz= (-kxzFromfcNEQ_NEB + kxzFromfcNEQ_NET - kxzFromfcNEQ_NWB + kxzFromfcNEQ_NWT -
- kxzFromfcNEQ_SEB + kxzFromfcNEQ_SET - kxzFromfcNEQ_SWB + kxzFromfcNEQ_SWT +
- c2o1*vx3_NEB - c2o1*vx3_NET - c2o1*vx3_NWB + c2o1*vx3_NWT +
- c2o1*vx3_SEB - c2o1*vx3_SET - c2o1*vx3_SWB + c2o1*vx3_SWT)/c8o1;
- bzz= (-kyzFromfcNEQ_NEB + kyzFromfcNEQ_NET - kyzFromfcNEQ_NWB + kyzFromfcNEQ_NWT -
- kyzFromfcNEQ_SEB + kyzFromfcNEQ_SET - kyzFromfcNEQ_SWB + kyzFromfcNEQ_SWT +
- c2o1*vx3_NEB - c2o1*vx3_NET + c2o1*vx3_NWB - c2o1*vx3_NWT -
- c2o1*vx3_SEB + c2o1*vx3_SET - c2o1*vx3_SWB + c2o1*vx3_SWT)/c8o1;
- czz= (-kxxMyyFromfcNEQ_NEB + kxxMyyFromfcNEQ_NET - kxxMyyFromfcNEQ_NWB + kxxMyyFromfcNEQ_NWT -
- kxxMyyFromfcNEQ_SEB + kxxMyyFromfcNEQ_SET - kxxMyyFromfcNEQ_SWB + kxxMyyFromfcNEQ_SWT +
- c2o1*kxxMzzFromfcNEQ_NEB - c2o1*kxxMzzFromfcNEQ_NET + c2o1*kxxMzzFromfcNEQ_NWB - c2o1*kxxMzzFromfcNEQ_NWT +
- c2o1*kxxMzzFromfcNEQ_SEB - c2o1*kxxMzzFromfcNEQ_SET + c2o1*kxxMzzFromfcNEQ_SWB - c2o1*kxxMzzFromfcNEQ_SWT -
- c2o1*vx1_NEB + c2o1*vx1_NET + c2o1*vx1_NWB - c2o1*vx1_NWT -
- c2o1*vx1_SEB + c2o1*vx1_SET + c2o1*vx1_SWB - c2o1*vx1_SWT -
- c2o1*vx2_NEB + c2o1*vx2_NET - c2o1*vx2_NWB + c2o1*vx2_NWT +
- c2o1*vx2_SEB - c2o1*vx2_SET + c2o1*vx2_SWB - c2o1*vx2_SWT)/c16o1;
- axy= (vx1_NEB + vx1_NET - vx1_NWB - vx1_NWT - vx1_SEB - vx1_SET + vx1_SWB + vx1_SWT)/c2o1;
- bxy= (vx2_NEB + vx2_NET - vx2_NWB - vx2_NWT - vx2_SEB - vx2_SET + vx2_SWB + vx2_SWT)/c2o1;
- cxy= (vx3_NEB + vx3_NET - vx3_NWB - vx3_NWT - vx3_SEB - vx3_SET + vx3_SWB + vx3_SWT)/c2o1;
- axz= (-vx1_NEB + vx1_NET + vx1_NWB - vx1_NWT - vx1_SEB + vx1_SET + vx1_SWB - vx1_SWT)/c2o1;
- bxz= (-vx2_NEB + vx2_NET + vx2_NWB - vx2_NWT - vx2_SEB + vx2_SET + vx2_SWB - vx2_SWT)/c2o1;
- cxz= (-vx3_NEB + vx3_NET + vx3_NWB - vx3_NWT - vx3_SEB + vx3_SET + vx3_SWB - vx3_SWT)/c2o1;
- ayz= (-vx1_NEB + vx1_NET - vx1_NWB + vx1_NWT + vx1_SEB - vx1_SET + vx1_SWB - vx1_SWT)/c2o1;
- byz= (-vx2_NEB + vx2_NET - vx2_NWB + vx2_NWT + vx2_SEB - vx2_SET + vx2_SWB - vx2_SWT)/c2o1;
- cyz= (-vx3_NEB + vx3_NET - vx3_NWB + vx3_NWT + vx3_SEB - vx3_SET + vx3_SWB - vx3_SWT)/c2o1;
- axyz=-vx1_NEB + vx1_NET + vx1_NWB - vx1_NWT + vx1_SEB - vx1_SET - vx1_SWB + vx1_SWT;
- bxyz=-vx2_NEB + vx2_NET + vx2_NWB - vx2_NWT + vx2_SEB - vx2_SET - vx2_SWB + vx2_SWT;
- cxyz=-vx3_NEB + vx3_NET + vx3_NWB - vx3_NWT + vx3_SEB - vx3_SET - vx3_SWB + vx3_SWT;
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //drho
- // d0 = ( drho_NEB + drho_NET + drho_NWB + drho_NWT + drho_SEB + drho_SET + drho_SWB + drho_SWT) * c1o8;
- // dx = ( drho_NEB + drho_NET - drho_NWB - drho_NWT + drho_SEB + drho_SET - drho_SWB - drho_SWT) * c1o4;
- // dy = ( drho_NEB + drho_NET + drho_NWB + drho_NWT - drho_SEB - drho_SET - drho_SWB - drho_SWT) * c1o4;
- // dz = (-drho_NEB + drho_NET - drho_NWB + drho_NWT - drho_SEB + drho_SET - drho_SWB + drho_SWT) * c1o4;
- // dxy = ( drho_NEB + drho_NET - drho_NWB - drho_NWT - drho_SEB - drho_SET + drho_SWB + drho_SWT) * c1o2;
- // dxz = (-drho_NEB + drho_NET + drho_NWB - drho_NWT - drho_SEB + drho_SET + drho_SWB - drho_SWT) * c1o2;
- // dyz = (-drho_NEB + drho_NET - drho_NWB + drho_NWT + drho_SEB - drho_SET + drho_SWB - drho_SWT) * c1o2;
- // dxyz = -drho_NEB + drho_NET + drho_NWB - drho_NWT + drho_SEB - drho_SET - drho_SWB + drho_SWT;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int kTimeStepOld = kTimeStep - numberOfParticles;
- real localX = coordParticleXlocal[kTimeStepOld];
- real localY = coordParticleYlocal[kTimeStepOld];
- real localZ = coordParticleZlocal[kTimeStepOld];
-
- x = (localX * (real)(pow((double)c2o1, (double)level))) - c1o2; //-c1o4;
- y = (localY * (real)(pow((double)c2o1, (double)level))) - c1o2; //-c1o4;
- z = (localZ * (real)(pow((double)c2o1, (double)level))) - c1o2; //-c1o4;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //press = d0 + x*dx + y*dy + z*dz + x*y*dxy + x*z*dxz + y*z*dyz + x*y*z*dxyz;
- vx1 = (a0 + x*ax + y*ay + z*az + x*x*axx + y*y*ayy + z*z*azz + x*y*axy + x*z*axz + y*z*ayz + x*y*z*axyz);
- vx2 = (b0 + x*bx + y*by + z*bz + x*x*bxx + y*y*byy + z*z*bzz + x*y*bxy + x*z*bxz + y*z*byz + x*y*z*bxyz);
- vx3 = (c0 + x*cx + y*cy + z*cz + x*x*cxx + y*y*cyy + z*z*czz + x*y*cxy + x*z*cxz + y*z*cyz + x*y*z*cxyz);
-
- real veloPreX = veloParticleX[kTimeStepOld];
- real veloPreY = veloParticleY[kTimeStepOld];
- real veloPreZ = veloParticleZ[kTimeStepOld];
-
- real veloPostX = (veloPreX + vx1) * c1o2;
- real veloPostY = (veloPreY + vx2) * c1o2;
- real veloPostZ = (veloPreZ + vx3) * c1o2;
-
- //real veloPostX = vx1;
- //real veloPostY = vx2;
- //real veloPostZ = vx3;
-
- veloParticleX[kTimeStep] = veloPostX;
- veloParticleY[kTimeStep] = veloPostY;
- veloParticleZ[kTimeStep] = veloPostZ;
- ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- x = x + veloPostX;
- //x = x + c1o3;
- y = y + veloPostY;
- z = z + veloPostZ;
-
- unsigned int cbID = cellBaseID[k];
- bool negativeDirection = false;
-
- if (x > c1o2)
- {
- cbID = neighborX[cbID];
- x = x - c1o1;
- }
- if (y > c1o2)
- {
- cbID = neighborY[cbID];
- y = y - c1o1;
- }
- if (z > c1o2)
- {
- cbID = neighborZ[cbID];
- z = z - c1o1;
- }
-
- real tempX = x;
- real tempY = y;
- real tempZ = z;
-
- if ((x < -c1o2) || (y < -c1o2) || (z < -c1o2))
- {
- cbID = neighborWSB[cbID];
- negativeDirection = true;
- tempX = x + c1o1;
- tempY = y + c1o1;
- tempZ = z + c1o1;
- }
- if ((x >= -c1o2) && (negativeDirection == true))
- {
- cbID = neighborX[cbID];
- tempX = x;
- }
- if ((y >= -c1o2) && (negativeDirection == true))
- {
- cbID = neighborY[cbID];
- tempY = y;
- }
- if ((z >= -c1o2) && (negativeDirection == true))
- {
- cbID = neighborZ[cbID];
- tempZ = z;
- }
-
- x = tempX;
- y = tempY;
- z = tempZ;
-
- localX = (x + c1o2) / (real)(pow((double)c2o1, (double)level));
- localY = (y + c1o2) / (real)(pow((double)c2o1, (double)level));
- localZ = (z + c1o2) / (real)(pow((double)c2o1, (double)level));
- coordParticleXlocal[kTimeStep] = localX;
- coordParticleYlocal[kTimeStep] = localY;
- coordParticleZlocal[kTimeStep] = localZ;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real globalX = localX + coordX[cbID];
- real globalY = localY + coordY[cbID];
- real globalZ = localZ + coordZ[cbID];
- coordParticleXglobal[kTimeStep] = globalX;
- coordParticleYglobal[kTimeStep] = globalY;
- coordParticleZglobal[kTimeStep] = globalZ;
- //coordParticleXglobal[kTimeStep] = coordParticleXglobal[kTimeStepOld];
- //coordParticleYglobal[kTimeStep] = coordParticleYglobal[kTimeStepOld];
- //coordParticleZglobal[kTimeStep] = coordParticleZglobal[kTimeStepOld];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- cellBaseID[k] = cbID;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void MoveParticlesWithoutBCs( real* coordX,
- real* coordY,
- real* coordZ,
- real* coordParticleXlocal,
- real* coordParticleYlocal,
- real* coordParticleZlocal,
- real* coordParticleXglobal,
- real* coordParticleYglobal,
- real* coordParticleZglobal,
- real* veloParticleX,
- real* veloParticleY,
- real* veloParticleZ,
- real* DD,
- real omega,
- unsigned int* particleID,
- unsigned int* cellBaseID,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- int level,
- unsigned int timestep,
- unsigned int numberOfTimesteps,
- unsigned int numberOfParticles,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned ix = threadIdx.x; // Globaler x-Index
- const unsigned iy = blockIdx.x; // Globaler y-Index
- const unsigned iz = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*iz + iy) + ix;
- //////////////////////////////////////////////////////////////////////////
-
- //real press;
- real vx1,vx2,vx3;
- real drho_SWT,vx1_SWT,vx2_SWT,vx3_SWT;
- real drho_NWT,vx1_NWT,vx2_NWT,vx3_NWT;
- real drho_NET,vx1_NET,vx2_NET,vx3_NET;
- real drho_SET,vx1_SET,vx2_SET,vx3_SET;
- real drho_SWB,vx1_SWB,vx2_SWB,vx3_SWB;
- real drho_NWB,vx1_NWB,vx2_NWB,vx3_NWB;
- real drho_NEB,vx1_NEB,vx2_NEB,vx3_NEB;
- real drho_SEB,vx1_SEB,vx2_SEB,vx3_SEB;
- real f_E,f_W,f_N,f_S,f_T,f_B,f_NE,f_SW,f_SE,f_NW,f_TE,f_BW,f_BE,f_TW,f_TN,f_BS,f_BN,f_TS,f_ZERO,f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
- real *feC, *fwC, *fnC, *fsC, *ftC, *fbC, *fneC, *fswC, *fseC, *fnwC, *fteC, *fbwC, *fbeC, *ftwC, *ftnC, *fbsC, *fbnC, *ftsC, *fzeroC, *ftneC, *ftswC, *ftseC, *ftnwC, *fbneC, *fbswC, *fbseC, *fbnwC;
- real kxyFromfcNEQ_SWT, kyzFromfcNEQ_SWT, kxzFromfcNEQ_SWT, kxxMyyFromfcNEQ_SWT, kxxMzzFromfcNEQ_SWT;
- real kxyFromfcNEQ_NWT, kyzFromfcNEQ_NWT, kxzFromfcNEQ_NWT, kxxMyyFromfcNEQ_NWT, kxxMzzFromfcNEQ_NWT;
- real kxyFromfcNEQ_NET, kyzFromfcNEQ_NET, kxzFromfcNEQ_NET, kxxMyyFromfcNEQ_NET, kxxMzzFromfcNEQ_NET;
- real kxyFromfcNEQ_SET, kyzFromfcNEQ_SET, kxzFromfcNEQ_SET, kxxMyyFromfcNEQ_SET, kxxMzzFromfcNEQ_SET;
- real kxyFromfcNEQ_SWB, kyzFromfcNEQ_SWB, kxzFromfcNEQ_SWB, kxxMyyFromfcNEQ_SWB, kxxMzzFromfcNEQ_SWB;
- real kxyFromfcNEQ_NWB, kyzFromfcNEQ_NWB, kxzFromfcNEQ_NWB, kxxMyyFromfcNEQ_NWB, kxxMzzFromfcNEQ_NWB;
- real kxyFromfcNEQ_NEB, kyzFromfcNEQ_NEB, kxzFromfcNEQ_NEB, kxxMyyFromfcNEQ_NEB, kxxMzzFromfcNEQ_NEB;
- real kxyFromfcNEQ_SEB, kyzFromfcNEQ_SEB, kxzFromfcNEQ_SEB, kxxMyyFromfcNEQ_SEB, kxxMzzFromfcNEQ_SEB;
- real a0, ax, ay, az, axx, ayy, azz, axy, axz, ayz, b0, bx, by, bz, bxx, byy, bzz, bxy, bxz, byz, c0, cx, cy, cz, cxx, cyy, czz, cxy, cxz, cyz, axyz, bxyz, cxyz;
- //real d0, dx, dy, dz, dxy, dxz, dyz, dxyz;
-
- real x,y,z;
-
- if(k < numberOfParticles)
- {
- /////////////////////////////////////////////////////////////
- unsigned int kTimeStep = k + (timestep * numberOfParticles);
- /////////////////////////////////////////////////////////////
- unsigned int kCellBaseID = cellBaseID[k];
- unsigned int BC000 = bcMatD[kCellBaseID];
- unsigned int BCx00 = bcMatD[neighborX[kCellBaseID]];
- unsigned int BC0y0 = bcMatD[neighborY[kCellBaseID]];
- unsigned int BC00z = bcMatD[neighborZ[kCellBaseID]];
- unsigned int BCxy0 = bcMatD[neighborY[neighborX[kCellBaseID]]];
- unsigned int BCx0z = bcMatD[neighborZ[neighborX[kCellBaseID]]];
- unsigned int BC0yz = bcMatD[neighborZ[neighborY[kCellBaseID]]];
- unsigned int BCxyz = bcMatD[neighborZ[neighborY[neighborX[kCellBaseID]]]];
- /////////////////////////////////////////////////////////////
- if( (BC000 == GEO_FLUID) || (BCx00 == GEO_FLUID) || (BC0y0 == GEO_FLUID) || (BC00z == GEO_FLUID) ||
- (BCxy0 == GEO_FLUID) || (BCx0z == GEO_FLUID) || (BC0yz == GEO_FLUID) || (BCxyz == GEO_FLUID) )
- {
- if (isEvenTimestep==true)
- {
- feC = &DD[dP00 * numberOfLBnodes];
- fwC = &DD[dM00 * numberOfLBnodes];
- fnC = &DD[d0P0 * numberOfLBnodes];
- fsC = &DD[d0M0 * numberOfLBnodes];
- ftC = &DD[d00P * numberOfLBnodes];
- fbC = &DD[d00M * numberOfLBnodes];
- fneC = &DD[dPP0 * numberOfLBnodes];
- fswC = &DD[dMM0 * numberOfLBnodes];
- fseC = &DD[dPM0 * numberOfLBnodes];
- fnwC = &DD[dMP0 * numberOfLBnodes];
- fteC = &DD[dP0P * numberOfLBnodes];
- fbwC = &DD[dM0M * numberOfLBnodes];
- fbeC = &DD[dP0M * numberOfLBnodes];
- ftwC = &DD[dM0P * numberOfLBnodes];
- ftnC = &DD[d0PP * numberOfLBnodes];
- fbsC = &DD[d0MM * numberOfLBnodes];
- fbnC = &DD[d0PM * numberOfLBnodes];
- ftsC = &DD[d0MP * numberOfLBnodes];
- fzeroC = &DD[d000 * numberOfLBnodes];
- ftneC = &DD[dPPP * numberOfLBnodes];
- ftswC = &DD[dMMP * numberOfLBnodes];
- ftseC = &DD[dPMP * numberOfLBnodes];
- ftnwC = &DD[dMPP * numberOfLBnodes];
- fbneC = &DD[dPPM * numberOfLBnodes];
- fbswC = &DD[dMMM * numberOfLBnodes];
- fbseC = &DD[dPMM * numberOfLBnodes];
- fbnwC = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- fwC = &DD[dP00 * numberOfLBnodes];
- feC = &DD[dM00 * numberOfLBnodes];
- fsC = &DD[d0P0 * numberOfLBnodes];
- fnC = &DD[d0M0 * numberOfLBnodes];
- fbC = &DD[d00P * numberOfLBnodes];
- ftC = &DD[d00M * numberOfLBnodes];
- fswC = &DD[dPP0 * numberOfLBnodes];
- fneC = &DD[dMM0 * numberOfLBnodes];
- fnwC = &DD[dPM0 * numberOfLBnodes];
- fseC = &DD[dMP0 * numberOfLBnodes];
- fbwC = &DD[dP0P * numberOfLBnodes];
- fteC = &DD[dM0M * numberOfLBnodes];
- ftwC = &DD[dP0M * numberOfLBnodes];
- fbeC = &DD[dM0P * numberOfLBnodes];
- fbsC = &DD[d0PP * numberOfLBnodes];
- ftnC = &DD[d0MM * numberOfLBnodes];
- ftsC = &DD[d0PM * numberOfLBnodes];
- fbnC = &DD[d0MP * numberOfLBnodes];
- fzeroC = &DD[d000 * numberOfLBnodes];
- fbswC = &DD[dPPP * numberOfLBnodes];
- fbneC = &DD[dMMP * numberOfLBnodes];
- fbnwC = &DD[dPMP * numberOfLBnodes];
- fbseC = &DD[dMPP * numberOfLBnodes];
- ftswC = &DD[dPPM * numberOfLBnodes];
- ftneC = &DD[dMMM * numberOfLBnodes];
- ftnwC = &DD[dPMM * numberOfLBnodes];
- ftseC = &DD[dMPM * numberOfLBnodes];
- }
-
- //////////////////////////////////////////////////////////////////////////
- //SWB//
- //////////////////////////////////////////////////////////////////////////
- //index 0
- unsigned int k0zero= cellBaseID[k];
- unsigned int k0w = neighborX[k0zero];
- unsigned int k0s = neighborY[k0zero];
- unsigned int k0b = neighborZ[k0zero];
- unsigned int k0sw = neighborY[k0w];
- unsigned int k0bw = neighborZ[k0w];
- unsigned int k0bs = neighborZ[k0s];
- unsigned int k0bsw = neighborZ[k0sw];
- //////////////////////////////////////////////////////////////////////////
- //index
- unsigned int kzero= k0zero;
- unsigned int kw = k0w;
- unsigned int ks = k0s;
- unsigned int kb = k0b;
- unsigned int ksw = k0sw;
- unsigned int kbw = k0bw;
- unsigned int kbs = k0bs;
- unsigned int kbsw = k0bsw;
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_SWB = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_SWB = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_SWB);
- vx2_SWB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_SWB);
- vx3_SWB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_SWB);
-
- kxyFromfcNEQ_SWB = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_SWB) - ((vx1_SWB*vx2_SWB)));
- kyzFromfcNEQ_SWB = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_SWB) - ((vx2_SWB*vx3_SWB)));
- kxzFromfcNEQ_SWB = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_SWB) - ((vx1_SWB*vx3_SWB)));
- kxxMyyFromfcNEQ_SWB = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_SWB) - ((vx1_SWB*vx1_SWB-vx2_SWB*vx2_SWB)));
- kxxMzzFromfcNEQ_SWB = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_SWB) - ((vx1_SWB*vx1_SWB-vx3_SWB*vx3_SWB)));
-
- //////////////////////////////////////////////////////////////////////////
- //SWT//
- //////////////////////////////////////////////////////////////////////////
- //index
- kzero= kb;
- kw = kbw;
- ks = kbs;
- kb = neighborZ[kb];
- ksw = kbsw;
- kbw = neighborZ[kbw];
- kbs = neighborZ[kbs];
- kbsw = neighborZ[kbsw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_SWT = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_SWT = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_SWT);
- vx2_SWT = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_SWT);
- vx3_SWT = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_SWT);
-
- kxyFromfcNEQ_SWT = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_SWT) - ((vx1_SWT*vx2_SWT)));
- kyzFromfcNEQ_SWT = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_SWT) - ((vx2_SWT*vx3_SWT)));
- kxzFromfcNEQ_SWT = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_SWT) - ((vx1_SWT*vx3_SWT)));
- kxxMyyFromfcNEQ_SWT = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_SWT) - ((vx1_SWT*vx1_SWT-vx2_SWT*vx2_SWT)));
- kxxMzzFromfcNEQ_SWT = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_SWT) - ((vx1_SWT*vx1_SWT-vx3_SWT*vx3_SWT)));
-
- //////////////////////////////////////////////////////////////////////////
- //SET//
- //////////////////////////////////////////////////////////////////////////
- //index
- kzero= kw;
- kw = neighborX[kw];
- ks = ksw;
- kb = kbw;
- ksw = neighborX[ksw];
- kbw = neighborX[kbw];
- kbs = kbsw;
- kbsw = neighborX[kbsw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_SET = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_SET = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_SET);
- vx2_SET = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_SET);
- vx3_SET = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_SET);
-
- kxyFromfcNEQ_SET = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_SET) - ((vx1_SET*vx2_SET)));
- kyzFromfcNEQ_SET = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_SET) - ((vx2_SET*vx3_SET)));
- kxzFromfcNEQ_SET = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_SET) - ((vx1_SET*vx3_SET)));
- kxxMyyFromfcNEQ_SET = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_SET) - ((vx1_SET*vx1_SET-vx2_SET*vx2_SET)));
- kxxMzzFromfcNEQ_SET = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_SET) - ((vx1_SET*vx1_SET-vx3_SET*vx3_SET)));
-
- //////////////////////////////////////////////////////////////////////////
- //SEB//
- //////////////////////////////////////////////////////////////////////////
- //index
- kb = kzero;
- kbw = kw;
- kbs = ks;
- kbsw = ksw;
- kzero= k0w;
- kw = neighborX[k0w];
- ks = k0sw;
- ksw = neighborX[k0sw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_SEB = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_SEB = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_SEB);
- vx2_SEB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_SEB);
- vx3_SEB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_SEB);
-
- kxyFromfcNEQ_SEB = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_SEB) - ((vx1_SEB*vx2_SEB)));
- kyzFromfcNEQ_SEB = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_SEB) - ((vx2_SEB*vx3_SEB)));
- kxzFromfcNEQ_SEB = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_SEB) - ((vx1_SEB*vx3_SEB)));
- kxxMyyFromfcNEQ_SEB = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_SEB) - ((vx1_SEB*vx1_SEB-vx2_SEB*vx2_SEB)));
- kxxMzzFromfcNEQ_SEB = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_SEB) - ((vx1_SEB*vx1_SEB-vx3_SEB*vx3_SEB)));
-
- //////////////////////////////////////////////////////////////////////////
- //NWB//
- //////////////////////////////////////////////////////////////////////////
- //index 0
- k0zero= k0s;
- k0w = k0sw;
- k0s = neighborY[k0s];
- k0b = k0bs;
- k0sw = neighborY[k0sw];
- k0bw = k0bsw;
- k0bs = neighborY[k0bs];
- k0bsw = neighborY[k0bsw];
- //////////////////////////////////////////////////////////////////////////
- //index
- kzero= k0zero;
- kw = k0w;
- ks = k0s;
- kb = k0b;
- ksw = k0sw;
- kbw = k0bw;
- kbs = k0bs;
- kbsw = k0bsw;
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_NWB = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_NWB = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_NWB);
- vx2_NWB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_NWB);
- vx3_NWB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_NWB);
-
- kxyFromfcNEQ_NWB = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_NWB) - ((vx1_NWB*vx2_NWB)));
- kyzFromfcNEQ_NWB = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_NWB) - ((vx2_NWB*vx3_NWB)));
- kxzFromfcNEQ_NWB = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_NWB) - ((vx1_NWB*vx3_NWB)));
- kxxMyyFromfcNEQ_NWB = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_NWB) - ((vx1_NWB*vx1_NWB-vx2_NWB*vx2_NWB)));
- kxxMzzFromfcNEQ_NWB = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_NWB) - ((vx1_NWB*vx1_NWB-vx3_NWB*vx3_NWB)));
-
- //////////////////////////////////////////////////////////////////////////
- //NWT//
- //////////////////////////////////////////////////////////////////////////
- //index
- kzero= kb;
- kw = kbw;
- ks = kbs;
- kb = neighborZ[kb];
- ksw = kbsw;
- kbw = neighborZ[kbw];
- kbs = neighborZ[kbs];
- kbsw = neighborZ[kbsw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_NWT = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_NWT = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_NWT);
- vx2_NWT = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_NWT);
- vx3_NWT = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_NWT);
-
- kxyFromfcNEQ_NWT = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_NWT) - ((vx1_NWT*vx2_NWT)));
- kyzFromfcNEQ_NWT = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_NWT) - ((vx2_NWT*vx3_NWT)));
- kxzFromfcNEQ_NWT = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_NWT) - ((vx1_NWT*vx3_NWT)));
- kxxMyyFromfcNEQ_NWT = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_NWT) - ((vx1_NWT*vx1_NWT-vx2_NWT*vx2_NWT)));
- kxxMzzFromfcNEQ_NWT = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_NWT) - ((vx1_NWT*vx1_NWT-vx3_NWT*vx3_NWT)));
-
- //////////////////////////////////////////////////////////////////////////
- //NET//
- //////////////////////////////////////////////////////////////////////////
- //index
- kzero= kw;
- kw = neighborX[kw];
- ks = ksw;
- kb = kbw;
- ksw = neighborX[ksw];
- kbw = neighborX[kbw];
- kbs = kbsw;
- kbsw = neighborX[kbsw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_NET = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_NET = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_NET);
- vx2_NET = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_NET);
- vx3_NET = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_NET);
-
- kxyFromfcNEQ_NET = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_NET) - ((vx1_NET*vx2_NET)));
- kyzFromfcNEQ_NET = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_NET) - ((vx2_NET*vx3_NET)));
- kxzFromfcNEQ_NET = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_NET) - ((vx1_NET*vx3_NET)));
- kxxMyyFromfcNEQ_NET = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_NET) - ((vx1_NET*vx1_NET-vx2_NET*vx2_NET)));
- kxxMzzFromfcNEQ_NET = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_NET) - ((vx1_NET*vx1_NET-vx3_NET*vx3_NET)));
-
- //////////////////////////////////////////////////////////////////////////
- //NEB//
- //////////////////////////////////////////////////////////////////////////
- //index
- kb = kzero;
- kbw = kw;
- kbs = ks;
- kbsw = ksw;
- kzero= k0w;
- kw = neighborX[k0w];
- ks = k0sw;
- ksw = neighborX[k0sw];
- ////////////////////////////////////////////////////////////////////////////////
- f_E = feC[kzero];
- f_W = fwC[kw];
- f_N = fnC[kzero];
- f_S = fsC[ks];
- f_T = ftC[kzero];
- f_B = fbC[kb];
- f_NE = fneC[kzero];
- f_SW = fswC[ksw];
- f_SE = fseC[ks];
- f_NW = fnwC[kw];
- f_TE = fteC[kzero];
- f_BW = fbwC[kbw];
- f_BE = fbeC[kb];
- f_TW = ftwC[kw];
- f_TN = ftnC[kzero];
- f_BS = fbsC[kbs];
- f_BN = fbnC[kb];
- f_TS = ftsC[ks];
- f_ZERO = fzeroC[kzero];
- f_TNE = ftneC[kzero];
- f_TSW = ftswC[ksw];
- f_TSE = ftseC[ks];
- f_TNW = ftnwC[kw];
- f_BNE = fbneC[kb];
- f_BSW = fbswC[kbsw];
- f_BSE = fbseC[kbs];
- f_BNW = fbnwC[kbw];
-
- drho_NEB = f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_ZERO+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- vx1_NEB = (((f_TNE-f_BSW)+(f_TSE-f_BNW)+(f_BNE-f_TSW)+(f_BSE-f_TNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W))/(c1o1 + drho_NEB);
- vx2_NEB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S))/(c1o1 + drho_NEB);
- vx3_NEB = (((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSE-f_BNW)+(f_TSW-f_BNE)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B))/(c1o1 + drho_NEB);
-
- kxyFromfcNEQ_NEB = -c3o1*omega*((f_SW+f_BSW+f_TSW-f_NW-f_BNW-f_TNW-f_SE-f_BSE-f_TSE+f_NE+f_BNE+f_TNE ) / (c1o1 + drho_NEB) - ((vx1_NEB*vx2_NEB)));
- kyzFromfcNEQ_NEB = -c3o1*omega*((f_BS+f_BSE+f_BSW-f_TS-f_TSE-f_TSW-f_BN-f_BNE-f_BNW+f_TN+f_TNE+f_TNW ) / (c1o1 + drho_NEB) - ((vx2_NEB*vx3_NEB)));
- kxzFromfcNEQ_NEB = -c3o1*omega*((f_BW+f_BSW+f_BNW-f_TW-f_TSW-f_TNW-f_BE-f_BSE-f_BNE+f_TE+f_TSE+f_TNE ) / (c1o1 + drho_NEB) - ((vx1_NEB*vx3_NEB)));
- kxxMyyFromfcNEQ_NEB = -c3o2*omega *((f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE ) / (c1o1 + drho_NEB) - ((vx1_NEB*vx1_NEB-vx2_NEB*vx2_NEB)));
- kxxMzzFromfcNEQ_NEB = -c3o2*omega *((f_SW+f_W+f_NW-f_BS-f_TS-f_B-f_T-f_BN-f_TN+f_SE+f_E+f_NE ) / (c1o1 + drho_NEB) - ((vx1_NEB*vx1_NEB-vx3_NEB*vx3_NEB)));
-
- //////////////////////////////////////////////////////////////////////////
- //interpolate
- //////////////////////////////////////////////////////////////////////////
- a0 = (-kxxMyyFromfcNEQ_NEB - kxxMyyFromfcNEQ_NET + kxxMyyFromfcNEQ_NWB + kxxMyyFromfcNEQ_NWT -
- kxxMyyFromfcNEQ_SEB - kxxMyyFromfcNEQ_SET + kxxMyyFromfcNEQ_SWB + kxxMyyFromfcNEQ_SWT -
- kxxMzzFromfcNEQ_NEB - kxxMzzFromfcNEQ_NET + kxxMzzFromfcNEQ_NWB + kxxMzzFromfcNEQ_NWT -
- kxxMzzFromfcNEQ_SEB - kxxMzzFromfcNEQ_SET + kxxMzzFromfcNEQ_SWB + kxxMzzFromfcNEQ_SWT -
- c2o1*kxyFromfcNEQ_NEB - c2o1*kxyFromfcNEQ_NET - c2o1*kxyFromfcNEQ_NWB - c2o1*kxyFromfcNEQ_NWT +
- c2o1*kxyFromfcNEQ_SEB + c2o1*kxyFromfcNEQ_SET + c2o1*kxyFromfcNEQ_SWB + c2o1*kxyFromfcNEQ_SWT +
- c2o1*kxzFromfcNEQ_NEB - c2o1*kxzFromfcNEQ_NET + c2o1*kxzFromfcNEQ_NWB - c2o1*kxzFromfcNEQ_NWT +
- c2o1*kxzFromfcNEQ_SEB - c2o1*kxzFromfcNEQ_SET + c2o1*kxzFromfcNEQ_SWB - c2o1*kxzFromfcNEQ_SWT +
- c8o1*vx1_NEB + c8o1*vx1_NET + c8o1*vx1_NWB + c8o1*vx1_NWT + c8o1*vx1_SEB +
- c8o1*vx1_SET + c8o1*vx1_SWB + c8o1*vx1_SWT + c2o1*vx2_NEB + c2o1*vx2_NET -
- c2o1*vx2_NWB - c2o1*vx2_NWT - c2o1*vx2_SEB - c2o1*vx2_SET + c2o1*vx2_SWB +
- c2o1*vx2_SWT - c2o1*vx3_NEB + c2o1*vx3_NET + c2o1*vx3_NWB - c2o1*vx3_NWT -
- c2o1*vx3_SEB + c2o1*vx3_SET + c2o1*vx3_SWB - c2o1*vx3_SWT)/c64o1;
- b0 = (c2o1*kxxMyyFromfcNEQ_NEB + c2o1*kxxMyyFromfcNEQ_NET + c2o1*kxxMyyFromfcNEQ_NWB + c2o1*kxxMyyFromfcNEQ_NWT -
- c2o1*kxxMyyFromfcNEQ_SEB - c2o1*kxxMyyFromfcNEQ_SET - c2o1*kxxMyyFromfcNEQ_SWB - c2o1*kxxMyyFromfcNEQ_SWT -
- kxxMzzFromfcNEQ_NEB - kxxMzzFromfcNEQ_NET - kxxMzzFromfcNEQ_NWB - kxxMzzFromfcNEQ_NWT +
- kxxMzzFromfcNEQ_SEB + kxxMzzFromfcNEQ_SET + kxxMzzFromfcNEQ_SWB + kxxMzzFromfcNEQ_SWT -
- c2o1*kxyFromfcNEQ_NEB - c2o1*kxyFromfcNEQ_NET + c2o1*kxyFromfcNEQ_NWB + c2o1*kxyFromfcNEQ_NWT -
- c2o1*kxyFromfcNEQ_SEB - c2o1*kxyFromfcNEQ_SET + c2o1*kxyFromfcNEQ_SWB + c2o1*kxyFromfcNEQ_SWT +
- c2o1*kyzFromfcNEQ_NEB - c2o1*kyzFromfcNEQ_NET + c2o1*kyzFromfcNEQ_NWB - c2o1*kyzFromfcNEQ_NWT +
- c2o1*kyzFromfcNEQ_SEB - c2o1*kyzFromfcNEQ_SET + c2o1*kyzFromfcNEQ_SWB - c2o1*kyzFromfcNEQ_SWT +
- c2o1*vx1_NEB + c2o1*vx1_NET - c2o1*vx1_NWB - c2o1*vx1_NWT -
- c2o1*vx1_SEB - c2o1*vx1_SET + c2o1*vx1_SWB + c2o1*vx1_SWT +
- c8o1*vx2_NEB + c8o1*vx2_NET + c8o1*vx2_NWB + c8o1*vx2_NWT +
- c8o1*vx2_SEB + c8o1*vx2_SET + c8o1*vx2_SWB + c8o1*vx2_SWT -
- c2o1*vx3_NEB + c2o1*vx3_NET - c2o1*vx3_NWB + c2o1*vx3_NWT +
- c2o1*vx3_SEB - c2o1*vx3_SET + c2o1*vx3_SWB - c2o1*vx3_SWT)/c64o1;
-
- //b0 = ((eight*vx2_NEB + eight*vx2_SWT) + (eight*vx2_NET + eight*vx2_SWB) + (eight*vx2_NWB + eight*vx2_SET) + (eight*vx2_NWT + eight*vx2_SEB))/sixtyfour;
-
- c0 = (kxxMyyFromfcNEQ_NEB - kxxMyyFromfcNEQ_NET + kxxMyyFromfcNEQ_NWB - kxxMyyFromfcNEQ_NWT +
- kxxMyyFromfcNEQ_SEB - kxxMyyFromfcNEQ_SET + kxxMyyFromfcNEQ_SWB - kxxMyyFromfcNEQ_SWT -
- c2o1*kxxMzzFromfcNEQ_NEB + c2o1*kxxMzzFromfcNEQ_NET - c2o1*kxxMzzFromfcNEQ_NWB + c2o1*kxxMzzFromfcNEQ_NWT -
- c2o1*kxxMzzFromfcNEQ_SEB + c2o1*kxxMzzFromfcNEQ_SET - c2o1*kxxMzzFromfcNEQ_SWB + c2o1*kxxMzzFromfcNEQ_SWT -
- c2o1*kxzFromfcNEQ_NEB - c2o1*kxzFromfcNEQ_NET + c2o1*kxzFromfcNEQ_NWB + c2o1*kxzFromfcNEQ_NWT -
- c2o1*kxzFromfcNEQ_SEB - c2o1*kxzFromfcNEQ_SET + c2o1*kxzFromfcNEQ_SWB + c2o1*kxzFromfcNEQ_SWT -
- c2o1*kyzFromfcNEQ_NEB - c2o1*kyzFromfcNEQ_NET - c2o1*kyzFromfcNEQ_NWB - c2o1*kyzFromfcNEQ_NWT +
- c2o1*kyzFromfcNEQ_SEB + c2o1*kyzFromfcNEQ_SET + c2o1*kyzFromfcNEQ_SWB + c2o1*kyzFromfcNEQ_SWT -
- c2o1*vx1_NEB + c2o1*vx1_NET + c2o1*vx1_NWB - c2o1*vx1_NWT -
- c2o1*vx1_SEB + c2o1*vx1_SET + c2o1*vx1_SWB - c2o1*vx1_SWT -
- c2o1*vx2_NEB + c2o1*vx2_NET - c2o1*vx2_NWB + c2o1*vx2_NWT +
- c2o1*vx2_SEB - c2o1*vx2_SET + c2o1*vx2_SWB - c2o1*vx2_SWT +
- c8o1*vx3_NEB + c8o1*vx3_NET + c8o1*vx3_NWB + c8o1*vx3_NWT +
- c8o1*vx3_SEB + c8o1*vx3_SET + c8o1*vx3_SWB + c8o1*vx3_SWT)/c64o1;
- ax = (vx1_NEB + vx1_NET - vx1_NWB - vx1_NWT + vx1_SEB + vx1_SET - vx1_SWB - vx1_SWT)/c4o1;
- bx = (vx2_NEB + vx2_NET - vx2_NWB - vx2_NWT + vx2_SEB + vx2_SET - vx2_SWB - vx2_SWT)/c4o1;
- //bx = ((vx2_NEB - vx2_SWT) + (vx2_NET - vx2_SWB) + (vx2_SET - vx2_NWB) + (vx2_SEB - vx2_NWT))/four;
- cx = (vx3_NEB + vx3_NET - vx3_NWB - vx3_NWT + vx3_SEB + vx3_SET - vx3_SWB - vx3_SWT)/c4o1;
- axx= (kxxMyyFromfcNEQ_NEB + kxxMyyFromfcNEQ_NET - kxxMyyFromfcNEQ_NWB - kxxMyyFromfcNEQ_NWT +
- kxxMyyFromfcNEQ_SEB + kxxMyyFromfcNEQ_SET - kxxMyyFromfcNEQ_SWB - kxxMyyFromfcNEQ_SWT +
- kxxMzzFromfcNEQ_NEB + kxxMzzFromfcNEQ_NET - kxxMzzFromfcNEQ_NWB - kxxMzzFromfcNEQ_NWT +
- kxxMzzFromfcNEQ_SEB + kxxMzzFromfcNEQ_SET - kxxMzzFromfcNEQ_SWB - kxxMzzFromfcNEQ_SWT +
- c2o1*vx2_NEB + c2o1*vx2_NET - c2o1*vx2_NWB - c2o1*vx2_NWT -
- c2o1*vx2_SEB - c2o1*vx2_SET + c2o1*vx2_SWB + c2o1*vx2_SWT -
- c2o1*vx3_NEB + c2o1*vx3_NET + c2o1*vx3_NWB - c2o1*vx3_NWT -
- c2o1*vx3_SEB + c2o1*vx3_SET + c2o1*vx3_SWB - c2o1*vx3_SWT)/c16o1;
- bxx= (kxyFromfcNEQ_NEB + kxyFromfcNEQ_NET - kxyFromfcNEQ_NWB - kxyFromfcNEQ_NWT +
- kxyFromfcNEQ_SEB + kxyFromfcNEQ_SET - kxyFromfcNEQ_SWB - kxyFromfcNEQ_SWT -
- c2o1*vx1_NEB - c2o1*vx1_NET + c2o1*vx1_NWB + c2o1*vx1_NWT +
- c2o1*vx1_SEB + c2o1*vx1_SET - c2o1*vx1_SWB - c2o1*vx1_SWT)/c8o1;
- cxx= (kxzFromfcNEQ_NEB + kxzFromfcNEQ_NET - kxzFromfcNEQ_NWB - kxzFromfcNEQ_NWT +
- kxzFromfcNEQ_SEB + kxzFromfcNEQ_SET - kxzFromfcNEQ_SWB - kxzFromfcNEQ_SWT +
- c2o1*vx1_NEB - c2o1*vx1_NET - c2o1*vx1_NWB + c2o1*vx1_NWT +
- c2o1*vx1_SEB - c2o1*vx1_SET - c2o1*vx1_SWB + c2o1*vx1_SWT)/c8o1;
- ay = (vx1_NEB + vx1_NET + vx1_NWB + vx1_NWT - vx1_SEB - vx1_SET - vx1_SWB - vx1_SWT)/c4o1;
- by = (vx2_NEB + vx2_NET + vx2_NWB + vx2_NWT - vx2_SEB - vx2_SET - vx2_SWB - vx2_SWT)/c4o1;
- cy = (vx3_NEB + vx3_NET + vx3_NWB + vx3_NWT - vx3_SEB - vx3_SET - vx3_SWB - vx3_SWT)/c4o1;
- ayy= (kxyFromfcNEQ_NEB + kxyFromfcNEQ_NET + kxyFromfcNEQ_NWB + kxyFromfcNEQ_NWT -
- kxyFromfcNEQ_SEB - kxyFromfcNEQ_SET - kxyFromfcNEQ_SWB - kxyFromfcNEQ_SWT -
- c2o1*vx2_NEB - c2o1*vx2_NET + c2o1*vx2_NWB + c2o1*vx2_NWT +
- c2o1*vx2_SEB + c2o1*vx2_SET - c2o1*vx2_SWB - c2o1*vx2_SWT)/c8o1;
- byy= (-c2o1*kxxMyyFromfcNEQ_NEB - c2o1*kxxMyyFromfcNEQ_NET - c2o1*kxxMyyFromfcNEQ_NWB - c2o1*kxxMyyFromfcNEQ_NWT +
- c2o1*kxxMyyFromfcNEQ_SEB + c2o1*kxxMyyFromfcNEQ_SET + c2o1*kxxMyyFromfcNEQ_SWB + c2o1*kxxMyyFromfcNEQ_SWT +
- kxxMzzFromfcNEQ_NEB + kxxMzzFromfcNEQ_NET + kxxMzzFromfcNEQ_NWB + kxxMzzFromfcNEQ_NWT -
- kxxMzzFromfcNEQ_SEB - kxxMzzFromfcNEQ_SET - kxxMzzFromfcNEQ_SWB - kxxMzzFromfcNEQ_SWT +
- c2o1*vx1_NEB + c2o1*vx1_NET - c2o1*vx1_NWB - c2o1*vx1_NWT -
- c2o1*vx1_SEB - c2o1*vx1_SET + c2o1*vx1_SWB + c2o1*vx1_SWT -
- c2o1*vx3_NEB + c2o1*vx3_NET - c2o1*vx3_NWB + c2o1*vx3_NWT +
- c2o1*vx3_SEB - c2o1*vx3_SET + c2o1*vx3_SWB - c2o1*vx3_SWT)/c16o1;
- cyy= (kyzFromfcNEQ_NEB + kyzFromfcNEQ_NET + kyzFromfcNEQ_NWB + kyzFromfcNEQ_NWT -
- kyzFromfcNEQ_SEB - kyzFromfcNEQ_SET - kyzFromfcNEQ_SWB - kyzFromfcNEQ_SWT +
- c2o1*vx2_NEB - c2o1*vx2_NET + c2o1*vx2_NWB - c2o1*vx2_NWT -
- c2o1*vx2_SEB + c2o1*vx2_SET - c2o1*vx2_SWB + c2o1*vx2_SWT)/c8o1;
- az = (-vx1_NEB + vx1_NET - vx1_NWB + vx1_NWT - vx1_SEB + vx1_SET - vx1_SWB + vx1_SWT)/c4o1;
- //bz = (-vx2_NEB + vx2_NET - vx2_NWB + vx2_NWT - vx2_SEB + vx2_SET - vx2_SWB + vx2_SWT)/four;
- bz = ((vx2_SWT - vx2_NEB) + (vx2_NET - vx2_SWB) + (vx2_SET - vx2_NWB) + (vx2_NWT - vx2_SEB))/c4o1;
- cz = (-vx3_NEB + vx3_NET - vx3_NWB + vx3_NWT - vx3_SEB + vx3_SET - vx3_SWB + vx3_SWT)/c4o1;
- azz= (-kxzFromfcNEQ_NEB + kxzFromfcNEQ_NET - kxzFromfcNEQ_NWB + kxzFromfcNEQ_NWT -
- kxzFromfcNEQ_SEB + kxzFromfcNEQ_SET - kxzFromfcNEQ_SWB + kxzFromfcNEQ_SWT +
- c2o1*vx3_NEB - c2o1*vx3_NET - c2o1*vx3_NWB + c2o1*vx3_NWT +
- c2o1*vx3_SEB - c2o1*vx3_SET - c2o1*vx3_SWB + c2o1*vx3_SWT)/c8o1;
- bzz= (-kyzFromfcNEQ_NEB + kyzFromfcNEQ_NET - kyzFromfcNEQ_NWB + kyzFromfcNEQ_NWT -
- kyzFromfcNEQ_SEB + kyzFromfcNEQ_SET - kyzFromfcNEQ_SWB + kyzFromfcNEQ_SWT +
- c2o1*vx3_NEB - c2o1*vx3_NET + c2o1*vx3_NWB - c2o1*vx3_NWT -
- c2o1*vx3_SEB + c2o1*vx3_SET - c2o1*vx3_SWB + c2o1*vx3_SWT)/c8o1;
- czz= (-kxxMyyFromfcNEQ_NEB + kxxMyyFromfcNEQ_NET - kxxMyyFromfcNEQ_NWB + kxxMyyFromfcNEQ_NWT -
- kxxMyyFromfcNEQ_SEB + kxxMyyFromfcNEQ_SET - kxxMyyFromfcNEQ_SWB + kxxMyyFromfcNEQ_SWT +
- c2o1*kxxMzzFromfcNEQ_NEB - c2o1*kxxMzzFromfcNEQ_NET + c2o1*kxxMzzFromfcNEQ_NWB - c2o1*kxxMzzFromfcNEQ_NWT +
- c2o1*kxxMzzFromfcNEQ_SEB - c2o1*kxxMzzFromfcNEQ_SET + c2o1*kxxMzzFromfcNEQ_SWB - c2o1*kxxMzzFromfcNEQ_SWT -
- c2o1*vx1_NEB + c2o1*vx1_NET + c2o1*vx1_NWB - c2o1*vx1_NWT -
- c2o1*vx1_SEB + c2o1*vx1_SET + c2o1*vx1_SWB - c2o1*vx1_SWT -
- c2o1*vx2_NEB + c2o1*vx2_NET - c2o1*vx2_NWB + c2o1*vx2_NWT +
- c2o1*vx2_SEB - c2o1*vx2_SET + c2o1*vx2_SWB - c2o1*vx2_SWT)/c16o1;
- axy= (vx1_NEB + vx1_NET - vx1_NWB - vx1_NWT - vx1_SEB - vx1_SET + vx1_SWB + vx1_SWT)/c2o1;
- bxy= (vx2_NEB + vx2_NET - vx2_NWB - vx2_NWT - vx2_SEB - vx2_SET + vx2_SWB + vx2_SWT)/c2o1;
- cxy= (vx3_NEB + vx3_NET - vx3_NWB - vx3_NWT - vx3_SEB - vx3_SET + vx3_SWB + vx3_SWT)/c2o1;
- axz= (-vx1_NEB + vx1_NET + vx1_NWB - vx1_NWT - vx1_SEB + vx1_SET + vx1_SWB - vx1_SWT)/c2o1;
- bxz= (-vx2_NEB + vx2_NET + vx2_NWB - vx2_NWT - vx2_SEB + vx2_SET + vx2_SWB - vx2_SWT)/c2o1;
- cxz= (-vx3_NEB + vx3_NET + vx3_NWB - vx3_NWT - vx3_SEB + vx3_SET + vx3_SWB - vx3_SWT)/c2o1;
- ayz= (-vx1_NEB + vx1_NET - vx1_NWB + vx1_NWT + vx1_SEB - vx1_SET + vx1_SWB - vx1_SWT)/c2o1;
- byz= (-vx2_NEB + vx2_NET - vx2_NWB + vx2_NWT + vx2_SEB - vx2_SET + vx2_SWB - vx2_SWT)/c2o1;
- cyz= (-vx3_NEB + vx3_NET - vx3_NWB + vx3_NWT + vx3_SEB - vx3_SET + vx3_SWB - vx3_SWT)/c2o1;
- axyz=-vx1_NEB + vx1_NET + vx1_NWB - vx1_NWT + vx1_SEB - vx1_SET - vx1_SWB + vx1_SWT;
- bxyz=-vx2_NEB + vx2_NET + vx2_NWB - vx2_NWT + vx2_SEB - vx2_SET - vx2_SWB + vx2_SWT;
- cxyz=-vx3_NEB + vx3_NET + vx3_NWB - vx3_NWT + vx3_SEB - vx3_SET - vx3_SWB + vx3_SWT;
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //drho
- // d0 = ( drho_NEB + drho_NET + drho_NWB + drho_NWT + drho_SEB + drho_SET + drho_SWB + drho_SWT) * c1o8;
- // dx = ( drho_NEB + drho_NET - drho_NWB - drho_NWT + drho_SEB + drho_SET - drho_SWB - drho_SWT) * c1o4;
- // dy = ( drho_NEB + drho_NET + drho_NWB + drho_NWT - drho_SEB - drho_SET - drho_SWB - drho_SWT) * c1o4;
- // dz = (-drho_NEB + drho_NET - drho_NWB + drho_NWT - drho_SEB + drho_SET - drho_SWB + drho_SWT) * c1o4;
- // dxy = ( drho_NEB + drho_NET - drho_NWB - drho_NWT - drho_SEB - drho_SET + drho_SWB + drho_SWT) * c1o2;
- // dxz = (-drho_NEB + drho_NET + drho_NWB - drho_NWT - drho_SEB + drho_SET + drho_SWB - drho_SWT) * c1o2;
- // dyz = (-drho_NEB + drho_NET - drho_NWB + drho_NWT + drho_SEB - drho_SET + drho_SWB - drho_SWT) * c1o2;
- // dxyz = -drho_NEB + drho_NET + drho_NWB - drho_NWT + drho_SEB - drho_SET - drho_SWB + drho_SWT;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int kTimeStepOld = kTimeStep - numberOfParticles;
- real localX = coordParticleXlocal[kTimeStepOld];
- real localY = coordParticleYlocal[kTimeStepOld];
- real localZ = coordParticleZlocal[kTimeStepOld];
-
- x = (localX * (real)(pow((double)c2o1, (double)level))) - c1o2; //-c1o4;
- y = (localY * (real)(pow((double)c2o1, (double)level))) - c1o2; //-c1o4;
- z = (localZ * (real)(pow((double)c2o1, (double)level))) - c1o2; //-c1o4;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //press = d0 + x*dx + y*dy + z*dz + x*y*dxy + x*z*dxz + y*z*dyz + x*y*z*dxyz;
- vx1 = (a0 + x*ax + y*ay + z*az + x*x*axx + y*y*ayy + z*z*azz + x*y*axy + x*z*axz + y*z*ayz + x*y*z*axyz);
- vx2 = (b0 + x*bx + y*by + z*bz + x*x*bxx + y*y*byy + z*z*bzz + x*y*bxy + x*z*bxz + y*z*byz + x*y*z*bxyz);
- vx3 = (c0 + x*cx + y*cy + z*cz + x*x*cxx + y*y*cyy + z*z*czz + x*y*cxy + x*z*cxz + y*z*cyz + x*y*z*cxyz);
-
- real veloPreX = veloParticleX[kTimeStepOld];
- real veloPreY = veloParticleY[kTimeStepOld];
- real veloPreZ = veloParticleZ[kTimeStepOld];
-
- real veloPostX = (veloPreX + vx1) * c1o2;
- real veloPostY = (veloPreY + vx2) * c1o2;
- real veloPostZ = (veloPreZ + vx3) * c1o2;
-
- //real veloPostX = vx1;
- //real veloPostY = vx2;
- //real veloPostZ = vx3;
-
- veloParticleX[kTimeStep] = veloPostX;
- veloParticleY[kTimeStep] = veloPostY;
- veloParticleZ[kTimeStep] = veloPostZ;
- ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- x = x + veloPostX;
- //x = x + c1o3;
- y = y + veloPostY;
- z = z + veloPostZ;
-
- unsigned int cbID = cellBaseID[k];
- bool negativeDirection = false;
-
- if (x > c1o2)
- {
- cbID = neighborX[cbID];
- x = x - c1o1;
- }
- if (y > c1o2)
- {
- cbID = neighborY[cbID];
- y = y - c1o1;
- }
- if (z > c1o2)
- {
- cbID = neighborZ[cbID];
- z = z - c1o1;
- }
-
- real tempX = x;
- real tempY = y;
- real tempZ = z;
-
- if ((x < -c1o2) || (y < -c1o2) || (z < -c1o2))
- {
- cbID = neighborWSB[cbID];
- negativeDirection = true;
- tempX = x + c1o1;
- tempY = y + c1o1;
- tempZ = z + c1o1;
- }
- if ((x >= -c1o2) && (negativeDirection == true))
- {
- cbID = neighborX[cbID];
- tempX = x;
- }
- if ((y >= -c1o2) && (negativeDirection == true))
- {
- cbID = neighborY[cbID];
- tempY = y;
- }
- if ((z >= -c1o2) && (negativeDirection == true))
- {
- cbID = neighborZ[cbID];
- tempZ = z;
- }
-
- x = tempX;
- y = tempY;
- z = tempZ;
-
- localX = (x + c1o2) / (real)(pow((double)c2o1, (double)level));
- localY = (y + c1o2) / (real)(pow((double)c2o1, (double)level));
- localZ = (z + c1o2) / (real)(pow((double)c2o1, (double)level));
- coordParticleXlocal[kTimeStep] = localX;
- coordParticleYlocal[kTimeStep] = localY;
- coordParticleZlocal[kTimeStep] = localZ;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real globalX = localX + coordX[cbID];
- real globalY = localY + coordY[cbID];
- real globalZ = localZ + coordZ[cbID];
- coordParticleXglobal[kTimeStep] = globalX;
- coordParticleYglobal[kTimeStep] = globalY;
- coordParticleZglobal[kTimeStep] = globalZ;
- //coordParticleXglobal[kTimeStep] = coordParticleXglobal[kTimeStepOld];
- //coordParticleYglobal[kTimeStep] = coordParticleYglobal[kTimeStepOld];
- //coordParticleZglobal[kTimeStep] = coordParticleZglobal[kTimeStepOld];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- cellBaseID[k] = cbID;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void ParticleNoSlipDeviceComp27(real* coordX,
- real* coordY,
- real* coordZ,
- real* coordParticleXlocal,
- real* coordParticleYlocal,
- real* coordParticleZlocal,
- real* coordParticleXglobal,
- real* coordParticleYglobal,
- real* coordParticleZglobal,
- real* veloParticleX,
- real* veloParticleY,
- real* veloParticleZ,
- real* randArray,
- real* DD,
- real omega,
- unsigned int* particleID,
- unsigned int* cellBaseID,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned int* neighborWSB,
- int level,
- unsigned int numberOfTimesteps,
- unsigned int timestep,
- unsigned int numberOfParticles,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real* NormalX,
- real* NormalY,
- real* NormalZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
-
- //TODO: What is this function for???
-
- //Distributions27 D;
- //if (isEvenTimestep==true)
- //{
- // D.f[dP00] = &DD[dP00 * size_Mat];
- // D.f[dM00] = &DD[dM00 * size_Mat];
- // D.f[d0P0] = &DD[d0P0 * size_Mat];
- // D.f[d0M0] = &DD[d0M0 * size_Mat];
- // D.f[d00P] = &DD[d00P * size_Mat];
- // D.f[d00M] = &DD[d00M * size_Mat];
- // D.f[dPP0] = &DD[dPP0 * size_Mat];
- // D.f[dMM0] = &DD[dMM0 * size_Mat];
- // D.f[dPM0] = &DD[dPM0 * size_Mat];
- // D.f[dMP0] = &DD[dMP0 * size_Mat];
- // D.f[dP0P] = &DD[dP0P * size_Mat];
- // D.f[dM0M] = &DD[dM0M * size_Mat];
- // D.f[dP0M] = &DD[dP0M * size_Mat];
- // D.f[dM0P] = &DD[dM0P * size_Mat];
- // D.f[d0PP] = &DD[d0PP * size_Mat];
- // D.f[d0MM] = &DD[d0MM * size_Mat];
- // D.f[d0PM] = &DD[d0PM * size_Mat];
- // D.f[d0MP] = &DD[d0MP * size_Mat];
- // D.f[d000] = &DD[d000 * size_Mat];
- // D.f[dPPP] = &DD[dPPP * size_Mat];
- // D.f[dMMP] = &DD[dMMP * size_Mat];
- // D.f[dPMP] = &DD[dPMP * size_Mat];
- // D.f[dMPP] = &DD[dMPP * size_Mat];
- // D.f[dPPM] = &DD[dPPM * size_Mat];
- // D.f[dMMM] = &DD[dMMM * size_Mat];
- // D.f[dPMM] = &DD[dPMM * size_Mat];
- // D.f[dMPM] = &DD[dMPM * size_Mat];
- //}
- //else
- //{
- // D.f[dM00] = &DD[dP00 * size_Mat];
- // D.f[dP00] = &DD[dM00 * size_Mat];
- // D.f[d0M0] = &DD[d0P0 * size_Mat];
- // D.f[d0P0] = &DD[d0M0 * size_Mat];
- // D.f[d00M] = &DD[d00P * size_Mat];
- // D.f[d00P] = &DD[d00M * size_Mat];
- // D.f[dMM0] = &DD[dPP0 * size_Mat];
- // D.f[dPP0] = &DD[dMM0 * size_Mat];
- // D.f[dMP0] = &DD[dPM0 * size_Mat];
- // D.f[dPM0] = &DD[dMP0 * size_Mat];
- // D.f[dM0M] = &DD[dP0P * size_Mat];
- // D.f[dP0P] = &DD[dM0M * size_Mat];
- // D.f[dM0P] = &DD[dP0M * size_Mat];
- // D.f[dP0M] = &DD[dM0P * size_Mat];
- // D.f[d0MM] = &DD[d0PP * size_Mat];
- // D.f[d0PP] = &DD[d0MM * size_Mat];
- // D.f[d0MP] = &DD[d0PM * size_Mat];
- // D.f[d0PM] = &DD[d0MP * size_Mat];
- // D.f[d000] = &DD[d000 * size_Mat];
- // D.f[dPPP] = &DD[dMMM * size_Mat];
- // D.f[dMMP] = &DD[dPPM * size_Mat];
- // D.f[dPMP] = &DD[dMPM * size_Mat];
- // D.f[dMPP] = &DD[dPMM * size_Mat];
- // D.f[dPPM] = &DD[dMMP * size_Mat];
- // D.f[dMMM] = &DD[dPPP * size_Mat];
- // D.f[dPMM] = &DD[dMPP * size_Mat];
- // D.f[dMPM] = &DD[dPMP * size_Mat];
- //}
- //////////////////////////////////////////////////////////////////////////////////
- //const unsigned x = threadIdx.x; // Globaler x-Index
- //const unsigned y = blockIdx.x; // Globaler y-Index
- //const unsigned z = blockIdx.y; // Globaler z-Index
-
- //const unsigned nx = blockDim.x;
- //const unsigned ny = gridDim.x;
-
- //const unsigned k = nx*(ny*z + y) + x;
- ////////////////////////////////////////////////////////////////////////////
-
- //if(k < numberOfBCnodes)
- //{
- // ////////////////////////////////////////////////////////////////////////////////
- // real *q_dirW, *q_dirS, *q_dirB;
- // // real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- // // *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- // // *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- // // *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- // // *q_dirBSE, *q_dirBNW;
- // // q_dirE = &QQ[dP00 * numberOfBCnodes];
- // q_dirW = &QQ[dM00 * numberOfBCnodes];
- // // q_dirN = &QQ[d0P0 * numberOfBCnodes];
- // q_dirS = &QQ[d0M0 * numberOfBCnodes];
- // // q_dirT = &QQ[d00P * numberOfBCnodes];
- // q_dirB = &QQ[d00M * numberOfBCnodes];
- // // q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- // // q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- // // q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- // // q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- // // q_dirTE = &QQ[dP0P * numberOfBCnodes];
- // // q_dirBW = &QQ[dM0M * numberOfBCnodes];
- // // q_dirBE = &QQ[dP0M * numberOfBCnodes];
- // // q_dirTW = &QQ[dM0P * numberOfBCnodes];
- // // q_dirTN = &QQ[d0PP * numberOfBCnodes];
- // // q_dirBS = &QQ[d0MM * numberOfBCnodes];
- // // q_dirBN = &QQ[d0PM * numberOfBCnodes];
- // // q_dirTS = &QQ[d0MP * numberOfBCnodes];
- // // q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- // // q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- // // q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- // // q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- // // q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- // // q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- // // q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- // // q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- // ////////////////////////////////////////////////////////////////////////////////
- // // real *nx_dirE, *nx_dirW, *nx_dirN, *nx_dirS, *nx_dirT, *nx_dirB,
- // // *nx_dirNE, *nx_dirSW, *nx_dirSE, *nx_dirNW, *nx_dirTE, *nx_dirBW,
- // // *nx_dirBE, *nx_dirTW, *nx_dirTN, *nx_dirBS, *nx_dirBN, *nx_dirTS,
- // // *nx_dirTNE, *nx_dirTSW, *nx_dirTSE, *nx_dirTNW, *nx_dirBNE, *nx_dirBSW,
- // // *nx_dirBSE, *nx_dirBNW;
- // // nx_dirE = &NormalX[dP00 * numberOfBCnodes];
- // // nx_dirW = &NormalX[dM00 * numberOfBCnodes];
- // // nx_dirN = &NormalX[d0P0 * numberOfBCnodes];
- // // nx_dirS = &NormalX[d0M0 * numberOfBCnodes];
- // // nx_dirT = &NormalX[d00P * numberOfBCnodes];
- // // nx_dirB = &NormalX[d00M * numberOfBCnodes];
- // // nx_dirNE = &NormalX[dPP0 * numberOfBCnodes];
- // // nx_dirSW = &NormalX[dMM0 * numberOfBCnodes];
- // // nx_dirSE = &NormalX[dPM0 * numberOfBCnodes];
- // // nx_dirNW = &NormalX[dMP0 * numberOfBCnodes];
- // // nx_dirTE = &NormalX[dP0P * numberOfBCnodes];
- // // nx_dirBW = &NormalX[dM0M * numberOfBCnodes];
- // // nx_dirBE = &NormalX[dP0M * numberOfBCnodes];
- // // nx_dirTW = &NormalX[dM0P * numberOfBCnodes];
- // // nx_dirTN = &NormalX[d0PP * numberOfBCnodes];
- // // nx_dirBS = &NormalX[d0MM * numberOfBCnodes];
- // // nx_dirBN = &NormalX[d0PM * numberOfBCnodes];
- // // nx_dirTS = &NormalX[d0MP * numberOfBCnodes];
- // // nx_dirTNE = &NormalX[dPPP * numberOfBCnodes];
- // // nx_dirTSW = &NormalX[dMMP * numberOfBCnodes];
- // // nx_dirTSE = &NormalX[dPMP * numberOfBCnodes];
- // // nx_dirTNW = &NormalX[dMPP * numberOfBCnodes];
- // // nx_dirBNE = &NormalX[dPPM * numberOfBCnodes];
- // // nx_dirBSW = &NormalX[dMMM * numberOfBCnodes];
- // // nx_dirBSE = &NormalX[dPMM * numberOfBCnodes];
- // // nx_dirBNW = &NormalX[dMPM * numberOfBCnodes];
- // ////////////////////////////////////////////////////////////////////////////////
- // // real *ny_dirE, *ny_dirW, *ny_dirN, *ny_dirS, *ny_dirT, *ny_dirB,
- // // *ny_dirNE, *ny_dirSW, *ny_dirSE, *ny_dirNW, *ny_dirTE, *ny_dirBW,
- // // *ny_dirBE, *ny_dirTW, *ny_dirTN, *ny_dirBS, *ny_dirBN, *ny_dirTS,
- // // *ny_dirTNE, *ny_dirTSW, *ny_dirTSE, *ny_dirTNW, *ny_dirBNE, *ny_dirBSW,
- // // *ny_dirBSE, *ny_dirBNW;
- // // ny_dirE = &NormalY[dP00 * numberOfBCnodes];
- // // ny_dirW = &NormalY[dM00 * numberOfBCnodes];
- // // ny_dirN = &NormalY[d0P0 * numberOfBCnodes];
- // // ny_dirS = &NormalY[d0M0 * numberOfBCnodes];
- // // ny_dirT = &NormalY[d00P * numberOfBCnodes];
- // // ny_dirB = &NormalY[d00M * numberOfBCnodes];
- // // ny_dirNE = &NormalY[dPP0 * numberOfBCnodes];
- // // ny_dirSW = &NormalY[dMM0 * numberOfBCnodes];
- // // ny_dirSE = &NormalY[dPM0 * numberOfBCnodes];
- // // ny_dirNW = &NormalY[dMP0 * numberOfBCnodes];
- // // ny_dirTE = &NormalY[dP0P * numberOfBCnodes];
- // // ny_dirBW = &NormalY[dM0M * numberOfBCnodes];
- // // ny_dirBE = &NormalY[dP0M * numberOfBCnodes];
- // // ny_dirTW = &NormalY[dM0P * numberOfBCnodes];
- // // ny_dirTN = &NormalY[d0PP * numberOfBCnodes];
- // // ny_dirBS = &NormalY[d0MM * numberOfBCnodes];
- // // ny_dirBN = &NormalY[d0PM * numberOfBCnodes];
- // // ny_dirTS = &NormalY[d0MP * numberOfBCnodes];
- // // ny_dirTNE = &NormalY[dPPP * numberOfBCnodes];
- // // ny_dirTSW = &NormalY[dMMP * numberOfBCnodes];
- // // ny_dirTSE = &NormalY[dPMP * numberOfBCnodes];
- // // ny_dirTNW = &NormalY[dMPP * numberOfBCnodes];
- // // ny_dirBNE = &NormalY[dPPM * numberOfBCnodes];
- // // ny_dirBSW = &NormalY[dMMM * numberOfBCnodes];
- // // ny_dirBSE = &NormalY[dPMM * numberOfBCnodes];
- // // ny_dirBNW = &NormalY[dMPM * numberOfBCnodes];
- // ////////////////////////////////////////////////////////////////////////////////
- // // real *nz_dirE, *nz_dirW, *nz_dirN, *nz_dirS, *nz_dirT, *nz_dirB,
- // // *nz_dirNE, *nz_dirSW, *nz_dirSE, *nz_dirNW, *nz_dirTE, *nz_dirBW,
- // // *nz_dirBE, *nz_dirTW, *nz_dirTN, *nz_dirBS, *nz_dirBN, *nz_dirTS,
- // // *nz_dirTNE, *nz_dirTSW, *nz_dirTSE, *nz_dirTNW, *nz_dirBNE, *nz_dirBSW,
- // // *nz_dirBSE, *nz_dirBNW;
- // // nz_dirE = &NormalZ[dP00 * numberOfBCnodes];
- // // nz_dirW = &NormalZ[dM00 * numberOfBCnodes];
- // // nz_dirN = &NormalZ[d0P0 * numberOfBCnodes];
- // // nz_dirS = &NormalZ[d0M0 * numberOfBCnodes];
- // // nz_dirT = &NormalZ[d00P * numberOfBCnodes];
- // // nz_dirB = &NormalZ[d00M * numberOfBCnodes];
- // // nz_dirNE = &NormalZ[dPP0 * numberOfBCnodes];
- // // nz_dirSW = &NormalZ[dMM0 * numberOfBCnodes];
- // // nz_dirSE = &NormalZ[dPM0 * numberOfBCnodes];
- // // nz_dirNW = &NormalZ[dMP0 * numberOfBCnodes];
- // // nz_dirTE = &NormalZ[dP0P * numberOfBCnodes];
- // // nz_dirBW = &NormalZ[dM0M * numberOfBCnodes];
- // // nz_dirBE = &NormalZ[dP0M * numberOfBCnodes];
- // // nz_dirTW = &NormalZ[dM0P * numberOfBCnodes];
- // // nz_dirTN = &NormalZ[d0PP * numberOfBCnodes];
- // // nz_dirBS = &NormalZ[d0MM * numberOfBCnodes];
- // // nz_dirBN = &NormalZ[d0PM * numberOfBCnodes];
- // // nz_dirTS = &NormalZ[d0MP * numberOfBCnodes];
- // // nz_dirTNE = &NormalZ[dPPP * numberOfBCnodes];
- // // nz_dirTSW = &NormalZ[dMMP * numberOfBCnodes];
- // // nz_dirTSE = &NormalZ[dPMP * numberOfBCnodes];
- // // nz_dirTNW = &NormalZ[dMPP * numberOfBCnodes];
- // // nz_dirBNE = &NormalZ[dPPM * numberOfBCnodes];
- // // nz_dirBSW = &NormalZ[dMMM * numberOfBCnodes];
- // // nz_dirBSE = &NormalZ[dPMM * numberOfBCnodes];
- // // nz_dirBNW = &NormalZ[dMPM * numberOfBCnodes];
- // ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //bool changeCell = false;
- // unsigned int KQK = k_Q[k];
- // ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //if( q_dirW[k] > c0o1 || q_dirS[k] > c0o1 || q_dirB[k] > c0o1 ) {
- // KQK = neighborWSB[KQK];
- // changeCell = true;
- //}
- //if( q_dirW[k] == c0o1 && changeCell == true ) {
- // KQK = neighborX[KQK];
- //}
- //if( q_dirS[k] == c0o1 && changeCell == true ) {
- // KQK = neighborY[KQK];
- //}
- //if( q_dirB[k] == c0o1 && changeCell == true ) {
- // KQK = neighborZ[KQK];
- //}
-
- ////for(int i = 0; i < numberOfParticles; i++){
- //// //push back?
- ////}
-
- // ////////////////////////////////////////////////////////////////////////////////
- // //index
- // //unsigned int KQK = k_Q[k];
- // unsigned int kzero= KQK;
- // unsigned int ke = KQK;
- // unsigned int kw = neighborX[KQK];
- // unsigned int kn = KQK;
- // unsigned int ks = neighborY[KQK];
- // unsigned int kt = KQK;
- // unsigned int kb = neighborZ[KQK];
- // unsigned int ksw = neighborY[kw];
- // unsigned int kne = KQK;
- // unsigned int kse = ks;
- // unsigned int knw = kw;
- // unsigned int kbw = neighborZ[kw];
- // unsigned int kte = KQK;
- // unsigned int kbe = kb;
- // unsigned int ktw = kw;
- // unsigned int kbs = neighborZ[ks];
- // unsigned int ktn = KQK;
- // unsigned int kbn = kb;
- // unsigned int kts = ks;
- // unsigned int ktse = ks;
- // unsigned int kbnw = kbw;
- // unsigned int ktnw = kw;
- // unsigned int kbse = kbs;
- // unsigned int ktsw = ksw;
- // unsigned int kbne = kb;
- // unsigned int ktne = KQK;
- // unsigned int kbsw = neighborZ[ksw];
- // ////////////////////////////////////////////////////////////////////////////////
- // real f_W = (D.f[dP00])[ke ];
- // real f_E = (D.f[dM00])[kw ];
- // real f_S = (D.f[d0P0])[kn ];
- // real f_N = (D.f[d0M0])[ks ];
- // real f_B = (D.f[d00P])[kt ];
- // real f_T = (D.f[d00M])[kb ];
- // real f_SW = (D.f[dPP0])[kne ];
- // real f_NE = (D.f[dMM0])[ksw ];
- // real f_NW = (D.f[dPM0])[kse ];
- // real f_SE = (D.f[dMP0])[knw ];
- // real f_BW = (D.f[dP0P])[kte ];
- // real f_TE = (D.f[dM0M])[kbw ];
- // real f_TW = (D.f[dP0M])[kbe ];
- // real f_BE = (D.f[dM0P])[ktw ];
- // real f_BS = (D.f[d0PP])[ktn ];
- // real f_TN = (D.f[d0MM])[kbs ];
- // real f_TS = (D.f[d0PM])[kbn ];
- // real f_BN = (D.f[d0MP])[kts ];
- // real f_BSW = (D.f[dPPP])[ktne ];
- // real f_BNE = (D.f[dMMP])[ktsw ];
- // real f_BNW = (D.f[dPMP])[ktse ];
- // real f_BSE = (D.f[dMPP])[ktnw ];
- // real f_TSW = (D.f[dPPM])[kbne ];
- // real f_TNE = (D.f[dMMM])[kbsw ];
- // real f_TNW = (D.f[dPMM])[kbse ];
- // real f_TSE = (D.f[dMPM])[kbnw ];
- // ////////////////////////////////////////////////////////////////////////////////
- // // real feq, q;
- // real vx1, vx2, vx3, drho;
- // drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- // f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- // f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
-
- // vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- // ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- // (f_E - f_W)) / (c1o1 + drho);
- //
-
- // vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- // ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- // (f_N - f_S)) / (c1o1 + drho);
-
- // vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- // (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- // (f_T - f_B)) / (c1o1 + drho);
-
- // //real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3) * (c1o1 + drho);
-
- // //////////////////////////////////////////////////////////////////////////
- // if (isEvenTimestep==false)
- // {
- // D.f[dP00] = &DD[dP00 * size_Mat];
- // D.f[dM00] = &DD[dM00 * size_Mat];
- // D.f[d0P0] = &DD[d0P0 * size_Mat];
- // D.f[d0M0] = &DD[d0M0 * size_Mat];
- // D.f[d00P] = &DD[d00P * size_Mat];
- // D.f[d00M] = &DD[d00M * size_Mat];
- // D.f[dPP0] = &DD[dPP0 * size_Mat];
- // D.f[dMM0] = &DD[dMM0 * size_Mat];
- // D.f[dPM0] = &DD[dPM0 * size_Mat];
- // D.f[dMP0] = &DD[dMP0 * size_Mat];
- // D.f[dP0P] = &DD[dP0P * size_Mat];
- // D.f[dM0M] = &DD[dM0M * size_Mat];
- // D.f[dP0M] = &DD[dP0M * size_Mat];
- // D.f[dM0P] = &DD[dM0P * size_Mat];
- // D.f[d0PP] = &DD[d0PP * size_Mat];
- // D.f[d0MM] = &DD[d0MM * size_Mat];
- // D.f[d0PM] = &DD[d0PM * size_Mat];
- // D.f[d0MP] = &DD[d0MP * size_Mat];
- // D.f[d000] = &DD[d000 * size_Mat];
- // D.f[dPPP] = &DD[dPPP * size_Mat];
- // D.f[dMMP] = &DD[dMMP * size_Mat];
- // D.f[dPMP] = &DD[dPMP * size_Mat];
- // D.f[dMPP] = &DD[dMPP * size_Mat];
- // D.f[dPPM] = &DD[dPPM * size_Mat];
- // D.f[dMMM] = &DD[dMMM * size_Mat];
- // D.f[dPMM] = &DD[dPMM * size_Mat];
- // D.f[dMPM] = &DD[dMPM * size_Mat];
- // }
- // else
- // {
- // D.f[dM00] = &DD[dP00 * size_Mat];
- // D.f[dP00] = &DD[dM00 * size_Mat];
- // D.f[d0M0] = &DD[d0P0 * size_Mat];
- // D.f[d0P0] = &DD[d0M0 * size_Mat];
- // D.f[d00M] = &DD[d00P * size_Mat];
- // D.f[d00P] = &DD[d00M * size_Mat];
- // D.f[dMM0] = &DD[dPP0 * size_Mat];
- // D.f[dPP0] = &DD[dMM0 * size_Mat];
- // D.f[dMP0] = &DD[dPM0 * size_Mat];
- // D.f[dPM0] = &DD[dMP0 * size_Mat];
- // D.f[dM0M] = &DD[dP0P * size_Mat];
- // D.f[dP0P] = &DD[dM0M * size_Mat];
- // D.f[dM0P] = &DD[dP0M * size_Mat];
- // D.f[dP0M] = &DD[dM0P * size_Mat];
- // D.f[d0MM] = &DD[d0PP * size_Mat];
- // D.f[d0PP] = &DD[d0MM * size_Mat];
- // D.f[d0MP] = &DD[d0PM * size_Mat];
- // D.f[d0PM] = &DD[d0MP * size_Mat];
- // D.f[d000] = &DD[d000 * size_Mat];
- // D.f[dPPP] = &DD[dMMM * size_Mat];
- // D.f[dMMP] = &DD[dPPM * size_Mat];
- // D.f[dPMP] = &DD[dMPM * size_Mat];
- // D.f[dMPP] = &DD[dPMM * size_Mat];
- // D.f[dPPM] = &DD[dMMP * size_Mat];
- // D.f[dMMM] = &DD[dPPP * size_Mat];
- // D.f[dPMM] = &DD[dMPP * size_Mat];
- // D.f[dMPM] = &DD[dPMP * size_Mat];
- // }
- //}
-}
diff --git a/src/gpu/core/GPU/PressBCs27.cu b/src/gpu/core/GPU/PressBCs27.cu
deleted file mode 100644
index 5f65a3f34e35b4912930d16eb168b9a1fe1f387d..0000000000000000000000000000000000000000
--- a/src/gpu/core/GPU/PressBCs27.cu
+++ /dev/null
@@ -1,4155 +0,0 @@
-//=======================================================================================
-// ____ ____ __ ______ __________ __ __ __ __
-// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
-// \ \ | | | | | |_) | | | | | | | / \ | |
-// \ \ | | | | | _ / | | | | | | / /\ \ | |
-// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
-// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
-// \ \ | | ________________________________________________________________
-// \ \ | | | ______________________________________________________________|
-// \ \| | | | __ __ __ __ ______ _______
-// \ | | |_____ | | | | | | | | | _ \ / _____)
-// \ | | _____| | | | | | | | | | | \ \ \_______
-// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
-// \ _____| |__| |________| \_______/ |__| |______/ (_______/
-//
-// This file is part of VirtualFluids. VirtualFluids is free software: you can
-// redistribute it and/or modify it under the terms of the GNU General Public
-// License as published by the Free Software Foundation, either version 3 of
-// the License, or (at your option) any later version.
-//
-// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
-// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
-// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
-// for more details.
-//
-// You should have received a copy of the GNU General Public License along
-// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
-//
-//! \file PressBCs27.cu
-//! \ingroup GPU
-//! \author Martin Schoenherr, Anna Wellmann
-//======================================================================================
-#include "LBM/LB.h"
-#include "lbm/constants/D3Q27.h"
-#include "basics/constants/NumericConstants.h"
-#include "lbm/MacroscopicQuantities.h"
-#include "LBM/GPUHelperFunctions/KernelUtilities.h"
-
-using namespace vf::basics::constant;
-using namespace vf::lbm::dir;
-using namespace vf::gpu;
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-__global__ void QInflowScaleByPressDevice27(
- real* rhoBC,
- real* DD,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- //index1
- unsigned int K1QK = k_N[k];
- unsigned int k1zero= K1QK;
- unsigned int k1e = K1QK;
- unsigned int k1w = neighborX[K1QK];
- unsigned int k1n = K1QK;
- unsigned int k1s = neighborY[K1QK];
- unsigned int k1t = K1QK;
- unsigned int k1b = neighborZ[K1QK];
- unsigned int k1sw = neighborY[k1w];
- unsigned int k1ne = K1QK;
- unsigned int k1se = k1s;
- unsigned int k1nw = k1w;
- unsigned int k1bw = neighborZ[k1w];
- unsigned int k1te = K1QK;
- unsigned int k1be = k1b;
- unsigned int k1tw = k1w;
- unsigned int k1bs = neighborZ[k1s];
- unsigned int k1tn = K1QK;
- unsigned int k1bn = k1b;
- unsigned int k1ts = k1s;
- unsigned int k1tse = k1s;
- unsigned int k1bnw = k1bw;
- unsigned int k1tnw = k1w;
- unsigned int k1bse = k1bs;
- unsigned int k1tsw = k1sw;
- unsigned int k1bne = k1b;
- unsigned int k1tne = K1QK;
- unsigned int k1bsw = neighborZ[k1sw];
- ////////////////////////////////////////////////////////////////////////////////
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real f1_E = (D.f[dP00])[k1e ];
- real f1_W = (D.f[dM00])[k1w ];
- real f1_N = (D.f[d0P0])[k1n ];
- real f1_S = (D.f[d0M0])[k1s ];
- real f1_T = (D.f[d00P])[k1t ];
- real f1_B = (D.f[d00M])[k1b ];
- real f1_NE = (D.f[dPP0])[k1ne ];
- real f1_SW = (D.f[dMM0])[k1sw ];
- real f1_SE = (D.f[dPM0])[k1se ];
- real f1_NW = (D.f[dMP0])[k1nw ];
- real f1_TE = (D.f[dP0P])[k1te ];
- real f1_BW = (D.f[dM0M])[k1bw ];
- real f1_BE = (D.f[dP0M])[k1be ];
- real f1_TW = (D.f[dM0P])[k1tw ];
- real f1_TN = (D.f[d0PP])[k1tn ];
- real f1_BS = (D.f[d0MM])[k1bs ];
- real f1_BN = (D.f[d0PM])[k1bn ];
- real f1_TS = (D.f[d0MP])[k1ts ];
- //real f1_ZERO = (D.f[d000])[k1zero];
- real f1_TNE = (D.f[dPPP])[k1tne ];
- real f1_TSW = (D.f[dMMP])[k1tsw ];
- real f1_TSE = (D.f[dPMP])[k1tse ];
- real f1_TNW = (D.f[dMPP])[k1tnw ];
- real f1_BNE = (D.f[dPPM])[k1bne ];
- real f1_BSW = (D.f[dMMM])[k1bsw ];
- real f1_BSE = (D.f[dPMM])[k1bse ];
- real f1_BNW = (D.f[dMPM])[k1bnw ];
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real f_E = (D.f[dP00])[ke ];
- real f_W = (D.f[dM00])[kw ];
- real f_N = (D.f[d0P0])[kn ];
- real f_S = (D.f[d0M0])[ks ];
- real f_T = (D.f[d00P])[kt ];
- real f_B = (D.f[d00M])[kb ];
- real f_NE = (D.f[dPP0])[kne ];
- real f_SW = (D.f[dMM0])[ksw ];
- real f_SE = (D.f[dPM0])[kse ];
- real f_NW = (D.f[dMP0])[knw ];
- real f_TE = (D.f[dP0P])[kte ];
- real f_BW = (D.f[dM0M])[kbw ];
- real f_BE = (D.f[dP0M])[kbe ];
- real f_TW = (D.f[dM0P])[ktw ];
- real f_TN = (D.f[d0PP])[ktn ];
- real f_BS = (D.f[d0MM])[kbs ];
- real f_BN = (D.f[d0PM])[kbn ];
- real f_TS = (D.f[d0MP])[kts ];
- //real f_ZERO = (D.f[d000])[kzero];
- real f_TNE = (D.f[dPPP])[ktne ];
- real f_TSW = (D.f[dMMP])[ktsw ];
- real f_TSE = (D.f[dPMP])[ktse ];
- real f_TNW = (D.f[dMPP])[ktnw ];
- real f_BNE = (D.f[dPPM])[kbne ];
- real f_BSW = (D.f[dMMM])[kbsw ];
- real f_BSE = (D.f[dPMM])[kbse ];
- real f_BNW = (D.f[dMPM])[kbnw ];
- //////////////////////////////////////////////////////////////////////////
- // real vx1, vx2, vx3;
- real drho, drho1;
- //////////////////////////////////////////////////////////////////////////
- //Dichte
- drho1 = f1_TSE + f1_TNW + f1_TNE + f1_TSW + f1_BSE + f1_BNW + f1_BNE + f1_BSW +
- f1_BN + f1_TS + f1_TN + f1_BS + f1_BE + f1_TW + f1_TE + f1_BW + f1_SE + f1_NW + f1_NE + f1_SW +
- f1_T + f1_B + f1_N + f1_S + f1_E + f1_W + ((D.f[d000])[k1zero]);
- drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
- //////////////////////////////////////////////////////////////////////////
- //Schallgeschwindigkeit
- real cs = c1o1 / sqrtf(c3o1);
- //////////////////////////////////////////////////////////////////////////
- real rhoInterpol = drho1 * cs + (c1o1 - cs) * drho;
- //real diffRho = (rhoBC[k] + one) / (rhoInterpol + one);
- real diffRhoToAdd = rhoBC[k] - rhoInterpol;
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //no velocity
- //////////////////////////////////////////
- f_E = f1_E * cs + (c1o1 - cs) * f_E ;
- f_W = f1_W * cs + (c1o1 - cs) * f_W ;
- f_N = f1_N * cs + (c1o1 - cs) * f_N ;
- f_S = f1_S * cs + (c1o1 - cs) * f_S ;
- f_T = f1_T * cs + (c1o1 - cs) * f_T ;
- f_B = f1_B * cs + (c1o1 - cs) * f_B ;
- f_NE = f1_NE * cs + (c1o1 - cs) * f_NE ;
- f_SW = f1_SW * cs + (c1o1 - cs) * f_SW ;
- f_SE = f1_SE * cs + (c1o1 - cs) * f_SE ;
- f_NW = f1_NW * cs + (c1o1 - cs) * f_NW ;
- f_TE = f1_TE * cs + (c1o1 - cs) * f_TE ;
- f_BW = f1_BW * cs + (c1o1 - cs) * f_BW ;
- f_BE = f1_BE * cs + (c1o1 - cs) * f_BE ;
- f_TW = f1_TW * cs + (c1o1 - cs) * f_TW ;
- f_TN = f1_TN * cs + (c1o1 - cs) * f_TN ;
- f_BS = f1_BS * cs + (c1o1 - cs) * f_BS ;
- f_BN = f1_BN * cs + (c1o1 - cs) * f_BN ;
- f_TS = f1_TS * cs + (c1o1 - cs) * f_TS ;
- f_TNE = f1_TNE * cs + (c1o1 - cs) * f_TNE ;
- f_TSW = f1_TSW * cs + (c1o1 - cs) * f_TSW ;
- f_TSE = f1_TSE * cs + (c1o1 - cs) * f_TSE ;
- f_TNW = f1_TNW * cs + (c1o1 - cs) * f_TNW ;
- f_BNE = f1_BNE * cs + (c1o1 - cs) * f_BNE ;
- f_BSW = f1_BSW * cs + (c1o1 - cs) * f_BSW ;
- f_BSE = f1_BSE * cs + (c1o1 - cs) * f_BSE ;
- f_BNW = f1_BNW * cs + (c1o1 - cs) * f_BNW ;
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //scale by press
- //////////////////////////////////////////
- //f_E = (f_E + c2over27 ) * diffRho - c2over27 ;
- // f_W = (f_W + c2over27 ) * diffRho - c2over27 ;
- // f_N = (f_N + c2over27 ) * diffRho - c2over27 ;
- // f_S = (f_S + c2over27 ) * diffRho - c2over27 ;
- // f_T = (f_T + c2over27 ) * diffRho - c2over27 ;
- // f_B = (f_B + c2over27 ) * diffRho - c2over27 ;
- //f_NE = (f_NE + c1over54 ) * diffRho - c1over54 ;
- // f_SW = (f_SW + c1over54 ) * diffRho - c1over54 ;
- // f_SE = (f_SE + c1over54 ) * diffRho - c1over54 ;
- // f_NW = (f_NW + c1over54 ) * diffRho - c1over54 ;
- // f_TE = (f_TE + c1over54 ) * diffRho - c1over54 ;
- // f_BW = (f_BW + c1over54 ) * diffRho - c1over54 ;
- // f_BE = (f_BE + c1over54 ) * diffRho - c1over54 ;
- // f_TW = (f_TW + c1over54 ) * diffRho - c1over54 ;
- // f_TN = (f_TN + c1over54 ) * diffRho - c1over54 ;
- // f_BS = (f_BS + c1over54 ) * diffRho - c1over54 ;
- // f_BN = (f_BN + c1over54 ) * diffRho - c1over54 ;
- // f_TS = (f_TS + c1over54 ) * diffRho - c1over54 ;
- // f_TNE = (f_TNE + c1over216) * diffRho - c1over216;
- // f_TSW = (f_TSW + c1over216) * diffRho - c1over216;
- // f_TSE = (f_TSE + c1over216) * diffRho - c1over216;
- // f_TNW = (f_TNW + c1over216) * diffRho - c1over216;
- // f_BNE = (f_BNE + c1over216) * diffRho - c1over216;
- // f_BSW = (f_BSW + c1over216) * diffRho - c1over216;
- // f_BSE = (f_BSE + c1over216) * diffRho - c1over216;
- // f_BNW = (f_BNW + c1over216) * diffRho - c1over216;
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- // add press
- //////////////////////////////////////////
- f_E = (f_E + c2o27 * diffRhoToAdd);
- f_W = (f_W + c2o27 * diffRhoToAdd);
- f_N = (f_N + c2o27 * diffRhoToAdd);
- f_S = (f_S + c2o27 * diffRhoToAdd);
- f_T = (f_T + c2o27 * diffRhoToAdd);
- f_B = (f_B + c2o27 * diffRhoToAdd);
- f_NE = (f_NE + c1o54 * diffRhoToAdd);
- f_SW = (f_SW + c1o54 * diffRhoToAdd);
- f_SE = (f_SE + c1o54 * diffRhoToAdd);
- f_NW = (f_NW + c1o54 * diffRhoToAdd);
- f_TE = (f_TE + c1o54 * diffRhoToAdd);
- f_BW = (f_BW + c1o54 * diffRhoToAdd);
- f_BE = (f_BE + c1o54 * diffRhoToAdd);
- f_TW = (f_TW + c1o54 * diffRhoToAdd);
- f_TN = (f_TN + c1o54 * diffRhoToAdd);
- f_BS = (f_BS + c1o54 * diffRhoToAdd);
- f_BN = (f_BN + c1o54 * diffRhoToAdd);
- f_TS = (f_TS + c1o54 * diffRhoToAdd);
- f_TNE = (f_TNE + c1o216 * diffRhoToAdd);
- f_TSW = (f_TSW + c1o216 * diffRhoToAdd);
- f_TSE = (f_TSE + c1o216 * diffRhoToAdd);
- f_TNW = (f_TNW + c1o216 * diffRhoToAdd);
- f_BNE = (f_BNE + c1o216 * diffRhoToAdd);
- f_BSW = (f_BSW + c1o216 * diffRhoToAdd);
- f_BSE = (f_BSE + c1o216 * diffRhoToAdd);
- f_BNW = (f_BNW + c1o216 * diffRhoToAdd);
- /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- //////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- //////////////////////////////////////////////////////////////////////////
- //__syncthreads();
- // -X
- //(D.f[dP00])[ke ] = f_E ;
- //(D.f[dPM0])[kse ] = f_SE ;
- //(D.f[dPP0])[kne ] = f_NE ;
- //(D.f[dP0M])[kbe ] = f_BE ;
- //(D.f[dP0P])[kte ] = f_TE ;
- //(D.f[dPMP])[ktse ] = f_TSE ;
- //(D.f[dPPP])[ktne ] = f_TNE ;
- //(D.f[dPMM])[kbse ] = f_BSE ;
- //(D.f[dPPM])[kbne ] = f_BNE ;
- // X
- (D.f[dM00])[kw ] = f_W ;
- (D.f[dMM0])[ksw ] = f_SW ;
- (D.f[dMP0])[knw ] = f_NW ;
- (D.f[dM0M])[kbw ] = f_BW ;
- (D.f[dM0P])[ktw ] = f_TW ;
- (D.f[dMMP])[ktsw ] = f_TSW ;
- (D.f[dMPP])[ktnw ] = f_TNW ;
- (D.f[dMMM])[kbsw ] = f_BSW ;
- (D.f[dMPM])[kbnw ] = f_BNW ;
- // Y
- //(D.f[d0M0])[ks ] = f_S ;
- //(D.f[dPM0])[kse ] = f_SE ;
- //(D.f[dMM0])[ksw ] = f_SW ;
- //(D.f[d0MP])[kts ] = f_TS ;
- //(D.f[d0MM])[kbs ] = f_BS ;
- //(D.f[dPMP])[ktse ] = f_TSE ;
- //(D.f[dMMP])[ktsw ] = f_TSW ;
- //(D.f[dPMM])[kbse ] = f_BSE ;
- //(D.f[dMMM])[kbsw ] = f_BSW ;
- // Z
- //(D.f[d00M])[kb ] = f_B ;
- //(D.f[dP0M])[kbe ] = f_BE ;
- //(D.f[dM0M])[kbw ] = f_BW ;
- //(D.f[d0PM])[kbn ] = f_BN ;
- //(D.f[d0MM])[kbs ] = f_BS ;
- //(D.f[dPPM])[kbne ] = f_BNE ;
- //(D.f[dMPM])[kbnw ] = f_BNW ;
- //(D.f[dPMM])[kbse ] = f_BSE ;
- //(D.f[dMMM])[kbsw ] = f_BSW ;
- //////////////////////////////////////////////////////////////////////////
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-////////////////////////////////////////////////////////////////////////////////
-__global__ void LB_BC_Press_East27(
- int nx,
- int ny,
- int tz,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* DD,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- //thread-index
- int ty = blockIdx.x;
- int tx = threadIdx.x;
-
- int k, k1, nxny; // Zugriff auf arrays im device
-
- int x = tx + STARTOFFX; // Globaler x-Index
- int y = ty + STARTOFFY; // Globaler y-Index
- int z = tz + STARTOFFZ; // Globaler z-Index
-
- k = nx*(ny*z + y) + x;
- nxny = nx*ny;
- k1 = k-nxny;
-
- if( bcMatD[k] == GEO_PRESS && bcMatD[k1] == GEO_FLUID)
- {
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int kzero= k;
- unsigned int ke = k;
- unsigned int kw = neighborX[k];
- unsigned int kn = k;
- unsigned int ks = neighborY[k];
- unsigned int kt = k;
- unsigned int kb = neighborZ[k];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = k;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = k;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = k;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = k;
- unsigned int kbsw = neighborZ[ksw];
- //unsigned int kzero= k;
- //unsigned int ke = k;
- //unsigned int kw = k + 1;
- //unsigned int kn = k;
- //unsigned int ks = k + nx;
- //unsigned int kt = k;
- //unsigned int kb = k + nxny;
- //unsigned int ksw = k + nx + 1;
- //unsigned int kne = k;
- //unsigned int kse = k + nx;
- //unsigned int knw = k + 1;
- //unsigned int kbw = k + nxny + 1;
- //unsigned int kte = k;
- //unsigned int kbe = k + nxny;
- //unsigned int ktw = k + 1;
- //unsigned int kbs = k + nxny + nx;
- //unsigned int ktn = k;
- //unsigned int kbn = k + nxny;
- //unsigned int kts = k + nx;
- //unsigned int ktse = k + nx;
- //unsigned int kbnw = k + nxny + 1;
- //unsigned int ktnw = k + 1;
- //unsigned int kbse = k + nxny + nx;
- //unsigned int ktsw = k + nx + 1;
- //unsigned int kbne = k + nxny;
- //unsigned int ktne = k;
- //unsigned int kbsw = k + nxny + nx + 1;
- ////////////////////////////////////////////////////////////////////////////////
- //index1
- unsigned int k1zero= k1;
- unsigned int k1e = k1;
- unsigned int k1w = neighborX[k1];
- unsigned int k1n = k1;
- unsigned int k1s = neighborY[k1];
- unsigned int k1t = k1;
- unsigned int k1b = neighborZ[k1];
- unsigned int k1sw = neighborY[k1w];
- unsigned int k1ne = k1;
- unsigned int k1se = k1s;
- unsigned int k1nw = k1w;
- unsigned int k1bw = neighborZ[k1w];
- unsigned int k1te = k1;
- unsigned int k1be = k1b;
- unsigned int k1tw = k1w;
- unsigned int k1bs = neighborZ[k1s];
- unsigned int k1tn = k1;
- unsigned int k1bn = k1b;
- unsigned int k1ts = k1s;
- unsigned int k1tse = k1s;
- unsigned int k1bnw = k1bw;
- unsigned int k1tnw = k1w;
- unsigned int k1bse = k1bs;
- unsigned int k1tsw = k1sw;
- unsigned int k1bne = k1b;
- unsigned int k1tne = k1;
- unsigned int k1bsw = neighborZ[k1sw];
- //unsigned int k1zero= k1;
- //unsigned int k1e = k1;
- //unsigned int k1w = k1 + 1;
- //unsigned int k1n = k1;
- //unsigned int k1s = k1 + nx;
- //unsigned int k1t = k1;
- //unsigned int k1b = k1 + nxny;
- //unsigned int k1sw = k1 + nx + 1;
- //unsigned int k1ne = k1;
- //unsigned int k1se = k1 + nx;
- //unsigned int k1nw = k1 + 1;
- //unsigned int k1bw = k1 + nxny + 1;
- //unsigned int k1te = k1;
- //unsigned int k1be = k1 + nxny;
- //unsigned int k1tw = k1 + 1;
- //unsigned int k1bs = k1 + nxny + nx;
- //unsigned int k1tn = k1;
- //unsigned int k1bn = k1 + nxny;
- //unsigned int k1ts = k1 + nx;
- //unsigned int k1tse = k1 + nx;
- //unsigned int k1bnw = k1 + nxny + 1;
- //unsigned int k1tnw = k1 + 1;
- //unsigned int k1bse = k1 + nxny + nx;
- //unsigned int k1tsw = k1 + nx + 1;
- //unsigned int k1bne = k1 + nxny;
- //unsigned int k1tne = k1;
- //unsigned int k1bsw = k1 + nxny + nx + 1;
- ////////////////////////////////////////////////////////////////////////////////
- real f1_E,f1_W,f1_N,f1_S,f1_T,f1_B,f1_NE,f1_SW,f1_SE,f1_NW,f1_TE,f1_BW,f1_BE,f1_TW,f1_TN,f1_BS,f1_BN,f1_TS,f1_ZERO,
- f1_TNE,f1_TSW,f1_TSE,f1_TNW,f1_BNE,f1_BSW,f1_BSE,f1_BNW;
-
- f1_W = (D.f[dP00])[k1e ];
- f1_E = (D.f[dM00])[k1w ];
- f1_S = (D.f[d0P0])[k1n ];
- f1_N = (D.f[d0M0])[k1s ];
- f1_B = (D.f[d00P])[k1t ];
- f1_T = (D.f[d00M])[k1b ];
- f1_SW = (D.f[dPP0])[k1ne ];
- f1_NE = (D.f[dMM0])[k1sw ];
- f1_NW = (D.f[dPM0])[k1se ];
- f1_SE = (D.f[dMP0])[k1nw ];
- f1_BW = (D.f[dP0P])[k1te ];
- f1_TE = (D.f[dM0M])[k1bw ];
- f1_TW = (D.f[dP0M])[k1be ];
- f1_BE = (D.f[dM0P])[k1tw ];
- f1_BS = (D.f[d0PP])[k1tn ];
- f1_TN = (D.f[d0MM])[k1bs ];
- f1_TS = (D.f[d0PM])[k1bn ];
- f1_BN = (D.f[d0MP])[k1ts ];
- f1_ZERO = (D.f[d000])[k1zero];
- f1_BSW = (D.f[dPPP])[k1tne ];
- f1_BNE = (D.f[dMMP])[k1tsw ];
- f1_BNW = (D.f[dPMP])[k1tse ];
- f1_BSE = (D.f[dMPP])[k1tnw ];
- f1_TSW = (D.f[dPPM])[k1bne ];
- f1_TNE = (D.f[dMMM])[k1bsw ];
- f1_TNW = (D.f[dPMM])[k1bse ];
- f1_TSE = (D.f[dMPM])[k1bnw ];
-
- real drho1 = f1_ZERO+f1_E+f1_W+f1_N+f1_S+f1_T+f1_B+f1_NE+f1_SW+f1_SE+f1_NW+f1_TE+f1_BW+f1_BE+f1_TW+f1_TN+f1_BS+f1_BN+f1_TS+
- f1_TNE+f1_TSW+f1_TSE+f1_TNW+f1_BNE+f1_BSW+f1_BSE+f1_BNW;
-
- __syncthreads();
-
- (D.f[dP00])[ke ] = f1_W -c2o27*drho1;
- (D.f[dM00])[kw ] = f1_E -c2o27*drho1;
- (D.f[d0P0])[kn ] = f1_S -c2o27*drho1;
- (D.f[d0M0])[ks ] = f1_N -c2o27*drho1;
- (D.f[d00P])[kt ] = f1_B -c2o27*drho1;
- (D.f[d00M])[kb ] = f1_T -c2o27*drho1;
- (D.f[dPP0])[kne ] = f1_SW -c1o54*drho1;
- (D.f[dMM0])[ksw ] = f1_NE -c1o54*drho1;
- (D.f[dPM0])[kse ] = f1_NW -c1o54*drho1;
- (D.f[dMP0])[knw ] = f1_SE -c1o54*drho1;
- (D.f[dP0P])[kte ] = f1_BW -c1o54*drho1;
- (D.f[dM0M])[kbw ] = f1_TE -c1o54*drho1;
- (D.f[dP0M])[kbe ] = f1_TW -c1o54*drho1;
- (D.f[dM0P])[ktw ] = f1_BE -c1o54*drho1;
- (D.f[d0PP])[ktn ] = f1_BS -c1o54*drho1;
- (D.f[d0MM])[kbs ] = f1_TN -c1o54*drho1;
- (D.f[d0PM])[kbn ] = f1_TS -c1o54*drho1;
- (D.f[d0MP])[kts ] = f1_BN -c1o54*drho1;
- (D.f[d000])[kzero] = f1_ZERO-c8o27*drho1;
- (D.f[dPPP])[ktne ] = f1_BSW -c1o216*drho1;
- (D.f[dMMP])[ktsw ] = f1_BNE -c1o216*drho1;
- (D.f[dPMP])[ktse ] = f1_BNW -c1o216*drho1;
- (D.f[dMPP])[ktnw ] = f1_BSE -c1o216*drho1;
- (D.f[dPPM])[kbne ] = f1_TSW -c1o216*drho1;
- (D.f[dMMM])[kbsw ] = f1_TNE -c1o216*drho1;
- (D.f[dPMM])[kbse ] = f1_TNW -c1o216*drho1;
- (D.f[dMPM])[kbnw ] = f1_TSE -c1o216*drho1;
- }
- __syncthreads();
-}
-//////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QPressDevice27(
- real* rhoBC,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- //unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
- f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
-
- f_W = (D.f[dP00])[ke ];
- f_E = (D.f[dM00])[kw ];
- f_S = (D.f[d0P0])[kn ];
- f_N = (D.f[d0M0])[ks ];
- f_B = (D.f[d00P])[kt ];
- f_T = (D.f[d00M])[kb ];
- f_SW = (D.f[dPP0])[kne ];
- f_NE = (D.f[dMM0])[ksw ];
- f_NW = (D.f[dPM0])[kse ];
- f_SE = (D.f[dMP0])[knw ];
- f_BW = (D.f[dP0P])[kte ];
- f_TE = (D.f[dM0M])[kbw ];
- f_TW = (D.f[dP0M])[kbe ];
- f_BE = (D.f[dM0P])[ktw ];
- f_BS = (D.f[d0PP])[ktn ];
- f_TN = (D.f[d0MM])[kbs ];
- f_TS = (D.f[d0PM])[kbn ];
- f_BN = (D.f[d0MP])[kts ];
- f_BSW = (D.f[dPPP])[ktne ];
- f_BNE = (D.f[dMMP])[ktsw ];
- f_BNW = (D.f[dPMP])[ktse ];
- f_BSE = (D.f[dMPP])[ktnw ];
- f_TSW = (D.f[dPPM])[kbne ];
- f_TNE = (D.f[dMMM])[kbsw ];
- f_TNW = (D.f[dPMM])[kbse ];
- f_TSE = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////
- real q, vx1, vx2, vx3, drho;
- vx1 = ((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W);
-
-
- vx2 = (-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S);
-
- vx3 = ((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B);
-
- real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);
- //////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////
- drho = rhoBC[k];
- //deltaRho = (rhoBC[k] + one) / (deltaRho + one);
- ////////////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dM00])[kw]=c2o27* (drho+c3o1*(-vx1 )+c9o2*(-vx1 )*(-vx1 )-cu_sq);
- //(D.f[dP00])[ke]=c2over27* (drho+three*( vx1 )+c9over2*( vx1 )*( vx1 )-cu_sq);
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dP00])[ke]=c2o27* (drho+c3o1*( vx1 )+c9o2*( vx1 )*( vx1 )-cu_sq);
- //(D.f[dM00])[kw]=c2over27* (drho+three*(-vx1 )+c9over2*(-vx1 )*(-vx1 )-cu_sq);
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0M0])[ks]=c2o27* (drho+c3o1*( -vx2 )+c9o2*( -vx2 )*( -vx2 )-cu_sq);
- //(D.f[d0P0])[kn]=c2over27* (drho+three*( vx2 )+c9over2*( vx2 )*( vx2 )-cu_sq);
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0P0])[kn]=c2o27* (drho+c3o1*( vx2 )+c9o2*( vx2 )*( vx2 )-cu_sq);
- //(D.f[d0M0])[ks]=c2over27* (drho+three*( -vx2 )+c9over2*( -vx2 )*( -vx2 )-cu_sq);
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d00M])[kb]=c2o27* (drho+c3o1*( -vx3)+c9o2*( -vx3)*( -vx3)-cu_sq);
- //(D.f[d00P])[kt]=c2over27* (drho+three*( vx3)+c9over2*( vx3)*( vx3)-cu_sq);
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d00P])[kt]=c2o27* (drho+c3o1*( vx3)+c9o2*( vx3)*( vx3)-cu_sq);
- //(D.f[d00M])[kb]=c2over27* (drho+three*( -vx3)+c9over2*( -vx3)*( -vx3)-cu_sq);
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMM0])[ksw]=c1o54* (drho+c3o1*(-vx1-vx2 )+c9o2*(-vx1-vx2 )*(-vx1-vx2 )-cu_sq);
- //(D.f[dPP0])[kne]=c1over54* (drho+three*( vx1+vx2 )+c9over2*( vx1+vx2 )*( vx1+vx2 )-cu_sq);
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPP0])[kne]=c1o54* (drho+c3o1*( vx1+vx2 )+c9o2*( vx1+vx2 )*( vx1+vx2 )-cu_sq);
- //(D.f[dMM0])[ksw]=c1over54* (drho+three*(-vx1-vx2 )+c9over2*(-vx1-vx2 )*(-vx1-vx2 )-cu_sq);
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMP0])[knw]=c1o54* (drho+c3o1*(-vx1+vx2 )+c9o2*(-vx1+vx2 )*(-vx1+vx2 )-cu_sq);
- //(D.f[dPM0])[kse]=c1over54* (drho+three*( vx1-vx2 )+c9over2*( vx1-vx2 )*( vx1-vx2 )-cu_sq);
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPM0])[kse]=c1o54* (drho+c3o1*( vx1-vx2 )+c9o2*( vx1-vx2 )*( vx1-vx2 )-cu_sq);
- //(D.f[dMP0])[knw]=c1over54* (drho+three*(-vx1+vx2 )+c9over2*(-vx1+vx2 )*(-vx1+vx2 )-cu_sq);
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dM0M])[kbw]=c1o54* (drho+c3o1*(-vx1 -vx3)+c9o2*(-vx1 -vx3)*(-vx1 -vx3)-cu_sq);
- //(D.f[dP0P])[kte]=c1over54* (drho+three*( vx1 +vx3)+c9over2*( vx1 +vx3)*( vx1 +vx3)-cu_sq);
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dP0P])[kte]=c1o54* (drho+c3o1*( vx1 +vx3)+c9o2*( vx1 +vx3)*( vx1 +vx3)-cu_sq);
- //(D.f[dM0M])[kbw]=c1over54* (drho+three*(-vx1 -vx3)+c9over2*(-vx1 -vx3)*(-vx1 -vx3)-cu_sq);
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dM0P])[ktw]=c1o54* (drho+c3o1*(-vx1 +vx3)+c9o2*(-vx1 +vx3)*(-vx1 +vx3)-cu_sq);
- //(D.f[dP0M])[kbe]=c1over54* (drho+three*( vx1 -vx3)+c9over2*( vx1 -vx3)*( vx1 -vx3)-cu_sq);
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dP0M])[kbe]=c1o54* (drho+c3o1*( vx1 -vx3)+c9o2*( vx1 -vx3)*( vx1 -vx3)-cu_sq);
- //(D.f[dM0P])[ktw]=c1over54* (drho+three*(-vx1 +vx3)+c9over2*(-vx1 +vx3)*(-vx1 +vx3)-cu_sq);
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0MM])[kbs]=c1o54* (drho+c3o1*( -vx2-vx3)+c9o2*( -vx2-vx3)*( -vx2-vx3)-cu_sq);
- //(D.f[d0PP])[ktn]=c1over54* (drho+three*( vx2+vx3)+c9over2*( vx2+vx3)*( vx2+vx3)-cu_sq);
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0PP])[ktn]=c1o54* (drho+c3o1*( vx2+vx3)+c9o2*( vx2+vx3)*( vx2+vx3)-cu_sq);
- //(D.f[d0MM])[kbs]=c1over54* (drho+three*( -vx2-vx3)+c9over2*( -vx2-vx3)*( -vx2-vx3)-cu_sq);
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0MP])[kts]=c1o54* (drho+c3o1*( -vx2+vx3)+c9o2*( -vx2+vx3)*( -vx2+vx3)-cu_sq);
- //(D.f[d0PM])[kbn]=c1over54* (drho+three*( vx2-vx3)+c9over2*( vx2-vx3)*( vx2-vx3)-cu_sq);
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0PM])[kbn]=c1o54* (drho+c3o1*( vx2-vx3)+c9o2*( vx2-vx3)*( vx2-vx3)-cu_sq);
- //(D.f[d0MP])[kts]=c1over54* (drho+three*( -vx2+vx3)+c9over2*( -vx2+vx3)*( -vx2+vx3)-cu_sq);
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMMM])[kbsw]=c1o216*(drho+c3o1*(-vx1-vx2-vx3)+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3)-cu_sq);
- //(D.f[dPPP])[ktne]=c1over216*(drho+three*( vx1+vx2+vx3)+c9over2*( vx1+vx2+vx3)*( vx1+vx2+vx3)-cu_sq);
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPPP])[ktne]=c1o216*(drho+c3o1*( vx1+vx2+vx3)+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3)-cu_sq);
- //(D.f[dMMM])[kbsw]=c1over216*(drho+three*(-vx1-vx2-vx3)+c9over2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3)-cu_sq);
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMMP])[ktsw]=c1o216*(drho+c3o1*(-vx1-vx2+vx3)+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3)-cu_sq);
- //(D.f[dPPM])[kbne]=c1over216*(drho+three*( vx1+vx2-vx3)+c9over2*( vx1+vx2-vx3)*( vx1+vx2-vx3)-cu_sq);
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPPM])[kbne]=c1o216*(drho+c3o1*( vx1+vx2-vx3)+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3)-cu_sq);
- //(D.f[dMMP])[ktsw]=c1over216*(drho+three*(-vx1-vx2+vx3)+c9over2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3)-cu_sq);
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMPM])[kbnw]=c1o216*(drho+c3o1*(-vx1+vx2-vx3)+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3)-cu_sq);
- //(D.f[dPMP])[ktse]=c1over216*(drho+three*( vx1-vx2+vx3)+c9over2*( vx1-vx2+vx3)*( vx1-vx2+vx3)-cu_sq);
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPMP])[ktse]=c1o216*(drho+c3o1*( vx1-vx2+vx3)+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3)-cu_sq);
- //(D.f[dMPM])[kbnw]=c1over216*(drho+three*(-vx1+vx2-vx3)+c9over2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3)-cu_sq);
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMPP])[ktnw]=c1o216*(drho+c3o1*(-vx1+vx2+vx3)+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3)-cu_sq);
- //(D.f[dPMM])[kbse]=c1over216*(drho+three*( vx1-vx2-vx3)+c9over2*( vx1-vx2-vx3)*( vx1-vx2-vx3)-cu_sq);
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPMM])[kbse]=c1o216*(drho+c3o1*( vx1-vx2-vx3)+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3)-cu_sq);
- //(D.f[dMPP])[ktnw]=c1over216*(drho+three*(-vx1+vx2+vx3)+c9over2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3)-cu_sq);
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QPressDeviceAntiBB27(
- real* rhoBC,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
- f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW, f_ZERO;
-
- f_W = (D.f[dP00])[ke ];
- f_E = (D.f[dM00])[kw ];
- f_S = (D.f[d0P0])[kn ];
- f_N = (D.f[d0M0])[ks ];
- f_B = (D.f[d00P])[kt ];
- f_T = (D.f[d00M])[kb ];
- f_SW = (D.f[dPP0])[kne ];
- f_NE = (D.f[dMM0])[ksw ];
- f_NW = (D.f[dPM0])[kse ];
- f_SE = (D.f[dMP0])[knw ];
- f_BW = (D.f[dP0P])[kte ];
- f_TE = (D.f[dM0M])[kbw ];
- f_TW = (D.f[dP0M])[kbe ];
- f_BE = (D.f[dM0P])[ktw ];
- f_BS = (D.f[d0PP])[ktn ];
- f_TN = (D.f[d0MM])[kbs ];
- f_TS = (D.f[d0PM])[kbn ];
- f_BN = (D.f[d0MP])[kts ];
- f_BSW = (D.f[dPPP])[ktne ];
- f_BNE = (D.f[dMMP])[ktsw ];
- f_BNW = (D.f[dPMP])[ktse ];
- f_BSE = (D.f[dMPP])[ktnw ];
- f_TSW = (D.f[dPPM])[kbne ];
- f_TNE = (D.f[dMMM])[kbsw ];
- f_TNW = (D.f[dPMM])[kbse ];
- f_TSE = (D.f[dMPM])[kbnw ];
- f_ZERO = (D.f[d000])[kzero];
- ////////////////////////////////////////////////////////////////////////////////
- //real vx1, vx2, vx3, drho;
- //vx1 = ((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- // ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- // (f_E - f_W);
-
-
- //vx2 = (-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- // ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- // (f_N - f_S);
-
- //vx3 = ((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- // (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- // (f_T - f_B);
-
- //real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);
- //////////////////////////////////////////////////////////////////////////
- real drho = f_ZERO+f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+
- f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- drho = drho - rhoBC[k];
- drho *= 0.01f;
- ////////////////////////////////////////////////////////////////////////////////
- real q;
- //deltaRho = (rhoBC[k] + one) / (deltaRho + one);
- ////////////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dM00])[kw]=f_W-c2o27*drho;
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dP00])[ke]=f_E-c2o27*drho;
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0M0])[ks]=f_S-c2o27*drho;
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0P0])[kn]=f_N-c2o27*drho;
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d00M])[kb]=f_B-c2o27*drho;
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d00P])[kt]=f_T-c2o27*drho;
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMM0])[ksw]=f_SW-c1o54*drho;
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPP0])[kne]=f_NE-c1o54*drho;
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMP0])[knw]=f_NW-c1o54*drho;
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPM0])[kse]=f_SE-c1o54*drho;
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dM0M])[kbw]=f_BW-c1o54*drho;
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dP0P])[kte]=f_TE-c1o54*drho;
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dM0P])[ktw]=f_TW-c1o54*drho;
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dP0M])[kbe]=f_BE-c1o54*drho;
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0MM])[kbs]=f_BS-c1o54*drho;
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0PP])[ktn]=f_TN-c1o54*drho;
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0MP])[kts]=f_TS-c1o54*drho;
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[d0PM])[kbn]=f_BN-c1o54*drho;
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMMM])[kbsw]=f_BSW-c1o216*drho;
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPPP])[ktne]=f_TNE-c1o216*drho;
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMMP])[ktsw]=f_TSW-c1o216*drho;
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPPM])[kbne]=f_BNE-c1o216*drho;
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMPM])[kbnw]=f_BNW-c1o216*drho;
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPMP])[ktse]=f_TSE-c1o216*drho;
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dMPP])[ktnw]=f_TNW-c1o216*drho;
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- (D.f[dPMM])[kbse]=f_BSE-c1o216*drho;
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QPressDeviceFixBackflow27(
- real* rhoBC,
- real* DD,
- int* k_Q,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- real deltaRho;
- ////////////////////////////////////////////////////////////////////////////////
- deltaRho = rhoBC[k];
- ////////////////////////////////////////////////////////////////////////////////
- Distributions27 D;
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- (D.f[dM00])[kw] = c2o27 * deltaRho;
- (D.f[dP00])[ke] = c2o27 * deltaRho;
- (D.f[d0M0])[ks] = c2o27 * deltaRho;
- (D.f[d0P0])[kn] = c2o27 * deltaRho;
- (D.f[d00M])[kb] = c2o27 * deltaRho;
- (D.f[d00P])[kt] = c2o27 * deltaRho;
- (D.f[dMM0])[ksw] = c1o54 * deltaRho;
- (D.f[dPP0])[kne] = c1o54 * deltaRho;
- (D.f[dMP0])[knw] = c1o54 * deltaRho;
- (D.f[dPM0])[kse] = c1o54 * deltaRho;
- (D.f[dM0M])[kbw] = c1o54 * deltaRho;
- (D.f[dP0P])[kte] = c1o54 * deltaRho;
- (D.f[dM0P])[ktw] = c1o54 * deltaRho;
- (D.f[dP0M])[kbe] = c1o54 * deltaRho;
- (D.f[d0MM])[kbs] = c1o54 * deltaRho;
- (D.f[d0PP])[ktn] = c1o54 * deltaRho;
- (D.f[d0MP])[kts] = c1o54 * deltaRho;
- (D.f[d0PM])[kbn] = c1o54 * deltaRho;
- (D.f[dMMM])[kbsw] = c1o216 * deltaRho;
- (D.f[dPPP])[ktne] = c1o216 * deltaRho;
- (D.f[dMMP])[ktsw] = c1o216 * deltaRho;
- (D.f[dPPM])[kbne] = c1o216 * deltaRho;
- (D.f[dMPM])[kbnw] = c1o216 * deltaRho;
- (D.f[dPMP])[ktse] = c1o216 * deltaRho;
- (D.f[dMPP])[ktnw] = c1o216 * deltaRho;
- (D.f[dPMM])[kbse] = c1o216 * deltaRho;
- (D.f[d000])[kzero] = c8o27 * deltaRho;
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QPressDeviceDirDepBot27(
- real* rhoBC,
- real* DD,
- int* k_Q,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- real rho;
- ////////////////////////////////////////////////////////////////////////////////
- rho = rhoBC[k];
- ////////////////////////////////////////////////////////////////////////////////
- Distributions27 D;
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real f_E,f_W,f_N,f_S,f_T,f_NE,f_SW,f_SE,f_NW,f_TE,f_TW,f_TN,f_TS,f_ZERO,f_TNE,f_TSW,f_TSE,f_TNW;//,
- //f_B,f_BW,f_BE,f_BS,f_BN,f_BSW,f_BNE,f_BNW,f_BSE;
-
- f_E = (D.f[dP00])[ke ];
- f_W = (D.f[dM00])[kw ];
- f_N = (D.f[d0P0])[kn ];
- f_S = (D.f[d0M0])[ks ];
- f_T = (D.f[d00P])[kt ];
- f_NE = (D.f[dPP0])[kne ];
- f_SW = (D.f[dMM0])[ksw ];
- f_SE = (D.f[dPM0])[kse ];
- f_NW = (D.f[dMP0])[knw ];
- f_TE = (D.f[dP0P])[kte ];
- f_TW = (D.f[dM0P])[ktw ];
- f_TN = (D.f[d0PP])[ktn ];
- f_TS = (D.f[d0MP])[kts ];
- f_ZERO = (D.f[d000])[kzero];
- f_TNE = (D.f[dPPP])[ktne ];
- f_TSW = (D.f[dMMP])[ktsw ];
- f_TSE = (D.f[dPMP])[ktse ];
- f_TNW = (D.f[dMPP])[ktnw ];
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- //f_B = (four*rho- four*f_SW- eight*f_TSW-four*f_W- eight*f_TW- four*f_NW- eight*f_TNW-four*f_S- eight*f_TS-four*f_ZERO+ f_T-four*f_N- eight*f_TN- four*f_SE- eight*f_TSE-four*f_E- eight*f_TE- four*f_NE- eight*f_TNE)/nine;
- //f_BW = ( two*rho+ f_SW- four*f_TSW+ f_W- four*f_TW+ f_NW- four*f_TNW- two*f_S- four*f_TS- two*f_ZERO-four*f_T- two*f_N- four*f_TN- five*f_SE- four*f_TSE-five*f_E+fourteen*f_TE- five*f_NE- four*f_TNE)/eighteen;
- //f_BE = ( two*rho- five*f_SW- four*f_TSW-five*f_W+fourteen*f_TW- five*f_NW- four*f_TNW- two*f_S- four*f_TS- two*f_ZERO-four*f_T- two*f_N- four*f_TN+ f_SE- four*f_TSE+ f_E- four*f_TE+ f_NE- four*f_TNE)/eighteen;
- //f_BS = ( two*rho+ f_SW- four*f_TSW- two*f_W- four*f_TW- five*f_NW- four*f_TNW+ f_S- four*f_TS- two*f_ZERO-four*f_T-five*f_N+fourteen*f_TN+ f_SE- four*f_TSE- two*f_E- four*f_TE- five*f_NE- four*f_TNE)/eighteen;
- //f_BN = ( two*rho- five*f_SW- four*f_TSW- two*f_W- four*f_TW+ f_NW- four*f_TNW-five*f_S+fourteen*f_TS- two*f_ZERO-four*f_T+ f_N- four*f_TN- five*f_SE- four*f_TSE- two*f_E- four*f_TE+ f_NE- four*f_TNE)/eighteen;
- //f_BSW = ( two*rho+ four*f_SW- four*f_TSW+ f_W- four*f_TW- two*f_NW- four*f_TNW+ f_S- four*f_TS- two*f_ZERO-four*f_T-five*f_N- four*f_TN- two*f_SE- four*f_TSE-five*f_E- four*f_TE-eight*f_NE+sixtyeight*f_TNE)/seventytwo;
- //f_BNE = ( two*rho-eight*f_SW+sixtyeight*f_TSW-five*f_W- four*f_TW- two*f_NW- four*f_TNW-five*f_S- four*f_TS- two*f_ZERO-four*f_T+ f_N- four*f_TN- two*f_SE- four*f_TSE+ f_E- four*f_TE+ four*f_NE- four*f_TNE)/seventytwo;
- //f_BNW = ( two*rho- two*f_SW- four*f_TSW+ f_W- four*f_TW+ four*f_NW- four*f_TNW-five*f_S- four*f_TS- two*f_ZERO-four*f_T+ f_N- four*f_TN-eight*f_SE+sixtyeight*f_TSE-five*f_E- four*f_TE- two*f_NE- four*f_TNE)/seventytwo;
- //f_BSE = ( two*rho- two*f_SW- four*f_TSW-five*f_W- four*f_TW-eight*f_NW+sixtyeight*f_TNW+ f_S- four*f_TS- two*f_ZERO-four*f_T-five*f_N- four*f_TN+ four*f_SE- four*f_TSE+ f_E- four*f_TE- two*f_NE- four*f_TNE)/seventytwo;
-
- //real drho = f_ZERO+f_E+f_W+f_N+f_S+f_T+f_B+f_NE+f_SW+f_SE+f_NW+f_TE+f_BW+f_BE+f_TW+f_TN+f_BS+f_BN+f_TS+f_TNE+f_TSW+f_TSE+f_TNW+f_BNE+f_BSW+f_BSE+f_BNW;
- //real vx1 = (f_E -f_W +f_NE-f_SW+f_SE-f_NW+f_TE-f_BW+f_BE-f_TW+ f_TNE-f_TSW+f_TSE-f_TNW+ f_BNE-f_BSW+f_BSE-f_BNW);
- //real vx2 = (f_N -f_S +f_NE-f_SW-f_SE+f_NW+f_TN-f_BS+f_BN-f_TS+ f_TNE-f_TSW-f_TSE+f_TNW+ f_BNE-f_BSW-f_BSE+f_BNW);
- //real vx3 = (f_T -f_B +f_TE-f_BW-f_BE+f_TW+f_TN-f_BS-f_BN+f_TS+ f_TNE+f_TSW+f_TSE+f_TNW- f_BNE-f_BSW-f_BSE-f_BNW);
-
- //real cusq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);
-
- //(D.f[d000])[kzero] = c8over27* (drho-cusq);
- //(D.f[dP00])[ke] = c2over27* (drho+three*( vx1 )+c9over2*( vx1 )*( vx1 )-cusq);
- //(D.f[dM00])[kw] = c2over27* (drho+three*(-vx1 )+c9over2*(-vx1 )*(-vx1 )-cusq);
- //(D.f[d0P0])[kn] = c2over27* (drho+three*( vx2 )+c9over2*( vx2 )*( vx2 )-cusq);
- //(D.f[d0M0])[ks] = c2over27* (drho+three*( -vx2 )+c9over2*( -vx2 )*( -vx2 )-cusq);
- //(D.f[d00P])[kt] = c2over27* (drho+three*( vx3)+c9over2*( vx3)*( vx3)-cusq);
- //(D.f[d00M])[kb] = c2over27* (drho+three*( -vx3)+c9over2*( -vx3)*( -vx3)-cusq);
- //(D.f[dPP0])[kne] = c1over54* (drho+three*( vx1+vx2 )+c9over2*( vx1+vx2 )*( vx1+vx2 )-cusq);
- //(D.f[dMM0])[ksw] = c1over54* (drho+three*(-vx1-vx2 )+c9over2*(-vx1-vx2 )*(-vx1-vx2 )-cusq);
- //(D.f[dPM0])[kse] = c1over54* (drho+three*( vx1-vx2 )+c9over2*( vx1-vx2 )*( vx1-vx2 )-cusq);
- //(D.f[dMP0])[knw] = c1over54* (drho+three*(-vx1+vx2 )+c9over2*(-vx1+vx2 )*(-vx1+vx2 )-cusq);
- //(D.f[dP0P])[kte] = c1over54* (drho+three*( vx1 +vx3)+c9over2*( vx1 +vx3)*( vx1 +vx3)-cusq);
- //(D.f[dM0M])[kbw] = c1over54* (drho+three*(-vx1 -vx3)+c9over2*(-vx1 -vx3)*(-vx1 -vx3)-cusq);
- //(D.f[dP0M])[kbe] = c1over54* (drho+three*( vx1 -vx3)+c9over2*( vx1 -vx3)*( vx1 -vx3)-cusq);
- //(D.f[dM0P])[ktw] = c1over54* (drho+three*(-vx1 +vx3)+c9over2*(-vx1 +vx3)*(-vx1 +vx3)-cusq);
- //(D.f[d0PP])[ktn] = c1over54* (drho+three*( vx2+vx3)+c9over2*( vx2+vx3)*( vx2+vx3)-cusq);
- //(D.f[d0MM])[kbs] = c1over54* (drho+three*( -vx2-vx3)+c9over2*( -vx2-vx3)*( -vx2-vx3)-cusq);
- //(D.f[d0PM])[kbn] = c1over54* (drho+three*( vx2-vx3)+c9over2*( vx2-vx3)*( vx2-vx3)-cusq);
- //(D.f[d0MP])[kts] = c1over54* (drho+three*( -vx2+vx3)+c9over2*( -vx2+vx3)*( -vx2+vx3)-cusq);
- //(D.f[dPPP])[ktne] = c1over216*(drho+three*( vx1+vx2+vx3)+c9over2*( vx1+vx2+vx3)*( vx1+vx2+vx3)-cusq);
- //(D.f[dMMM])[kbsw] = c1over216*(drho+three*(-vx1-vx2-vx3)+c9over2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3)-cusq);
- //(D.f[dPPM])[kbne] = c1over216*(drho+three*( vx1+vx2-vx3)+c9over2*( vx1+vx2-vx3)*( vx1+vx2-vx3)-cusq);
- //(D.f[dMMP])[ktsw] = c1over216*(drho+three*(-vx1-vx2+vx3)+c9over2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3)-cusq);
- //(D.f[dPMP])[ktse] = c1over216*(drho+three*( vx1-vx2+vx3)+c9over2*( vx1-vx2+vx3)*( vx1-vx2+vx3)-cusq);
- //(D.f[dMPM])[kbnw] = c1over216*(drho+three*(-vx1+vx2-vx3)+c9over2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3)-cusq);
- //(D.f[dPMM])[kbse] = c1over216*(drho+three*( vx1-vx2-vx3)+c9over2*( vx1-vx2-vx3)*( vx1-vx2-vx3)-cusq);
- //(D.f[dMPP])[ktnw] = c1over216*(drho+three*(-vx1+vx2+vx3)+c9over2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3)-cusq);
- real drho = f_ZERO+f_E+f_W+f_N+f_S+f_T+f_NE+f_SW+f_SE+f_NW+f_TE+f_TW+f_TN+f_TS+f_TNE+f_TSW+f_TSE+f_TNW;
- real dTop = f_T+f_TE+f_TW+f_TN+f_TS+f_TNE+f_TSW+f_TSE+f_TNW;
- (D.f[d00M])[kb] = (f_T+c2o27)*(rho-drho+c1o1/c6o1)/(dTop+c1o1/c6o1)-c2o27;
- (D.f[dM0M])[kbw] = (f_TW+c1o54)*(rho-drho+c1o1/c6o1)/(dTop+c1o1/c6o1)-c1o54;
- (D.f[dP0M])[kbe] = (f_TE+c1o54)*(rho-drho+c1o1/c6o1)/(dTop+c1o1/c6o1)-c1o54;
- (D.f[d0MM])[kbs] = (f_TS+c1o54)*(rho-drho+c1o1/c6o1)/(dTop+c1o1/c6o1)-c1o54;
- (D.f[d0PM])[kbn] = (f_TN+c1o54)*(rho-drho+c1o1/c6o1)/(dTop+c1o1/c6o1)-c1o54;
- (D.f[dMMM])[kbsw] = (f_TSW+c1o216)*(rho-drho+c1o1/c6o1)/(dTop+c1o1/c6o1)-c1o216;
- (D.f[dPPM])[kbne] = (f_TNE+c1o216)*(rho-drho+c1o1/c6o1)/(dTop+c1o1/c6o1)-c1o216;
- (D.f[dMPM])[kbnw] = (f_TNW+c1o216)*(rho-drho+c1o1/c6o1)/(dTop+c1o1/c6o1)-c1o216;
- (D.f[dPMM])[kbse] = (f_TSE+c1o216)*(rho-drho+c1o1/c6o1)/(dTop+c1o1/c6o1)-c1o216;
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-__global__ void QPressDeviceOld27(
- real* rhoBC,
- real* DD,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- //index1
- unsigned int K1QK = k_N[k];
- unsigned int k1zero= K1QK;
- unsigned int k1e = K1QK;
- unsigned int k1w = neighborX[K1QK];
- unsigned int k1n = K1QK;
- unsigned int k1s = neighborY[K1QK];
- unsigned int k1t = K1QK;
- unsigned int k1b = neighborZ[K1QK];
- unsigned int k1sw = neighborY[k1w];
- unsigned int k1ne = K1QK;
- unsigned int k1se = k1s;
- unsigned int k1nw = k1w;
- unsigned int k1bw = neighborZ[k1w];
- unsigned int k1te = K1QK;
- unsigned int k1be = k1b;
- unsigned int k1tw = k1w;
- unsigned int k1bs = neighborZ[k1s];
- unsigned int k1tn = K1QK;
- unsigned int k1bn = k1b;
- unsigned int k1ts = k1s;
- unsigned int k1tse = k1s;
- unsigned int k1bnw = k1bw;
- unsigned int k1tnw = k1w;
- unsigned int k1bse = k1bs;
- unsigned int k1tsw = k1sw;
- unsigned int k1bne = k1b;
- unsigned int k1tne = K1QK;
- unsigned int k1bsw = neighborZ[k1sw];
- ////////////////////////////////////////////////////////////////////////////////
- Distributions27 D;
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real f1_E,f1_W,f1_N,f1_S,f1_T,f1_B,f1_NE,f1_SW,f1_SE,f1_NW,f1_TE,f1_BW,f1_BE,f1_TW,f1_TN,f1_BS,f1_BN,f1_TS,f1_ZERO,
- f1_TNE,f1_TSW,f1_TSE,f1_TNW,f1_BNE,f1_BSW,f1_BSE,f1_BNW;
-
- f1_W = (D.f[dP00])[k1e ];
- f1_E = (D.f[dM00])[k1w ];
- f1_S = (D.f[d0P0])[k1n ];
- f1_N = (D.f[d0M0])[k1s ];
- f1_B = (D.f[d00P])[k1t ];
- f1_T = (D.f[d00M])[k1b ];
- f1_SW = (D.f[dPP0])[k1ne ];
- f1_NE = (D.f[dMM0])[k1sw ];
- f1_NW = (D.f[dPM0])[k1se ];
- f1_SE = (D.f[dMP0])[k1nw ];
- f1_BW = (D.f[dP0P])[k1te ];
- f1_TE = (D.f[dM0M])[k1bw ];
- f1_TW = (D.f[dP0M])[k1be ];
- f1_BE = (D.f[dM0P])[k1tw ];
- f1_BS = (D.f[d0PP])[k1tn ];
- f1_TN = (D.f[d0MM])[k1bs ];
- f1_TS = (D.f[d0PM])[k1bn ];
- f1_BN = (D.f[d0MP])[k1ts ];
- f1_ZERO = (D.f[d000])[k1zero];
- f1_BSW = (D.f[dPPP])[k1tne ];
- f1_BNE = (D.f[dMMP])[k1tsw ];
- f1_BNW = (D.f[dPMP])[k1tse ];
- f1_BSE = (D.f[dMPP])[k1tnw ];
- f1_TSW = (D.f[dPPM])[k1bne ];
- f1_TNE = (D.f[dMMM])[k1bsw ];
- f1_TNW = (D.f[dPMM])[k1bse ];
- f1_TSE = (D.f[dMPM])[k1bnw ];
-
- //////////////////////////////////////////////////////////////////////////
- real drho1 = f1_ZERO+f1_E+f1_W+f1_N+f1_S+f1_T+f1_B+f1_NE+f1_SW+f1_SE+f1_NW+f1_TE+f1_BW+f1_BE+f1_TW+f1_TN+f1_BS+f1_BN+f1_TS+
- f1_TNE+f1_TSW+f1_TSE+f1_TNW+f1_BNE+f1_BSW+f1_BSE+f1_BNW;
-
- //drho1 = (drho1 + rhoBC[k])/2.f;
- drho1 = drho1 - rhoBC[k];
- //////////////////////////////////////////////////////////////////////////
-
- __syncthreads();
-
- (D.f[dP00])[ke ] = f1_W -c2o27*drho1; // c1o100; // zero; //
- (D.f[dM00])[kw ] = f1_E -c2o27*drho1; // c1o100; // zero; //
- (D.f[d0P0])[kn ] = f1_S -c2o27*drho1; // c1o100; // zero; //
- (D.f[d0M0])[ks ] = f1_N -c2o27*drho1; // c1o100; // zero; //
- (D.f[d00P])[kt ] = f1_B -c2o27*drho1; // c1o100; // zero; //
- (D.f[d00M])[kb ] = f1_T -c2o27*drho1; // c1o100; // zero; //
- (D.f[dPP0])[kne ] = f1_SW -c1o54*drho1; // c1o100; // zero; //
- (D.f[dMM0])[ksw ] = f1_NE -c1o54*drho1; // c1o100; // zero; //
- (D.f[dPM0])[kse ] = f1_NW -c1o54*drho1; // c1o100; // zero; //
- (D.f[dMP0])[knw ] = f1_SE -c1o54*drho1; // c1o100; // zero; //
- (D.f[dP0P])[kte ] = f1_BW -c1o54*drho1; // c1o100; // zero; //
- (D.f[dM0M])[kbw ] = f1_TE -c1o54*drho1; // c1o100; // zero; //
- (D.f[dP0M])[kbe ] = f1_TW -c1o54*drho1; // c1o100; // zero; //
- (D.f[dM0P])[ktw ] = f1_BE -c1o54*drho1; // c1o100; // zero; //
- (D.f[d0PP])[ktn ] = f1_BS -c1o54*drho1; // c1o100; // zero; //
- (D.f[d0MM])[kbs ] = f1_TN -c1o54*drho1; // c1o100; // zero; //
- (D.f[d0PM])[kbn ] = f1_TS -c1o54*drho1; // c1o100; // zero; //
- (D.f[d0MP])[kts ] = f1_BN -c1o54*drho1; // c1o100; // zero; //
- (D.f[d000])[kzero] = f1_ZERO-c8o27*drho1; // c1o100; // zero; //
- (D.f[dPPP])[ktne ] = f1_BSW -c1o216*drho1; // c1o100; // zero; //
- (D.f[dMMP])[ktsw ] = f1_BNE -c1o216*drho1; // c1o100; // zero; //
- (D.f[dPMP])[ktse ] = f1_BNW -c1o216*drho1; // c1o100; // zero; //
- (D.f[dMPP])[ktnw ] = f1_BSE -c1o216*drho1; // c1o100; // zero; //
- (D.f[dPPM])[kbne ] = f1_TSW -c1o216*drho1; // c1o100; // zero; //
- (D.f[dMMM])[kbsw ] = f1_TNE -c1o216*drho1; // c1o100; // zero; //
- (D.f[dPMM])[kbse ] = f1_TNW -c1o216*drho1; // c1o100; // zero; //
- (D.f[dMPM])[kbnw ] = f1_TSE -c1o216*drho1; // c1o100; // zero; //
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-__global__ void QPressDeviceEQZ27(
- real* rhoBC,
- real* DD,
- int* k_Q,
- int* k_N,
- real* kTestRE,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- //index1
- unsigned int K1QK = k_N[k];
- unsigned int k1zero= K1QK;
- unsigned int k1e = K1QK;
- unsigned int k1w = neighborX[K1QK];
- unsigned int k1n = K1QK;
- unsigned int k1s = neighborY[K1QK];
- unsigned int k1t = K1QK;
- unsigned int k1b = neighborZ[K1QK];
- unsigned int k1sw = neighborY[k1w];
- unsigned int k1ne = K1QK;
- unsigned int k1se = k1s;
- unsigned int k1nw = k1w;
- unsigned int k1bw = neighborZ[k1w];
- unsigned int k1te = K1QK;
- unsigned int k1be = k1b;
- unsigned int k1tw = k1w;
- unsigned int k1bs = neighborZ[k1s];
- unsigned int k1tn = K1QK;
- unsigned int k1bn = k1b;
- unsigned int k1ts = k1s;
- unsigned int k1tse = k1s;
- unsigned int k1bnw = k1bw;
- unsigned int k1tnw = k1w;
- unsigned int k1bse = k1bs;
- unsigned int k1tsw = k1sw;
- unsigned int k1bne = k1b;
- unsigned int k1tne = K1QK;
- unsigned int k1bsw = neighborZ[k1sw];
- ////////////////////////////////////////////////////////////////////////////////
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- // Distributions27 kDistTest;
- // kDistTest.f[dP00] = &kTestRE[dP00 * numberOfBCnodes];
- // kDistTest.f[dM00] = &kTestRE[dM00 * numberOfBCnodes];
- // kDistTest.f[d0P0] = &kTestRE[d0P0 * numberOfBCnodes];
- // kDistTest.f[d0M0] = &kTestRE[d0M0 * numberOfBCnodes];
- // kDistTest.f[d00P] = &kTestRE[d00P * numberOfBCnodes];
- // kDistTest.f[d00M] = &kTestRE[d00M * numberOfBCnodes];
- // kDistTest.f[dPP0] = &kTestRE[dPP0 * numberOfBCnodes];
- // kDistTest.f[dMM0] = &kTestRE[dMM0 * numberOfBCnodes];
- // kDistTest.f[dPM0] = &kTestRE[dPM0 * numberOfBCnodes];
- // kDistTest.f[dMP0] = &kTestRE[dMP0 * numberOfBCnodes];
- // kDistTest.f[dP0P] = &kTestRE[dP0P * numberOfBCnodes];
- // kDistTest.f[dM0M] = &kTestRE[dM0M * numberOfBCnodes];
- // kDistTest.f[dP0M] = &kTestRE[dP0M * numberOfBCnodes];
- // kDistTest.f[dM0P] = &kTestRE[dM0P * numberOfBCnodes];
- // kDistTest.f[d0PP] = &kTestRE[d0PP * numberOfBCnodes];
- // kDistTest.f[d0MM] = &kTestRE[d0MM * numberOfBCnodes];
- // kDistTest.f[d0PM] = &kTestRE[d0PM * numberOfBCnodes];
- // kDistTest.f[d0MP] = &kTestRE[d0MP * numberOfBCnodes];
- // kDistTest.f[d000] = &kTestRE[d000 * numberOfBCnodes];
- // kDistTest.f[dPPP] = &kTestRE[dPPP * numberOfBCnodes];
- // kDistTest.f[dMMP] = &kTestRE[dMMP * numberOfBCnodes];
- // kDistTest.f[dPMP] = &kTestRE[dPMP * numberOfBCnodes];
- // kDistTest.f[dMPP] = &kTestRE[dMPP * numberOfBCnodes];
- // kDistTest.f[dPPM] = &kTestRE[dPPM * numberOfBCnodes];
- // kDistTest.f[dMMM] = &kTestRE[dMMM * numberOfBCnodes];
- // kDistTest.f[dPMM] = &kTestRE[dPMM * numberOfBCnodes];
- // kDistTest.f[dMPM] = &kTestRE[dMPM * numberOfBCnodes];
- // ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- // //real f1_E,f1_W,f1_N,f1_S,f1_T,f1_B,f1_NE,f1_SW,f1_SE,f1_NW,f1_TE,f1_BW,f1_BE,f1_TW,f1_TN,f1_BS,f1_BN,f1_TS,f1_ZERO,f1_TNE,f1_TSW,f1_TSE,f1_TNW,f1_BNE,f1_BSW,f1_BSE,f1_BNW;
- // //f1_W = (D.f[dP00])[k1e ];
- // //f1_E = (D.f[dM00])[k1w ];
- // //f1_S = (D.f[d0P0])[k1n ];
- // //f1_N = (D.f[d0M0])[k1s ];
- // //f1_B = (D.f[d00P])[k1t ];
- // //f1_T = (D.f[d00M])[k1b ];
- // //f1_SW = (D.f[dPP0])[k1ne ];
- // //f1_NE = (D.f[dMM0])[k1sw ];
- // //f1_NW = (D.f[dPM0])[k1se ];
- // //f1_SE = (D.f[dMP0])[k1nw ];
- // //f1_BW = (D.f[dP0P])[k1te ];
- // //f1_TE = (D.f[dM0M])[k1bw ];
- // //f1_TW = (D.f[dP0M])[k1be ];
- // //f1_BE = (D.f[dM0P])[k1tw ];
- // //f1_BS = (D.f[d0PP])[k1tn ];
- // //f1_TN = (D.f[d0MM])[k1bs ];
- // //f1_TS = (D.f[d0PM])[k1bn ];
- // //f1_BN = (D.f[d0MP])[k1ts ];
- // //f1_ZERO = (D.f[d000])[k1zero];
- // //f1_BSW = (D.f[dPPP])[k1tne ];
- // //f1_BNE = (D.f[dMMP])[k1tsw ];
- // //f1_BNW = (D.f[dPMP])[k1tse ];
- // //f1_BSE = (D.f[dMPP])[k1tnw ];
- // //f1_TSW = (D.f[dPPM])[k1bne ];
- // //f1_TNE = (D.f[dMMM])[k1bsw ];
- // //f1_TNW = (D.f[dPMM])[k1bse ];
- // //f1_TSE = (D.f[dMPM])[k1bnw ];
- // ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- // //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- // real f1_E,f1_W,f1_N,f1_S,f1_T,f1_B,f1_NE,f1_SW,f1_SE,f1_NW,f1_TE,f1_BW,f1_BE,f1_TW,f1_TN,f1_BS,f1_BN,f1_TS,f1_ZERO,f1_TNE,f1_TSW,f1_TSE,f1_TNW,f1_BNE,f1_BSW,f1_BSE,f1_BNW;
- // f1_E = (D.f[dP00])[k1e ];
- // f1_W = (D.f[dM00])[k1w ];
- // f1_N = (D.f[d0P0])[k1n ];
- // f1_S = (D.f[d0M0])[k1s ];
- // f1_T = (D.f[d00P])[k1t ];
- // f1_B = (D.f[d00M])[k1b ];
- // f1_NE = (D.f[dPP0])[k1ne ];
- // f1_SW = (D.f[dMM0])[k1sw ];
- // f1_SE = (D.f[dPM0])[k1se ];
- // f1_NW = (D.f[dMP0])[k1nw ];
- // f1_TE = (D.f[dP0P])[k1te ];
- // f1_BW = (D.f[dM0M])[k1bw ];
- // f1_BE = (D.f[dP0M])[k1be ];
- // f1_TW = (D.f[dM0P])[k1tw ];
- // f1_TN = (D.f[d0PP])[k1tn ];
- // f1_BS = (D.f[d0MM])[k1bs ];
- // f1_BN = (D.f[d0PM])[k1bn ];
- // f1_TS = (D.f[d0MP])[k1ts ];
- // f1_ZERO = (D.f[d000])[k1zero];
- // f1_TNE = (D.f[dPPP])[k1tne ];
- // f1_TSW = (D.f[dMMP])[k1tsw ];
- // f1_TSE = (D.f[dPMP])[k1tse ];
- // f1_TNW = (D.f[dMPP])[k1tnw ];
- // f1_BNE = (D.f[dPPM])[k1bne ];
- // f1_BSW = (D.f[dMMM])[k1bsw ];
- // f1_BSE = (D.f[dPMM])[k1bse ];
- // f1_BNW = (D.f[dMPM])[k1bnw ];
- // //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- // //////////////////////////////////////////////////////////////////////////
- // real drho1 = f1_ZERO+f1_E+f1_W+f1_N+f1_S+f1_T+f1_B+f1_NE+f1_SW+f1_SE+f1_NW+f1_TE+f1_BW+f1_BE+f1_TW+f1_TN+f1_BS+f1_BN+f1_TS+ f1_TNE+f1_TSW+f1_TSE+f1_TNW+f1_BNE+f1_BSW+f1_BSE+f1_BNW;
- //real vx1 = (((f1_TNE-f1_BSW)+(f1_BSE-f1_TNW)+(f1_BNE-f1_TSW)+(f1_TSE-f1_BNW)) + (((f1_NE-f1_SW)+(f1_TE-f1_BW))+((f1_SE-f1_NW)+(f1_BE-f1_TW))) + (f1_E-f1_W)) / (one + drho1);
- //real vx2 = (((f1_TNE-f1_BSW)+(f1_TNW-f1_BSE)+(f1_BNE-f1_TSW)+(f1_BNW-f1_TSE)) + (((f1_NE-f1_SW)+(f1_TN-f1_BS))+((f1_BN-f1_TS)+(f1_NW-f1_SE))) + (f1_N-f1_S)) / (one + drho1);
- //real vx3 = (((f1_TNE-f1_BSW)+(f1_TNW-f1_BSE)+(f1_TSW-f1_BNE)+(f1_TSE-f1_BNW)) + (((f1_TE-f1_BW)+(f1_TN-f1_BS))+((f1_TW-f1_BE)+(f1_TS-f1_BN))) + (f1_T-f1_B)) / (one + drho1);
- // //////////////////////////////////////////////////////////////////////////
- ////real omega = om1;
- // real cusq = c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);
- // //////////////////////////////////////////////////////////////////////////
- ////T�st MK
- ////if(vx1 < zero) vx1 = zero;
- // //////////////////////////////////////////////////////////////////////////
- ////becomes higher with neighbor source and lower with local source
- // //real fZERO = c8over27* (rhoBC[k]-(one + rhoBC[k])*(cusq)) ;
- // //real fE = c2over27* (rhoBC[k]+(one + rhoBC[k])*(three*( vx1 )+c9over2*( vx1 )*( vx1 )-cusq));
- // //real fW = c2over27* (rhoBC[k]+(one + rhoBC[k])*(three*(-vx1 )+c9over2*(-vx1 )*(-vx1 )-cusq));
- // //real fN = c2over27* (rhoBC[k]+(one + rhoBC[k])*(three*( vx2 )+c9over2*( vx2 )*( vx2 )-cusq));
- // //real fS = c2over27* (rhoBC[k]+(one + rhoBC[k])*(three*( -vx2 )+c9over2*( -vx2 )*( -vx2 )-cusq));
- // //real fT = c2over27* (rhoBC[k]+(one + rhoBC[k])*(three*( vx3)+c9over2*( vx3)*( vx3)-cusq));
- // //real fB = c2over27* (rhoBC[k]+(one + rhoBC[k])*(three*( -vx3)+c9over2*( -vx3)*( -vx3)-cusq));
- // //real fNE = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*( vx1+vx2 )+c9over2*( vx1+vx2 )*( vx1+vx2 )-cusq));
- // //real fSW = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*(-vx1-vx2 )+c9over2*(-vx1-vx2 )*(-vx1-vx2 )-cusq));
- // //real fSE = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*( vx1-vx2 )+c9over2*( vx1-vx2 )*( vx1-vx2 )-cusq));
- // //real fNW = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*(-vx1+vx2 )+c9over2*(-vx1+vx2 )*(-vx1+vx2 )-cusq));
- // //real fTE = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*( vx1 +vx3)+c9over2*( vx1 +vx3)*( vx1 +vx3)-cusq));
- // //real fBW = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*(-vx1 -vx3)+c9over2*(-vx1 -vx3)*(-vx1 -vx3)-cusq));
- // //real fBE = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*( vx1 -vx3)+c9over2*( vx1 -vx3)*( vx1 -vx3)-cusq));
- // //real fTW = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*(-vx1 +vx3)+c9over2*(-vx1 +vx3)*(-vx1 +vx3)-cusq));
- // //real fTN = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*( vx2+vx3)+c9over2*( vx2+vx3)*( vx2+vx3)-cusq));
- // //real fBS = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*( -vx2-vx3)+c9over2*( -vx2-vx3)*( -vx2-vx3)-cusq));
- // //real fBN = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*( vx2-vx3)+c9over2*( vx2-vx3)*( vx2-vx3)-cusq));
- // //real fTS = c1over54* (rhoBC[k]+(one + rhoBC[k])*(three*( -vx2+vx3)+c9over2*( -vx2+vx3)*( -vx2+vx3)-cusq));
- // //real fTNE = c1over216* (rhoBC[k]+(one + rhoBC[k])*(three*( vx1+vx2+vx3)+c9over2*( vx1+vx2+vx3)*( vx1+vx2+vx3)-cusq));
- // //real fBSW = c1over216* (rhoBC[k]+(one + rhoBC[k])*(three*(-vx1-vx2-vx3)+c9over2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3)-cusq));
- // //real fBNE = c1over216* (rhoBC[k]+(one + rhoBC[k])*(three*( vx1+vx2-vx3)+c9over2*( vx1+vx2-vx3)*( vx1+vx2-vx3)-cusq));
- // //real fTSW = c1over216* (rhoBC[k]+(one + rhoBC[k])*(three*(-vx1-vx2+vx3)+c9over2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3)-cusq));
- // //real fTSE = c1over216* (rhoBC[k]+(one + rhoBC[k])*(three*( vx1-vx2+vx3)+c9over2*( vx1-vx2+vx3)*( vx1-vx2+vx3)-cusq));
- // //real fBNW = c1over216* (rhoBC[k]+(one + rhoBC[k])*(three*(-vx1+vx2-vx3)+c9over2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3)-cusq));
- // //real fBSE = c1over216* (rhoBC[k]+(one + rhoBC[k])*(three*( vx1-vx2-vx3)+c9over2*( vx1-vx2-vx3)*( vx1-vx2-vx3)-cusq));
- // //real fTNW = c1over216* (rhoBC[k]+(one + rhoBC[k])*(three*(-vx1+vx2+vx3)+c9over2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3)-cusq));
- // //////////////////////////////////////////////////////////////////////////
- //// based on VirtualFluids (kucher + fard)
- // real fZERO = c8over27 * rhoBC[k] * (one - cusq);
- // real fE = c2over27 * rhoBC[k] * (one + three * ( vx1 ) + c9over2 * ( vx1 ) * ( vx1 ) - cusq);
- // real fW = c2over27 * rhoBC[k] * (one + three * (-vx1 ) + c9over2 * (-vx1 ) * (-vx1 ) - cusq);
- // real fN = c2over27 * rhoBC[k] * (one + three * ( vx2 ) + c9over2 * ( vx2 ) * ( vx2 ) - cusq);
- // real fS = c2over27 * rhoBC[k] * (one + three * ( -vx2 ) + c9over2 * ( -vx2 ) * ( -vx2 ) - cusq);
- // real fT = c2over27 * rhoBC[k] * (one + three * ( vx3) + c9over2 * ( vx3) * ( vx3) - cusq);
- // real fB = c2over27 * rhoBC[k] * (one + three * ( -vx3) + c9over2 * ( -vx3) * ( -vx3) - cusq);
- // real fNE = c1over54 * rhoBC[k] * (one + three * ( vx1+vx2 ) + c9over2 * ( vx1+vx2 ) * ( vx1+vx2 ) - cusq);
- // real fSW = c1over54 * rhoBC[k] * (one + three * (-vx1-vx2 ) + c9over2 * (-vx1-vx2 ) * (-vx1-vx2 ) - cusq);
- // real fSE = c1over54 * rhoBC[k] * (one + three * ( vx1-vx2 ) + c9over2 * ( vx1-vx2 ) * ( vx1-vx2 ) - cusq);
- // real fNW = c1over54 * rhoBC[k] * (one + three * (-vx1+vx2 ) + c9over2 * (-vx1+vx2 ) * (-vx1+vx2 ) - cusq);
- // real fTE = c1over54 * rhoBC[k] * (one + three * ( vx1 +vx3) + c9over2 * ( vx1 +vx3) * ( vx1 +vx3) - cusq);
- // real fBW = c1over54 * rhoBC[k] * (one + three * (-vx1 -vx3) + c9over2 * (-vx1 -vx3) * (-vx1 -vx3) - cusq);
- // real fBE = c1over54 * rhoBC[k] * (one + three * ( vx1 -vx3) + c9over2 * ( vx1 -vx3) * ( vx1 -vx3) - cusq);
- // real fTW = c1over54 * rhoBC[k] * (one + three * (-vx1 +vx3) + c9over2 * (-vx1 +vx3) * (-vx1 +vx3) - cusq);
- // real fTN = c1over54 * rhoBC[k] * (one + three * ( vx2+vx3) + c9over2 * ( vx2+vx3) * ( vx2+vx3) - cusq);
- // real fBS = c1over54 * rhoBC[k] * (one + three * ( -vx2-vx3) + c9over2 * ( -vx2-vx3) * ( -vx2-vx3) - cusq);
- // real fBN = c1over54 * rhoBC[k] * (one + three * ( vx2-vx3) + c9over2 * ( vx2-vx3) * ( vx2-vx3) - cusq);
- // real fTS = c1over54 * rhoBC[k] * (one + three * ( -vx2+vx3) + c9over2 * ( -vx2+vx3) * ( -vx2+vx3) - cusq);
- // real fTNE = c1over216 * rhoBC[k] * (one + three * ( vx1+vx2+vx3) + c9over2 * ( vx1+vx2+vx3) * ( vx1+vx2+vx3) - cusq);
- // real fBSW = c1over216 * rhoBC[k] * (one + three * (-vx1-vx2-vx3) + c9over2 * (-vx1-vx2-vx3) * (-vx1-vx2-vx3) - cusq);
- // real fBNE = c1over216 * rhoBC[k] * (one + three * ( vx1+vx2-vx3) + c9over2 * ( vx1+vx2-vx3) * ( vx1+vx2-vx3) - cusq);
- // real fTSW = c1over216 * rhoBC[k] * (one + three * (-vx1-vx2+vx3) + c9over2 * (-vx1-vx2+vx3) * (-vx1-vx2+vx3) - cusq);
- // real fTSE = c1over216 * rhoBC[k] * (one + three * ( vx1-vx2+vx3) + c9over2 * ( vx1-vx2+vx3) * ( vx1-vx2+vx3) - cusq);
- // real fBNW = c1over216 * rhoBC[k] * (one + three * (-vx1+vx2-vx3) + c9over2 * (-vx1+vx2-vx3) * (-vx1+vx2-vx3) - cusq);
- // real fBSE = c1over216 * rhoBC[k] * (one + three * ( vx1-vx2-vx3) + c9over2 * ( vx1-vx2-vx3) * ( vx1-vx2-vx3) - cusq);
- // real fTNW = c1over216 * rhoBC[k] * (one + three * (-vx1+vx2+vx3) + c9over2 * (-vx1+vx2+vx3) * (-vx1+vx2+vx3) - cusq);
- //// ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //////test
- //// real fZERO = c8over27 * ((drho1 + rhoBC[k]) / two) * (one - cusq);
- //// real fE = c2over27 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx1 ) + c9over2 * ( vx1 ) * ( vx1 ) - cusq);
- //// real fW = c2over27 * ((drho1 + rhoBC[k]) / two) * (one + three * (-vx1 ) + c9over2 * (-vx1 ) * (-vx1 ) - cusq);
- //// real fN = c2over27 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx2 ) + c9over2 * ( vx2 ) * ( vx2 ) - cusq);
- //// real fS = c2over27 * ((drho1 + rhoBC[k]) / two) * (one + three * ( -vx2 ) + c9over2 * ( -vx2 ) * ( -vx2 ) - cusq);
- //// real fT = c2over27 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx3) + c9over2 * ( vx3) * ( vx3) - cusq);
- //// real fB = c2over27 * ((drho1 + rhoBC[k]) / two) * (one + three * ( -vx3) + c9over2 * ( -vx3) * ( -vx3) - cusq);
- //// real fNE = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx1+vx2 ) + c9over2 * ( vx1+vx2 ) * ( vx1+vx2 ) - cusq);
- //// real fSW = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * (-vx1-vx2 ) + c9over2 * (-vx1-vx2 ) * (-vx1-vx2 ) - cusq);
- //// real fSE = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx1-vx2 ) + c9over2 * ( vx1-vx2 ) * ( vx1-vx2 ) - cusq);
- //// real fNW = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * (-vx1+vx2 ) + c9over2 * (-vx1+vx2 ) * (-vx1+vx2 ) - cusq);
- //// real fTE = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx1 +vx3) + c9over2 * ( vx1 +vx3) * ( vx1 +vx3) - cusq);
- //// real fBW = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * (-vx1 -vx3) + c9over2 * (-vx1 -vx3) * (-vx1 -vx3) - cusq);
- //// real fBE = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx1 -vx3) + c9over2 * ( vx1 -vx3) * ( vx1 -vx3) - cusq);
- //// real fTW = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * (-vx1 +vx3) + c9over2 * (-vx1 +vx3) * (-vx1 +vx3) - cusq);
- //// real fTN = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx2+vx3) + c9over2 * ( vx2+vx3) * ( vx2+vx3) - cusq);
- //// real fBS = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * ( -vx2-vx3) + c9over2 * ( -vx2-vx3) * ( -vx2-vx3) - cusq);
- //// real fBN = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx2-vx3) + c9over2 * ( vx2-vx3) * ( vx2-vx3) - cusq);
- //// real fTS = c1over54 * ((drho1 + rhoBC[k]) / two) * (one + three * ( -vx2+vx3) + c9over2 * ( -vx2+vx3) * ( -vx2+vx3) - cusq);
- //// real fTNE = c1over216 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx1+vx2+vx3) + c9over2 * ( vx1+vx2+vx3) * ( vx1+vx2+vx3) - cusq);
- //// real fBSW = c1over216 * ((drho1 + rhoBC[k]) / two) * (one + three * (-vx1-vx2-vx3) + c9over2 * (-vx1-vx2-vx3) * (-vx1-vx2-vx3) - cusq);
- //// real fBNE = c1over216 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx1+vx2-vx3) + c9over2 * ( vx1+vx2-vx3) * ( vx1+vx2-vx3) - cusq);
- //// real fTSW = c1over216 * ((drho1 + rhoBC[k]) / two) * (one + three * (-vx1-vx2+vx3) + c9over2 * (-vx1-vx2+vx3) * (-vx1-vx2+vx3) - cusq);
- //// real fTSE = c1over216 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx1-vx2+vx3) + c9over2 * ( vx1-vx2+vx3) * ( vx1-vx2+vx3) - cusq);
- //// real fBNW = c1over216 * ((drho1 + rhoBC[k]) / two) * (one + three * (-vx1+vx2-vx3) + c9over2 * (-vx1+vx2-vx3) * (-vx1+vx2-vx3) - cusq);
- //// real fBSE = c1over216 * ((drho1 + rhoBC[k]) / two) * (one + three * ( vx1-vx2-vx3) + c9over2 * ( vx1-vx2-vx3) * ( vx1-vx2-vx3) - cusq);
- //// real fTNW = c1over216 * ((drho1 + rhoBC[k]) / two) * (one + three * (-vx1+vx2+vx3) + c9over2 * (-vx1+vx2+vx3) * (-vx1+vx2+vx3) - cusq);
-
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- // based on BGK Plus Comp
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //double mfabb = (D.f[dP00])[k1e ];
- //double mfcbb = (D.f[dM00])[k1w ];
- //double mfbab = (D.f[d0P0])[k1n ];
- //double mfbcb = (D.f[d0M0])[k1s ];
- //double mfbba = (D.f[d00P])[k1t ];
- //double mfbbc = (D.f[d00M])[k1b ];
- //double mfaab = (D.f[dPP0])[k1ne ];
- //double mfccb = (D.f[dMM0])[k1sw ];
- //double mfacb = (D.f[dPM0])[k1se ];
- //double mfcab = (D.f[dMP0])[k1nw ];
- //double mfaba = (D.f[dP0P])[k1te ];
- //double mfcbc = (D.f[dM0M])[k1bw ];
- //double mfabc = (D.f[dP0M])[k1be ];
- //double mfcba = (D.f[dM0P])[k1tw ];
- //double mfbaa = (D.f[d0PP])[k1tn ];
- //double mfbcc = (D.f[d0MM])[k1bs ];
- //double mfbac = (D.f[d0PM])[k1bn ];
- //double mfbca = (D.f[d0MP])[k1ts ];
- //double mfbbb = (D.f[d000])[k1zero];
- //double mfaaa = (D.f[dPPP])[k1tne ];
- //double mfcca = (D.f[dMMP])[k1tsw ];
- //double mfaca = (D.f[dPMP])[k1tse ];
- //double mfcaa = (D.f[dMPP])[k1tnw ];
- //double mfaac = (D.f[dPPM])[k1bne ];
- //double mfccc = (D.f[dMMM])[k1bsw ];
- //double mfacc = (D.f[dPMM])[k1bse ];
- //double mfcac = (D.f[dMPM])[k1bnw ];
- real mfabb = (D.f[dP00])[k1e ];
- real mfcbb = (D.f[dM00])[k1w ];
- real mfbab = (D.f[d0P0])[k1n ];
- real mfbcb = (D.f[d0M0])[k1s ];
- real mfbba = (D.f[d00P])[k1t ];
- real mfbbc = (D.f[d00M])[k1b ];
- real mfaab = (D.f[dPP0])[k1ne ];
- real mfccb = (D.f[dMM0])[k1sw ];
- real mfacb = (D.f[dPM0])[k1se ];
- real mfcab = (D.f[dMP0])[k1nw ];
- real mfaba = (D.f[dP0P])[k1te ];
- real mfcbc = (D.f[dM0M])[k1bw ];
- real mfabc = (D.f[dP0M])[k1be ];
- real mfcba = (D.f[dM0P])[k1tw ];
- real mfbaa = (D.f[d0PP])[k1tn ];
- real mfbcc = (D.f[d0MM])[k1bs ];
- real mfbac = (D.f[d0PM])[k1bn ];
- real mfbca = (D.f[d0MP])[k1ts ];
- real mfbbb = (D.f[d000])[k1zero];
- real mfaaa = (D.f[dPPP])[k1tne ];
- real mfcca = (D.f[dMMP])[k1tsw ];
- real mfaca = (D.f[dPMP])[k1tse ];
- real mfcaa = (D.f[dMPP])[k1tnw ];
- real mfaac = (D.f[dPPM])[k1bne ];
- real mfccc = (D.f[dMMM])[k1bsw ];
- real mfacc = (D.f[dPMM])[k1bse ];
- real mfcac = (D.f[dMPM])[k1bnw ];
-
- //real mfcbb = (D.f[dP00])[ke ];
- //real mfabb = (D.f[dM00])[kw ];
- //real mfbcb = (D.f[d0P0])[kn ];
- //real mfbab = (D.f[d0M0])[ks ];
- //real mfbbc = (D.f[d00P])[kt ];
- //real mfbba = (D.f[d00M])[kb ];
- //real mfccb = (D.f[dPP0])[kne ];
- //real mfaab = (D.f[dMM0])[ksw ];
- //real mfcab = (D.f[dPM0])[kse ];
- //real mfacb = (D.f[dMP0])[knw ];
- //real mfcbc = (D.f[dP0P])[kte ];
- //real mfaba = (D.f[dM0M])[kbw ];
- //real mfcba = (D.f[dP0M])[kbe ];
- //real mfabc = (D.f[dM0P])[ktw ];
- //real mfbcc = (D.f[d0PP])[ktn ];
- //real mfbaa = (D.f[d0MM])[kbs ];
- //real mfbca = (D.f[d0PM])[kbn ];
- //real mfbac = (D.f[d0MP])[kts ];
- //real mfbbb = (D.f[d000])[kzero];
- //real mfccc = (D.f[dPPP])[ktne ];
- //real mfaac = (D.f[dMMP])[ktsw ];
- //real mfcac = (D.f[dPMP])[ktse ];
- //real mfacc = (D.f[dMPP])[ktnw ];
- //real mfcca = (D.f[dPPM])[kbne ];
- //real mfaaa = (D.f[dMMM])[kbsw ];
- //real mfcaa = (D.f[dPMM])[kbse ];
- //real mfaca = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////////
- //real rho = (((((mfccc+mfaaa) + (mfaca+mfcac)) + ((mfacc+mfcaa) + (mfaac+mfcca))) +
- // (((mfbac+mfbca) + (mfbaa+mfbcc)) + ((mfabc+mfcba) + (mfaba+mfcbc)) + ((mfacb+mfcab) + (mfaab+mfccb))) +
- // ((mfabb+mfcbb) + (mfbab+mfbcb)) + (mfbba+mfbbc)) + mfbbb) + one;//!!!!Achtung + one
- ////////////////////////////////////////////////////////////////////////////////////
- real rho = rhoBC[k];
- ////////////////////////////////////////////////////////////////////////////////////
- real OoRho = c1o1 / (rho * 1.5f);
- ////////////////////////////////////////////////////////////////////////////////////
- real vvx = ((((mfccc-mfaaa) + (mfcac-mfaca)) + ((mfcaa-mfacc) + (mfcca-mfaac))) +
- (((mfcba-mfabc) + (mfcbc-mfaba)) + ((mfcab-mfacb) + (mfccb-mfaab))) +
- (mfcbb-mfabb)) * OoRho;
- real vvy =((((mfccc-mfaaa) + (mfaca-mfcac)) + ((mfacc-mfcaa) + (mfcca-mfaac))) +
- (((mfbca-mfbac) + (mfbcc-mfbaa)) + ((mfacb-mfcab) + (mfccb-mfaab))) +
- (mfbcb-mfbab)) * OoRho;
- real vvz =((((mfccc-mfaaa) + (mfcac-mfaca)) + ((mfacc-mfcaa) + (mfaac-mfcca))) +
- (((mfbac-mfbca) + (mfbcc-mfbaa)) + ((mfabc-mfcba) + (mfcbc-mfaba))) +
- (mfbbc-mfbba)) * OoRho;
- /////////////////////////
- //Test Values
- //double vvx = 0.016;
- //double vvy = zero;
- //double vvz = zero;
- ////////////////////////////////////////////////////////////////////////////////////////
- ////round off error test
- //if(vvx!=zero){
- // (kDistTest.f[dP00])[k] = mfabb;
- // (kDistTest.f[dM00])[k] = mfcbb;
- // (kDistTest.f[d0P0])[k] = mfbab;
- // (kDistTest.f[d0M0])[k] = mfbcb;
- // (kDistTest.f[d00P])[k] = mfbba;
- // (kDistTest.f[d00M])[k] = mfbbc;
- // (kDistTest.f[dPP0])[k] = mfaab;
- // (kDistTest.f[dMM0])[k] = mfccb;
- // (kDistTest.f[dPM0])[k] = mfacb;
- // (kDistTest.f[dMP0])[k] = mfcab;
- // (kDistTest.f[dP0P])[k] = mfaba;
- // (kDistTest.f[dM0M])[k] = mfcbc;
- // (kDistTest.f[dP0M])[k] = mfabc;
- // (kDistTest.f[dM0P])[k] = mfcba;
- // (kDistTest.f[d0PP])[k] = mfbaa;
- // (kDistTest.f[d0MM])[k] = mfbcc;
- // (kDistTest.f[d0PM])[k] = mfbac;
- // (kDistTest.f[d0MP])[k] = mfbca;
- // (kDistTest.f[d000])[k] = KQK;
- // (kDistTest.f[dPPP])[k] = mfaaa;
- // (kDistTest.f[dMMP])[k] = mfcca;
- // (kDistTest.f[dPMP])[k] = mfaca;
- // (kDistTest.f[dMPP])[k] = mfcaa;
- // (kDistTest.f[dPPM])[k] = mfaac;
- // (kDistTest.f[dMMM])[k] = mfccc;
- // (kDistTest.f[dPMM])[k] = mfacc;
- // (kDistTest.f[dMPM])[k] = mfcac;
- //}else{
- // (kDistTest.f[dP00])[k] = zero;
- // (kDistTest.f[dM00])[k] = zero;
- // (kDistTest.f[d0P0])[k] = zero;
- // (kDistTest.f[d0M0])[k] = zero;
- // (kDistTest.f[d00P])[k] = zero;
- // (kDistTest.f[d00M])[k] = zero;
- // (kDistTest.f[dPP0])[k] = zero;
- // (kDistTest.f[dMM0])[k] = zero;
- // (kDistTest.f[dPM0])[k] = zero;
- // (kDistTest.f[dMP0])[k] = zero;
- // (kDistTest.f[dP0P])[k] = zero;
- // (kDistTest.f[dM0M])[k] = zero;
- // (kDistTest.f[dP0M])[k] = zero;
- // (kDistTest.f[dM0P])[k] = zero;
- // (kDistTest.f[d0PP])[k] = zero;
- // (kDistTest.f[d0MM])[k] = zero;
- // (kDistTest.f[d0PM])[k] = zero;
- // (kDistTest.f[d0MP])[k] = zero;
- // (kDistTest.f[d000])[k] = zero;
- // (kDistTest.f[dPPP])[k] = zero;
- // (kDistTest.f[dMMP])[k] = zero;
- // (kDistTest.f[dPMP])[k] = zero;
- // (kDistTest.f[dMPP])[k] = zero;
- // (kDistTest.f[dPPM])[k] = zero;
- // (kDistTest.f[dMMM])[k] = zero;
- // (kDistTest.f[dPMM])[k] = zero;
- // (kDistTest.f[dMPM])[k] = zero;
- //}
-
- //////////////////////////////////////////////////////////////////////////////////////
- //// first bad fix for negative x velocity
- ////if(vvx > zero) vvx = zero;
- //////////////////////////////////////////////////////////////////////////////////////
- ////// second bad fix for negative x velocity
- ////if(vvx > zero){
- //// vvx = -vvx;
- //// vvy = -vvy;
- //// vvz = -vvz;
- ////}
- ////////////////////////////////////////////////////////////////////////////////////
- double vx2 = vvx * vvx;
- double vy2 = vvy * vvy;
- double vz2 = vvz * vvz;
- //////////////////////////////////////////////////////////////////////////////////
- //original
- real XXb = -c2o3 + vx2;
- real XXc = -c1o2 * (XXb + c1o1 + vvx);
- real XXa = XXc + vvx;
- real YYb = -c2o3 + vy2;
- real YYc = -c1o2 * (YYb + c1o1 + vvy);
- real YYa = YYc + vvy;
- real ZZb = -c2o3 + vz2;
- real ZZc = -c1o2 * (ZZb + c1o1 + vvz);
- real ZZa = ZZc + vvz;
- //////////////////////////////////////////////////////////////////////////////////
- //unkonditioniert
- mfcbb = -(rhoBC[k] + c1o1) * XXc * YYb * ZZb - c2o27;
- mfabb = -(rhoBC[k] + c1o1) * XXa * YYb * ZZb - c2o27;
- mfbcb = -(rhoBC[k] + c1o1) * XXb * YYc * ZZb - c2o27;
- mfbab = -(rhoBC[k] + c1o1) * XXb * YYa * ZZb - c2o27;
- mfbbc = -(rhoBC[k] + c1o1) * XXb * YYb * ZZc - c2o27;
- mfbba = -(rhoBC[k] + c1o1) * XXb * YYb * ZZa - c2o27;
- mfccb = -(rhoBC[k] + c1o1) * XXc * YYc * ZZb - c1o54;
- mfaab = -(rhoBC[k] + c1o1) * XXa * YYa * ZZb - c1o54;
- mfcab = -(rhoBC[k] + c1o1) * XXc * YYa * ZZb - c1o54;
- mfacb = -(rhoBC[k] + c1o1) * XXa * YYc * ZZb - c1o54;
- mfcbc = -(rhoBC[k] + c1o1) * XXc * YYb * ZZc - c1o54;
- mfaba = -(rhoBC[k] + c1o1) * XXa * YYb * ZZa - c1o54;
- mfcba = -(rhoBC[k] + c1o1) * XXc * YYb * ZZa - c1o54;
- mfabc = -(rhoBC[k] + c1o1) * XXa * YYb * ZZc - c1o54;
- mfbcc = -(rhoBC[k] + c1o1) * XXb * YYc * ZZc - c1o54;
- mfbaa = -(rhoBC[k] + c1o1) * XXb * YYa * ZZa - c1o54;
- mfbca = -(rhoBC[k] + c1o1) * XXb * YYc * ZZa - c1o54;
- mfbac = -(rhoBC[k] + c1o1) * XXb * YYa * ZZc - c1o54;
- mfbbb = -(rhoBC[k] + c1o1) * XXb * YYb * ZZb - c8o27;
- mfccc = -(rhoBC[k] + c1o1) * XXc * YYc * ZZc - c1o216;
- mfaac = -(rhoBC[k] + c1o1) * XXa * YYa * ZZc - c1o216;
- mfcac = -(rhoBC[k] + c1o1) * XXc * YYa * ZZc - c1o216;
- mfacc = -(rhoBC[k] + c1o1) * XXa * YYc * ZZc - c1o216;
- mfcca = -(rhoBC[k] + c1o1) * XXc * YYc * ZZa - c1o216;
- mfaaa = -(rhoBC[k] + c1o1) * XXa * YYa * ZZa - c1o216;
- mfcaa = -(rhoBC[k] + c1o1) * XXc * YYa * ZZa - c1o216;
- mfaca = -(rhoBC[k] + c1o1) * XXa * YYc * ZZa - c1o216;
- //////////////////////////////////////////////////////////
- ////konditioniert
- //double OneOver216RhoPlusOne = c1over216*(rhoBC[k]+one);
- //double OnoOver216Rho = c1over216*rhoBC[k];
- //mfcbb = OnoOver216Rho*sixteen + OneOver216RhoPlusOne*twelve*(-(two*vy2) - two*vz2 + three*vy2*vz2 + vvx*(-two + three*vy2)*(-two + three*vz2) + vx2*(-two + three*vy2)*(-two + three*vz2));
- //mfabb = OnoOver216Rho*sixteen - OneOver216RhoPlusOne*twelve*(two*vy2 + two*vz2 - three*vy2*vz2 + vvx*(-two + three*vy2)*(-two + three*vz2) + vx2*(-four + six*vy2 + six*vz2 - nine*vy2*vz2));
- //mfbcb = four*(-(four*OneOver216RhoPlusOne) + four*OnoOver216Rho + OneOver216RhoPlusOne*(-two + three*vx2)*(one + three*vvy + three*vy2)*(-two + three*vz2));
- //mfbab = four*(four*OnoOver216Rho - OneOver216RhoPlusOne*three*(vvy*(-two + three*vx2)*(-two + three*vz2) - one*vx2*(one + three*vy2)*(-two + three*vz2) + two*(-(two*vy2) + vz2 + three*vy2*vz2)));
- //mfbbc = four*(-(four*OneOver216RhoPlusOne) + four*OnoOver216Rho + OneOver216RhoPlusOne*(-two + three*vx2)*(-two + three*vy2)*(one + three*vvz + three*vz2));
- //mfbba = four*(four*OnoOver216Rho - OneOver216RhoPlusOne*three*(vvz*(-two + three*vx2)*(-two + three*vy2) - one*vx2*(-two + three*vy2)*(one + three*vz2) + two*(vy2 - two*vz2 + three*vy2*vz2)));
- //mfccb = -(two*(-(OnoOver216Rho*two) + OneOver216RhoPlusOne*three*(-(two*vx2) - two*vy2 - six*vx2*vy2 + vz2 + three*vx2*vz2 + three*vy2*vz2 + nine*vx2*vy2*vz2 + vvy*(one + three*vx2)*(-two + three*vz2) + vvx*(one + three*vvy + three*vy2)*(-two + three*vz2))));
- //mfaab = -(two*(-(OnoOver216Rho*two) + OneOver216RhoPlusOne*three*(-(two*vx2) - two*vy2 - six*vx2*vy2 + vz2 + three*vx2*vz2 + three*vy2*vz2 + nine*vx2*vy2*vz2 - one*vvy*(one + three*vx2)*(-two + three*vz2) + vvx*(-one + three*vvy - three*vy2)*(-two + three*vz2))));
- //mfcab = two*(OnoOver216Rho*two + OneOver216RhoPlusOne*three*(two*vx2 + two*vy2 + six*vx2*vy2 - one*vz2 - three*vx2*vz2 - three*vy2*vz2 - nine*vx2*vy2*vz2 + vvy*(one + three*vx2)*(-two + three*vz2) + vvx*(-one + three*vvy - three*vy2)*(-two + three*vz2)));
- //mfacb = two*(OnoOver216Rho*two + OneOver216RhoPlusOne*three*(two*vx2 + two*vy2 + six*vx2*vy2 - one*vz2 - three*vx2*vz2 - three*vy2*vz2 - nine*vx2*vy2*vz2 - one*vvy*(one + three*vx2)*(-two + three*vz2) + vvx*(one + three*vvy + three*vy2)*(-two + three*vz2)));
- //mfcbc = -(two*(-(OnoOver216Rho*two) + OneOver216RhoPlusOne*three*(-(two*vx2) + vy2 + three*vx2*vy2 + vvz*(one + three*vx2)*(-two + three*vy2) - two*vz2 - six*vx2*vz2 + three*vy2*vz2 + nine*vx2*vy2*vz2 + vvx*(-two + three*vy2)*(one + three*vvz + three*vz2))));
- //mfaba = -(two*(-(OnoOver216Rho*two) + OneOver216RhoPlusOne*three*(-(two*vx2) + vy2 + three*vx2*vy2 - one*vvz*(one + three*vx2)*(-two + three*vy2) - two*vz2 - six*vx2*vz2 + three*vy2*vz2 + nine*vx2*vy2*vz2 + vvx*(-two + three*vy2)*(-one + three*vvz - three*vz2))));
- //mfcba = two*(OnoOver216Rho*two + OneOver216RhoPlusOne*three*(two*vx2 - one*vy2 - three*vx2*vy2 + vvz*(one + three*vx2)*(-two + three*vy2) + two*vz2 + six*vx2*vz2 - three*vy2*vz2 - nine*vx2*vy2*vz2 + vvx*(-two + three*vy2)*(-one + three*vvz - three*vz2)));
- //mfabc = two*(OnoOver216Rho*two + OneOver216RhoPlusOne*three*(two*vx2 - one*vy2 - three*vx2*vy2 - one*vvz*(one + three*vx2)*(-two + three*vy2) + two*vz2 + six*vx2*vz2 - three*vy2*vz2 - nine*vx2*vy2*vz2 + vvx*(-two + three*vy2)*(one + three*vvz + three*vz2)));
- //mfbcc = -(two*(-(OnoOver216Rho*two) + OneOver216RhoPlusOne*three*(vx2 - two*vy2 + three*vx2*vy2 + vvz*(-two + three*vx2)*(one + three*vy2) - two*vz2 + three*vx2*vz2 - six*vy2*vz2 + nine*vx2*vy2*vz2 + vvy*(-two + three*vx2)*(one + three*vvz + three*vz2))));
- //mfbaa = -(two*(-(OnoOver216Rho*two) + OneOver216RhoPlusOne*three*(vx2 - two*vy2 + three*vx2*vy2 - one*vvz*(-two + three*vx2)*(one + three*vy2) - two*vz2 + three*vx2*vz2 - six*vy2*vz2 + nine*vx2*vy2*vz2 + vvy*(-two + three*vx2)*(-one + three*vvz - three*vz2))));
- //mfbca = two*(OnoOver216Rho*two + OneOver216RhoPlusOne*three*(-(one*vx2) + two*vy2 - three*vx2*vy2 + vvz*(-two + three*vx2)*(one + three*vy2) + two*vz2 - three*vx2*vz2 + six*vy2*vz2 - nine*vx2*vy2*vz2 + vvy*(-two + three*vx2)*(-one + three*vvz - three*vz2)));
- //mfbac = two*(OnoOver216Rho*two + OneOver216RhoPlusOne*three*(-(one*vx2) + two*vy2 - three*vx2*vy2 - one*vvz*(-two + three*vx2)*(one + three*vy2) + two*vz2 - three*vx2*vz2 + six*vy2*vz2 - nine*vx2*vy2*vz2 + vvy*(-two + three*vx2)*(one + three*vvz + three*vz2)));
- //mfbbb = eight*(eight*OnoOver216Rho + OneOver216RhoPlusOne*three*(four*vy2 + four*vz2 - six*vy2*vz2 + vx2*(-two + three*vy2)*(-two + three*vz2)));
- //mfccc = OnoOver216Rho + OneOver216RhoPlusOne*three*(vvz + vx2 + three*vvz*vx2 + vy2 + three*vvz*vy2 + three*vx2*vy2 + nine*vvz*vx2*vy2 + vz2 + three*vx2*vz2 + three*vy2*vz2 + nine*vx2*vy2*vz2 + vvy*(one + three*vx2)*(one + three*vvz + three*vz2) + vvx*(one + three*vvy + three*vy2)*(one + three*vvz + three*vz2));
- //mfaac = OnoOver216Rho + OneOver216RhoPlusOne*three*(vvz + vx2 + three*vvz*vx2 + vy2 + three*vvz*vy2 + three*vx2*vy2 + nine*vvz*vx2*vy2 + vz2 + three*vx2*vz2 + three*vy2*vz2 + nine*vx2*vy2*vz2 - one*vvy*(one + three*vx2)*(one + three*vvz + three*vz2) + vvx*(-one + three*vvy - three*vy2)*(one + three*vvz + three*vz2));
- //mfcac = OnoOver216Rho + OneOver216RhoPlusOne*three*(vvz + vx2 + three*vvz*vx2 + vy2 + three*vvz*vy2 + three*vx2*vy2 + nine*vvz*vx2*vy2 + vz2 + three*vx2*vz2 + three*vy2*vz2 + nine*vx2*vy2*vz2 - one*vvy*(one + three*vx2)*(one + three*vvz + three*vz2) - one*vvx*(-one + three*vvy - three*vy2)*(one + three*vvz + three*vz2));
- //mfacc = OnoOver216Rho + OneOver216RhoPlusOne*three*(vvz + vx2 + three*vvz*vx2 + vy2 + three*vvz*vy2 + three*vx2*vy2 + nine*vvz*vx2*vy2 + vz2 + three*vx2*vz2 + three*vy2*vz2 + nine*vx2*vy2*vz2 + vvy*(one + three*vx2)*(one + three*vvz + three*vz2) - one*vvx*(one + three*vvy + three*vy2)*(one + three*vvz + three*vz2));
- //mfcca = OnoOver216Rho + OneOver216RhoPlusOne*three*(-(one*vvz) + vx2 - three*vvz*vx2 + vy2 - three*vvz*vy2 + three*vx2*vy2 - nine*vvz*vx2*vy2 + vz2 + three*vx2*vz2 + three*vy2*vz2 + nine*vx2*vy2*vz2 - one*vvy*(one + three*vx2)*(-one + three*vvz - three*vz2) - one*vvx*(one + three*vvy + three*vy2)*(-one + three*vvz - three*vz2));
- //mfaaa = OnoOver216Rho - OneOver216RhoPlusOne*three*(vvz - one*vx2 + three*vvz*vx2 - one*vy2 + three*vvz*vy2 - three*vx2*vy2 + nine*vvz*vx2*vy2 - one*vz2 - three*vx2*vz2 - three*vy2*vz2 - nine*vx2*vy2*vz2 - one*vvy*(one + three*vx2)*(-one + three*vvz - three*vz2) + vvx*(-one + three*vvy - three*vy2)*(-one + three*vvz - three*vz2));
- //mfcaa = OnoOver216Rho + OneOver216RhoPlusOne*three*(-(one*vvz) + vx2 - three*vvz*vx2 + vy2 - three*vvz*vy2 + three*vx2*vy2 - nine*vvz*vx2*vy2 + vz2 + three*vx2*vz2 + three*vy2*vz2 + nine*vx2*vy2*vz2 + vvy*(one + three*vx2)*(-one + three*vvz - three*vz2) + vvx*(-one + three*vvy - three*vy2)*(-one + three*vvz - three*vz2));
- //mfaca = OnoOver216Rho + OneOver216RhoPlusOne*three*(-(one*vvz) + vx2 - three*vvz*vx2 + vy2 - three*vvz*vy2 + three*vx2*vy2 - nine*vvz*vx2*vy2 + vz2 + three*vx2*vz2 + three*vy2*vz2 + nine*vx2*vy2*vz2 - one*vvy*(one + three*vx2)*(-one + three*vvz - three*vz2) + vvx*(one + three*vvy + three*vy2)*(-one + three*vvz - three*vz2));
-
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //if (isEvenTimestep==true)
- //{
- // D.f[dP00] = &DD[dP00 * size_Mat];
- // D.f[dM00] = &DD[dM00 * size_Mat];
- // D.f[d0P0] = &DD[d0P0 * size_Mat];
- // D.f[d0M0] = &DD[d0M0 * size_Mat];
- // D.f[d00P] = &DD[d00P * size_Mat];
- // D.f[d00M] = &DD[d00M * size_Mat];
- // D.f[dPP0] = &DD[dPP0 * size_Mat];
- // D.f[dMM0] = &DD[dMM0 * size_Mat];
- // D.f[dPM0] = &DD[dPM0 * size_Mat];
- // D.f[dMP0] = &DD[dMP0 * size_Mat];
- // D.f[dP0P] = &DD[dP0P * size_Mat];
- // D.f[dM0M] = &DD[dM0M * size_Mat];
- // D.f[dP0M] = &DD[dP0M * size_Mat];
- // D.f[dM0P] = &DD[dM0P * size_Mat];
- // D.f[d0PP] = &DD[d0PP * size_Mat];
- // D.f[d0MM] = &DD[d0MM * size_Mat];
- // D.f[d0PM] = &DD[d0PM * size_Mat];
- // D.f[d0MP] = &DD[d0MP * size_Mat];
- // D.f[d000] = &DD[d000 * size_Mat];
- // D.f[dPPP] = &DD[dPPP * size_Mat];
- // D.f[dMMP] = &DD[dMMP * size_Mat];
- // D.f[dPMP] = &DD[dPMP * size_Mat];
- // D.f[dMPP] = &DD[dMPP * size_Mat];
- // D.f[dPPM] = &DD[dPPM * size_Mat];
- // D.f[dMMM] = &DD[dMMM * size_Mat];
- // D.f[dPMM] = &DD[dPMM * size_Mat];
- // D.f[dMPM] = &DD[dMPM * size_Mat];
- //}
- //else
- //{
- // D.f[dM00] = &DD[dP00 * size_Mat];
- // D.f[dP00] = &DD[dM00 * size_Mat];
- // D.f[d0M0] = &DD[d0P0 * size_Mat];
- // D.f[d0P0] = &DD[d0M0 * size_Mat];
- // D.f[d00M] = &DD[d00P * size_Mat];
- // D.f[d00P] = &DD[d00M * size_Mat];
- // D.f[dMM0] = &DD[dPP0 * size_Mat];
- // D.f[dPP0] = &DD[dMM0 * size_Mat];
- // D.f[dMP0] = &DD[dPM0 * size_Mat];
- // D.f[dPM0] = &DD[dMP0 * size_Mat];
- // D.f[dM0M] = &DD[dP0P * size_Mat];
- // D.f[dP0P] = &DD[dM0M * size_Mat];
- // D.f[dM0P] = &DD[dP0M * size_Mat];
- // D.f[dP0M] = &DD[dM0P * size_Mat];
- // D.f[d0MM] = &DD[d0PP * size_Mat];
- // D.f[d0PP] = &DD[d0MM * size_Mat];
- // D.f[d0MP] = &DD[d0PM * size_Mat];
- // D.f[d0PM] = &DD[d0MP * size_Mat];
- // D.f[d000] = &DD[d000 * size_Mat];
- // D.f[dPPP] = &DD[dMMM * size_Mat];
- // D.f[dMMP] = &DD[dPPM * size_Mat];
- // D.f[dPMP] = &DD[dMPM * size_Mat];
- // D.f[dMPP] = &DD[dPMM * size_Mat];
- // D.f[dPPM] = &DD[dMMP * size_Mat];
- // D.f[dMMM] = &DD[dPPP * size_Mat];
- // D.f[dPMM] = &DD[dMPP * size_Mat];
- // D.f[dMPM] = &DD[dPMP * size_Mat];
- //}
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //__syncthreads();
-
- (D.f[dP00])[ke ] = mfabb;//mfcbb;
- (D.f[dM00])[kw ] = mfcbb;//mfabb;
- (D.f[d0P0])[kn ] = mfbab;//mfbcb;
- (D.f[d0M0])[ks ] = mfbcb;//mfbab;
- (D.f[d00P])[kt ] = mfbba;//mfbbc;
- (D.f[d00M])[kb ] = mfbbc;//mfbba;
- (D.f[dPP0])[kne ] = mfaab;//mfccb;
- (D.f[dMM0])[ksw ] = mfccb;//mfaab;
- (D.f[dPM0])[kse ] = mfacb;//mfcab;
- (D.f[dMP0])[knw ] = mfcab;//mfacb;
- (D.f[dP0P])[kte ] = mfaba;//mfcbc;
- (D.f[dM0M])[kbw ] = mfcbc;//mfaba;
- (D.f[dP0M])[kbe ] = mfabc;//mfcba;
- (D.f[dM0P])[ktw ] = mfcba;//mfabc;
- (D.f[d0PP])[ktn ] = mfbaa;//mfbcc;
- (D.f[d0MM])[kbs ] = mfbcc;//mfbaa;
- (D.f[d0PM])[kbn ] = mfbac;//mfbca;
- (D.f[d0MP])[kts ] = mfbca;//mfbac;
- (D.f[d000])[kzero] = mfbbb;//mfbbb;
- (D.f[dPPP])[ktne ] = mfaaa;//mfccc;
- (D.f[dMMP])[ktsw ] = mfcca;//mfaac;
- (D.f[dPMP])[ktse ] = mfaca;//mfcac;
- (D.f[dMPP])[ktnw ] = mfcaa;//mfacc;
- (D.f[dPPM])[kbne ] = mfaac;//mfcca;
- (D.f[dMMM])[kbsw ] = mfccc;//mfaaa;
- (D.f[dPMM])[kbse ] = mfacc;//mfcaa;
- (D.f[dMPM])[kbnw ] = mfcac;//mfaca;
- //(D.f[dP00])[ke ] = mfcbb;
- //(D.f[dM00])[kw ] = mfabb;
- //(D.f[d0P0])[kn ] = mfbcb;
- //(D.f[d0M0])[ks ] = mfbab;
- //(D.f[d00P])[kt ] = mfbbc;
- //(D.f[d00M])[kb ] = mfbba;
- //(D.f[dPP0])[kne ] = mfccb;
- //(D.f[dMM0])[ksw ] = mfaab;
- //(D.f[dPM0])[kse ] = mfcab;
- //(D.f[dMP0])[knw ] = mfacb;
- //(D.f[dP0P])[kte ] = mfcbc;
- //(D.f[dM0M])[kbw ] = mfaba;
- //(D.f[dP0M])[kbe ] = mfcba;
- //(D.f[dM0P])[ktw ] = mfabc;
- //(D.f[d0PP])[ktn ] = mfbcc;
- //(D.f[d0MM])[kbs ] = mfbaa;
- //(D.f[d0PM])[kbn ] = mfbca;
- //(D.f[d0MP])[kts ] = mfbac;
- //(D.f[d000])[kzero] = mfbbb;
- //(D.f[dPPP])[ktne ] = mfccc;
- //(D.f[dMMP])[ktsw ] = mfaac;
- //(D.f[dPMP])[ktse ] = mfcac;
- //(D.f[dMPP])[ktnw ] = mfacc;
- //(D.f[dPPM])[kbne ] = mfcca;
- //(D.f[dMMM])[kbsw ] = mfaaa;
- //(D.f[dPMM])[kbse ] = mfcaa;
- //(D.f[dMPM])[kbnw ] = mfaca;
-
- //(D.f[dP00])[ke ] = fE ; //f1_E ; //fW; //fE ;
- //(D.f[dM00])[kw ] = fW ; //f1_W ; //fE; //fW ;
- //(D.f[d0P0])[kn ] = fN ; //f1_N ; //fS; //fN ;
- //(D.f[d0M0])[ks ] = fS ; //f1_S ; //fN; //fS ;
- //(D.f[d00P])[kt ] = fT ; //f1_T ; //fB; //fT ;
- //(D.f[d00M])[kb ] = fB ; //f1_B ; //fT; //fB ;
- //(D.f[dPP0])[kne ] = fNE; //f1_NE; //fSW; //fNE;
- //(D.f[dMM0])[ksw ] = fSW; //f1_SW; //fNE; //fSW;
- //(D.f[dPM0])[kse ] = fSE; //f1_SE; //fNW; //fSE;
- //(D.f[dMP0])[knw ] = fNW; //f1_NW; //fSE; //fNW;
- //(D.f[dP0P])[kte ] = fTE; //f1_TE; //fBW; //fTE;
- //(D.f[dM0M])[kbw ] = fBW; //f1_BW; //fTE; //fBW;
- //(D.f[dP0M])[kbe ] = fBE; //f1_BE; //fTW; //fBE;
- //(D.f[dM0P])[ktw ] = fTW; //f1_TW; //fBE; //fTW;
- //(D.f[d0PP])[ktn ] = fTN; //f1_TN; //fBS; //fTN;
- //(D.f[d0MM])[kbs ] = fBS; //f1_BS; //fTN; //fBS;
- //(D.f[d0PM])[kbn ] = fBN; //f1_BN; //fTS; //fBN;
- //(D.f[d0MP])[kts ] = fTS; //f1_TS; //fBN; //fTS;
- //(D.f[d000])[kzero] = fZERO;//f1_ZERO; //fZERO; //fZERO;
- //(D.f[dPPP])[ktne ] = fTNE; //f1_TNE; //fBSW; //fTNE;
- //(D.f[dMMM])[kbsw ] = fBSW; //f1_BSW; //fTNE; //fBSW;
- //(D.f[dPPM])[kbne ] = fBNE; //f1_BNE; //fTSW; //fBNE;
- //(D.f[dMMP])[ktsw ] = fTSW; //f1_TSW; //fBNE; //fTSW;
- //(D.f[dPMP])[ktse ] = fTSE; //f1_TSE; //fBNW; //fTSE;
- //(D.f[dMPM])[kbnw ] = fBNW; //f1_BNW; //fTSE; //fBNW;
- //(D.f[dPMM])[kbse ] = fBSE; //f1_BSE; //fTNW; //fBSE;
- //(D.f[dMPP])[ktnw ] = fTNW; //f1_TNW; //fBSE; //fTNW;
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-__global__ void QPressDeviceZero27(
- real* DD,
- int* k_Q,
- unsigned int numberOfBCnodes,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- Distributions27 D;
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //__syncthreads();
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- (D.f[dP00])[ke ] =c0o1;
- (D.f[dM00])[kw ] =c0o1;
- (D.f[d0P0])[kn ] =c0o1;
- (D.f[d0M0])[ks ] =c0o1;
- (D.f[d00P])[kt ] =c0o1;
- (D.f[d00M])[kb ] =c0o1;
- (D.f[dPP0])[kne ] =c0o1;
- (D.f[dMM0])[ksw ] =c0o1;
- (D.f[dPM0])[kse ] =c0o1;
- (D.f[dMP0])[knw ] =c0o1;
- (D.f[dP0P])[kte ] =c0o1;
- (D.f[dM0M])[kbw ] =c0o1;
- (D.f[dP0M])[kbe ] =c0o1;
- (D.f[dM0P])[ktw ] =c0o1;
- (D.f[d0PP])[ktn ] =c0o1;
- (D.f[d0MM])[kbs ] =c0o1;
- (D.f[d0PM])[kbn ] =c0o1;
- (D.f[d0MP])[kts ] =c0o1;
- (D.f[d000])[kzero] =c0o1;
- (D.f[dPPP])[ktne ] =c0o1;
- (D.f[dMMP])[ktsw ] =c0o1;
- (D.f[dPMP])[ktse ] =c0o1;
- (D.f[dMPP])[ktnw ] =c0o1;
- (D.f[dPPM])[kbne ] =c0o1;
- (D.f[dMMM])[kbsw ] =c0o1;
- (D.f[dPMM])[kbse ] =c0o1;
- (D.f[dMPM])[kbnw ] =c0o1;
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-__global__ void QPressDeviceFake27(
- real* rhoBC,
- real* DD,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- //index1
- unsigned int K1QK = k_N[k];
- unsigned int k1zero= K1QK;
- unsigned int k1e = K1QK;
- unsigned int k1w = neighborX[K1QK];
- unsigned int k1n = K1QK;
- unsigned int k1s = neighborY[K1QK];
- unsigned int k1t = K1QK;
- unsigned int k1b = neighborZ[K1QK];
- unsigned int k1sw = neighborY[k1w];
- unsigned int k1ne = K1QK;
- unsigned int k1se = k1s;
- unsigned int k1nw = k1w;
- unsigned int k1bw = neighborZ[k1w];
- unsigned int k1te = K1QK;
- unsigned int k1be = k1b;
- unsigned int k1tw = k1w;
- unsigned int k1bs = neighborZ[k1s];
- unsigned int k1tn = K1QK;
- unsigned int k1bn = k1b;
- unsigned int k1ts = k1s;
- unsigned int k1tse = k1s;
- unsigned int k1bnw = k1bw;
- unsigned int k1tnw = k1w;
- unsigned int k1bse = k1bs;
- unsigned int k1tsw = k1sw;
- unsigned int k1bne = k1b;
- unsigned int k1tne = K1QK;
- unsigned int k1bsw = neighborZ[k1sw];
- ////////////////////////////////////////////////////////////////////////////////
- Distributions27 D;
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real f1_E,f1_W,f1_N,f1_S,f1_T,f1_B,f1_NE,f1_SW,f1_SE,f1_NW,f1_TE,f1_BW,f1_BE,f1_TW,f1_TN,f1_BS,f1_BN,f1_TS,f1_ZERO,
- f1_TNE,f1_TSW,f1_TSE,f1_TNW,f1_BNE,f1_BSW,f1_BSE,f1_BNW;
-
- f1_W = (D.f[dP00])[k1e ];
- f1_E = (D.f[dM00])[k1w ];
- f1_S = (D.f[d0P0])[k1n ];
- f1_N = (D.f[d0M0])[k1s ];
- f1_B = (D.f[d00P])[k1t ];
- f1_T = (D.f[d00M])[k1b ];
- f1_SW = (D.f[dPP0])[k1ne ];
- f1_NE = (D.f[dMM0])[k1sw ];
- f1_NW = (D.f[dPM0])[k1se ];
- f1_SE = (D.f[dMP0])[k1nw ];
- f1_BW = (D.f[dP0P])[k1te ];
- f1_TE = (D.f[dM0M])[k1bw ];
- f1_TW = (D.f[dP0M])[k1be ];
- f1_BE = (D.f[dM0P])[k1tw ];
- f1_BS = (D.f[d0PP])[k1tn ];
- f1_TN = (D.f[d0MM])[k1bs ];
- f1_TS = (D.f[d0PM])[k1bn ];
- f1_BN = (D.f[d0MP])[k1ts ];
- f1_ZERO = (D.f[d000])[k1zero];
- f1_BSW = (D.f[dPPP])[k1tne ];
- f1_BNE = (D.f[dMMP])[k1tsw ];
- f1_BNW = (D.f[dPMP])[k1tse ];
- f1_BSE = (D.f[dMPP])[k1tnw ];
- f1_TSW = (D.f[dPPM])[k1bne ];
- f1_TNE = (D.f[dMMM])[k1bsw ];
- f1_TNW = (D.f[dPMM])[k1bse ];
- f1_TSE = (D.f[dMPM])[k1bnw ];
-
- ////////////////////////////////////////////////////////////////////////////////
- real vx1, vx2, vx3;
- vx1 = ((f1_TSE - f1_BNW) - (f1_TNW - f1_BSE)) + ((f1_TNE - f1_BSW) - (f1_TSW - f1_BNE)) +
- ((f1_BE - f1_TW) + (f1_TE - f1_BW)) + ((f1_SE - f1_NW) + (f1_NE - f1_SW)) +
- (f1_E - f1_W);
-
-
- vx2 = (-(f1_TSE - f1_BNW) + (f1_TNW - f1_BSE)) + ((f1_TNE - f1_BSW) - (f1_TSW - f1_BNE)) +
- ((f1_BN - f1_TS) + (f1_TN - f1_BS)) + (-(f1_SE - f1_NW) + (f1_NE - f1_SW)) +
- (f1_N - f1_S);
-
- vx3 = ((f1_TSE - f1_BNW) + (f1_TNW - f1_BSE)) + ((f1_TNE - f1_BSW) + (f1_TSW - f1_BNE)) +
- (-(f1_BN - f1_TS) + (f1_TN - f1_BS)) + ((f1_TE - f1_BW) - (f1_BE - f1_TW)) +
- (f1_T - f1_B);
-
- real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);
- //////////////////////////////////////////////////////////////////////////
- real drho1 = f1_ZERO+f1_E+f1_W+f1_N+f1_S+f1_T+f1_B+f1_NE+f1_SW+f1_SE+f1_NW+f1_TE+f1_BW+f1_BE+f1_TW+f1_TN+f1_BS+f1_BN+f1_TS+
- f1_TNE+f1_TSW+f1_TSE+f1_TNW+f1_BNE+f1_BSW+f1_BSE+f1_BNW;
-
- //drho1 = (drho1 + rhoBC[k])/2.f;
- drho1 = drho1 - rhoBC[k];
-
- __syncthreads();
-
- (D.f[dP00])[ke ] = c2o27* (rhoBC[k]+c3o1*(-vx1 )+c9o2*(-vx1 )*(-vx1 )-cu_sq);
- (D.f[dM00])[kw ] = c2o27* (rhoBC[k]+c3o1*( vx1 )+c9o2*( vx1 )*( vx1 )-cu_sq);
- (D.f[d0P0])[kn ] = c2o27* (rhoBC[k]+c3o1*( -vx2 )+c9o2*( -vx2 )*( -vx2 )-cu_sq);
- (D.f[d0M0])[ks ] = c2o27* (rhoBC[k]+c3o1*( vx2 )+c9o2*( vx2 )*( vx2 )-cu_sq);
- (D.f[d00P])[kt ] = c2o27* (rhoBC[k]+c3o1*( -vx3)+c9o2*( -vx3)*( -vx3)-cu_sq);
- (D.f[d00M])[kb ] = c2o27* (rhoBC[k]+c3o1*( vx3)+c9o2*( vx3)*( vx3)-cu_sq);
- (D.f[dPP0])[kne ] = f1_SW -c1o54*drho1; // c1o100; // zero; //
- (D.f[dMM0])[ksw ] = f1_NE -c1o54*drho1; // c1o100; // zero; //
- (D.f[dPM0])[kse ] = f1_NW -c1o54*drho1; // c1o100; // zero; //
- (D.f[dMP0])[knw ] = f1_SE -c1o54*drho1; // c1o100; // zero; //
- (D.f[dP0P])[kte ] = f1_BW -c1o54*drho1; // c1o100; // zero; //
- (D.f[dM0M])[kbw ] = f1_TE -c1o54*drho1; // c1o100; // zero; //
- (D.f[dP0M])[kbe ] = f1_TW -c1o54*drho1; // c1o100; // zero; //
- (D.f[dM0P])[ktw ] = f1_BE -c1o54*drho1; // c1o100; // zero; //
- (D.f[d0PP])[ktn ] = f1_BS -c1o54*drho1; // c1o100; // zero; //
- (D.f[d0MM])[kbs ] = f1_TN -c1o54*drho1; // c1o100; // zero; //
- (D.f[d0PM])[kbn ] = f1_TS -c1o54*drho1; // c1o100; // zero; //
- (D.f[d0MP])[kts ] = f1_BN -c1o54*drho1; // c1o100; // zero; //
- (D.f[d000])[kzero] = f1_ZERO-c8o27*drho1; // c1o100; // zero; //
- (D.f[dPPP])[ktne ] = f1_BSW -c1o216*drho1; // c1o100; // zero; //
- (D.f[dMMP])[ktsw ] = f1_BNE -c1o216*drho1; // c1o100; // zero; //
- (D.f[dPMP])[ktse ] = f1_BNW -c1o216*drho1; // c1o100; // zero; //
- (D.f[dMPP])[ktnw ] = f1_BSE -c1o216*drho1; // c1o100; // zero; //
- (D.f[dPPM])[kbne ] = f1_TSW -c1o216*drho1; // c1o100; // zero; //
- (D.f[dMMM])[kbsw ] = f1_TNE -c1o216*drho1; // c1o100; // zero; //
- (D.f[dPMM])[kbse ] = f1_TNW -c1o216*drho1; // c1o100; // zero; //
- (D.f[dMPM])[kbnw ] = f1_TSE -c1o216*drho1; // c1o100; // zero; //
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////
-__global__ void QPressDevice27_IntBB(
- real* rho,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k < numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //real VeloX = vx[k];
- //real VeloY = vy[k];
- //real VeloZ = vz[k]; //(16.0*(u0*2.0)*bbx*bby*(grid_nx-bbx)*(grid_ny-bby))/(grid_nx*grid_nx*grid_ny*grid_ny)
- ////////////////////////////////////////////////////////////////////////////////
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
- f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
-
- f_W = (D.f[dP00])[ke ];
- f_E = (D.f[dM00])[kw ];
- f_S = (D.f[d0P0])[kn ];
- f_N = (D.f[d0M0])[ks ];
- f_B = (D.f[d00P])[kt ];
- f_T = (D.f[d00M])[kb ];
- f_SW = (D.f[dPP0])[kne ];
- f_NE = (D.f[dMM0])[ksw ];
- f_NW = (D.f[dPM0])[kse ];
- f_SE = (D.f[dMP0])[knw ];
- f_BW = (D.f[dP0P])[kte ];
- f_TE = (D.f[dM0M])[kbw ];
- f_TW = (D.f[dP0M])[kbe ];
- f_BE = (D.f[dM0P])[ktw ];
- f_BS = (D.f[d0PP])[ktn ];
- f_TN = (D.f[d0MM])[kbs ];
- f_TS = (D.f[d0PM])[kbn ];
- f_BN = (D.f[d0MP])[kts ];
- f_BSW = (D.f[dPPP])[ktne ];
- f_BNE = (D.f[dMMP])[ktsw ];
- f_BNW = (D.f[dPMP])[ktse ];
- f_BSE = (D.f[dMPP])[ktnw ];
- f_TSW = (D.f[dPPM])[kbne ];
- f_TNE = (D.f[dMMM])[kbsw ];
- f_TNW = (D.f[dPMM])[kbse ];
- f_TSE = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////
- real vx1, vx2, vx3, drho, feq, q;
- drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
-
- vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W))/(c1o1+drho);
-
-
- vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S))/(c1o1+drho);
-
- vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B))/(c1o1+drho);
-
- real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);
-
- //////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //Test
- //(D.f[d000])[k]=c1o10;
- real rhoDiff = drho - rho[k];
- real VeloX = vx1;
- real VeloY = vx2;
- real VeloZ = vx3;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c9o2*( vx1 )*( vx1 )-cu_sq);
- (D.f[dM00])[kw]=(c1o1-q)/(c1o1+q)*(f_E-f_W+(f_E+f_W-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_E+f_W)-c2o27*(rhoDiff + c6o1*( VeloX )))/(c1o1+q);
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c9o2*(-vx1 )*(-vx1 )-cu_sq);
- (D.f[dP00])[ke]=(c1o1-q)/(c1o1+q)*(f_W-f_E+(f_W+f_E-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_W+f_E)-c2o27*(rhoDiff + c6o1*(-VeloX )))/(c1o1+q);
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c9o2*( vx2 )*( vx2 )-cu_sq);
- (D.f[d0M0])[ks]=(c1o1-q)/(c1o1+q)*(f_N-f_S+(f_N+f_S-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_N+f_S)-c2o27*(rhoDiff + c6o1*( VeloY )))/(c1o1+q);
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c9o2*( -vx2 )*( -vx2 )-cu_sq);
- (D.f[d0P0])[kn]=(c1o1-q)/(c1o1+q)*(f_S-f_N+(f_S+f_N-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_S+f_N)-c2o27*(rhoDiff + c6o1*(-VeloY )))/(c1o1+q);
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c9o2*( vx3)*( vx3)-cu_sq);
- (D.f[d00M])[kb]=(c1o1-q)/(c1o1+q)*(f_T-f_B+(f_T+f_B-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_T+f_B)-c2o27*(rhoDiff + c6o1*( VeloZ )))/(c1o1+q);
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c9o2*( -vx3)*( -vx3)-cu_sq);
- (D.f[d00P])[kt]=(c1o1-q)/(c1o1+q)*(f_B-f_T+(f_B+f_T-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_B+f_T)-c2o27*(rhoDiff + c6o1*(-VeloZ )))/(c1o1+q);
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*( vx1+vx2 )*( vx1+vx2 )-cu_sq);
- (D.f[dMM0])[ksw]=(c1o1-q)/(c1o1+q)*(f_NE-f_SW+(f_NE+f_SW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_NE+f_SW)-c1o54*(rhoDiff + c6o1*(VeloX+VeloY)))/(c1o1+q);
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*(-vx1-vx2 )*(-vx1-vx2 )-cu_sq);
- (D.f[dPP0])[kne]=(c1o1-q)/(c1o1+q)*(f_SW-f_NE+(f_SW+f_NE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_SW+f_NE)-c1o54*(rhoDiff + c6o1*(-VeloX-VeloY)))/(c1o1+q);
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*( vx1-vx2 )*( vx1-vx2 )-cu_sq);
- (D.f[dMP0])[knw]=(c1o1-q)/(c1o1+q)*(f_SE-f_NW+(f_SE+f_NW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_SE+f_NW)-c1o54*(rhoDiff + c6o1*( VeloX-VeloY)))/(c1o1+q);
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*(-vx1+vx2 )*(-vx1+vx2 )-cu_sq);
- (D.f[dPM0])[kse]=(c1o1-q)/(c1o1+q)*(f_NW-f_SE+(f_NW+f_SE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_NW+f_SE)-c1o54*(rhoDiff + c6o1*(-VeloX+VeloY)))/(c1o1+q);
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*( vx1 +vx3)*( vx1 +vx3)-cu_sq);
- (D.f[dM0M])[kbw]=(c1o1-q)/(c1o1+q)*(f_TE-f_BW+(f_TE+f_BW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TE+f_BW)-c1o54*(rhoDiff + c6o1*( VeloX+VeloZ)))/(c1o1+q);
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*(-vx1 -vx3)*(-vx1 -vx3)-cu_sq);
- (D.f[dP0P])[kte]=(c1o1-q)/(c1o1+q)*(f_BW-f_TE+(f_BW+f_TE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BW+f_TE)-c1o54*(rhoDiff + c6o1*(-VeloX-VeloZ)))/(c1o1+q);
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*( vx1 -vx3)*( vx1 -vx3)-cu_sq);
- (D.f[dM0P])[ktw]=(c1o1-q)/(c1o1+q)*(f_BE-f_TW+(f_BE+f_TW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BE+f_TW)-c1o54*(rhoDiff + c6o1*( VeloX-VeloZ)))/(c1o1+q);
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*(-vx1 +vx3)*(-vx1 +vx3)-cu_sq);
- (D.f[dP0M])[kbe]=(c1o1-q)/(c1o1+q)*(f_TW-f_BE+(f_TW+f_BE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TW+f_BE)-c1o54*(rhoDiff + c6o1*(-VeloX+VeloZ)))/(c1o1+q);
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*( vx2+vx3)*( vx2+vx3)-cu_sq);
- (D.f[d0MM])[kbs]=(c1o1-q)/(c1o1+q)*(f_TN-f_BS+(f_TN+f_BS-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TN+f_BS)-c1o54*(rhoDiff + c6o1*( VeloY+VeloZ)))/(c1o1+q);
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*( -vx2-vx3)*( -vx2-vx3)-cu_sq);
- (D.f[d0PP])[ktn]=(c1o1-q)/(c1o1+q)*(f_BS-f_TN+(f_BS+f_TN-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BS+f_TN)-c1o54*(rhoDiff + c6o1*( -VeloY-VeloZ)))/(c1o1+q);
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*( vx2-vx3)*( vx2-vx3)-cu_sq);
- (D.f[d0MP])[kts]=(c1o1-q)/(c1o1+q)*(f_BN-f_TS+(f_BN+f_TS-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BN+f_TS)-c1o54*(rhoDiff + c6o1*( VeloY-VeloZ)))/(c1o1+q);
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c9o2*( -vx2+vx3)*( -vx2+vx3)-cu_sq);
- (D.f[d0PM])[kbn]=(c1o1-q)/(c1o1+q)*(f_TS-f_BN+(f_TS+f_BN-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TS+f_BN)-c1o54*(rhoDiff + c6o1*( -VeloY+VeloZ)))/(c1o1+q);
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3)-cu_sq);
- (D.f[dMMM])[kbsw]=(c1o1-q)/(c1o1+q)*(f_TNE-f_BSW+(f_TNE+f_BSW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TNE+f_BSW)-c1o216*(rhoDiff + c6o1*( VeloX+VeloY+VeloZ)))/(c1o1+q);
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3)-cu_sq);
- (D.f[dPPP])[ktne]=(c1o1-q)/(c1o1+q)*(f_BSW-f_TNE+(f_BSW+f_TNE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BSW+f_TNE)-c1o216*(rhoDiff + c6o1*(-VeloX-VeloY-VeloZ)))/(c1o1+q);
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3)-cu_sq);
- (D.f[dMMP])[ktsw]=(c1o1-q)/(c1o1+q)*(f_BNE-f_TSW+(f_BNE+f_TSW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BNE+f_TSW)-c1o216*(rhoDiff + c6o1*( VeloX+VeloY-VeloZ)))/(c1o1+q);
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3)-cu_sq);
- (D.f[dPPM])[kbne]=(c1o1-q)/(c1o1+q)*(f_TSW-f_BNE+(f_TSW+f_BNE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TSW+f_BNE)-c1o216*(rhoDiff + c6o1*(-VeloX-VeloY+VeloZ)))/(c1o1+q);
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3)-cu_sq);
- (D.f[dMPM])[kbnw]=(c1o1-q)/(c1o1+q)*(f_TSE-f_BNW+(f_TSE+f_BNW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TSE+f_BNW)-c1o216*(rhoDiff + c6o1*( VeloX-VeloY+VeloZ)))/(c1o1+q);
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3)-cu_sq);
- (D.f[dPMP])[ktse]=(c1o1-q)/(c1o1+q)*(f_BNW-f_TSE+(f_BNW+f_TSE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BNW+f_TSE)-c1o216*(rhoDiff + c6o1*(-VeloX+VeloY-VeloZ)))/(c1o1+q);
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3)-cu_sq);
- (D.f[dMPP])[ktnw]=(c1o1-q)/(c1o1+q)*(f_BSE-f_TNW+(f_BSE+f_TNW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BSE+f_TNW)-c1o216*(rhoDiff + c6o1*( VeloX-VeloY-VeloZ)))/(c1o1+q);
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3)-cu_sq);
- (D.f[dPMM])[kbse]=(c1o1-q)/(c1o1+q)*(f_TNW-f_BSE+(f_TNW+f_BSE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TNW+f_BSE)-c1o216*(rhoDiff + c6o1*(-VeloX+VeloY+VeloZ)))/(c1o1+q);
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
diff --git a/src/gpu/core/GPU/SchlafferBCs27.cu b/src/gpu/core/GPU/SchlafferBCs27.cu
deleted file mode 100644
index b031d25bd252b8405b75c0f07afe07a16ce93ee2..0000000000000000000000000000000000000000
--- a/src/gpu/core/GPU/SchlafferBCs27.cu
+++ /dev/null
@@ -1,590 +0,0 @@
-/* Device code */
-#include "LBM/LB.h"
-#include "lbm/constants/D3Q27.h"
-#include <basics/constants/NumericConstants.h>
-
-using namespace vf::basics::constant;
-using namespace vf::lbm::dir;
-
-// TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-__global__ void PressSchlaff27(real* rhoBC,
- real* DD,
- real* vx0,
- real* vy0,
- real* vz0,
- real* deltaVz0,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real f1_E,f1_W,f1_N,f1_S,f1_T,f1_B,f1_NE,f1_SW,f1_SE,f1_NW,f1_TE,f1_BW,f1_BE,f1_TW,f1_TN,f1_BS,f1_BN,f1_TS,f1_ZERO,f1_TNE,f1_TSW,f1_TSE,f1_TNW,f1_BNE,f1_BSW,f1_BSE,f1_BNW;
-
- f1_E = (D.f[dP00])[ke ];
- f1_W = (D.f[dM00])[kw ];
- f1_N = (D.f[d0P0])[kn ];
- f1_S = (D.f[d0M0])[ks ];
- f1_T = (D.f[d00P])[kt ];
- f1_B = (D.f[d00M])[kb ];
- f1_NE = (D.f[dPP0])[kne ];
- f1_SW = (D.f[dMM0])[ksw ];
- f1_SE = (D.f[dPM0])[kse ];
- f1_NW = (D.f[dMP0])[knw ];
- f1_TE = (D.f[dP0P])[kte ];
- f1_BW = (D.f[dM0M])[kbw ];
- f1_BE = (D.f[dP0M])[kbe ];
- f1_TW = (D.f[dM0P])[ktw ];
- f1_TN = (D.f[d0PP])[ktn ];
- f1_BS = (D.f[d0MM])[kbs ];
- f1_BN = (D.f[d0PM])[kbn ];
- f1_TS = (D.f[d0MP])[kts ];
- f1_ZERO = (D.f[d000])[kzero];
- f1_TNE = (D.f[dPPP])[ktne ];
- f1_TSW = (D.f[dMMP])[ktsw ];
- f1_TSE = (D.f[dPMP])[ktse ];
- f1_TNW = (D.f[dMPP])[ktnw ];
- f1_BNE = (D.f[dPPM])[kbne ];
- f1_BSW = (D.f[dMMM])[kbsw ];
- f1_BSE = (D.f[dPMM])[kbse ];
- f1_BNW = (D.f[dMPM])[kbnw ];
- //////////////////////////////////////////////////////////////////////////
- real cs = c1o1/sqrt(c3o1);
- real csp1 = cs + c1o1;
- real csp1Sq = (c1o1 + cs)*(c1o1 + cs);
- real relFac = c21o20; // 0.9...1.0
- //////////////////////////////////////////////////////////////////////////
- // For adaption:
- // Pressure limits with rho0 = 1:
- // 2.2e-10 ~ 0.94 dB
- // 6.2e-10 ~ 9.9 dB
- // 6.2e-9 ~ 29.9 dB
- // 2.0e-7 ~ 60.1 dB /Vel
- // 2.0e-5 ~ 100.1 dB /press
- const double dPlimit = c0p0000002;
- const double dRlimit = dPlimit * c3o1;// three = c1oCs2;
- const double uSlimit = dRlimit * c1o1;// one = c1oRho0;
- //////////////////////////////////////////////////////////////////////////
- real VX = vx0[k];
- real VY = vy0[k];
- real VZ = vz0[k];
- //////////////////////////////////////////////////////////////////////////
-
- real temp = c2o1*(f1_TNE + f1_TSE + f1_TSW + f1_TNW) + c2o1*(f1_TE + f1_TW + f1_TN + f1_TS) + f1_NE + f1_SW + f1_SE + f1_NW + c2o1*f1_T + f1_E + f1_W + f1_N + f1_S + f1_ZERO;
-
- real vs_z = relFac * (VZ+cs) * ( csp1 - sqrt(csp1Sq + c2o1*VZ - c2o1*temp) ); //old = relFac * cs * ( csp1 - sqrt(csp1Sq + two*VZ - two*temp) );
-
- // 3. Compute density of compensated velocity:
- real tempDeltaV = deltaVz0[k];
- real rholoc = temp - c1o1 * (VZ + tempDeltaV + vs_z);
-
- // 4. Compute density deviation:
- real drho = rholoc - rhoBC[k];
-
- // 5. Adapt Speed:
- real dv = tempDeltaV + vs_z;
-
- if( drho > dRlimit) {
- VZ += dv + uSlimit;
- tempDeltaV += uSlimit;
- }
- else if( drho < -dRlimit) {
- VZ += dv - uSlimit;
- tempDeltaV -= uSlimit;
- }
- else {
- VZ += dv + drho;
- tempDeltaV += drho;
- }
-
- //VZ = vz0[k] + vs_z;
- // 6. Set unknown distributions:
- f1_B = f1_T - c4o9 * VZ;
- f1_BW = f1_TE - c1o9 * (VX + VZ);
- f1_BE = f1_TW + c1o9 * (VX - VZ);
- f1_BS = f1_TN - c1o9 * (VY + VZ);
- f1_BN = f1_TS + c1o9 * (VY - VZ);
- f1_BSW = f1_TNE - c1o36 * (VX + VY + VZ);
- f1_BNW = f1_TSE - c1o36 * (VX - VY + VZ);
- f1_BNE = f1_TSW + c1o36 * (VX + VY - VZ);
- f1_BSE = f1_TNW + c1o36 * (VX - VY - VZ);
-
- deltaVz0[k] = tempDeltaV;
-
- (D.f[d00M])[kb ] = f1_B ;
- (D.f[dM0M])[kbw ] = f1_BW ;
- (D.f[dP0M])[kbe ] = f1_BE ;
- (D.f[d0MM])[kbs ] = f1_BS ;
- (D.f[d0PM])[kbn ] = f1_BN ;
- (D.f[dPPM])[kbne ] = f1_BNE ;
- (D.f[dMMM])[kbsw ] = f1_BSW ;
- (D.f[dPMM])[kbse ] = f1_BSE ;
- (D.f[dMPM])[kbnw ] = f1_BNW ;
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-// TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-__global__ void VelSchlaff27( int t,
- real* DD,
- real* vz0,
- real* deltaVz0,
- int* k_Q,
- int* k_N,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real f1_E,f1_W,f1_N,f1_S,f1_T,f1_B,f1_NE,f1_SW,f1_SE,f1_NW,f1_TE,f1_BW,f1_BE,f1_TW,f1_TN,f1_BS,f1_BN,f1_TS,f1_ZERO,
- f1_TNE,f1_TSW,f1_TSE,f1_TNW,f1_BNE,f1_BSW,f1_BSE,f1_BNW;
-
- f1_E = (D.f[dP00])[ke ];
- f1_W = (D.f[dM00])[kw ];
- f1_N = (D.f[d0P0])[kn ];
- f1_S = (D.f[d0M0])[ks ];
- f1_T = (D.f[d00P])[kt ];
- f1_B = (D.f[d00M])[kb ];
- f1_NE = (D.f[dPP0])[kne ];
- f1_SW = (D.f[dMM0])[ksw ];
- f1_SE = (D.f[dPM0])[kse ];
- f1_NW = (D.f[dMP0])[knw ];
- f1_TE = (D.f[dP0P])[kte ];
- f1_BW = (D.f[dM0M])[kbw ];
- f1_BE = (D.f[dP0M])[kbe ];
- f1_TW = (D.f[dM0P])[ktw ];
- f1_TN = (D.f[d0PP])[ktn ];
- f1_BS = (D.f[d0MM])[kbs ];
- f1_BN = (D.f[d0PM])[kbn ];
- f1_TS = (D.f[d0MP])[kts ];
- f1_ZERO = (D.f[d000])[kzero];
- f1_TNE = (D.f[dPPP])[ktne ];
- f1_TSW = (D.f[dMMP])[ktsw ];
- f1_TSE = (D.f[dPMP])[ktse ];
- f1_TNW = (D.f[dMPP])[ktnw ];
- f1_BNE = (D.f[dPPM])[kbne ];
- f1_BSW = (D.f[dMMM])[kbsw ];
- f1_BSE = (D.f[dPMM])[kbse ];
- f1_BNW = (D.f[dMPM])[kbnw ];
- //f1_W = (D.f[dP00])[ke ];
- //f1_E = (D.f[dM00])[kw ];
- //f1_S = (D.f[d0P0])[kn ];
- //f1_N = (D.f[d0M0])[ks ];
- //f1_B = (D.f[d00P])[kt ];
- //f1_T = (D.f[d00M])[kb ];
- //f1_SW = (D.f[dPP0])[kne ];
- //f1_NE = (D.f[dMM0])[ksw ];
- //f1_NW = (D.f[dPM0])[kse ];
- //f1_SE = (D.f[dMP0])[knw ];
- //f1_BW = (D.f[dP0P])[kte ];
- //f1_TE = (D.f[dM0M])[kbw ];
- //f1_TW = (D.f[dP0M])[kbe ];
- //f1_BE = (D.f[dM0P])[ktw ];
- //f1_BS = (D.f[d0PP])[ktn ];
- //f1_TN = (D.f[d0MM])[kbs ];
- //f1_TS = (D.f[d0PM])[kbn ];
- //f1_BN = (D.f[d0MP])[kts ];
- //f1_ZERO = (D.f[d000])[kzero];
- //f1_BSW = (D.f[dPPP])[ktne ];
- //f1_BNE = (D.f[dMMP])[ktsw ];
- //f1_BNW = (D.f[dPMP])[ktse ];
- //f1_BSE = (D.f[dMPP])[ktnw ];
- //f1_TSW = (D.f[dPPM])[kbne ];
- //f1_TNE = (D.f[dMMM])[kbsw ];
- //f1_TNW = (D.f[dPMM])[kbse ];
- //f1_TSE = (D.f[dMPM])[kbnw ];
- //////////////////////////////////////////////////////////////////////////
- real cs = c1o1/sqrt(c3o1);
- real csp1 = cs + c1o1;
- real csp1Sq = (c1o1 + cs)*(c1o1 + cs);
- real relFac = c19o20; // 0.9...1.0
- //////////////////////////////////////////////////////////////////////////
- // For adaption:
- // Pressure limits with rho0 = 1:
- // 2.2e-10 ~ 0.94 dB
- // 6.2e-10 ~ 9.9 dB
- // 6.2e-9 ~ 29.9 dB
- // 2.0e-7 ~ 60.1 dB /Vel
- // 2.0e-5 ~ 100.1 dB /press
- real uSlimit = c0p0000002;
- //////////////////////////////////////////////////////////////////////////
- real VX = c0o1;
- real VY = c0o1;
- real VZ = vz0[k];
- //////////////////////////////////////////////////////////////////////////
- real temp = f1_ZERO + f1_E + f1_W + f1_N + f1_S + f1_NE + f1_SW + f1_SE + f1_NW + c2o1*(f1_B + f1_BE + f1_BW + f1_BN + f1_BS + f1_BNE + f1_BSE + f1_BSW + f1_BNW);
- //real temp = f1_ZERO + f1_E + f1_W + f1_N + f1_S + f1_NE + f1_SW + f1_SE + f1_NW + two*(f1_T + f1_TE + f1_TW + f1_TN + f1_TS + f1_TNE + f1_TSE + f1_TSW + f1_TNW);
- ////real temp2= c1mcsSq + two*VZ - two*temp;
- real vs_z;
- //if (t < 5)
- //{
- // vs_z = zero;
- //}
- //else
- //{
- vs_z = relFac * (cs-VZ) * ( sqrt(csp1Sq - c2o1*VZ - c2o1*temp) - csp1 ); //old = relFac * cs * ( sqrt(csp1Sq - two*VZ - two*temp) - csp1 );
- //}
-
- // 3. Adapt Speed:
- real tempDeltaV = deltaVz0[k];
- real dv = tempDeltaV + vs_z;
-
- if( dv > uSlimit) {
- VZ += dv - uSlimit;
- tempDeltaV -= uSlimit;
- }
- else if( dv < -uSlimit) {
- VZ += dv + uSlimit;
- tempDeltaV += uSlimit;
- }
- else {
- tempDeltaV = -vs_z;
- }
-
- //VZ = vz0[k]+vs_z;
- // 4. Set unknown distributions:
- //f1_B = f1_T - c4o9 * VZ;
- //f1_BW = f1_TE - c1o9 * (VX + VZ);
- //f1_BE = f1_TW + c1o9 * (VX - VZ);
- //f1_BS = f1_TN - c1o9 * (VY + VZ);
- //f1_BN = f1_TS + c1o9 * (VY - VZ);
- //f1_BSW = f1_TNE - c1o36 * (VX + VY + VZ);
- //f1_BNW = f1_TSE - c1o36 * (VX - VY + VZ);
- //f1_BNE = f1_TSW + c1o36 * (VX + VY - VZ);
- //f1_BSE = f1_TNW + c1o36 * (VX - VY - VZ);
-
- f1_T = f1_B + c4o9 * VZ;
- f1_TE = f1_BW + c1o9 * (VX + VZ);
- f1_TW = f1_BE - c1o9 * (VX - VZ);
- f1_TN = f1_BS + c1o9 * (VY + VZ);
- f1_TS = f1_BN - c1o9 * (VY - VZ);
- f1_TNE = f1_BSW + c1o36 * (VX + VY + VZ);
- f1_TSE = f1_BNW + c1o36 * (VX - VY + VZ);
- f1_TSW = f1_BNE - c1o36 * (VX + VY - VZ);
- f1_TNW = f1_BSE - c1o36 * (VX - VY - VZ);
-
- deltaVz0[k] = tempDeltaV;
- (D.f[d00P])[kt ] = f1_T ;
- (D.f[dP0P])[kte ] = f1_TE ;
- (D.f[dM0P])[ktw ] = f1_TW ;
- (D.f[d0PP])[ktn ] = f1_TN ;
- (D.f[d0MP])[kts ] = f1_TS ;
- (D.f[dPPP])[ktne ] = f1_TNE;
- (D.f[dMMP])[ktsw ] = f1_TSW;
- (D.f[dPMP])[ktse ] = f1_TSE;
- (D.f[dMPP])[ktnw ] = f1_TNW;
-
- //(D.f[d00M])[kb ] = f1_B ;
- //(D.f[dM0M])[kbw ] = f1_BW ;
- //(D.f[dP0M])[kbe ] = f1_BE ;
- //(D.f[d0MM])[kbs ] = f1_BS ;
- //(D.f[d0PM])[kbn ] = f1_BN ;
- //(D.f[dPPM])[kbne ] = f1_BNE ;
- //(D.f[dMMM])[kbsw ] = f1_BSW ;
- //(D.f[dPMM])[kbse ] = f1_BSE ;
- //(D.f[dMPM])[kbnw ] = f1_BNW ;
-
-
- //(D.f[d00P])[kt ] = f1_B ;
- //(D.f[dP0P])[kte ] = f1_BW ;
- //(D.f[dM0P])[ktw ] = f1_BE ;
- //(D.f[d0PP])[ktn ] = f1_BS ;
- //(D.f[d0MP])[kts ] = f1_BN ;
- //(D.f[dPPP])[ktne ] = f1_BSW;
- //(D.f[dMMP])[ktsw ] = f1_BNE;
- //(D.f[dPMP])[ktse ] = f1_BNW;
- //(D.f[dMPP])[ktnw ] = f1_BSE;
-
- //(D.f[dP00])[ke ] = f1_W -c2over27*drho1;
- //(D.f[dM00])[kw ] = f1_E -c2over27*drho1;
- //(D.f[d0P0])[kn ] = f1_S -c2over27*drho1;
- //(D.f[d0M0])[ks ] = f1_N -c2over27*drho1;
- //(D.f[d00P])[kt ] = f1_B -c2over27*drho1;
- //(D.f[d00M])[kb ] = f1_T -c2over27*drho1;
- //(D.f[dPP0])[kne ] = f1_SW -c1over54*drho1;
- //(D.f[dMM0])[ksw ] = f1_NE -c1over54*drho1;
- //(D.f[dPM0])[kse ] = f1_NW -c1over54*drho1;
- //(D.f[dMP0])[knw ] = f1_SE -c1over54*drho1;
- //(D.f[dP0P])[kte ] = f1_BW -c1over54*drho1;
- //(D.f[dM0M])[kbw ] = f1_TE -c1over54*drho1;
- //(D.f[dP0M])[kbe ] = f1_TW -c1over54*drho1;
- //(D.f[dM0P])[ktw ] = f1_BE -c1over54*drho1;
- //(D.f[d0PP])[ktn ] = f1_BS -c1over54*drho1;
- //(D.f[d0MM])[kbs ] = f1_TN -c1over54*drho1;
- //(D.f[d0PM])[kbn ] = f1_TS -c1over54*drho1;
- //(D.f[d0MP])[kts ] = f1_BN -c1over54*drho1;
- //(D.f[d000])[kzero] = f1_ZERO-c8over27*drho1;
- //(D.f[dPPP])[ktne ] = f1_BSW -c1over216*drho1;
- //(D.f[dMMP])[ktsw ] = f1_BNE -c1over216*drho1;
- //(D.f[dPMP])[ktse ] = f1_BNW -c1over216*drho1;
- //(D.f[dMPP])[ktnw ] = f1_BSE -c1over216*drho1;
- //(D.f[dPPM])[kbne ] = f1_TSW -c1over216*drho1;
- //(D.f[dMMM])[kbsw ] = f1_TNE -c1over216*drho1;
- //(D.f[dPMM])[kbse ] = f1_TNW -c1over216*drho1;
- //(D.f[dMPM])[kbnw ] = f1_TSE -c1over216*drho1;
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
diff --git a/src/gpu/core/GPU/VelocityBCs27.cu b/src/gpu/core/GPU/VelocityBCs27.cu
deleted file mode 100644
index 437c19d81e513c70fbdddbb8e20819933d1c42d0..0000000000000000000000000000000000000000
--- a/src/gpu/core/GPU/VelocityBCs27.cu
+++ /dev/null
@@ -1,5446 +0,0 @@
-//=======================================================================================
-// ____ ____ __ ______ __________ __ __ __ __
-// \ \ | | | | | _ \ |___ ___| | | | | / \ | |
-// \ \ | | | | | |_) | | | | | | | / \ | |
-// \ \ | | | | | _ / | | | | | | / /\ \ | |
-// \ \ | | | | | | \ \ | | | \__/ | / ____ \ | |____
-// \ \ | | |__| |__| \__\ |__| \________/ /__/ \__\ |_______|
-// \ \ | | ________________________________________________________________
-// \ \ | | | ______________________________________________________________|
-// \ \| | | | __ __ __ __ ______ _______
-// \ | | |_____ | | | | | | | | | _ \ / _____)
-// \ | | _____| | | | | | | | | | | \ \ \_______
-// \ | | | | |_____ | \_/ | | | | |_/ / _____ |
-// \ _____| |__| |________| \_______/ |__| |______/ (_______/
-//
-// This file is part of VirtualFluids. VirtualFluids is free software: you can
-// redistribute it and/or modify it under the terms of the GNU General Public
-// License as published by the Free Software Foundation, either version 3 of
-// the License, or (at your option) any later version.
-//
-// VirtualFluids is distributed in the hope that it will be useful, but WITHOUT
-// ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
-// FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
-// for more details.
-//
-// You should have received a copy of the GNU General Public License along
-// with VirtualFluids (see COPYING.txt). If not, see <http://www.gnu.org/licenses/>.
-//
-//! \file VelocityBCs27.cu
-//! \ingroup GPU
-//! \author Martin Schoenherr, Anna Wellmann
-//======================================================================================
-#include "LBM/LB.h"
-#include "lbm/constants/D3Q27.h"
-#include "basics/constants/NumericConstants.h"
-#include "LBM/GPUHelperFunctions/KernelUtilities.h"
-
-using namespace vf::basics::constant;
-using namespace vf::lbm::dir;
-using namespace vf::gpu;
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QVelDeviceCompPlusSlip27(
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if (k < numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- real VeloX = vx[k];
- real VeloY = vy[k];
- real VeloZ = vz[k]; //(16.0*(u0*2.0)*bbx*bby*(grid_nx-bbx)*(grid_ny-bby))/(grid_nx*grid_nx*grid_ny*grid_ny)
- ////////////////////////////////////////////////////////////////////////////////
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero = KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
- f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
-
- f_W = (D.f[dP00])[ke];
- f_E = (D.f[dM00])[kw];
- f_S = (D.f[d0P0])[kn];
- f_N = (D.f[d0M0])[ks];
- f_B = (D.f[d00P])[kt];
- f_T = (D.f[d00M])[kb];
- f_SW = (D.f[dPP0])[kne];
- f_NE = (D.f[dMM0])[ksw];
- f_NW = (D.f[dPM0])[kse];
- f_SE = (D.f[dMP0])[knw];
- f_BW = (D.f[dP0P])[kte];
- f_TE = (D.f[dM0M])[kbw];
- f_TW = (D.f[dP0M])[kbe];
- f_BE = (D.f[dM0P])[ktw];
- f_BS = (D.f[d0PP])[ktn];
- f_TN = (D.f[d0MM])[kbs];
- f_TS = (D.f[d0PM])[kbn];
- f_BN = (D.f[d0MP])[kts];
- f_BSW = (D.f[dPPP])[ktne];
- f_BNE = (D.f[dMMP])[ktsw];
- f_BNW = (D.f[dPMP])[ktse];
- f_BSE = (D.f[dMPP])[ktnw];
- f_TSW = (D.f[dPPM])[kbne];
- f_TNE = (D.f[dMMM])[kbsw];
- f_TNW = (D.f[dPMM])[kbse];
- f_TSE = (D.f[dMPM])[kbnw];
- ////////////////////////////////////////////////////////////////////////////////
- real vx1, vx2, vx3, drho, feq, q;
- drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
-
- vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W)) / (c1o1 + drho);
-
-
- vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S)) / (c1o1 + drho);
-
- vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B)) / (c1o1 + drho);
-
- real cu_sq = c3o2*(vx1*vx1 + vx2*vx2 + vx3*vx3) * (c1o1 + drho);
-
- //////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep == false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //Test
- //(D.f[d000])[k]=c1o10;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- //ToDo anders Klammern
-
- /////To Slip Or Not To Slip?
- // We assume slip BC if |vec(V_BC)|=1. To avoid problems we take V_BC*V_BC>0.99 (c99o100)
- if (VeloX*VeloX + VeloY*VeloY + VeloZ*VeloZ > c99o100)
- {
- // vt=v-(n \dot v) *n
- // n=(VeloX,VeloY,VeloZ) a misuse of the velocity variable!
- real normalV = VeloX*vx1 + VeloY*vx2 + VeloZ*vx3;
- vx1 = vx1 - normalV*VeloX;
- vx2 = vx2 - normalV*VeloY;
- vx3 = vx3 - normalV*VeloZ;
- }
- ////////////////
-
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx1 )*/+c9o2*( vx1 )*( vx1 ) * (c1o1 + drho)-cu_sq);
- (D.f[dM00])[kw]=(c1o1-q)/(c1o1+q)*(f_E-f_W+(f_E+f_W-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_E+f_W)-c6o1*c2o27*( VeloX ))/(c1o1+q);// - c2over27 * drho;
- //(D.f[dM00])[kw]=zero;
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*(-vx1 )*/+c9o2*(-vx1 )*(-vx1 ) * (c1o1 + drho)-cu_sq);
- (D.f[dP00])[ke]=(c1o1-q)/(c1o1+q)*(f_W-f_E+(f_W+f_E-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_W+f_E)-c6o1*c2o27*(-VeloX ))/(c1o1+q);// - c2over27 * drho;
- //(D.f[dP00])[ke]=zero;
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx2 )*/+c9o2*( vx2 )*( vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[d0M0])[ks]=(c1o1-q)/(c1o1+q)*(f_N-f_S+(f_N+f_S-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_N+f_S)-c6o1*c2o27*( VeloY ))/(c1o1+q);// - c2over27 * drho;
- //(D.f[d0M0])[ks]=zero;
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx2 )*/+c9o2*( -vx2 )*( -vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[d0P0])[kn]=(c1o1-q)/(c1o1+q)*(f_S-f_N+(f_S+f_N-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_S+f_N)-c6o1*c2o27*(-VeloY ))/(c1o1+q);// - c2over27 * drho;
- //(D.f[d0P0])[kn]=zero;
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx3)*/+c9o2*( vx3)*( vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d00M])[kb]=(c1o1-q)/(c1o1+q)*(f_T-f_B+(f_T+f_B-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_T+f_B)-c6o1*c2o27*( VeloZ ))/(c1o1+q);// - c2over27 * drho;
- //(D.f[d00M])[kb]=one;
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx3)*/+c9o2*( -vx3)*( -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d00P])[kt]=(c1o1-q)/(c1o1+q)*(f_B-f_T+(f_B+f_T-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_B+f_T)-c6o1*c2o27*(-VeloZ ))/(c1o1+q);// - c2over27 * drho;
- //(D.f[d00P])[kt]=zero;
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1+vx2 )*/+c9o2*( vx1+vx2 )*( vx1+vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dMM0])[ksw]=(c1o1-q)/(c1o1+q)*(f_NE-f_SW+(f_NE+f_SW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_NE+f_SW)-c6o1*c1o54*(VeloX+VeloY))/(c1o1+q);// - c1over54 * drho;
- //(D.f[dMM0])[ksw]=zero;
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1-vx2 )*/+c9o2*(-vx1-vx2 )*(-vx1-vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dPP0])[kne]=(c1o1-q)/(c1o1+q)*(f_SW-f_NE+(f_SW+f_NE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_SW+f_NE)-c6o1*c1o54*(-VeloX-VeloY))/(c1o1+q);// - c1over54 * drho;
- //(D.f[dPP0])[kne]=zero;
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1-vx2 )*/+c9o2*( vx1-vx2 )*( vx1-vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dMP0])[knw]=(c1o1-q)/(c1o1+q)*(f_SE-f_NW+(f_SE+f_NW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_SE+f_NW)-c6o1*c1o54*( VeloX-VeloY))/(c1o1+q);// - c1over54 * drho;
- //(D.f[dMP0])[knw]=zero;
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1+vx2 )*/+c9o2*(-vx1+vx2 )*(-vx1+vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dPM0])[kse]=(c1o1-q)/(c1o1+q)*(f_NW-f_SE+(f_NW+f_SE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_NW+f_SE)-c6o1*c1o54*(-VeloX+VeloY))/(c1o1+q);// - c1over54 * drho;
- //(D.f[dPM0])[kse]=zero;
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 +vx3)*/+c9o2*( vx1 +vx3)*( vx1 +vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dM0M])[kbw]=(c1o1-q)/(c1o1+q)*(f_TE-f_BW+(f_TE+f_BW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TE+f_BW)-c6o1*c1o54*( VeloX+VeloZ))/(c1o1+q);// - c1over54 * drho;
- //(D.f[dM0M])[kbw]=zero;
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 -vx3)*/+c9o2*(-vx1 -vx3)*(-vx1 -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dP0P])[kte]=(c1o1-q)/(c1o1+q)*(f_BW-f_TE+(f_BW+f_TE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BW+f_TE)-c6o1*c1o54*(-VeloX-VeloZ))/(c1o1+q);// - c1over54 * drho;
- //(D.f[dP0P])[kte]=zero;
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 -vx3)*/+c9o2*( vx1 -vx3)*( vx1 -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dM0P])[ktw]=(c1o1-q)/(c1o1+q)*(f_BE-f_TW+(f_BE+f_TW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BE+f_TW)-c6o1*c1o54*( VeloX-VeloZ))/(c1o1+q);// - c1over54 * drho;
- //(D.f[dM0P])[ktw]=zero;
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 +vx3)*/+c9o2*(-vx1 +vx3)*(-vx1 +vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dP0M])[kbe]=(c1o1-q)/(c1o1+q)*(f_TW-f_BE+(f_TW+f_BE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TW+f_BE)-c6o1*c1o54*(-VeloX+VeloZ))/(c1o1+q);// - c1over54 * drho;
- //(D.f[dP0M])[kbe]=zero;
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2+vx3)*/+c9o2*( vx2+vx3)*( vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0MM])[kbs]=(c1o1-q)/(c1o1+q)*(f_TN-f_BS+(f_TN+f_BS-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TN+f_BS)-c6o1*c1o54*( VeloY+VeloZ))/(c1o1+q);// - c1over54 * drho;
- //(D.f[d0MM])[kbs]=zero;
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2-vx3)*/+c9o2*( -vx2-vx3)*( -vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0PP])[ktn]=(c1o1-q)/(c1o1+q)*(f_BS-f_TN+(f_BS+f_TN-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BS+f_TN)-c6o1*c1o54*( -VeloY-VeloZ))/(c1o1+q);// - c1over54 * drho;
- //(D.f[d0PP])[ktn]=zero;
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2-vx3)*/+c9o2*( vx2-vx3)*( vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0MP])[kts]=(c1o1-q)/(c1o1+q)*(f_BN-f_TS+(f_BN+f_TS-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BN+f_TS)-c6o1*c1o54*( VeloY-VeloZ))/(c1o1+q);// - c1over54 * drho;
- //(D.f[d0MP])[kts]=zero;
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2+vx3)*/+c9o2*( -vx2+vx3)*( -vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0PM])[kbn]=(c1o1-q)/(c1o1+q)*(f_TS-f_BN+(f_TS+f_BN-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TS+f_BN)-c6o1*c1o54*( -VeloY+VeloZ))/(c1o1+q);// - c1over54 * drho;
- //(D.f[d0PM])[kbn]=zero;
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2+vx3)*/+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMMM])[kbsw]=(c1o1-q)/(c1o1+q)*(f_TNE-f_BSW+(f_TNE+f_BSW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TNE+f_BSW)-c6o1*c1o216*( VeloX+VeloY+VeloZ))/(c1o1+q);// - c1over216 * drho;
- //(D.f[dMMM])[kbsw]=zero;
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2-vx3)*/+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPPP])[ktne]=(c1o1-q)/(c1o1+q)*(f_BSW-f_TNE+(f_BSW+f_TNE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BSW+f_TNE)-c6o1*c1o216*(-VeloX-VeloY-VeloZ))/(c1o1+q);// - c1over216 * drho;
- //(D.f[dPPP])[ktne]=zero;
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2-vx3)*/+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMMP])[ktsw]=(c1o1-q)/(c1o1+q)*(f_BNE-f_TSW+(f_BNE+f_TSW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BNE+f_TSW)-c6o1*c1o216*( VeloX+VeloY-VeloZ))/(c1o1+q);// - c1over216 * drho;
- //(D.f[dMMP])[ktsw]=zero;
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2+vx3)*/+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPPM])[kbne]=(c1o1-q)/(c1o1+q)*(f_TSW-f_BNE+(f_TSW+f_BNE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TSW+f_BNE)-c6o1*c1o216*(-VeloX-VeloY+VeloZ))/(c1o1+q);// - c1over216 * drho;
- //(D.f[dPPM])[kbne]=zero;
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2+vx3)*/+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMPM])[kbnw]=(c1o1-q)/(c1o1+q)*(f_TSE-f_BNW+(f_TSE+f_BNW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TSE+f_BNW)-c6o1*c1o216*( VeloX-VeloY+VeloZ))/(c1o1+q);// - c1over216 * drho;
- //(D.f[dMPM])[kbnw]=zero;
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2-vx3)*/+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPMP])[ktse]=(c1o1-q)/(c1o1+q)*(f_BNW-f_TSE+(f_BNW+f_TSE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BNW+f_TSE)-c6o1*c1o216*(-VeloX+VeloY-VeloZ))/(c1o1+q);// - c1over216 * drho;
- //(D.f[dPMP])[ktse]=zero;
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2-vx3)*/+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMPP])[ktnw]=(c1o1-q)/(c1o1+q)*(f_BSE-f_TNW+(f_BSE+f_TNW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BSE+f_TNW)-c6o1*c1o216*( VeloX-VeloY-VeloZ))/(c1o1+q);// - c1over216 * drho;
- //(D.f[dMPP])[ktnw]=zero;
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2+vx3)*/+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPMM])[kbse]=(c1o1-q)/(c1o1+q)*(f_TNW-f_BSE+(f_TNW+f_BSE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TNW+f_BSE)-c6o1*c1o216*(-VeloX+VeloY+VeloZ))/(c1o1+q);// - c1over216 * drho;
- //(D.f[dPMM])[kbse]=zero;
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-__global__ void QVeloDeviceEQ27(
- real* VeloX,
- real* VeloY,
- real* VeloZ,
- real* DD,
- int* k_Q,
- int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
-
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- // based on BGK Plus Comp
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real mfcbb = (D.f[dP00])[ke ];
- real mfabb = (D.f[dM00])[kw ];
- real mfbcb = (D.f[d0P0])[kn ];
- real mfbab = (D.f[d0M0])[ks ];
- real mfbbc = (D.f[d00P])[kt ];
- real mfbba = (D.f[d00M])[kb ];
- real mfccb = (D.f[dPP0])[kne ];
- real mfaab = (D.f[dMM0])[ksw ];
- real mfcab = (D.f[dPM0])[kse ];
- real mfacb = (D.f[dMP0])[knw ];
- real mfcbc = (D.f[dP0P])[kte ];
- real mfaba = (D.f[dM0M])[kbw ];
- real mfcba = (D.f[dP0M])[kbe ];
- real mfabc = (D.f[dM0P])[ktw ];
- real mfbcc = (D.f[d0PP])[ktn ];
- real mfbaa = (D.f[d0MM])[kbs ];
- real mfbca = (D.f[d0PM])[kbn ];
- real mfbac = (D.f[d0MP])[kts ];
- real mfbbb = (D.f[d000])[kzero];
- real mfccc = (D.f[dPPP])[ktne ];
- real mfaac = (D.f[dMMP])[ktsw ];
- real mfcac = (D.f[dPMP])[ktse ];
- real mfacc = (D.f[dMPP])[ktnw ];
- real mfcca = (D.f[dPPM])[kbne ];
- real mfaaa = (D.f[dMMM])[kbsw ];
- real mfcaa = (D.f[dPMM])[kbse ];
- real mfaca = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////////
- real rho = (mfccc+mfaaa + mfaca+mfcac + mfacc+mfcaa + mfaac+mfcca +
- mfbac+mfbca + mfbaa+mfbcc + mfabc+mfcba + mfaba+mfcbc + mfacb+mfcab + mfaab+mfccb +
- mfabb+mfcbb + mfbab+mfbcb + mfbba+mfbbc + mfbbb + c1o1);//!!!!Achtung + one
- ////////////////////////////////////////////////////////////////////////////////////
- real vvx = ((((mfccc-mfaaa) + (mfcac-mfaca)) + ((mfcaa-mfacc) + (mfcca-mfaac))) +
- (((mfcba-mfabc) + (mfcbc-mfaba)) + ((mfcab-mfacb) + (mfccb-mfaab))) +
- (mfcbb-mfabb)) / rho;
- real vvy =((((mfccc-mfaaa) + (mfaca-mfcac)) + ((mfacc-mfcaa) + (mfcca-mfaac))) +
- (((mfbca-mfbac) + (mfbcc-mfbaa)) + ((mfacb-mfcab) + (mfccb-mfaab))) +
- (mfbcb-mfbab)) / rho;
- real vvz =((((mfccc-mfaaa) + (mfcac-mfaca)) + ((mfacc-mfcaa) + (mfaac-mfcca))) +
- (((mfbac-mfbca) + (mfbcc-mfbaa)) + ((mfabc-mfcba) + (mfcbc-mfaba))) +
- (mfbbc-mfbba)) / rho;
- ////////////////////////////////////////////////////////////////////////////////////
- if(VeloX[k]!=c0o1) vvx = VeloX[k];
- if(VeloY[k]!=c0o1) vvy = VeloY[k];
- if(VeloZ[k]!=c0o1) vvz = VeloZ[k];
- ////////////////////////////////////////////////////////////////////////////////////
- real vx2 = vvx * vvx;
- real vy2 = vvy * vvy;
- real vz2 = vvz * vvz;
- ////////////////////////////////////////////////////////////////////////////////////
- real XXb = -c2o3 + vx2;
- real XXc = -c1o2 * (XXb + c1o1 + vvx);
- real XXa = XXc + vvx;
- real YYb = -c2o3 + vy2;
- real YYc = -c1o2 * (YYb + c1o1 + vvy);
- real YYa = YYc + vvy;
- real ZZb = -c2o3 + vz2;
- real ZZc = -c1o2 * (ZZb + c1o1 + vvz);
- real ZZa = ZZc + vvz;
- ////////////////////////////////////////////////////////////////////////////////////
- mfcbb = -rho * XXc * YYb * ZZb - c2o27 ;
- mfabb = -rho * XXa * YYb * ZZb - c2o27 ;
- mfbcb = -rho * XXb * YYc * ZZb - c2o27 ;
- mfbab = -rho * XXb * YYa * ZZb - c2o27 ;
- mfbbc = -rho * XXb * YYb * ZZc - c2o27 ;
- mfbba = -rho * XXb * YYb * ZZa - c2o27 ;
- mfccb = -rho * XXc * YYc * ZZb - c1o54 ;
- mfaab = -rho * XXa * YYa * ZZb - c1o54 ;
- mfcab = -rho * XXc * YYa * ZZb - c1o54 ;
- mfacb = -rho * XXa * YYc * ZZb - c1o54 ;
- mfcbc = -rho * XXc * YYb * ZZc - c1o54 ;
- mfaba = -rho * XXa * YYb * ZZa - c1o54 ;
- mfcba = -rho * XXc * YYb * ZZa - c1o54 ;
- mfabc = -rho * XXa * YYb * ZZc - c1o54 ;
- mfbcc = -rho * XXb * YYc * ZZc - c1o54 ;
- mfbaa = -rho * XXb * YYa * ZZa - c1o54 ;
- mfbca = -rho * XXb * YYc * ZZa - c1o54 ;
- mfbac = -rho * XXb * YYa * ZZc - c1o54 ;
- mfbbb = -rho * XXb * YYb * ZZb - c8o27 ;
- mfccc = -rho * XXc * YYc * ZZc - c1o216;
- mfaac = -rho * XXa * YYa * ZZc - c1o216;
- mfcac = -rho * XXc * YYa * ZZc - c1o216;
- mfacc = -rho * XXa * YYc * ZZc - c1o216;
- mfcca = -rho * XXc * YYc * ZZa - c1o216;
- mfaaa = -rho * XXa * YYa * ZZa - c1o216;
- mfcaa = -rho * XXc * YYa * ZZa - c1o216;
- mfaca = -rho * XXa * YYc * ZZa - c1o216;
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- (D.f[dP00])[ke ] = mfabb;//mfcbb;
- (D.f[dM00])[kw ] = mfcbb;//mfabb;
- (D.f[d0P0])[kn ] = mfbab;//mfbcb;
- (D.f[d0M0])[ks ] = mfbcb;//mfbab;
- (D.f[d00P])[kt ] = mfbba;//mfbbc;
- (D.f[d00M])[kb ] = mfbbc;//mfbba;
- (D.f[dPP0])[kne ] = mfaab;//mfccb;
- (D.f[dMM0])[ksw ] = mfccb;//mfaab;
- (D.f[dPM0])[kse ] = mfacb;//mfcab;
- (D.f[dMP0])[knw ] = mfcab;//mfacb;
- (D.f[dP0P])[kte ] = mfaba;//mfcbc;
- (D.f[dM0M])[kbw ] = mfcbc;//mfaba;
- (D.f[dP0M])[kbe ] = mfabc;//mfcba;
- (D.f[dM0P])[ktw ] = mfcba;//mfabc;
- (D.f[d0PP])[ktn ] = mfbaa;//mfbcc;
- (D.f[d0MM])[kbs ] = mfbcc;//mfbaa;
- (D.f[d0PM])[kbn ] = mfbac;//mfbca;
- (D.f[d0MP])[kts ] = mfbca;//mfbac;
- (D.f[d000])[kzero] = mfbbb;//mfbbb;
- (D.f[dPPP])[ktne ] = mfaaa;//mfccc;
- (D.f[dMMP])[ktsw ] = mfcca;//mfaac;
- (D.f[dPMP])[ktse ] = mfaca;//mfcac;
- (D.f[dMPP])[ktnw ] = mfcaa;//mfacc;
- (D.f[dPPM])[kbne ] = mfaac;//mfcca;
- (D.f[dMMM])[kbsw ] = mfccc;//mfaaa;
- (D.f[dPMM])[kbse ] = mfacc;//mfcaa;
- (D.f[dMPM])[kbnw ] = mfcac;//mfaca;
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QVelDeviceIncompHighNu27(
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- real VeloX = vx[k];
- real VeloY = vy[k];
- real VeloZ = vz[k]; //(16.0*(u0*2.0)*bbx*bby*(grid_nx-bbx)*(grid_ny-bby))/(grid_nx*grid_nx*grid_ny*grid_ny)
- ////////////////////////////////////////////////////////////////////////////////
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
- f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
-
- f_E = (D.f[dP00])[ke ];
- f_W = (D.f[dM00])[kw ];
- f_N = (D.f[d0P0])[kn ];
- f_S = (D.f[d0M0])[ks ];
- f_T = (D.f[d00P])[kt ];
- f_B = (D.f[d00M])[kb ];
- f_NE = (D.f[dPP0])[kne ];
- f_SW = (D.f[dMM0])[ksw ];
- f_SE = (D.f[dPM0])[kse ];
- f_NW = (D.f[dMP0])[knw ];
- f_TE = (D.f[dP0P])[kte ];
- f_BW = (D.f[dM0M])[kbw ];
- f_BE = (D.f[dP0M])[kbe ];
- f_TW = (D.f[dM0P])[ktw ];
- f_TN = (D.f[d0PP])[ktn ];
- f_BS = (D.f[d0MM])[kbs ];
- f_BN = (D.f[d0PM])[kbn ];
- f_TS = (D.f[d0MP])[kts ];
- f_TNE = (D.f[dPPP])[ktne ];
- f_TSW = (D.f[dMMP])[ktsw ];
- f_TSE = (D.f[dPMP])[ktse ];
- f_TNW = (D.f[dMPP])[ktnw ];
- f_BNE = (D.f[dPPM])[kbne ];
- f_BSW = (D.f[dMMM])[kbsw ];
- f_BSE = (D.f[dPMM])[kbse ];
- f_BNW = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////
- real vx1, vx2, vx3, drho, feq, q;
- drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
-
- vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W));// / (one + drho);
-
-
- vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S));// / (one + drho);
-
- vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B));// / (one + drho);
-
- real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);// * (one + drho);
-
- //////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //Test
- //(D.f[d000])[k]=c1o10;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- //ToDo anders Klammern
-
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx1 )*/+c9o2*( vx1 )*( vx1 ) /** (one + drho)*/-cu_sq);
- (D.f[dM00])[kw]=((c1o1 - q) * f_E + q * ((f_E + f_W) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloX )) / (q + c1o1) ;
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*(-vx1 )*/+c9o2*(-vx1 )*(-vx1 ) /** (one + drho)*/-cu_sq);
- (D.f[dP00])[ke]=((c1o1 - q) * f_W + q * ((f_W + f_E) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloX )) / (q + c1o1) ;
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx2 )*/+c9o2*( vx2 )*( vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[d0M0])[ks]=((c1o1 - q) * f_N + q * ((f_N + f_S) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloY )) / (q + c1o1) ;
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx2 )*/+c9o2*( -vx2 )*( -vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[d0P0])[kn]=((c1o1 - q) * f_S + q * ((f_S + f_N) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloY )) / (q + c1o1) ;
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx3)*/+c9o2*( vx3)*( vx3) /** (one + drho)*/-cu_sq);
- (D.f[d00M])[kb]=((c1o1 - q) * f_T + q * ((f_T + f_B) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloZ )) / (q + c1o1) ;
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx3)*/+c9o2*( -vx3)*( -vx3) /** (one + drho)*/-cu_sq);
- (D.f[d00P])[kt]=((c1o1 - q) * f_B + q * ((f_B + f_T) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloZ )) / (q + c1o1) ;
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1+vx2 )*/+c9o2*( vx1+vx2 )*( vx1+vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[dMM0])[ksw]=((c1o1 - q) * f_NE + q * ((f_NE + f_SW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX+VeloY)) / (q + c1o1) ;
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1-vx2 )*/+c9o2*(-vx1-vx2 )*(-vx1-vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[dPP0])[kne]=((c1o1 - q) * f_SW + q * ((f_SW + f_NE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX-VeloY)) / (q + c1o1) ;
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1-vx2 )*/+c9o2*( vx1-vx2 )*( vx1-vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[dMP0])[knw]=((c1o1 - q) * f_SE + q * ((f_SE + f_NW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX-VeloY)) / (q + c1o1) ;
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1+vx2 )*/+c9o2*(-vx1+vx2 )*(-vx1+vx2 ) /** (one + drho)*/-cu_sq);
- (D.f[dPM0])[kse]=((c1o1 - q) * f_NW + q * ((f_NW + f_SE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX+VeloY)) / (q + c1o1) ;
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 +vx3)*/+c9o2*( vx1 +vx3)*( vx1 +vx3) /** (one + drho)*/-cu_sq);
- (D.f[dM0M])[kbw]=((c1o1 - q) * f_TE + q * ((f_TE + f_BW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 -vx3)*/+c9o2*(-vx1 -vx3)*(-vx1 -vx3) /** (one + drho)*/-cu_sq);
- (D.f[dP0P])[kte]=((c1o1 - q) * f_BW + q * ((f_BW + f_TE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 -vx3)*/+c9o2*( vx1 -vx3)*( vx1 -vx3) /** (one + drho)*/-cu_sq);
- (D.f[dM0P])[ktw]=((c1o1 - q) * f_BE + q * ((f_BE + f_TW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 +vx3)*/+c9o2*(-vx1 +vx3)*(-vx1 +vx3) /** (one + drho)*/-cu_sq);
- (D.f[dP0M])[kbe]=((c1o1 - q) * f_TW + q * ((f_TW + f_BE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2+vx3)*/+c9o2*( vx2+vx3)*( vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[d0MM])[kbs]=((c1o1 - q) * f_TN + q * ((f_TN + f_BS) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloY+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2-vx3)*/+c9o2*( -vx2-vx3)*( -vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[d0PP])[ktn]=((c1o1 - q) * f_BS + q * ((f_BS + f_TN) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2-vx3)*/+c9o2*( vx2-vx3)*( vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[d0MP])[kts]=((c1o1 - q) * f_BN + q * ((f_BN + f_TS) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2+vx3)*/+c9o2*( -vx2+vx3)*( -vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[d0PM])[kbn]=((c1o1 - q) * f_TS + q * ((f_TS + f_BN) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloY+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2+vx3)*/+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[dMMM])[kbsw]=((c1o1 - q) * f_TNE + q * ((f_TNE + f_BSW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX+VeloY+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2-vx3)*/+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[dPPP])[ktne]=((c1o1 - q) * f_BSW + q * ((f_BSW + f_TNE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX-VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2-vx3)*/+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[dMMP])[ktsw]=((c1o1 - q) * f_BNE + q * ((f_BNE + f_TSW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX+VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2+vx3)*/+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[dPPM])[kbne]=((c1o1 - q) * f_TSW + q * ((f_TSW + f_BNE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX-VeloY+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2+vx3)*/+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[dMPM])[kbnw]=((c1o1 - q) * f_TSE + q * ((f_TSE + f_BNW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX-VeloY+VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2-vx3)*/+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[dPMP])[ktse]=((c1o1 - q) * f_BNW + q * ((f_BNW + f_TSE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX+VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2-vx3)*/+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3) /** (one + drho)*/-cu_sq);
- (D.f[dMPP])[ktnw]=((c1o1 - q) * f_BSE + q * ((f_BSE + f_TNW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX-VeloY-VeloZ)) / (q + c1o1) ;
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2+vx3)*/+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3) /** (one + drho)*/-cu_sq);
- (D.f[dPMM])[kbse]=((c1o1 - q) * f_TNW + q * ((f_TNW + f_BSE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX+VeloY+VeloZ)) / (q + c1o1) ;
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QVelDeviceCompHighNu27(
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- real VeloX = vx[k];
- real VeloY = vy[k];
- real VeloZ = vz[k]; //(16.0*(u0*2.0)*bbx*bby*(grid_nx-bbx)*(grid_ny-bby))/(grid_nx*grid_nx*grid_ny*grid_ny)
- ////////////////////////////////////////////////////////////////////////////////
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
- real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
- f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
-
- f_E = (D.f[dP00])[ke ];
- f_W = (D.f[dM00])[kw ];
- f_N = (D.f[d0P0])[kn ];
- f_S = (D.f[d0M0])[ks ];
- f_T = (D.f[d00P])[kt ];
- f_B = (D.f[d00M])[kb ];
- f_NE = (D.f[dPP0])[kne ];
- f_SW = (D.f[dMM0])[ksw ];
- f_SE = (D.f[dPM0])[kse ];
- f_NW = (D.f[dMP0])[knw ];
- f_TE = (D.f[dP0P])[kte ];
- f_BW = (D.f[dM0M])[kbw ];
- f_BE = (D.f[dP0M])[kbe ];
- f_TW = (D.f[dM0P])[ktw ];
- f_TN = (D.f[d0PP])[ktn ];
- f_BS = (D.f[d0MM])[kbs ];
- f_BN = (D.f[d0PM])[kbn ];
- f_TS = (D.f[d0MP])[kts ];
- f_TNE = (D.f[dPPP])[ktne ];
- f_TSW = (D.f[dMMP])[ktsw ];
- f_TSE = (D.f[dPMP])[ktse ];
- f_TNW = (D.f[dMPP])[ktnw ];
- f_BNE = (D.f[dPPM])[kbne ];
- f_BSW = (D.f[dMMM])[kbsw ];
- f_BSE = (D.f[dPMM])[kbse ];
- f_BNW = (D.f[dMPM])[kbnw ];
- //f_W = (D.f[dP00])[ke ];
- //f_E = (D.f[dM00])[kw ];
- //f_S = (D.f[d0P0])[kn ];
- //f_N = (D.f[d0M0])[ks ];
- //f_B = (D.f[d00P])[kt ];
- //f_T = (D.f[d00M])[kb ];
- //f_SW = (D.f[dPP0])[kne ];
- //f_NE = (D.f[dMM0])[ksw ];
- //f_NW = (D.f[dPM0])[kse ];
- //f_SE = (D.f[dMP0])[knw ];
- //f_BW = (D.f[dP0P])[kte ];
- //f_TE = (D.f[dM0M])[kbw ];
- //f_TW = (D.f[dP0M])[kbe ];
- //f_BE = (D.f[dM0P])[ktw ];
- //f_BS = (D.f[d0PP])[ktn ];
- //f_TN = (D.f[d0MM])[kbs ];
- //f_TS = (D.f[d0PM])[kbn ];
- //f_BN = (D.f[d0MP])[kts ];
- //f_BSW = (D.f[dPPP])[ktne ];
- //f_BNE = (D.f[dMMP])[ktsw ];
- //f_BNW = (D.f[dPMP])[ktse ];
- //f_BSE = (D.f[dMPP])[ktnw ];
- //f_TSW = (D.f[dPPM])[kbne ];
- //f_TNE = (D.f[dMMM])[kbsw ];
- //f_TNW = (D.f[dPMM])[kbse ];
- //f_TSE = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////
- real vx1, vx2, vx3, drho, feq, q;
- drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
-
- vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W)) / (c1o1 + drho);
-
-
- vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S)) / (c1o1 + drho);
-
- vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B)) / (c1o1 + drho);
-
- real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3) * (c1o1 + drho);
-
- //////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //Test
- //(D.f[d000])[k]=c1o10;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- //ToDo anders Klammern
-
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx1 )*/+c9o2*( vx1 )*( vx1 ) * (c1o1 + drho)-cu_sq);
- (D.f[dM00])[kw]=((c1o1 - q) * f_E + q * ((f_E + f_W) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloX )) / (q + c1o1) ;
- //(D.f[dM00])[kw]=(one-q)/(one+q)*(f_E-f_W+(f_E+f_W-two*feq*om1)/(one-om1))*c1o2+(q*(f_E+f_W)-six*c2over27*( VeloX ))/(one+q) - c2over27 * drho;
- //(D.f[dM00])[kw]=zero;
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*(-vx1 )*/+c9o2*(-vx1 )*(-vx1 ) * (c1o1 + drho)-cu_sq);
- (D.f[dP00])[ke]=((c1o1 - q) * f_W + q * ((f_W + f_E) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloX )) / (q + c1o1) ;
- //(D.f[dP00])[ke]=(one-q)/(one+q)*(f_W-f_E+(f_W+f_E-two*feq*om1)/(one-om1))*c1o2+(q*(f_W+f_E)-six*c2over27*(-VeloX ))/(one+q) - c2over27 * drho;
- //(D.f[dP00])[ke]=zero;
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx2 )*/+c9o2*( vx2 )*( vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[d0M0])[ks]=((c1o1 - q) * f_N + q * ((f_N + f_S) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloY )) / (q + c1o1) ;
- //(D.f[d0M0])[ks]=(one-q)/(one+q)*(f_N-f_S+(f_N+f_S-two*feq*om1)/(one-om1))*c1o2+(q*(f_N+f_S)-six*c2over27*( VeloY ))/(one+q) - c2over27 * drho;
- //(D.f[d0M0])[ks]=zero;
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx2 )*/+c9o2*( -vx2 )*( -vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[d0P0])[kn]=((c1o1 - q) * f_S + q * ((f_S + f_N) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloY )) / (q + c1o1) ;
- //(D.f[d0P0])[kn]=(one-q)/(one+q)*(f_S-f_N+(f_S+f_N-two*feq*om1)/(one-om1))*c1o2+(q*(f_S+f_N)-six*c2over27*(-VeloY ))/(one+q) - c2over27 * drho;
- //(D.f[d0P0])[kn]=zero;
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx3)*/+c9o2*( vx3)*( vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d00M])[kb]=((c1o1 - q) * f_T + q * ((f_T + f_B) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*( VeloZ )) / (q + c1o1) ;
- //(D.f[d00M])[kb]=(one-q)/(one+q)*(f_T-f_B+(f_T+f_B-two*feq*om1)/(one-om1))*c1o2+(q*(f_T+f_B)-six*c2over27*( VeloZ ))/(one+q) - c2over27 * drho;
- //(D.f[d00M])[kb]=one;
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx3)*/+c9o2*( -vx3)*( -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d00P])[kt]=((c1o1 - q) * f_B + q * ((f_B + f_T) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c2o27*(-VeloZ )) / (q + c1o1) ;
- //(D.f[d00P])[kt]=(one-q)/(one+q)*(f_B-f_T+(f_B+f_T-two*feq*om1)/(one-om1))*c1o2+(q*(f_B+f_T)-six*c2over27*(-VeloZ ))/(one+q) - c2over27 * drho;
- //(D.f[d00P])[kt]=zero;
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1+vx2 )*/+c9o2*( vx1+vx2 )*( vx1+vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dMM0])[ksw]=((c1o1 - q) * f_NE + q * ((f_NE + f_SW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX+VeloY)) / (q + c1o1) ;
- //(D.f[dMM0])[ksw]=(one-q)/(one+q)*(f_NE-f_SW+(f_NE+f_SW-two*feq*om1)/(one-om1))*c1o2+(q*(f_NE+f_SW)-six*c1over54*(VeloX+VeloY))/(one+q) - c1over54 * drho;
- //(D.f[dMM0])[ksw]=zero;
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1-vx2 )*/+c9o2*(-vx1-vx2 )*(-vx1-vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dPP0])[kne]=((c1o1 - q) * f_SW + q * ((f_SW + f_NE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX-VeloY)) / (q + c1o1) ;
- //(D.f[dPP0])[kne]=(one-q)/(one+q)*(f_SW-f_NE+(f_SW+f_NE-two*feq*om1)/(one-om1))*c1o2+(q*(f_SW+f_NE)-six*c1over54*(-VeloX-VeloY))/(one+q) - c1over54 * drho;
- //(D.f[dPP0])[kne]=zero;
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1-vx2 )*/+c9o2*( vx1-vx2 )*( vx1-vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dMP0])[knw]=((c1o1 - q) * f_SE + q * ((f_SE + f_NW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX-VeloY)) / (q + c1o1) ;
- //(D.f[dMP0])[knw]=(one-q)/(one+q)*(f_SE-f_NW+(f_SE+f_NW-two*feq*om1)/(one-om1))*c1o2+(q*(f_SE+f_NW)-six*c1over54*( VeloX-VeloY))/(one+q) - c1over54 * drho;
- //(D.f[dMP0])[knw]=zero;
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1+vx2 )*/+c9o2*(-vx1+vx2 )*(-vx1+vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dPM0])[kse]=((c1o1 - q) * f_NW + q * ((f_NW + f_SE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX+VeloY)) / (q + c1o1) ;
- //(D.f[dPM0])[kse]=(one-q)/(one+q)*(f_NW-f_SE+(f_NW+f_SE-two*feq*om1)/(one-om1))*c1o2+(q*(f_NW+f_SE)-six*c1over54*(-VeloX+VeloY))/(one+q) - c1over54 * drho;
- //(D.f[dPM0])[kse]=zero;
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 +vx3)*/+c9o2*( vx1 +vx3)*( vx1 +vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dM0M])[kbw]=((c1o1 - q) * f_TE + q * ((f_TE + f_BW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX+VeloZ)) / (q + c1o1) ;
- //(D.f[dM0M])[kbw]=(one-q)/(one+q)*(f_TE-f_BW+(f_TE+f_BW-two*feq*om1)/(one-om1))*c1o2+(q*(f_TE+f_BW)-six*c1over54*( VeloX+VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[dM0M])[kbw]=zero;
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 -vx3)*/+c9o2*(-vx1 -vx3)*(-vx1 -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dP0P])[kte]=((c1o1 - q) * f_BW + q * ((f_BW + f_TE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX-VeloZ)) / (q + c1o1) ;
- //(D.f[dP0P])[kte]=(one-q)/(one+q)*(f_BW-f_TE+(f_BW+f_TE-two*feq*om1)/(one-om1))*c1o2+(q*(f_BW+f_TE)-six*c1over54*(-VeloX-VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[dP0P])[kte]=zero;
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 -vx3)*/+c9o2*( vx1 -vx3)*( vx1 -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dM0P])[ktw]=((c1o1 - q) * f_BE + q * ((f_BE + f_TW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloX-VeloZ)) / (q + c1o1) ;
- //(D.f[dM0P])[ktw]=(one-q)/(one+q)*(f_BE-f_TW+(f_BE+f_TW-two*feq*om1)/(one-om1))*c1o2+(q*(f_BE+f_TW)-six*c1over54*( VeloX-VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[dM0P])[ktw]=zero;
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 +vx3)*/+c9o2*(-vx1 +vx3)*(-vx1 +vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dP0M])[kbe]=((c1o1 - q) * f_TW + q * ((f_TW + f_BE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloX+VeloZ)) / (q + c1o1) ;
- //(D.f[dP0M])[kbe]=(one-q)/(one+q)*(f_TW-f_BE+(f_TW+f_BE-two*feq*om1)/(one-om1))*c1o2+(q*(f_TW+f_BE)-six*c1over54*(-VeloX+VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[dP0M])[kbe]=zero;
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2+vx3)*/+c9o2*( vx2+vx3)*( vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0MM])[kbs]=((c1o1 - q) * f_TN + q * ((f_TN + f_BS) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[d0MM])[kbs]=(one-q)/(one+q)*(f_TN-f_BS+(f_TN+f_BS-two*feq*om1)/(one-om1))*c1o2+(q*(f_TN+f_BS)-six*c1over54*( VeloY+VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[d0MM])[kbs]=zero;
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2-vx3)*/+c9o2*( -vx2-vx3)*( -vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0PP])[ktn]=((c1o1 - q) * f_BS + q * ((f_BS + f_TN) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[d0PP])[ktn]=(one-q)/(one+q)*(f_BS-f_TN+(f_BS+f_TN-two*feq*om1)/(one-om1))*c1o2+(q*(f_BS+f_TN)-six*c1over54*( -VeloY-VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[d0PP])[ktn]=zero;
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2-vx3)*/+c9o2*( vx2-vx3)*( vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0MP])[kts]=((c1o1 - q) * f_BN + q * ((f_BN + f_TS) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*( VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[d0MP])[kts]=(one-q)/(one+q)*(f_BN-f_TS+(f_BN+f_TS-two*feq*om1)/(one-om1))*c1o2+(q*(f_BN+f_TS)-six*c1over54*( VeloY-VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[d0MP])[kts]=zero;
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2+vx3)*/+c9o2*( -vx2+vx3)*( -vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0PM])[kbn]=((c1o1 - q) * f_TS + q * ((f_TS + f_BN) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o54*(-VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[d0PM])[kbn]=(one-q)/(one+q)*(f_TS-f_BN+(f_TS+f_BN-two*feq*om1)/(one-om1))*c1o2+(q*(f_TS+f_BN)-six*c1over54*( -VeloY+VeloZ))/(one+q) - c1over54 * drho;
- //(D.f[d0PM])[kbn]=zero;
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2+vx3)*/+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMMM])[kbsw]=((c1o1 - q) * f_TNE + q * ((f_TNE + f_BSW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX+VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[dMMM])[kbsw]=(one-q)/(one+q)*(f_TNE-f_BSW+(f_TNE+f_BSW-two*feq*om1)/(one-om1))*c1o2+(q*(f_TNE+f_BSW)-six*c1over216*( VeloX+VeloY+VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dMMM])[kbsw]=zero;
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2-vx3)*/+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPPP])[ktne]=((c1o1 - q) * f_BSW + q * ((f_BSW + f_TNE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX-VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[dPPP])[ktne]=(one-q)/(one+q)*(f_BSW-f_TNE+(f_BSW+f_TNE-two*feq*om1)/(one-om1))*c1o2+(q*(f_BSW+f_TNE)-six*c1over216*(-VeloX-VeloY-VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dPPP])[ktne]=zero;
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2-vx3)*/+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMMP])[ktsw]=((c1o1 - q) * f_BNE + q * ((f_BNE + f_TSW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX+VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[dMMP])[ktsw]=(one-q)/(one+q)*(f_BNE-f_TSW+(f_BNE+f_TSW-two*feq*om1)/(one-om1))*c1o2+(q*(f_BNE+f_TSW)-six*c1over216*( VeloX+VeloY-VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dMMP])[ktsw]=zero;
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2+vx3)*/+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPPM])[kbne]=((c1o1 - q) * f_TSW + q * ((f_TSW + f_BNE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX-VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[dPPM])[kbne]=(one-q)/(one+q)*(f_TSW-f_BNE+(f_TSW+f_BNE-two*feq*om1)/(one-om1))*c1o2+(q*(f_TSW+f_BNE)-six*c1over216*(-VeloX-VeloY+VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dPPM])[kbne]=zero;
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2+vx3)*/+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMPM])[kbnw]=((c1o1 - q) * f_TSE + q * ((f_TSE + f_BNW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX-VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[dMPM])[kbnw]=(one-q)/(one+q)*(f_TSE-f_BNW+(f_TSE+f_BNW-two*feq*om1)/(one-om1))*c1o2+(q*(f_TSE+f_BNW)-six*c1over216*( VeloX-VeloY+VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dMPM])[kbnw]=zero;
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2-vx3)*/+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPMP])[ktse]=((c1o1 - q) * f_BNW + q * ((f_BNW + f_TSE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX+VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[dPMP])[ktse]=(one-q)/(one+q)*(f_BNW-f_TSE+(f_BNW+f_TSE-two*feq*om1)/(one-om1))*c1o2+(q*(f_BNW+f_TSE)-six*c1over216*(-VeloX+VeloY-VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dPMP])[ktse]=zero;
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2-vx3)*/+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMPP])[ktnw]=((c1o1 - q) * f_BSE + q * ((f_BSE + f_TNW) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*( VeloX-VeloY-VeloZ)) / (q + c1o1) ;
- //(D.f[dMPP])[ktnw]=(one-q)/(one+q)*(f_BSE-f_TNW+(f_BSE+f_TNW-two*feq*om1)/(one-om1))*c1o2+(q*(f_BSE+f_TNW)-six*c1over216*( VeloX-VeloY-VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dMPP])[ktnw]=zero;
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2+vx3)*/+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPMM])[kbse]=((c1o1 - q) * f_TNW + q * ((f_TNW + f_BSE) * (c1o1 - om1) + om1 * c2o1 * feq) - c6o1*c1o216*(-VeloX+VeloY+VeloZ)) / (q + c1o1) ;
- //(D.f[dPMM])[kbse]=(one-q)/(one+q)*(f_TNW-f_BSE+(f_TNW+f_BSE-two*feq*om1)/(one-om1))*c1o2+(q*(f_TNW+f_BSE)-six*c1over216*(-VeloX+VeloY+VeloZ))/(one+q) - c1over216 * drho;
- //(D.f[dPMM])[kbse]=zero;
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QVelDeviceCompZeroPress27(
- real* velocityX,
- real* velocityY,
- real* velocityZ,
- real* distribution,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- real omega,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- //////////////////////////////////////////////////////////////////////////
- //! The velocity boundary condition is executed in the following steps
- //!
- ////////////////////////////////////////////////////////////////////////////////
- //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
- //!
- const unsigned nodeIndex = getNodeIndex();
-
- //////////////////////////////////////////////////////////////////////////
- //! - Run for all indices in size of boundary condition (numberOfBCnodes)
- //!
- if(nodeIndex < numberOfBCnodes)
- {
-
- //////////////////////////////////////////////////////////////////////////
- //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
- //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
- //!
- Distributions27 dist;
- getPointersToDistributions(dist, distribution, numberOfLBnodes, isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local velocities
- //!
- real VeloX = velocityX[nodeIndex];
- real VeloY = velocityY[nodeIndex];
- real VeloZ = velocityZ[nodeIndex];
-
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local subgrid distances (q's)
- //!
- SubgridDistances27 subgridD;
- getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set neighbor indices (necessary for indirect addressing)
- //!
- unsigned int KQK = subgridDistanceIndices[nodeIndex];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local distributions
- //!
- real f_W = (dist.f[dP00])[ke ];
- real f_E = (dist.f[dM00])[kw ];
- real f_S = (dist.f[d0P0])[kn ];
- real f_N = (dist.f[d0M0])[ks ];
- real f_B = (dist.f[d00P])[kt ];
- real f_T = (dist.f[d00M])[kb ];
- real f_SW = (dist.f[dPP0])[kne ];
- real f_NE = (dist.f[dMM0])[ksw ];
- real f_NW = (dist.f[dPM0])[kse ];
- real f_SE = (dist.f[dMP0])[knw ];
- real f_BW = (dist.f[dP0P])[kte ];
- real f_TE = (dist.f[dM0M])[kbw ];
- real f_TW = (dist.f[dP0M])[kbe ];
- real f_BE = (dist.f[dM0P])[ktw ];
- real f_BS = (dist.f[d0PP])[ktn ];
- real f_TN = (dist.f[d0MM])[kbs ];
- real f_TS = (dist.f[d0PM])[kbn ];
- real f_BN = (dist.f[d0MP])[kts ];
- real f_BSW = (dist.f[dPPP])[ktne ];
- real f_BNE = (dist.f[dMMP])[ktsw ];
- real f_BNW = (dist.f[dPMP])[ktse ];
- real f_BSE = (dist.f[dMPP])[ktnw ];
- real f_TSW = (dist.f[dPPM])[kbne ];
- real f_TNE = (dist.f[dMMM])[kbsw ];
- real f_TNW = (dist.f[dPMM])[kbse ];
- real f_TSE = (dist.f[dMPM])[kbnw ];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Calculate macroscopic quantities
- //!
- real drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((dist.f[d000])[kzero]);
-
- real vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W)) / (c1o1 + drho);
-
-
- real vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S)) / (c1o1 + drho);
-
- real vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B)) / (c1o1 + drho);
-
- real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3) * (c1o1 + drho);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - change the pointer to write the results in the correct array
- //!
- getPointersToDistributions(dist, distribution, numberOfLBnodes, !isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Update distributions with subgrid distance (q) between zero and one
- real feq, q, velocityLB, velocityBC;
- q = (subgridD.q[dP00])[nodeIndex];
- if (q>=c0o1 && q<=c1o1) // only update distribution for q between zero and one
- {
- velocityLB = vx1;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = VeloX;
- (dist.f[dM00])[kw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_E, f_W, feq, omega, drho, velocityBC, c2o27);
- }
-
- q = (subgridD.q[dM00])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = -VeloX;
- (dist.f[dP00])[ke] = getInterpolatedDistributionForVeloWithPressureBC(q, f_W, f_E, feq, omega, drho, velocityBC, c2o27);
- }
-
- q = (subgridD.q[d0P0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = VeloY;
- (dist.f[d0M0])[ks] = getInterpolatedDistributionForVeloWithPressureBC(q, f_N, f_S, feq, omega, drho, velocityBC, c2o27);
- }
-
- q = (subgridD.q[d0M0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = -VeloY;
- (dist.f[d0P0])[kn] = getInterpolatedDistributionForVeloWithPressureBC(q, f_S, f_N, feq, omega, drho, velocityBC, c2o27);
- }
-
- q = (subgridD.q[d00P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = VeloZ;
- (dist.f[d00M])[kb] = getInterpolatedDistributionForVeloWithPressureBC(q, f_T, f_B, feq, omega, drho, velocityBC, c2o27);
- }
-
- q = (subgridD.q[d00M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = -VeloZ;
- (dist.f[d00P])[kt] = getInterpolatedDistributionForVeloWithPressureBC(q, f_B, f_T, feq, omega, drho, velocityBC, c2o27);
- }
-
- q = (subgridD.q[dPP0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloX + VeloY;
- (dist.f[dMM0])[ksw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_NE, f_SW, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dMM0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloX - VeloY;
- (dist.f[dPP0])[kne] = getInterpolatedDistributionForVeloWithPressureBC(q, f_SW, f_NE, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dPM0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloX - VeloY;
- (dist.f[dMP0])[knw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_SE, f_NW, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dMP0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloX + VeloY;
- (dist.f[dPM0])[kse] = getInterpolatedDistributionForVeloWithPressureBC(q, f_NW, f_SE, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dP0P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloX + VeloZ;
- (dist.f[dM0M])[kbw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TE, f_BW, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dM0M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloX - VeloZ;
- (dist.f[dP0P])[kte] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BW, f_TE, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dP0M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloX - VeloZ;
- (dist.f[dM0P])[ktw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BE, f_TW, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dM0P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloX + VeloZ;
- (dist.f[dP0M])[kbe] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TW, f_BE, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[d0PP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloY + VeloZ;
- (dist.f[d0MM])[kbs] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TN, f_BS, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[d0MM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloY - VeloZ;
- (dist.f[d0PP])[ktn] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BS, f_TN, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[d0PM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloY - VeloZ;
- (dist.f[d0MP])[kts] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BN, f_TS, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[d0MP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloY + VeloZ;
- (dist.f[d0PM])[kbn] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TS, f_BN, feq, omega, drho, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dPPP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = VeloX + VeloY + VeloZ;
- (dist.f[dMMM])[kbsw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TNE, f_BSW, feq, omega, drho, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dMMM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = -VeloX - VeloY - VeloZ;
- (dist.f[dPPP])[ktne] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BSW, f_TNE, feq, omega, drho, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dPPM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = VeloX + VeloY - VeloZ;
- (dist.f[dMMP])[ktsw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BNE, f_TSW, feq, omega, drho, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dMMP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = -VeloX - VeloY + VeloZ;
- (dist.f[dPPM])[kbne] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TSW, f_BNE, feq, omega, drho, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dPMP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = VeloX - VeloY + VeloZ;
- (dist.f[dMPM])[kbnw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TSE, f_BNW, feq, omega, drho, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dMPM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = -VeloX + VeloY - VeloZ;
- (dist.f[dPMP])[ktse] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BNW, f_TSE, feq, omega, drho, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dPMM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = VeloX - VeloY - VeloZ;
- (dist.f[dMPP])[ktnw] = getInterpolatedDistributionForVeloWithPressureBC(q, f_BSE, f_TNW, feq, omega, drho, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dMPP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = -VeloX + VeloY + VeloZ;
- (dist.f[dPMM])[kbse] = getInterpolatedDistributionForVeloWithPressureBC(q, f_TNW, f_BSE, feq, omega, drho, velocityBC, c1o216);
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QVelDeviceCompZeroPress1h27(
- int inx,
- int iny,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- real Phi,
- real angularVelocity,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* coordX,
- real* coordY,
- real* coordZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- //real VeloX = vx[k];
- //real VeloY = vy[k];
- //real VeloZ = vz[k]; //(16.0*(u0*2.0)*bbx*bby*(grid_nx-bbx)*(grid_ny-bby))/(grid_nx*grid_nx*grid_ny*grid_ny)
- ////////////////////////////////////////////////////////////////////////////////
- real VeloX = cosf(Phi)*vx[k] - sinf(Phi)*vy[k];
- real VeloY = sinf(Phi)*vx[k] + cosf(Phi)*vy[k];
- //real VeloZ = vz[k]; //(16.0*(u0*2.0)*bbx*bby*(grid_nx-bbx)*(grid_ny-bby))/(grid_nx*grid_nx*grid_ny*grid_ny)
- ////////////////////////////////////////////////////////////////////////////////////
- //Ship
- real coord0X = 281.125f;//7.5f;
- real coord0Y = 388.125f;//7.5f;
- real ux = - angularVelocity * (coordY[k_Q[k]] - coord0Y);
- real uy = angularVelocity * (coordX[k_Q[k]] - coord0X);
- real VeloXpur=VeloX;
- real VeloYpur=VeloY;
- VeloX-=ux;
- VeloY-=uy;
- ////////////////////////////////////////////////////////////////////////////////
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- //unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- //////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real vx1, vx2, vx3, drho, feq, q, cu_sq;
- ///////// equilibrium BC
- cu_sq=c3o2*(VeloX*VeloX +VeloY*VeloY);
- VeloXpur*=-c1o1;
- VeloYpur*=-c1o1;
- vx1=VeloX;
- vx2=VeloY;
- vx3=c0o1;
- drho=c0o1;
-
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*( VeloXpur )+c9o2*( vx1 )*( vx1 ) * (c1o1 + drho)-cu_sq);
- (D.f[dM00])[kw]= feq - c2o27 * drho;
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*(-VeloXpur )+c9o2*(-vx1 )*(-vx1 ) * (c1o1 + drho)-cu_sq);
- (D.f[dP00])[ke]= feq - c2o27 * drho;
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*( VeloYpur )+c9o2*( vx2 )*( vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[d0M0])[ks]= feq - c2o27 * drho;
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*( -VeloYpur )+c9o2*( -vx2 )*( -vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[d0P0])[kn]= feq - c2o27 * drho;
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*( vx3)+c9o2*( vx3)*( vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d00M])[kb]= feq - c2o27 * drho;
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*( -vx3)+c9o2*( -vx3)*( -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d00P])[kt]= feq - c2o27 * drho;
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloXpur+VeloYpur )+c9o2*( vx1+vx2 )*( vx1+vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dMM0])[ksw]= feq - c1o54 * drho;
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*(-VeloXpur-VeloYpur )+c9o2*(-vx1-vx2 )*(-vx1-vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dPP0])[kne]= feq - c1o54 * drho;
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloXpur-VeloYpur )+c9o2*( vx1-vx2 )*( vx1-vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dMP0])[knw]= feq - c1o54 * drho;
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*(-VeloXpur+VeloYpur )+c9o2*(-vx1+vx2 )*(-vx1+vx2 ) * (c1o1 + drho)-cu_sq);
- (D.f[dPM0])[kse]= feq - c1o54 * drho;
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloXpur +vx3)+c9o2*( vx1 +vx3)*( vx1 +vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dM0M])[kbw]= feq - c1o54 * drho;
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*(-VeloXpur -vx3)+c9o2*(-vx1 -vx3)*(-vx1 -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dP0P])[kte]= feq - c1o54 * drho;
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloXpur -vx3)+c9o2*( vx1 -vx3)*( vx1 -vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dM0P])[ktw]= feq - c1o54 * drho;
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*(-VeloXpur +vx3)+c9o2*(-vx1 +vx3)*(-vx1 +vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dP0M])[kbe]= feq - c1o54 * drho;
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloYpur+vx3)+c9o2*( vx2+vx3)*( vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0MM])[kbs]= feq - c1o54 * drho;
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( -VeloYpur-vx3)+c9o2*( -vx2-vx3)*( -vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0PP])[ktn]= feq - c1o54 * drho;
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloYpur-vx3)+c9o2*( vx2-vx3)*( vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0MP])[kts]= feq - c1o54 * drho;
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( -VeloYpur+vx3)+c9o2*( -vx2+vx3)*( -vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[d0PM])[kbn]= feq - c1o54 * drho;
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*( VeloXpur+VeloYpur+vx3)+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMMM])[kbsw]= feq - c1o216 * drho;
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*(-VeloXpur-VeloYpur-vx3)+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPPP])[ktne]= feq - c1o216 * drho;
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*( VeloXpur+VeloYpur-vx3)+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMMP])[ktsw]= feq - c1o216 * drho;
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*(-VeloXpur-VeloYpur+vx3)+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPPM])[kbne]= feq - c1o216 * drho;
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*( VeloXpur-VeloYpur+vx3)+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMPM])[kbnw]= feq - c1o216 * drho;
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*(-VeloXpur+VeloYpur-vx3)+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPMP])[ktse]= feq - c1o216 * drho;
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*( VeloXpur-VeloYpur-vx3)+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dMPP])[ktnw]= feq - c1o216 * drho;
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*(-VeloXpur+VeloYpur+vx3)+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3) * (c1o1 + drho)-cu_sq);
- (D.f[dPMM])[kbse]= feq - c1o216 * drho;
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void LB_BC_Vel_West_27(
- int nx,
- int ny,
- int nz,
- int itz,
- unsigned int* bcMatD,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* DD,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep,
- real u0x,
- unsigned int grid_nx,
- unsigned int grid_ny,
- real om)
-{
- //thread-index
- unsigned int ity = blockIdx.x;
- unsigned int itx = threadIdx.x;
-
- unsigned int k, nxny; // Zugriff auf arrays im device
-
- unsigned int x = itx + STARTOFFX; // Globaler x-Index
- unsigned int y = ity + STARTOFFY; // Globaler y-Index
- unsigned int z = itz + STARTOFFZ; // Globaler z-Index
-
- k = nx*(ny*z + y) + x;
- nxny = nx*ny;
- unsigned int k1 = k+nxny;
-
- if( bcMatD[k] == GEO_VELO )
- {
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
-
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int kzero= k;
- unsigned int ke = k;
- unsigned int kw = neighborX[k];
- unsigned int kn = k;
- unsigned int ks = neighborY[k];
- unsigned int kt = k;
- unsigned int kb = neighborZ[k];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = k;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = k;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = k;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = k;
- unsigned int kbsw = neighborZ[ksw];
- //unsigned int kzero= k;
- //unsigned int ke = k;
- //unsigned int kw = k + 1;
- //unsigned int kn = k;
- //unsigned int ks = k + nx;
- //unsigned int kt = k;
- //unsigned int kb = k + nxny;
- //unsigned int ksw = k + nx + 1;
- //unsigned int kne = k;
- //unsigned int kse = k + nx;
- //unsigned int knw = k + 1;
- //unsigned int kbw = k + nxny + 1;
- //unsigned int kte = k;
- //unsigned int kbe = k + nxny;
- //unsigned int ktw = k + 1;
- //unsigned int kbs = k + nxny + nx;
- //unsigned int ktn = k;
- //unsigned int kbn = k + nxny;
- //unsigned int kts = k + nx;
- //unsigned int ktse = k + nx;
- //unsigned int kbnw = k + nxny + 1;
- //unsigned int ktnw = k + 1;
- //unsigned int kbse = k + nxny + nx;
- //unsigned int ktsw = k + nx + 1;
- //unsigned int kbne = k + nxny;
- //unsigned int ktne = k;
- //unsigned int kbsw = k + nxny + nx + 1;
- ////////////////////////////////////////////////////////////////////////////////
- //index1
- unsigned int k1zero= k1;
- unsigned int k1e = k1;
- unsigned int k1w = neighborX[k1];
- unsigned int k1n = k1;
- unsigned int k1s = neighborY[k1];
- unsigned int k1t = k1;
- unsigned int k1b = neighborZ[k1];
- unsigned int k1sw = neighborY[k1w];
- unsigned int k1ne = k1;
- unsigned int k1se = k1s;
- unsigned int k1nw = k1w;
- unsigned int k1bw = neighborZ[k1w];
- unsigned int k1te = k1;
- unsigned int k1be = k1b;
- unsigned int k1tw = k1w;
- unsigned int k1bs = neighborZ[k1s];
- unsigned int k1tn = k1;
- unsigned int k1bn = k1b;
- unsigned int k1ts = k1s;
- unsigned int k1tse = k1s;
- unsigned int k1bnw = k1bw;
- unsigned int k1tnw = k1w;
- unsigned int k1bse = k1bs;
- unsigned int k1tsw = k1sw;
- unsigned int k1bne = k1b;
- unsigned int k1tne = k1;
- unsigned int k1bsw = neighborZ[k1sw];
- //unsigned int k1zero= k1;
- //unsigned int k1e = k1;
- //unsigned int k1w = k1 + 1;
- //unsigned int k1n = k1;
- //unsigned int k1s = k1 + nx;
- //unsigned int k1t = k1;
- //unsigned int k1b = k1 + nxny;
- //unsigned int k1sw = k1 + nx + 1;
- //unsigned int k1ne = k1;
- //unsigned int k1se = k1 + nx;
- //unsigned int k1nw = k1 + 1;
- //unsigned int k1bw = k1 + nxny + 1;
- //unsigned int k1te = k1;
- //unsigned int k1be = k1 + nxny;
- //unsigned int k1tw = k1 + 1;
- //unsigned int k1bs = k1 + nxny + nx;
- //unsigned int k1tn = k1;
- //unsigned int k1bn = k1 + nxny;
- //unsigned int k1ts = k1 + nx;
- //unsigned int k1tse = k1 + nx;
- //unsigned int k1bnw = k1 + nxny + 1;
- //unsigned int k1tnw = k1 + 1;
- //unsigned int k1bse = k1 + nxny + nx;
- //unsigned int k1tsw = k1 + nx + 1;
- //unsigned int k1bne = k1 + nxny;
- //unsigned int k1tne = k1;
- //unsigned int k1bsw = k1 + nxny + nx + 1;
- ////////////////////////////////////////////////////////////////////////////////
- real f1_E,f1_W,f1_N,f1_S,f1_T,f1_B,f1_NE,f1_SW,f1_SE,f1_NW,f1_TE,f1_BW,f1_BE,f1_TW,f1_TN,f1_BS,f1_BN,f1_TS,f1_ZERO,
- f1_TNE,f1_TSW,f1_TSE,f1_TNW,f1_BNE,f1_BSW,f1_BSE,f1_BNW;
-
- f1_W = (D.f[dP00])[k1e ];
- f1_E = (D.f[dM00])[k1w ];
- f1_S = (D.f[d0P0])[k1n ];
- f1_N = (D.f[d0M0])[k1s ];
- f1_B = (D.f[d00P])[k1t ];
- f1_T = (D.f[d00M])[k1b ];
- f1_SW = (D.f[dPP0])[k1ne ];
- f1_NE = (D.f[dMM0])[k1sw ];
- f1_NW = (D.f[dPM0])[k1se ];
- f1_SE = (D.f[dMP0])[k1nw ];
- f1_BW = (D.f[dP0P])[k1te ];
- f1_TE = (D.f[dM0M])[k1bw ];
- f1_TW = (D.f[dP0M])[k1be ];
- f1_BE = (D.f[dM0P])[k1tw ];
- f1_BS = (D.f[d0PP])[k1tn ];
- f1_TN = (D.f[d0MM])[k1bs ];
- f1_TS = (D.f[d0PM])[k1bn ];
- f1_BN = (D.f[d0MP])[k1ts ];
- f1_ZERO = (D.f[d000])[k1zero];
- f1_BSW = (D.f[dPPP])[k1tne ];
- f1_BNE = (D.f[dMMP])[k1tsw ];
- f1_BNW = (D.f[dPMP])[k1tse ];
- f1_BSE = (D.f[dMPP])[k1tnw ];
- f1_TSW = (D.f[dPPM])[k1bne ];
- f1_TNE = (D.f[dMMM])[k1bsw ];
- f1_TNW = (D.f[dPMM])[k1bse ];
- f1_TSE = (D.f[dMPM])[k1bnw ];
-
- real drho1 = f1_ZERO+f1_E+f1_W+f1_N+f1_S+f1_T+f1_B+f1_NE+f1_SW+f1_SE+f1_NW+f1_TE+f1_BW+f1_BE+f1_TW+f1_TN+f1_BS+f1_BN+f1_TS+
- f1_TNE+f1_TSW+f1_TSE+f1_TNW+f1_BNE+f1_BSW+f1_BSE+f1_BNW;
-
- __syncthreads();
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- real drho = drho1;
- real vx1 = c0o1;
- real vx2 = c0o1;
- real vx3 = u0x;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);
-
- (D.f[d000])[kzero] = c8o27* (drho-cu_sq);
- (D.f[dP00])[ke ] = c2o27* (drho+c3o1*( vx1 )+c9o2*( vx1 )*( vx1 )-cu_sq);
- (D.f[dM00])[kw ] = c2o27* (drho+c3o1*(-vx1 )+c9o2*(-vx1 )*(-vx1 )-cu_sq);
- (D.f[d0P0])[kn ] = c2o27* (drho+c3o1*( vx2 )+c9o2*( vx2 )*( vx2 )-cu_sq);
- (D.f[d0M0])[ks ] = c2o27* (drho+c3o1*( -vx2 )+c9o2*( -vx2 )*( -vx2 )-cu_sq);
- (D.f[d00P])[kt ] = c2o27* (drho+c3o1*( vx3)+c9o2*( vx3)*( vx3)-cu_sq);
- (D.f[d00M])[kb ] = c2o27* (drho+c3o1*( -vx3)+c9o2*( -vx3)*( -vx3)-cu_sq);
- (D.f[dPP0])[kne ] = c1o54* (drho+c3o1*( vx1+vx2 )+c9o2*( vx1+vx2 )*( vx1+vx2 )-cu_sq);
- (D.f[dMM0])[ksw ] = c1o54* (drho+c3o1*(-vx1-vx2 )+c9o2*(-vx1-vx2 )*(-vx1-vx2 )-cu_sq);
- (D.f[dPM0])[kse ] = c1o54* (drho+c3o1*( vx1-vx2 )+c9o2*( vx1-vx2 )*( vx1-vx2 )-cu_sq);
- (D.f[dMP0])[knw ] = c1o54* (drho+c3o1*(-vx1+vx2 )+c9o2*(-vx1+vx2 )*(-vx1+vx2 )-cu_sq);
- (D.f[dP0P])[kte ] = c1o54* (drho+c3o1*( vx1 +vx3)+c9o2*( vx1 +vx3)*( vx1 +vx3)-cu_sq);
- (D.f[dM0M])[kbw ] = c1o54* (drho+c3o1*(-vx1 -vx3)+c9o2*(-vx1 -vx3)*(-vx1 -vx3)-cu_sq);
- (D.f[dP0M])[kbe ] = c1o54* (drho+c3o1*( vx1 -vx3)+c9o2*( vx1 -vx3)*( vx1 -vx3)-cu_sq);
- (D.f[dM0P])[ktw ] = c1o54* (drho+c3o1*(-vx1 +vx3)+c9o2*(-vx1 +vx3)*(-vx1 +vx3)-cu_sq);
- (D.f[d0PP])[ktn ] = c1o54* (drho+c3o1*( vx2+vx3)+c9o2*( vx2+vx3)*( vx2+vx3)-cu_sq);
- (D.f[d0MM])[kbs ] = c1o54* (drho+c3o1*( -vx2-vx3)+c9o2*( -vx2-vx3)*( -vx2-vx3)-cu_sq);
- (D.f[d0PM])[kbn ] = c1o54* (drho+c3o1*( vx2-vx3)+c9o2*( vx2-vx3)*( vx2-vx3)-cu_sq);
- (D.f[d0MP])[kts ] = c1o54* (drho+c3o1*( -vx2+vx3)+c9o2*( -vx2+vx3)*( -vx2+vx3)-cu_sq);
- (D.f[dPPP])[ktne ] = c1o216*(drho+c3o1*( vx1+vx2+vx3)+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3)-cu_sq);
- (D.f[dMMM])[kbsw ] = c1o216*(drho+c3o1*(-vx1-vx2-vx3)+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3)-cu_sq);
- (D.f[dPPM])[kbne ] = c1o216*(drho+c3o1*( vx1+vx2-vx3)+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3)-cu_sq);
- (D.f[dMMP])[ktsw ] = c1o216*(drho+c3o1*(-vx1-vx2+vx3)+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3)-cu_sq);
- (D.f[dPMP])[ktse ] = c1o216*(drho+c3o1*( vx1-vx2+vx3)+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3)-cu_sq);
- (D.f[dMPM])[kbnw ] = c1o216*(drho+c3o1*(-vx1+vx2-vx3)+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3)-cu_sq);
- (D.f[dPMM])[kbse ] = c1o216*(drho+c3o1*( vx1-vx2-vx3)+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3)-cu_sq);
- (D.f[dMPP])[ktnw ] = c1o216*(drho+c3o1*(-vx1+vx2+vx3)+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3)-cu_sq);
- }
- __syncthreads();
-}
-//////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QVelDevPlainBB27(
- real* velocityX,
- real* velocityY,
- real* velocityZ,
- real* distributions,
- int* subgridDistanceIndices,
- real* subgridDistances,
- uint numberOfBCnodes,
- uint* neighborX,
- uint* neighborY,
- uint* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- //////////////////////////////////////////////////////////////////////////
- //! The velocity boundary condition is executed in the following steps
- //!
- ////////////////////////////////////////////////////////////////////////////////
- //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
- //!
- const unsigned nodeIndex = getNodeIndex();
-
- //////////////////////////////////////////////////////////////////////////
- // run for all indices in size of boundary condition (numberOfBCnodes)
- if(nodeIndex < numberOfBCnodes)
- {
- //////////////////////////////////////////////////////////////////////////
- //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
- //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
- //!
- Distributions27 dist;
- getPointersToDistributions(dist, distributions, numberOfLBnodes, isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local velocities
- //!
- real VeloX = velocityX[nodeIndex];
- real VeloY = velocityY[nodeIndex];
- real VeloZ = velocityZ[nodeIndex];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local subgrid distances (q's)
- //!
- SubgridDistances27 subgridD;
- getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set neighbor indices (necessary for indirect addressing)
- //!
- uint indexOfBCnode = subgridDistanceIndices[nodeIndex];
- uint ke = indexOfBCnode;
- uint kw = neighborX[indexOfBCnode];
- uint kn = indexOfBCnode;
- uint ks = neighborY[indexOfBCnode];
- uint kt = indexOfBCnode;
- uint kb = neighborZ[indexOfBCnode];
- uint ksw = neighborY[kw];
- uint kne = indexOfBCnode;
- uint kse = ks;
- uint knw = kw;
- uint kbw = neighborZ[kw];
- uint kte = indexOfBCnode;
- uint kbe = kb;
- uint ktw = kw;
- uint kbs = neighborZ[ks];
- uint ktn = indexOfBCnode;
- uint kbn = kb;
- uint kts = ks;
- uint ktse = ks;
- uint kbnw = kbw;
- uint ktnw = kw;
- uint kbse = kbs;
- uint ktsw = ksw;
- uint kbne = kb;
- uint ktne = indexOfBCnode;
- uint kbsw = neighborZ[ksw];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local distributions
- //!
- real f_W = (dist.f[dP00])[ke ];
- real f_E = (dist.f[dM00])[kw ];
- real f_S = (dist.f[d0P0])[kn ];
- real f_N = (dist.f[d0M0])[ks ];
- real f_B = (dist.f[d00P])[kt ];
- real f_T = (dist.f[d00M])[kb ];
- real f_SW = (dist.f[dPP0])[kne ];
- real f_NE = (dist.f[dMM0])[ksw ];
- real f_NW = (dist.f[dPM0])[kse ];
- real f_SE = (dist.f[dMP0])[knw ];
- real f_BW = (dist.f[dP0P])[kte ];
- real f_TE = (dist.f[dM0M])[kbw ];
- real f_TW = (dist.f[dP0M])[kbe ];
- real f_BE = (dist.f[dM0P])[ktw ];
- real f_BS = (dist.f[d0PP])[ktn ];
- real f_TN = (dist.f[d0MM])[kbs ];
- real f_TS = (dist.f[d0PM])[kbn ];
- real f_BN = (dist.f[d0MP])[kts ];
- real f_BSW = (dist.f[dPPP])[ktne ];
- real f_BNE = (dist.f[dMMP])[ktsw ];
- real f_BNW = (dist.f[dPMP])[ktse ];
- real f_BSE = (dist.f[dMPP])[ktnw ];
- real f_TSW = (dist.f[dPPM])[kbne ];
- real f_TNE = (dist.f[dMMM])[kbsw ];
- real f_TNW = (dist.f[dPMM])[kbse ];
- real f_TSE = (dist.f[dMPM])[kbnw ];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - change the pointer to write the results in the correct array
- //!
- getPointersToDistributions(dist, distributions, numberOfLBnodes, !isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - rewrite distributions if there is a sub-grid distance (q) in same direction
- real q;
- q = (subgridD.q[dP00])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM00])[kw ]=f_E + c4o9 * (-VeloX);
- q = (subgridD.q[dM00])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP00])[ke ]=f_W + c4o9 * ( VeloX);
- q = (subgridD.q[d0P0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0M0])[ks ]=f_N + c4o9 * (-VeloY);
- q = (subgridD.q[d0M0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0P0])[kn ]=f_S + c4o9 * ( VeloY);
- q = (subgridD.q[d00P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d00M])[kb ]=f_T + c4o9 * (-VeloZ);
- q = (subgridD.q[d00M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d00P])[kt ]=f_B + c4o9 * ( VeloZ);
- q = (subgridD.q[dPP0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMM0])[ksw ]=f_NE + c1o9 * (-VeloX - VeloY);
- q = (subgridD.q[dMM0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPP0])[kne ]=f_SW + c1o9 * ( VeloX + VeloY);
- q = (subgridD.q[dPM0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMP0])[knw ]=f_SE + c1o9 * (-VeloX + VeloY);
- q = (subgridD.q[dMP0])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPM0])[kse ]=f_NW + c1o9 * ( VeloX - VeloY);
- q = (subgridD.q[dP0P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM0M])[kbw ]=f_TE + c1o9 * (-VeloX - VeloZ);
- q = (subgridD.q[dM0M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP0P])[kte ]=f_BW + c1o9 * ( VeloX + VeloZ);
- q = (subgridD.q[dP0M])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dM0P])[ktw ]=f_BE + c1o9 * (-VeloX + VeloZ);
- q = (subgridD.q[dM0P])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dP0M])[kbe ]=f_TW + c1o9 * ( VeloX - VeloZ);
- q = (subgridD.q[d0PP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0MM])[kbs ]=f_TN + c1o9 * (-VeloY - VeloZ);
- q = (subgridD.q[d0MM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0PP])[ktn ]=f_BS + c1o9 * ( VeloY + VeloZ);
- q = (subgridD.q[d0PM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0MP])[kts ]=f_BN + c1o9 * (-VeloY + VeloZ);
- q = (subgridD.q[d0MP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[d0PM])[kbn ]=f_TS + c1o9 * ( VeloY - VeloZ);
- q = (subgridD.q[dPPP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMMM])[kbsw]=f_TNE + c1o36 * (-VeloX - VeloY - VeloZ);
- q = (subgridD.q[dMMM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPPP])[ktne]=f_BSW + c1o36 * ( VeloX + VeloY + VeloZ);
- q = (subgridD.q[dPPM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMMP])[ktsw]=f_BNE + c1o36 * (-VeloX - VeloY + VeloZ);
- q = (subgridD.q[dMMP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPPM])[kbne]=f_TSW + c1o36 * ( VeloX + VeloY - VeloZ);
- q = (subgridD.q[dPMP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMPM])[kbnw]=f_TSE + c1o36 * (-VeloX + VeloY - VeloZ);
- q = (subgridD.q[dMPM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPMP])[ktse]=f_BNW + c1o36 * ( VeloX - VeloY + VeloZ);
- q = (subgridD.q[dPMM])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dMPP])[ktnw]=f_BSE + c1o36 * (-VeloX + VeloY + VeloZ);
- q = (subgridD.q[dMPP])[nodeIndex]; if (q>=c0o1 && q<=c1o1) (dist.f[dPMM])[kbse]=f_TNW + c1o36 * ( VeloX - VeloY - VeloZ);
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QVelDevCouette27(
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- real VeloX = vx[k];
- real VeloY = vy[k];
- real VeloZ = vz[k];
- ////////////////////////////////////////////////////////////////////////////////
- real*q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- //unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- ////////////////////////////////////////////////////////////////////////////////
-
- ////////////////////////////////////////////////////////////////////////////////
- real f_W = (D.f[dP00])[ke ];
- real f_E = (D.f[dM00])[kw ];
- real f_S = (D.f[d0P0])[kn ];
- real f_N = (D.f[d0M0])[ks ];
- real f_B = (D.f[d00P])[kt ];
- real f_T = (D.f[d00M])[kb ];
- real f_SW = (D.f[dPP0])[kne ];
- real f_NE = (D.f[dMM0])[ksw ];
- real f_NW = (D.f[dPM0])[kse ];
- real f_SE = (D.f[dMP0])[knw ];
- real f_BW = (D.f[dP0P])[kte ];
- real f_TE = (D.f[dM0M])[kbw ];
- real f_TW = (D.f[dP0M])[kbe ];
- real f_BE = (D.f[dM0P])[ktw ];
- real f_BS = (D.f[d0PP])[ktn ];
- real f_TN = (D.f[d0MM])[kbs ];
- real f_TS = (D.f[d0PM])[kbn ];
- real f_BN = (D.f[d0MP])[kts ];
- real f_BSW = (D.f[dPPP])[ktne ];
- real f_BNE = (D.f[dMMP])[ktsw ];
- real f_BNW = (D.f[dPMP])[ktse ];
- real f_BSE = (D.f[dMPP])[ktnw ];
- real f_TSW = (D.f[dPPM])[kbne ];
- real f_TNE = (D.f[dMMM])[kbsw ];
- real f_TNW = (D.f[dPMM])[kbse ];
- real f_TSE = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////
-
- ////////////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- /////// FlowDirection Y !!!!!!!!!! ///////////////////////////////////
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //calculate velocity
- //real vx1 = ((f_TNE-f_BSW)+(f_BSE-f_TNW)+(f_BNE-f_TSW)+(f_TSE-f_BNW)) + (((f_NE-f_SW)+(f_TE-f_BW))+((f_SE-f_NW)+(f_BE-f_TW))) + (f_E-f_W);
- real vx2 = ((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_BNE-f_TSW)+(f_BNW-f_TSE)) + (((f_NE-f_SW)+(f_TN-f_BS))+((f_BN-f_TS)+(f_NW-f_SE))) + (f_N-f_S);
- //real vx3 = ((f_TNE-f_BSW)+(f_TNW-f_BSE)+(f_TSW-f_BNE)+(f_TSE-f_BNW)) + (((f_TE-f_BW)+(f_TN-f_BS))+((f_TW-f_BE)+(f_TS-f_BN))) + (f_T-f_B);
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //constant
- real on=c0o1;//c1o2;//one;
- real ms=-c6o1;
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //2nd order moment
- real kxxMyyFromfcNEQ = c0o1;//-c3o2 * (f_BW+f_W+f_TW-f_BS-f_S-f_TS-f_BN-f_N-f_TN+f_BE+f_E+f_TE-(vx1*vx1-vx2*vx2)); //all dP00+dM00 minus all d0P0+d0M0 (no combinations of xy left)
-
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //set distributions
- real q;
- q = q_dirE[k]; if (q>=c0o1 && q<=c1o1) (D.f[dM00])[kw ]=f_E + ms*c2o27 * VeloX;
- q = q_dirW[k]; if (q>=c0o1 && q<=c1o1) (D.f[dP00])[ke ]=f_W - ms*c2o27 * VeloX;
- q = q_dirN[k]; if (q>=c0o1 && q<=c1o1) (D.f[d0M0])[ks ]=f_N + ms*c2o27 * VeloY;
- q = q_dirS[k]; if (q>=c0o1 && q<=c1o1) (D.f[d0P0])[kn ]=f_S - ms*c2o27 * VeloY;
- q = q_dirT[k]; if (q>=c0o1 && q<=c1o1) (D.f[d00M])[kb ]=f_T + ms*c2o27 * VeloZ - c3o2*c2o27*((c2o1*VeloY-vx2)*(c2o1*VeloY-vx2)-vx2*vx2)*on;
- q = q_dirB[k]; if (q>=c0o1 && q<=c1o1) (D.f[d00P])[kt ]=f_B - ms*c2o27 * VeloZ;
- q = q_dirNE[k]; if (q>=c0o1 && q<=c1o1) (D.f[dMM0])[ksw ]=f_NE + ms*c1o54 * VeloX + ms*c1o54 * VeloY;
- q = q_dirSW[k]; if (q>=c0o1 && q<=c1o1) (D.f[dPP0])[kne ]=f_SW - ms*c1o54 * VeloX - ms*c1o54 * VeloY;
- q = q_dirSE[k]; if (q>=c0o1 && q<=c1o1) (D.f[dMP0])[knw ]=f_SE + ms*c1o54 * VeloX - ms*c1o54 * VeloY;
- q = q_dirNW[k]; if (q>=c0o1 && q<=c1o1) (D.f[dPM0])[kse ]=f_NW - ms*c1o54 * VeloX + ms*c1o54 * VeloY;
- q = q_dirTE[k]; if (q>=c0o1 && q<=c1o1) (D.f[dM0M])[kbw ]=f_TE + ms*c1o54 * VeloX + ms*c1o54 * VeloZ - c3o2*c1o54*((c2o1*VeloY-vx2)*(c2o1*VeloY-vx2)-vx2*vx2)*on-c1o12*kxxMyyFromfcNEQ;
- q = q_dirBW[k]; if (q>=c0o1 && q<=c1o1) (D.f[dP0P])[kte ]=f_BW - ms*c1o54 * VeloX - ms*c1o54 * VeloZ;
- q = q_dirBE[k]; if (q>=c0o1 && q<=c1o1) (D.f[dM0P])[ktw ]=f_BE + ms*c1o54 * VeloX - ms*c1o54 * VeloZ;
- q = q_dirTW[k]; if (q>=c0o1 && q<=c1o1) (D.f[dP0M])[kbe ]=f_TW - ms*c1o54 * VeloX + ms*c1o54 * VeloZ - c3o2*c1o54*((c2o1*VeloY-vx2)*(c2o1*VeloY-vx2)-vx2*vx2)*on-c1o12*kxxMyyFromfcNEQ;
- q = q_dirTN[k]; if (q>=c0o1 && q<=c1o1) (D.f[d0MM])[kbs ]=f_TN + ms*c1o54 * VeloY + ms*c1o54 * VeloZ + c3o1*c1o54*((c2o1*VeloY-vx2)*(c2o1*VeloY-vx2)-vx2*vx2)*on+c1o12*kxxMyyFromfcNEQ;
- q = q_dirBS[k]; if (q>=c0o1 && q<=c1o1) (D.f[d0PP])[ktn ]=f_BS - ms*c1o54 * VeloY - ms*c1o54 * VeloZ;
- q = q_dirBN[k]; if (q>=c0o1 && q<=c1o1) (D.f[d0MP])[kts ]=f_BN + ms*c1o54 * VeloY - ms*c1o54 * VeloZ;
- q = q_dirTS[k]; if (q>=c0o1 && q<=c1o1) (D.f[d0PM])[kbn ]=f_TS - ms*c1o54 * VeloY + ms*c1o54 * VeloZ + c3o1*c1o54*((c2o1*VeloY-vx2)*(c2o1*VeloY-vx2)-vx2*vx2)*on+c1o12*kxxMyyFromfcNEQ;
- q = q_dirTNE[k]; if (q>=c0o1 && q<=c1o1) (D.f[dMMM])[kbsw]=f_TNE + ms*c1o216 * VeloX + ms*c1o216 * VeloY + ms*c1o216 * VeloZ + c3o1*c1o216*((c2o1*VeloY-vx2)*(c2o1*VeloY-vx2)-vx2*vx2)*on;
- q = q_dirBSW[k]; if (q>=c0o1 && q<=c1o1) (D.f[dPPP])[ktne]=f_BSW - ms*c1o216 * VeloX - ms*c1o216 * VeloY - ms*c1o216 * VeloZ;
- q = q_dirBNE[k]; if (q>=c0o1 && q<=c1o1) (D.f[dMMP])[ktsw]=f_BNE + ms*c1o216 * VeloX + ms*c1o216 * VeloY - ms*c1o216 * VeloZ;
- q = q_dirTSW[k]; if (q>=c0o1 && q<=c1o1) (D.f[dPPM])[kbne]=f_TSW - ms*c1o216 * VeloX - ms*c1o216 * VeloY + ms*c1o216 * VeloZ + c3o1*c1o216*((c2o1*VeloY-vx2)*(c2o1*VeloY-vx2)-vx2*vx2)*on;
- q = q_dirTSE[k]; if (q>=c0o1 && q<=c1o1) (D.f[dMPM])[kbnw]=f_TSE + ms*c1o216 * VeloX - ms*c1o216 * VeloY + ms*c1o216 * VeloZ + c3o1*c1o216*((c2o1*VeloY-vx2)*(c2o1*VeloY-vx2)-vx2*vx2)*on;
- q = q_dirBNW[k]; if (q>=c0o1 && q<=c1o1) (D.f[dPMP])[ktse]=f_BNW - ms*c1o216 * VeloX + ms*c1o216 * VeloY - ms*c1o216 * VeloZ;
- q = q_dirBSE[k]; if (q>=c0o1 && q<=c1o1) (D.f[dMPP])[ktnw]=f_BSE + ms*c1o216 * VeloX - ms*c1o216 * VeloY - ms*c1o216 * VeloZ;
- q = q_dirTNW[k]; if (q>=c0o1 && q<=c1o1) (D.f[dPMM])[kbse]=f_TNW - ms*c1o216 * VeloX + ms*c1o216 * VeloY + ms*c1o216 * VeloZ + c3o1*c1o216*((c2o1*VeloY-vx2)*(c2o1*VeloY-vx2)-vx2*vx2)*on;
- //q = q_dirE[k]; if (q>=zero && q<=one) (D.f[dM00])[kw ]=f_E + ms*c2over27 * VeloX;
- // q = q_dirW[k]; if (q>=zero && q<=one) (D.f[dP00])[ke ]=f_W - ms*c2over27 * VeloX;
- // q = q_dirN[k]; if (q>=zero && q<=one) (D.f[d0M0])[ks ]=f_N + ms*c2over27 * VeloY;
- // q = q_dirS[k]; if (q>=zero && q<=one) (D.f[d0P0])[kn ]=f_S - ms*c2over27 * VeloY;
- //q = q_dirT[k]; if (q>=zero && q<=one) (D.f[d00M])[kb ]=f_T + ms*c2over27 * VeloZ - c1o9*((two*VeloY-vx2)*(two*VeloY-vx2)-vx2*vx2)*on;
- // q = q_dirB[k]; if (q>=zero && q<=one) (D.f[d00P])[kt ]=f_B - ms*c2over27 * VeloZ;
- // q = q_dirNE[k]; if (q>=zero && q<=one) (D.f[dMM0])[ksw ]=f_NE + ms*c1over54 * VeloX + ms*c1over54 * VeloY;
- //q = q_dirSW[k]; if (q>=zero && q<=one) (D.f[dPP0])[kne ]=f_SW - ms*c1over54 * VeloX - ms*c1over54 * VeloY;
- //q = q_dirSE[k]; if (q>=zero && q<=one) (D.f[dMP0])[knw ]=f_SE + ms*c1over54 * VeloX - ms*c1over54 * VeloY;
- //q = q_dirNW[k]; if (q>=zero && q<=one) (D.f[dPM0])[kse ]=f_NW - ms*c1over54 * VeloX + ms*c1over54 * VeloY;
- //q = q_dirTE[k]; if (q>=zero && q<=one) (D.f[dM0M])[kbw ]=f_TE + ms*c1over54 * VeloX + ms*c1over54 * VeloZ - c1o36*((two*VeloY-vx2)*(two*VeloY-vx2)-vx2*vx2)*on;
- //q = q_dirBW[k]; if (q>=zero && q<=one) (D.f[dP0P])[kte ]=f_BW - ms*c1over54 * VeloX - ms*c1over54 * VeloZ;
- //q = q_dirBE[k]; if (q>=zero && q<=one) (D.f[dM0P])[ktw ]=f_BE + ms*c1over54 * VeloX - ms*c1over54 * VeloZ;
- //q = q_dirTW[k]; if (q>=zero && q<=one) (D.f[dP0M])[kbe ]=f_TW - ms*c1over54 * VeloX + ms*c1over54 * VeloZ - c1o36*((two*VeloY-vx2)*(two*VeloY-vx2)-vx2*vx2)*on;
- //q = q_dirTN[k]; if (q>=zero && q<=one) (D.f[d0MM])[kbs ]=f_TN + ms*c1over54 * VeloY + ms*c1over54 * VeloZ + c1o2*c1o9*((two*VeloY-vx2)*(two*VeloY-vx2)-vx2*vx2)*on;
- //q = q_dirBS[k]; if (q>=zero && q<=one) (D.f[d0PP])[ktn ]=f_BS - ms*c1over54 * VeloY - ms*c1over54 * VeloZ;
- //q = q_dirBN[k]; if (q>=zero && q<=one) (D.f[d0MP])[kts ]=f_BN + ms*c1over54 * VeloY - ms*c1over54 * VeloZ;
- //q = q_dirTS[k]; if (q>=zero && q<=one) (D.f[d0PM])[kbn ]=f_TS - ms*c1over54 * VeloY + ms*c1over54 * VeloZ + c1o2*c1o9*((two*VeloY-vx2)*(two*VeloY-vx2)-vx2*vx2)*on;
- // q = q_dirTNE[k]; if (q>=zero && q<=one) (D.f[dMMM])[kbsw]=f_TNE + ms*c1over216 * VeloX + ms*c1over216 * VeloY + ms*c1over216 * VeloZ + c1o2*c1o36*((two*VeloY-vx2)*(two*VeloY-vx2)-vx2*vx2)*on;
- // q = q_dirBSW[k]; if (q>=zero && q<=one) (D.f[dPPP])[ktne]=f_BSW - ms*c1over216 * VeloX - ms*c1over216 * VeloY - ms*c1over216 * VeloZ;
- // q = q_dirBNE[k]; if (q>=zero && q<=one) (D.f[dMMP])[ktsw]=f_BNE + ms*c1over216 * VeloX + ms*c1over216 * VeloY - ms*c1over216 * VeloZ;
- // q = q_dirTSW[k]; if (q>=zero && q<=one) (D.f[dPPM])[kbne]=f_TSW - ms*c1over216 * VeloX - ms*c1over216 * VeloY + ms*c1over216 * VeloZ + c1o2*c1o36*((two*VeloY-vx2)*(two*VeloY-vx2)-vx2*vx2)*on;
- // q = q_dirTSE[k]; if (q>=zero && q<=one) (D.f[dMPM])[kbnw]=f_TSE + ms*c1over216 * VeloX - ms*c1over216 * VeloY + ms*c1over216 * VeloZ + c1o2*c1o36*((two*VeloY-vx2)*(two*VeloY-vx2)-vx2*vx2)*on;
- // q = q_dirBNW[k]; if (q>=zero && q<=one) (D.f[dPMP])[ktse]=f_BNW - ms*c1over216 * VeloX + ms*c1over216 * VeloY - ms*c1over216 * VeloZ;
- // q = q_dirBSE[k]; if (q>=zero && q<=one) (D.f[dMPP])[ktnw]=f_BSE + ms*c1over216 * VeloX - ms*c1over216 * VeloY - ms*c1over216 * VeloZ;
- // q = q_dirTNW[k]; if (q>=zero && q<=one) (D.f[dPMM])[kbse]=f_TNW - ms*c1over216 * VeloX + ms*c1over216 * VeloY + ms*c1over216 * VeloZ + c1o2*c1o36*((two*VeloY-vx2)*(two*VeloY-vx2)-vx2*vx2)*on;
- //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QVelDev1h27(
- int inx,
- int iny,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- real Phi,
- real angularVelocity,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- real* coordX,
- real* coordY,
- real* coordZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- real VeloX = cosf(Phi)*vx[k] - sinf(Phi)*vy[k];
- real VeloY = sinf(Phi)*vx[k] + cosf(Phi)*vy[k];
- //real VeloZ = vz[k]; //(16.0*(u0*2.0)*bbx*bby*(grid_nx-bbx)*(grid_ny-bby))/(grid_nx*grid_nx*grid_ny*grid_ny)
- ////////////////////////////////////////////////////////////////////////////////////
- //Ship
- real coord0X = 281.125f;//7.5f;
- real coord0Y = 388.125f;//7.5f;
- real ux = - angularVelocity * (coordY[k_Q[k]] - coord0Y);
- real uy = angularVelocity * (coordX[k_Q[k]] - coord0X);
- real VeloXpur=VeloX;
- real VeloYpur=VeloY;
- VeloX-=ux;
- VeloY-=uy;
- ////////////////////////////////////////////////////////////////////////////////
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- //unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- //unsigned int nxny = nx*ny;
- //unsigned int kzero= KQK;
- //unsigned int ke = KQK;
- //unsigned int kw = KQK + 1;
- //unsigned int kn = KQK;
- //unsigned int ks = KQK + nx;
- //unsigned int kt = KQK;
- //unsigned int kb = KQK + nxny;
- //unsigned int ksw = KQK + nx + 1;
- //unsigned int kne = KQK;
- //unsigned int kse = KQK + nx;
- //unsigned int knw = KQK + 1;
- //unsigned int kbw = KQK + nxny + 1;
- //unsigned int kte = KQK;
- //unsigned int kbe = KQK + nxny;
- //unsigned int ktw = KQK + 1;
- //unsigned int kbs = KQK + nxny + nx;
- //unsigned int ktn = KQK;
- //unsigned int kbn = KQK + nxny;
- //unsigned int kts = KQK + nx;
- //unsigned int ktse = KQK + nx;
- //unsigned int kbnw = KQK + nxny + 1;
- //unsigned int ktnw = KQK + 1;
- //unsigned int kbse = KQK + nxny + nx;
- //unsigned int ktsw = KQK + nx + 1;
- //unsigned int kbne = KQK + nxny;
- //unsigned int ktne = KQK;
- //unsigned int kbsw = KQK + nxny + nx + 1;
- ////////////////////////////////////////////////////////////////////////////////
- //real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
- // f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
-
- //f_W = (D.f[dP00])[ke ];
- //f_E = (D.f[dM00])[kw ];
- //f_S = (D.f[d0P0])[kn ];
- //f_N = (D.f[d0M0])[ks ];
- //f_B = (D.f[d00P])[kt ];
- //f_T = (D.f[d00M])[kb ];
- //f_SW = (D.f[dPP0])[kne ];
- //f_NE = (D.f[dMM0])[ksw ];
- //f_NW = (D.f[dPM0])[kse ];
- //f_SE = (D.f[dMP0])[knw ];
- //f_BW = (D.f[dP0P])[kte ];
- //f_TE = (D.f[dM0M])[kbw ];
- //f_TW = (D.f[dP0M])[kbe ];
- //f_BE = (D.f[dM0P])[ktw ];
- //f_BS = (D.f[d0PP])[ktn ];
- //f_TN = (D.f[d0MM])[kbs ];
- //f_TS = (D.f[d0PM])[kbn ];
- //f_BN = (D.f[d0MP])[kts ];
- //f_BSW = (D.f[dPPP])[ktne ];
- //f_BNE = (D.f[dMMP])[ktsw ];
- //f_BNW = (D.f[dPMP])[ktse ];
- //f_BSE = (D.f[dMPP])[ktnw ];
- //f_TSW = (D.f[dPPM])[kbne ];
- //f_TNE = (D.f[dMMM])[kbsw ];
- //f_TNW = (D.f[dPMM])[kbse ];
- //f_TSE = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////
- real /*vx1, vx2,*/ vx3, drho, feq, q, cu_sq;
- //drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- // f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- // f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
-
- //vx1 = ((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- // ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- // (f_E - f_W);
-
-
- //vx2 = (-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- // ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- // (f_N - f_S);
-
- //vx3 = ((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- // (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- // (f_T - f_B);
-
- //cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);
-
- //////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //Test
- //(D.f[d000])[k]=c1o10;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- //ToDo anders Klammern
-
- //q = q_dirE[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c2over27* (drho/*+three*( vx1 )*/+c9over2*( vx1 )*( vx1 )-cu_sq);
- // (D.f[dM00])[kw]=(one-q)/(one+q)*(f_E-f_W+(f_E+f_W-two*feq*om1)/(one-om1))*c1o2+(q*(f_E+f_W)-six*c2over27*( VeloX ))/(one+q);
- // //(D.f[dM00])[kw]=zero;
- //}
-
- //q = q_dirW[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c2over27* (drho/*+three*(-vx1 )*/+c9over2*(-vx1 )*(-vx1 )-cu_sq);
- // (D.f[dP00])[ke]=(one-q)/(one+q)*(f_W-f_E+(f_W+f_E-two*feq*om1)/(one-om1))*c1o2+(q*(f_W+f_E)-six*c2over27*(-VeloX ))/(one+q);
- // //(D.f[dP00])[ke]=zero;
- //}
-
- //q = q_dirN[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c2over27* (drho/*+three*( vx2 )*/+c9over2*( vx2 )*( vx2 )-cu_sq);
- // (D.f[d0M0])[ks]=(one-q)/(one+q)*(f_N-f_S+(f_N+f_S-two*feq*om1)/(one-om1))*c1o2+(q*(f_N+f_S)-six*c2over27*( VeloY ))/(one+q);
- // //(D.f[d0M0])[ks]=zero;
- //}
-
- //q = q_dirS[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c2over27* (drho/*+three*( -vx2 )*/+c9over2*( -vx2 )*( -vx2 )-cu_sq);
- // (D.f[d0P0])[kn]=(one-q)/(one+q)*(f_S-f_N+(f_S+f_N-two*feq*om1)/(one-om1))*c1o2+(q*(f_S+f_N)-six*c2over27*(-VeloY ))/(one+q);
- // //(D.f[d0P0])[kn]=zero;
- //}
-
- //q = q_dirT[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c2over27* (drho/*+three*( vx3)*/+c9over2*( vx3)*( vx3)-cu_sq);
- // (D.f[d00M])[kb]=(one-q)/(one+q)*(f_T-f_B+(f_T+f_B-two*feq*om1)/(one-om1))*c1o2+(q*(f_T+f_B)-six*c2over27*( VeloZ ))/(one+q);
- // //(D.f[d00M])[kb]=one;
- //}
-
- //q = q_dirB[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c2over27* (drho/*+three*( -vx3)*/+c9over2*( -vx3)*( -vx3)-cu_sq);
- // (D.f[d00P])[kt]=(one-q)/(one+q)*(f_B-f_T+(f_B+f_T-two*feq*om1)/(one-om1))*c1o2+(q*(f_B+f_T)-six*c2over27*(-VeloZ ))/(one+q);
- // //(D.f[d00P])[kt]=zero;
- //}
-
- //q = q_dirNE[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*( vx1+vx2 )*/+c9over2*( vx1+vx2 )*( vx1+vx2 )-cu_sq);
- // (D.f[dMM0])[ksw]=(one-q)/(one+q)*(f_NE-f_SW+(f_NE+f_SW-two*feq*om1)/(one-om1))*c1o2+(q*(f_NE+f_SW)-six*c1over54*(VeloX+VeloY))/(one+q);
- // //(D.f[dMM0])[ksw]=zero;
- //}
-
- //q = q_dirSW[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*(-vx1-vx2 )*/+c9over2*(-vx1-vx2 )*(-vx1-vx2 )-cu_sq);
- // (D.f[dPP0])[kne]=(one-q)/(one+q)*(f_SW-f_NE+(f_SW+f_NE-two*feq*om1)/(one-om1))*c1o2+(q*(f_SW+f_NE)-six*c1over54*(-VeloX-VeloY))/(one+q);
- // //(D.f[dPP0])[kne]=zero;
- //}
-
- //q = q_dirSE[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*( vx1-vx2 )*/+c9over2*( vx1-vx2 )*( vx1-vx2 )-cu_sq);
- // (D.f[dMP0])[knw]=(one-q)/(one+q)*(f_SE-f_NW+(f_SE+f_NW-two*feq*om1)/(one-om1))*c1o2+(q*(f_SE+f_NW)-six*c1over54*( VeloX-VeloY))/(one+q);
- // //(D.f[dMP0])[knw]=zero;
- //}
-
- //q = q_dirNW[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*(-vx1+vx2 )*/+c9over2*(-vx1+vx2 )*(-vx1+vx2 )-cu_sq);
- // (D.f[dPM0])[kse]=(one-q)/(one+q)*(f_NW-f_SE+(f_NW+f_SE-two*feq*om1)/(one-om1))*c1o2+(q*(f_NW+f_SE)-six*c1over54*(-VeloX+VeloY))/(one+q);
- // //(D.f[dPM0])[kse]=zero;
- //}
-
- //q = q_dirTE[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*( vx1 +vx3)*/+c9over2*( vx1 +vx3)*( vx1 +vx3)-cu_sq);
- // (D.f[dM0M])[kbw]=(one-q)/(one+q)*(f_TE-f_BW+(f_TE+f_BW-two*feq*om1)/(one-om1))*c1o2+(q*(f_TE+f_BW)-six*c1over54*( VeloX+VeloZ))/(one+q);
- // //(D.f[dM0M])[kbw]=zero;
- //}
-
- //q = q_dirBW[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*(-vx1 -vx3)*/+c9over2*(-vx1 -vx3)*(-vx1 -vx3)-cu_sq);
- // (D.f[dP0P])[kte]=(one-q)/(one+q)*(f_BW-f_TE+(f_BW+f_TE-two*feq*om1)/(one-om1))*c1o2+(q*(f_BW+f_TE)-six*c1over54*(-VeloX-VeloZ))/(one+q);
- // //(D.f[dP0P])[kte]=zero;
- //}
-
- //q = q_dirBE[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*( vx1 -vx3)*/+c9over2*( vx1 -vx3)*( vx1 -vx3)-cu_sq);
- // (D.f[dM0P])[ktw]=(one-q)/(one+q)*(f_BE-f_TW+(f_BE+f_TW-two*feq*om1)/(one-om1))*c1o2+(q*(f_BE+f_TW)-six*c1over54*( VeloX-VeloZ))/(one+q);
- // //(D.f[dM0P])[ktw]=zero;
- //}
-
- //q = q_dirTW[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*(-vx1 +vx3)*/+c9over2*(-vx1 +vx3)*(-vx1 +vx3)-cu_sq);
- // (D.f[dP0M])[kbe]=(one-q)/(one+q)*(f_TW-f_BE+(f_TW+f_BE-two*feq*om1)/(one-om1))*c1o2+(q*(f_TW+f_BE)-six*c1over54*(-VeloX+VeloZ))/(one+q);
- // //(D.f[dP0M])[kbe]=zero;
- //}
-
- //q = q_dirTN[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*( vx2+vx3)*/+c9over2*( vx2+vx3)*( vx2+vx3)-cu_sq);
- // (D.f[d0MM])[kbs]=(one-q)/(one+q)*(f_TN-f_BS+(f_TN+f_BS-two*feq*om1)/(one-om1))*c1o2+(q*(f_TN+f_BS)-six*c1over54*( VeloY+VeloZ))/(one+q);
- // //(D.f[d0MM])[kbs]=zero;
- //}
-
- //q = q_dirBS[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*( -vx2-vx3)*/+c9over2*( -vx2-vx3)*( -vx2-vx3)-cu_sq);
- // (D.f[d0PP])[ktn]=(one-q)/(one+q)*(f_BS-f_TN+(f_BS+f_TN-two*feq*om1)/(one-om1))*c1o2+(q*(f_BS+f_TN)-six*c1over54*( -VeloY-VeloZ))/(one+q);
- // //(D.f[d0PP])[ktn]=zero;
- //}
-
- //q = q_dirBN[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*( vx2-vx3)*/+c9over2*( vx2-vx3)*( vx2-vx3)-cu_sq);
- // (D.f[d0MP])[kts]=(one-q)/(one+q)*(f_BN-f_TS+(f_BN+f_TS-two*feq*om1)/(one-om1))*c1o2+(q*(f_BN+f_TS)-six*c1over54*( VeloY-VeloZ))/(one+q);
- // //(D.f[d0MP])[kts]=zero;
- //}
-
- //q = q_dirTS[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over54* (drho/*+three*( -vx2+vx3)*/+c9over2*( -vx2+vx3)*( -vx2+vx3)-cu_sq);
- // (D.f[d0PM])[kbn]=(one-q)/(one+q)*(f_TS-f_BN+(f_TS+f_BN-two*feq*om1)/(one-om1))*c1o2+(q*(f_TS+f_BN)-six*c1over54*( -VeloY+VeloZ))/(one+q);
- // //(D.f[d0PM])[kbn]=zero;
- //}
-
- //q = q_dirTNE[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over216*(drho/*+three*( vx1+vx2+vx3)*/+c9over2*( vx1+vx2+vx3)*( vx1+vx2+vx3)-cu_sq);
- // (D.f[dMMM])[kbsw]=(one-q)/(one+q)*(f_TNE-f_BSW+(f_TNE+f_BSW-two*feq*om1)/(one-om1))*c1o2+(q*(f_TNE+f_BSW)-six*c1over216*( VeloX+VeloY+VeloZ))/(one+q);
- // //(D.f[dMMM])[kbsw]=zero;
- //}
-
- //q = q_dirBSW[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over216*(drho/*+three*(-vx1-vx2-vx3)*/+c9over2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3)-cu_sq);
- // (D.f[dPPP])[ktne]=(one-q)/(one+q)*(f_BSW-f_TNE+(f_BSW+f_TNE-two*feq*om1)/(one-om1))*c1o2+(q*(f_BSW+f_TNE)-six*c1over216*(-VeloX-VeloY-VeloZ))/(one+q);
- // //(D.f[dPPP])[ktne]=zero;
- //}
-
- //q = q_dirBNE[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over216*(drho/*+three*( vx1+vx2-vx3)*/+c9over2*( vx1+vx2-vx3)*( vx1+vx2-vx3)-cu_sq);
- // (D.f[dMMP])[ktsw]=(one-q)/(one+q)*(f_BNE-f_TSW+(f_BNE+f_TSW-two*feq*om1)/(one-om1))*c1o2+(q*(f_BNE+f_TSW)-six*c1over216*( VeloX+VeloY-VeloZ))/(one+q);
- // //(D.f[dMMP])[ktsw]=zero;
- //}
-
- //q = q_dirTSW[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over216*(drho/*+three*(-vx1-vx2+vx3)*/+c9over2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3)-cu_sq);
- // (D.f[dPPM])[kbne]=(one-q)/(one+q)*(f_TSW-f_BNE+(f_TSW+f_BNE-two*feq*om1)/(one-om1))*c1o2+(q*(f_TSW+f_BNE)-six*c1over216*(-VeloX-VeloY+VeloZ))/(one+q);
- // //(D.f[dPPM])[kbne]=zero;
- //}
-
- //q = q_dirTSE[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over216*(drho/*+three*( vx1-vx2+vx3)*/+c9over2*( vx1-vx2+vx3)*( vx1-vx2+vx3)-cu_sq);
- // (D.f[dMPM])[kbnw]=(one-q)/(one+q)*(f_TSE-f_BNW+(f_TSE+f_BNW-two*feq*om1)/(one-om1))*c1o2+(q*(f_TSE+f_BNW)-six*c1over216*( VeloX-VeloY+VeloZ))/(one+q);
- // //(D.f[dMPM])[kbnw]=zero;
- //}
-
- //q = q_dirBNW[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over216*(drho/*+three*(-vx1+vx2-vx3)*/+c9over2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3)-cu_sq);
- // (D.f[dPMP])[ktse]=(one-q)/(one+q)*(f_BNW-f_TSE+(f_BNW+f_TSE-two*feq*om1)/(one-om1))*c1o2+(q*(f_BNW+f_TSE)-six*c1over216*(-VeloX+VeloY-VeloZ))/(one+q);
- // //(D.f[dPMP])[ktse]=zero;
- //}
-
- //q = q_dirBSE[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over216*(drho/*+three*( vx1-vx2-vx3)*/+c9over2*( vx1-vx2-vx3)*( vx1-vx2-vx3)-cu_sq);
- // (D.f[dMPP])[ktnw]=(one-q)/(one+q)*(f_BSE-f_TNW+(f_BSE+f_TNW-two*feq*om1)/(one-om1))*c1o2+(q*(f_BSE+f_TNW)-six*c1over216*( VeloX-VeloY-VeloZ))/(one+q);
- // //(D.f[dMPP])[ktnw]=zero;
- //}
-
- //q = q_dirTNW[k];
- //if (q>=zero && q<=one)
- //{
- // feq=c1over216*(drho/*+three*(-vx1+vx2+vx3)*/+c9over2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3)-cu_sq);
- // (D.f[dPMM])[kbse]=(one-q)/(one+q)*(f_TNW-f_BSE+(f_TNW+f_BSE-two*feq*om1)/(one-om1))*c1o2+(q*(f_TNW+f_BSE)-six*c1over216*(-VeloX+VeloY+VeloZ))/(one+q);
- // //(D.f[dPMM])[kbse]=zero;
- //}
-
- ///////// equilibrium BC
- cu_sq=c3o2*(VeloX*VeloX +VeloY*VeloY);
- VeloXpur*=-c1o1;
- VeloYpur*=-c1o1;
- vx3=c0o1;
- drho=c0o1;
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*( VeloXpur )+c9o2*( VeloX )*( VeloX )-cu_sq);
- (D.f[dM00])[kw]=feq;
- //(D.f[dM00])[kw]=zero;
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*(-VeloXpur )+c9o2*(-VeloX )*(-VeloX )-cu_sq);
- (D.f[dP00])[ke]=feq;
- //(D.f[dP00])[ke]=zero;
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*( VeloYpur )+c9o2*( VeloY )*( VeloY )-cu_sq);
- (D.f[d0M0])[ks]=feq;
- //(D.f[d0M0])[ks]=zero;
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*( -VeloYpur )+c9o2*( -VeloY )*( -VeloY )-cu_sq);
- (D.f[d0P0])[kn]=feq;
- //(D.f[d0P0])[kn]=zero;
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*( vx3)+c9o2*( vx3)*( vx3)-cu_sq);
- (D.f[d00M])[kb]=feq;
- //(D.f[d00M])[kb]=one;
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho+c3o1*( -vx3)+c9o2*( -vx3)*( -vx3)-cu_sq);
- (D.f[d00P])[kt]=feq;
- //(D.f[d00P])[kt]=zero;
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloXpur+VeloYpur )+c9o2*( VeloX+VeloY )*( VeloX+VeloY )-cu_sq);
- (D.f[dMM0])[ksw]=feq;
- //(D.f[dMM0])[ksw]=zero;
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*(-VeloXpur-VeloYpur )+c9o2*(-VeloX-VeloY )*(-VeloX-VeloY )-cu_sq);
- (D.f[dPP0])[kne]=feq;
- //(D.f[dPP0])[kne]=zero;
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloXpur-VeloYpur )+c9o2*( VeloX-VeloY )*( VeloX-VeloY )-cu_sq);
- (D.f[dMP0])[knw]=feq;
- //(D.f[dMP0])[knw]=zero;
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*(-VeloXpur+VeloYpur )+c9o2*(-VeloX+VeloY )*(-VeloX+VeloY )-cu_sq);
- (D.f[dPM0])[kse]=feq;
- //(D.f[dPM0])[kse]=zero;
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloXpur +vx3)+c9o2*( VeloX +vx3)*( VeloX +vx3)-cu_sq);
- (D.f[dM0M])[kbw]=feq;
- //(D.f[dM0M])[kbw]=zero;
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*(-VeloXpur -vx3)+c9o2*(-VeloX -vx3)*(-VeloX -vx3)-cu_sq);
- (D.f[dP0P])[kte]=feq;
- //(D.f[dP0P])[kte]=zero;
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloXpur -vx3)+c9o2*( VeloX -vx3)*( VeloX -vx3)-cu_sq);
- (D.f[dM0P])[ktw]=feq;
- //(D.f[dM0P])[ktw]=zero;
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*(-VeloXpur +vx3)+c9o2*(-VeloX +vx3)*(-VeloX +vx3)-cu_sq);
- (D.f[dP0M])[kbe]=feq;
- //(D.f[dP0M])[kbe]=zero;
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloYpur+vx3)+c9o2*( VeloY+vx3)*( VeloY+vx3)-cu_sq);
- (D.f[d0MM])[kbs]=feq;
- //(D.f[d0MM])[kbs]=zero;
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( -VeloYpur-vx3)+c9o2*( -VeloY-vx3)*( -VeloY-vx3)-cu_sq);
- (D.f[d0PP])[ktn]=feq;
- //(D.f[d0PP])[ktn]=zero;
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( VeloYpur-vx3)+c9o2*( VeloY-vx3)*( VeloY-vx3)-cu_sq);
- (D.f[d0MP])[kts]=feq;
- //(D.f[d0MP])[kts]=zero;
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho+c3o1*( -VeloYpur+vx3)+c9o2*( -VeloY+vx3)*( -VeloY+vx3)-cu_sq);
- (D.f[d0PM])[kbn]=feq;
- //(D.f[d0PM])[kbn]=zero;
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*( VeloXpur+VeloYpur+vx3)+c9o2*( VeloX+VeloY+vx3)*( VeloX+VeloY+vx3)-cu_sq);
- (D.f[dMMM])[kbsw]=feq;
- //(D.f[dMMM])[kbsw]=zero;
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*(-VeloXpur-VeloYpur-vx3)+c9o2*(-VeloX-VeloY-vx3)*(-VeloX-VeloY-vx3)-cu_sq);
- (D.f[dPPP])[ktne]=feq;
- //(D.f[dPPP])[ktne]=zero;
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*( VeloXpur+VeloYpur-vx3)+c9o2*( VeloX+VeloY-vx3)*( VeloX+VeloY-vx3)-cu_sq);
- (D.f[dMMP])[ktsw]=feq;
- //(D.f[dMMP])[ktsw]=zero;
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*(-VeloXpur-VeloYpur+vx3)+c9o2*(-VeloX-VeloY+vx3)*(-VeloX-VeloY+vx3)-cu_sq);
- (D.f[dPPM])[kbne]=feq;
- //(D.f[dPPM])[kbne]=zero;
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*( VeloXpur-VeloYpur+vx3)+c9o2*( VeloX-VeloY+vx3)*( VeloX-VeloY+vx3)-cu_sq);
- (D.f[dMPM])[kbnw]=feq;
- //(D.f[dMPM])[kbnw]=zero;
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*(-VeloXpur+VeloYpur-vx3)+c9o2*(-VeloX+VeloY-vx3)*(-VeloX+VeloY-vx3)-cu_sq);
- (D.f[dPMP])[ktse]=feq;
- //(D.f[dPMP])[ktse]=zero;
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*( VeloXpur-VeloYpur-vx3)+c9o2*( VeloX-VeloY-vx3)*( VeloX-VeloY-vx3)-cu_sq);
- (D.f[dMPP])[ktnw]=feq;
- //(D.f[dMPP])[ktnw]=zero;
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho+c3o1*(-VeloXpur+VeloYpur+vx3)+c9o2*(-VeloX+VeloY+vx3)*(-VeloX+VeloY+vx3)-cu_sq);
- (D.f[dPMM])[kbse]=feq;
- //(D.f[dPMM])[kbse]=zero;
- }
-
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QVelDeviceComp27(
- real* velocityX,
- real* velocityY,
- real* velocityZ,
- real* distributions,
- int* subgridDistanceIndices,
- real* subgridDistances,
- unsigned int numberOfBCnodes,
- real omega,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- //////////////////////////////////////////////////////////////////////////
- //! The velocity boundary condition is executed in the following steps
- //!
- ////////////////////////////////////////////////////////////////////////////////
- //! - Get node index coordinates from threadIdx, blockIdx, blockDim and gridDim.
- //!
- const unsigned nodeIndex = getNodeIndex();
-
- //////////////////////////////////////////////////////////////////////////
- //! - Run for all indices in size of boundary condition (numberOfBCnodes)
- //!
- if(nodeIndex < numberOfBCnodes)
- {
- //////////////////////////////////////////////////////////////////////////
- //! - Read distributions: style of reading and writing the distributions from/to stored arrays dependent on timestep is based on the esoteric twist algorithm \ref
- //! <a href="https://doi.org/10.3390/computation5020019"><b>[ M. Geier et al. (2017), DOI:10.3390/computation5020019 ]</b></a>
- //!
- Distributions27 dist;
- getPointersToDistributions(dist, distributions, numberOfLBnodes, isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local velocities
- //!
- real VeloX = velocityX[nodeIndex];
- real VeloY = velocityY[nodeIndex];
- real VeloZ = velocityZ[nodeIndex];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local subgrid distances (q's)
- //!
- SubgridDistances27 subgridD;
- getPointersToSubgridDistances(subgridD, subgridDistances, numberOfBCnodes);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set neighbor indices (necessary for indirect addressing)
- //!
- unsigned int indexOfBCnode = subgridDistanceIndices[nodeIndex];
- unsigned int kzero= indexOfBCnode;
- unsigned int ke = indexOfBCnode;
- unsigned int kw = neighborX[indexOfBCnode];
- unsigned int kn = indexOfBCnode;
- unsigned int ks = neighborY[indexOfBCnode];
- unsigned int kt = indexOfBCnode;
- unsigned int kb = neighborZ[indexOfBCnode];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = indexOfBCnode;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = indexOfBCnode;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = indexOfBCnode;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = indexOfBCnode;
- unsigned int kbsw = neighborZ[ksw];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Set local distributions
- //!
- real f_W = (dist.f[dP00])[ke ];
- real f_E = (dist.f[dM00])[kw ];
- real f_S = (dist.f[d0P0])[kn ];
- real f_N = (dist.f[d0M0])[ks ];
- real f_B = (dist.f[d00P])[kt ];
- real f_T = (dist.f[d00M])[kb ];
- real f_SW = (dist.f[dPP0])[kne ];
- real f_NE = (dist.f[dMM0])[ksw ];
- real f_NW = (dist.f[dPM0])[kse ];
- real f_SE = (dist.f[dMP0])[knw ];
- real f_BW = (dist.f[dP0P])[kte ];
- real f_TE = (dist.f[dM0M])[kbw ];
- real f_TW = (dist.f[dP0M])[kbe ];
- real f_BE = (dist.f[dM0P])[ktw ];
- real f_BS = (dist.f[d0PP])[ktn ];
- real f_TN = (dist.f[d0MM])[kbs ];
- real f_TS = (dist.f[d0PM])[kbn ];
- real f_BN = (dist.f[d0MP])[kts ];
- real f_BSW = (dist.f[dPPP])[ktne ];
- real f_BNE = (dist.f[dMMP])[ktsw ];
- real f_BNW = (dist.f[dPMP])[ktse ];
- real f_BSE = (dist.f[dMPP])[ktnw ];
- real f_TSW = (dist.f[dPPM])[kbne ];
- real f_TNE = (dist.f[dMMM])[kbsw ];
- real f_TNW = (dist.f[dPMM])[kbse ];
- real f_TSE = (dist.f[dMPM])[kbnw ];
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Calculate macroscopic quantities
- //!
- real drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((dist.f[d000])[kzero]);
-
- real vx1 = (((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W)) / (c1o1 + drho);
-
- real vx2 = ((-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S)) / (c1o1 + drho);
-
- real vx3 = (((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B)) / (c1o1 + drho);
-
- real cu_sq = c3o2 * (vx1 * vx1 + vx2 * vx2 + vx3 * vx3) * (c1o1 + drho);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - change the pointer to write the results in the correct array
- //!
- getPointersToDistributions(dist, distributions, numberOfLBnodes, !isEvenTimestep);
-
- ////////////////////////////////////////////////////////////////////////////////
- //! - Update distributions with subgrid distance (q) between zero and one
- //!
- real feq, q, velocityLB, velocityBC;
- q = (subgridD.q[dP00])[nodeIndex];
- if (q>=c0o1 && q<=c1o1) // only update distribution for q between zero and one
- {
- velocityLB = vx1;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = VeloX;
- (dist.f[dM00])[kw] = getInterpolatedDistributionForVeloBC(q, f_E, f_W, feq, omega, velocityBC, c2o27);
- }
-
- q = (subgridD.q[dM00])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = -VeloX;
- (dist.f[dP00])[ke] = getInterpolatedDistributionForVeloBC(q, f_W, f_E, feq, omega, velocityBC, c2o27);
- }
-
- q = (subgridD.q[d0P0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = VeloY;
- (dist.f[d0M0])[ks] = getInterpolatedDistributionForVeloBC(q, f_N, f_S, feq, omega, velocityBC, c2o27);
- }
-
- q = (subgridD.q[d0M0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = -VeloY;
- (dist.f[d0P0])[kn] = getInterpolatedDistributionForVeloBC(q, f_S, f_N, feq, omega, velocityBC, c2o27);
- }
-
- q = (subgridD.q[d00P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = VeloZ;
- (dist.f[d00M])[kb] = getInterpolatedDistributionForVeloBC(q, f_T, f_B, feq, omega, velocityBC, c2o27);
- }
-
- q = (subgridD.q[d00M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c2o27);
- velocityBC = -VeloZ;
- (dist.f[d00P])[kt] = getInterpolatedDistributionForVeloBC(q, f_B, f_T, feq, omega, velocityBC, c2o27);
- }
-
- q = (subgridD.q[dPP0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloX + VeloY;
- (dist.f[dMM0])[ksw] = getInterpolatedDistributionForVeloBC(q, f_NE, f_SW, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dMM0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloX - VeloY;
- (dist.f[dPP0])[kne] = getInterpolatedDistributionForVeloBC(q, f_SW, f_NE, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dPM0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloX - VeloY;
- (dist.f[dMP0])[knw] = getInterpolatedDistributionForVeloBC(q, f_SE, f_NW, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dMP0])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloX + VeloY;
- (dist.f[dPM0])[kse] = getInterpolatedDistributionForVeloBC(q, f_NW, f_SE, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dP0P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloX + VeloZ;
- (dist.f[dM0M])[kbw] = getInterpolatedDistributionForVeloBC(q, f_TE, f_BW, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dM0M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloX - VeloZ;
- (dist.f[dP0P])[kte] = getInterpolatedDistributionForVeloBC(q, f_BW, f_TE, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dP0M])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloX - VeloZ;
- (dist.f[dM0P])[ktw] = getInterpolatedDistributionForVeloBC(q, f_BE, f_TW, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dM0P])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloX + VeloZ;
- (dist.f[dP0M])[kbe] = getInterpolatedDistributionForVeloBC(q, f_TW, f_BE, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[d0PP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloY + VeloZ;
- (dist.f[d0MM])[kbs] = getInterpolatedDistributionForVeloBC(q, f_TN, f_BS, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[d0MM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloY - VeloZ;
- (dist.f[d0PP])[ktn] = getInterpolatedDistributionForVeloBC(q, f_BS, f_TN, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[d0PM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = VeloY - VeloZ;
- (dist.f[d0MP])[kts] = getInterpolatedDistributionForVeloBC(q, f_BN, f_TS, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[d0MP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o54);
- velocityBC = -VeloY + VeloZ;
- (dist.f[d0PM])[kbn] = getInterpolatedDistributionForVeloBC(q, f_TS, f_BN, feq, omega, velocityBC, c1o54);
- }
-
- q = (subgridD.q[dPPP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = VeloX + VeloY + VeloZ;
- (dist.f[dMMM])[kbsw] = getInterpolatedDistributionForVeloBC(q, f_TNE, f_BSW, feq, omega, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dMMM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = -VeloX - VeloY - VeloZ;
- (dist.f[dPPP])[ktne] = getInterpolatedDistributionForVeloBC(q, f_BSW, f_TNE, feq, omega, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dPPM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 + vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = VeloX + VeloY - VeloZ;
- (dist.f[dMMP])[ktsw] = getInterpolatedDistributionForVeloBC(q, f_BNE, f_TSW, feq, omega, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dMMP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 - vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = -VeloX - VeloY + VeloZ;
- (dist.f[dPPM])[kbne] = getInterpolatedDistributionForVeloBC(q, f_TSW, f_BNE, feq, omega, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dPMP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = VeloX - VeloY + VeloZ;
- (dist.f[dMPM])[kbnw] = getInterpolatedDistributionForVeloBC(q, f_TSE, f_BNW, feq, omega, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dMPM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = -VeloX + VeloY - VeloZ;
- (dist.f[dPMP])[ktse] = getInterpolatedDistributionForVeloBC(q, f_BNW, f_TSE, feq, omega, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dPMM])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = vx1 - vx2 - vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = VeloX - VeloY - VeloZ;
- (dist.f[dMPP])[ktnw] = getInterpolatedDistributionForVeloBC(q, f_BSE, f_TNW, feq, omega, velocityBC, c1o216);
- }
-
- q = (subgridD.q[dMPP])[nodeIndex];
- if (q>=c0o1 && q<=c1o1)
- {
- velocityLB = -vx1 + vx2 + vx3;
- feq = getEquilibriumForBC(drho, velocityLB, cu_sq, c1o216);
- velocityBC = -VeloX + VeloY + VeloZ;
- (dist.f[dPMM])[kbse] = getInterpolatedDistributionForVeloBC(q, f_TNW, f_BSE, feq, omega, velocityBC, c1o216);
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-//////////////////////////////////////////////////////////////////////////////
-__global__ void QVelDevice27(
- int inx,
- int iny,
- real* vx,
- real* vy,
- real* vz,
- real* DD,
- int* k_Q,
- real* QQ,
- unsigned int numberOfBCnodes,
- real om1,
- unsigned int* neighborX,
- unsigned int* neighborY,
- unsigned int* neighborZ,
- unsigned long long numberOfLBnodes,
- bool isEvenTimestep)
-{
- Distributions27 D;
- if (isEvenTimestep==true)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////
- const unsigned x = threadIdx.x; // Globaler x-Index
- const unsigned y = blockIdx.x; // Globaler y-Index
- const unsigned z = blockIdx.y; // Globaler z-Index
-
- const unsigned nx = blockDim.x;
- const unsigned ny = gridDim.x;
-
- const unsigned k = nx*(ny*z + y) + x;
- //////////////////////////////////////////////////////////////////////////
-
- if(k<numberOfBCnodes)
- {
- ////////////////////////////////////////////////////////////////////////////////
- real VeloX = vx[k];
- real VeloY = vy[k];
- real VeloZ = vz[k]; //(16.0*(u0*2.0)*bbx*bby*(grid_nx-bbx)*(grid_ny-bby))/(grid_nx*grid_nx*grid_ny*grid_ny)
- ////////////////////////////////////////////////////////////////////////////////
- real *q_dirE, *q_dirW, *q_dirN, *q_dirS, *q_dirT, *q_dirB,
- *q_dirNE, *q_dirSW, *q_dirSE, *q_dirNW, *q_dirTE, *q_dirBW,
- *q_dirBE, *q_dirTW, *q_dirTN, *q_dirBS, *q_dirBN, *q_dirTS,
- *q_dirTNE, *q_dirTSW, *q_dirTSE, *q_dirTNW, *q_dirBNE, *q_dirBSW,
- *q_dirBSE, *q_dirBNW;
- q_dirE = &QQ[dP00 * numberOfBCnodes];
- q_dirW = &QQ[dM00 * numberOfBCnodes];
- q_dirN = &QQ[d0P0 * numberOfBCnodes];
- q_dirS = &QQ[d0M0 * numberOfBCnodes];
- q_dirT = &QQ[d00P * numberOfBCnodes];
- q_dirB = &QQ[d00M * numberOfBCnodes];
- q_dirNE = &QQ[dPP0 * numberOfBCnodes];
- q_dirSW = &QQ[dMM0 * numberOfBCnodes];
- q_dirSE = &QQ[dPM0 * numberOfBCnodes];
- q_dirNW = &QQ[dMP0 * numberOfBCnodes];
- q_dirTE = &QQ[dP0P * numberOfBCnodes];
- q_dirBW = &QQ[dM0M * numberOfBCnodes];
- q_dirBE = &QQ[dP0M * numberOfBCnodes];
- q_dirTW = &QQ[dM0P * numberOfBCnodes];
- q_dirTN = &QQ[d0PP * numberOfBCnodes];
- q_dirBS = &QQ[d0MM * numberOfBCnodes];
- q_dirBN = &QQ[d0PM * numberOfBCnodes];
- q_dirTS = &QQ[d0MP * numberOfBCnodes];
- q_dirTNE = &QQ[dPPP * numberOfBCnodes];
- q_dirTSW = &QQ[dMMP * numberOfBCnodes];
- q_dirTSE = &QQ[dPMP * numberOfBCnodes];
- q_dirTNW = &QQ[dMPP * numberOfBCnodes];
- q_dirBNE = &QQ[dPPM * numberOfBCnodes];
- q_dirBSW = &QQ[dMMM * numberOfBCnodes];
- q_dirBSE = &QQ[dPMM * numberOfBCnodes];
- q_dirBNW = &QQ[dMPM * numberOfBCnodes];
- ////////////////////////////////////////////////////////////////////////////////
- //index
- unsigned int KQK = k_Q[k];
- unsigned int kzero= KQK;
- unsigned int ke = KQK;
- unsigned int kw = neighborX[KQK];
- unsigned int kn = KQK;
- unsigned int ks = neighborY[KQK];
- unsigned int kt = KQK;
- unsigned int kb = neighborZ[KQK];
- unsigned int ksw = neighborY[kw];
- unsigned int kne = KQK;
- unsigned int kse = ks;
- unsigned int knw = kw;
- unsigned int kbw = neighborZ[kw];
- unsigned int kte = KQK;
- unsigned int kbe = kb;
- unsigned int ktw = kw;
- unsigned int kbs = neighborZ[ks];
- unsigned int ktn = KQK;
- unsigned int kbn = kb;
- unsigned int kts = ks;
- unsigned int ktse = ks;
- unsigned int kbnw = kbw;
- unsigned int ktnw = kw;
- unsigned int kbse = kbs;
- unsigned int ktsw = ksw;
- unsigned int kbne = kb;
- unsigned int ktne = KQK;
- unsigned int kbsw = neighborZ[ksw];
- //unsigned int nxny = nx*ny;
- //unsigned int kzero= KQK;
- //unsigned int ke = KQK;
- //unsigned int kw = KQK + 1;
- //unsigned int kn = KQK;
- //unsigned int ks = KQK + nx;
- //unsigned int kt = KQK;
- //unsigned int kb = KQK + nxny;
- //unsigned int ksw = KQK + nx + 1;
- //unsigned int kne = KQK;
- //unsigned int kse = KQK + nx;
- //unsigned int knw = KQK + 1;
- //unsigned int kbw = KQK + nxny + 1;
- //unsigned int kte = KQK;
- //unsigned int kbe = KQK + nxny;
- //unsigned int ktw = KQK + 1;
- //unsigned int kbs = KQK + nxny + nx;
- //unsigned int ktn = KQK;
- //unsigned int kbn = KQK + nxny;
- //unsigned int kts = KQK + nx;
- //unsigned int ktse = KQK + nx;
- //unsigned int kbnw = KQK + nxny + 1;
- //unsigned int ktnw = KQK + 1;
- //unsigned int kbse = KQK + nxny + nx;
- //unsigned int ktsw = KQK + nx + 1;
- //unsigned int kbne = KQK + nxny;
- //unsigned int ktne = KQK;
- //unsigned int kbsw = KQK + nxny + nx + 1;
- ////////////////////////////////////////////////////////////////////////////////
- real f_E, f_W, f_N, f_S, f_T, f_B, f_NE, f_SW, f_SE, f_NW, f_TE, f_BW, f_BE,
- f_TW, f_TN, f_BS, f_BN, f_TS, f_TNE, f_TSW, f_TSE, f_TNW, f_BNE, f_BSW, f_BSE, f_BNW;
-
- f_W = (D.f[dP00])[ke ];
- f_E = (D.f[dM00])[kw ];
- f_S = (D.f[d0P0])[kn ];
- f_N = (D.f[d0M0])[ks ];
- f_B = (D.f[d00P])[kt ];
- f_T = (D.f[d00M])[kb ];
- f_SW = (D.f[dPP0])[kne ];
- f_NE = (D.f[dMM0])[ksw ];
- f_NW = (D.f[dPM0])[kse ];
- f_SE = (D.f[dMP0])[knw ];
- f_BW = (D.f[dP0P])[kte ];
- f_TE = (D.f[dM0M])[kbw ];
- f_TW = (D.f[dP0M])[kbe ];
- f_BE = (D.f[dM0P])[ktw ];
- f_BS = (D.f[d0PP])[ktn ];
- f_TN = (D.f[d0MM])[kbs ];
- f_TS = (D.f[d0PM])[kbn ];
- f_BN = (D.f[d0MP])[kts ];
- f_BSW = (D.f[dPPP])[ktne ];
- f_BNE = (D.f[dMMP])[ktsw ];
- f_BNW = (D.f[dPMP])[ktse ];
- f_BSE = (D.f[dMPP])[ktnw ];
- f_TSW = (D.f[dPPM])[kbne ];
- f_TNE = (D.f[dMMM])[kbsw ];
- f_TNW = (D.f[dPMM])[kbse ];
- f_TSE = (D.f[dMPM])[kbnw ];
- ////////////////////////////////////////////////////////////////////////////////
- real vx1, vx2, vx3, drho, feq, q;
- drho = f_TSE + f_TNW + f_TNE + f_TSW + f_BSE + f_BNW + f_BNE + f_BSW +
- f_BN + f_TS + f_TN + f_BS + f_BE + f_TW + f_TE + f_BW + f_SE + f_NW + f_NE + f_SW +
- f_T + f_B + f_N + f_S + f_E + f_W + ((D.f[d000])[kzero]);
-
- vx1 = ((f_TSE - f_BNW) - (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BE - f_TW) + (f_TE - f_BW)) + ((f_SE - f_NW) + (f_NE - f_SW)) +
- (f_E - f_W);
-
-
- vx2 = (-(f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) - (f_TSW - f_BNE)) +
- ((f_BN - f_TS) + (f_TN - f_BS)) + (-(f_SE - f_NW) + (f_NE - f_SW)) +
- (f_N - f_S);
-
- vx3 = ((f_TSE - f_BNW) + (f_TNW - f_BSE)) + ((f_TNE - f_BSW) + (f_TSW - f_BNE)) +
- (-(f_BN - f_TS) + (f_TN - f_BS)) + ((f_TE - f_BW) - (f_BE - f_TW)) +
- (f_T - f_B);
-
- real cu_sq=c3o2*(vx1*vx1+vx2*vx2+vx3*vx3);
-
- //////////////////////////////////////////////////////////////////////////
- if (isEvenTimestep==false)
- {
- D.f[dP00] = &DD[dP00 * numberOfLBnodes];
- D.f[dM00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00P] = &DD[d00P * numberOfLBnodes];
- D.f[d00M] = &DD[d00M * numberOfLBnodes];
- D.f[dPP0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dMM0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dP0P] = &DD[dP0P * numberOfLBnodes];
- D.f[dM0M] = &DD[dM0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dP0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dM0P * numberOfLBnodes];
- D.f[d0PP] = &DD[d0PP * numberOfLBnodes];
- D.f[d0MM] = &DD[d0MM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0PM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dPPP * numberOfLBnodes];
- D.f[dMMP] = &DD[dMMP * numberOfLBnodes];
- D.f[dPMP] = &DD[dPMP * numberOfLBnodes];
- D.f[dMPP] = &DD[dMPP * numberOfLBnodes];
- D.f[dPPM] = &DD[dPPM * numberOfLBnodes];
- D.f[dMMM] = &DD[dMMM * numberOfLBnodes];
- D.f[dPMM] = &DD[dPMM * numberOfLBnodes];
- D.f[dMPM] = &DD[dMPM * numberOfLBnodes];
- }
- else
- {
- D.f[dM00] = &DD[dP00 * numberOfLBnodes];
- D.f[dP00] = &DD[dM00 * numberOfLBnodes];
- D.f[d0M0] = &DD[d0P0 * numberOfLBnodes];
- D.f[d0P0] = &DD[d0M0 * numberOfLBnodes];
- D.f[d00M] = &DD[d00P * numberOfLBnodes];
- D.f[d00P] = &DD[d00M * numberOfLBnodes];
- D.f[dMM0] = &DD[dPP0 * numberOfLBnodes];
- D.f[dPP0] = &DD[dMM0 * numberOfLBnodes];
- D.f[dMP0] = &DD[dPM0 * numberOfLBnodes];
- D.f[dPM0] = &DD[dMP0 * numberOfLBnodes];
- D.f[dM0M] = &DD[dP0P * numberOfLBnodes];
- D.f[dP0P] = &DD[dM0M * numberOfLBnodes];
- D.f[dM0P] = &DD[dP0M * numberOfLBnodes];
- D.f[dP0M] = &DD[dM0P * numberOfLBnodes];
- D.f[d0MM] = &DD[d0PP * numberOfLBnodes];
- D.f[d0PP] = &DD[d0MM * numberOfLBnodes];
- D.f[d0MP] = &DD[d0PM * numberOfLBnodes];
- D.f[d0PM] = &DD[d0MP * numberOfLBnodes];
- D.f[d000] = &DD[d000 * numberOfLBnodes];
- D.f[dPPP] = &DD[dMMM * numberOfLBnodes];
- D.f[dMMP] = &DD[dPPM * numberOfLBnodes];
- D.f[dPMP] = &DD[dMPM * numberOfLBnodes];
- D.f[dMPP] = &DD[dPMM * numberOfLBnodes];
- D.f[dPPM] = &DD[dMMP * numberOfLBnodes];
- D.f[dMMM] = &DD[dPPP * numberOfLBnodes];
- D.f[dPMM] = &DD[dMPP * numberOfLBnodes];
- D.f[dMPM] = &DD[dPMP * numberOfLBnodes];
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //Test
- //(D.f[d000])[k]=c1o10;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- //ToDo anders Klammern
-
- q = q_dirE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx1 )*/+c9o2*( vx1 )*( vx1 )-cu_sq);
- (D.f[dM00])[kw]=(c1o1-q)/(c1o1+q)*(f_E-f_W+(f_E+f_W-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_E+f_W)-c6o1*c2o27*( VeloX ))/(c1o1+q);
- //(D.f[dM00])[kw]=zero;
- }
-
- q = q_dirW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*(-vx1 )*/+c9o2*(-vx1 )*(-vx1 )-cu_sq);
- (D.f[dP00])[ke]=(c1o1-q)/(c1o1+q)*(f_W-f_E+(f_W+f_E-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_W+f_E)-c6o1*c2o27*(-VeloX ))/(c1o1+q);
- //(D.f[dP00])[ke]=zero;
- }
-
- q = q_dirN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx2 )*/+c9o2*( vx2 )*( vx2 )-cu_sq);
- (D.f[d0M0])[ks]=(c1o1-q)/(c1o1+q)*(f_N-f_S+(f_N+f_S-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_N+f_S)-c6o1*c2o27*( VeloY ))/(c1o1+q);
- //(D.f[d0M0])[ks]=zero;
- }
-
- q = q_dirS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx2 )*/+c9o2*( -vx2 )*( -vx2 )-cu_sq);
- (D.f[d0P0])[kn]=(c1o1-q)/(c1o1+q)*(f_S-f_N+(f_S+f_N-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_S+f_N)-c6o1*c2o27*(-VeloY ))/(c1o1+q);
- //(D.f[d0P0])[kn]=zero;
- }
-
- q = q_dirT[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( vx3)*/+c9o2*( vx3)*( vx3)-cu_sq);
- (D.f[d00M])[kb]=(c1o1-q)/(c1o1+q)*(f_T-f_B+(f_T+f_B-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_T+f_B)-c6o1*c2o27*( VeloZ ))/(c1o1+q);
- //(D.f[d00M])[kb]=one;
- }
-
- q = q_dirB[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c2o27* (drho/*+three*( -vx3)*/+c9o2*( -vx3)*( -vx3)-cu_sq);
- (D.f[d00P])[kt]=(c1o1-q)/(c1o1+q)*(f_B-f_T+(f_B+f_T-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_B+f_T)-c6o1*c2o27*(-VeloZ ))/(c1o1+q);
- //(D.f[d00P])[kt]=zero;
- }
-
- q = q_dirNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1+vx2 )*/+c9o2*( vx1+vx2 )*( vx1+vx2 )-cu_sq);
- (D.f[dMM0])[ksw]=(c1o1-q)/(c1o1+q)*(f_NE-f_SW+(f_NE+f_SW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_NE+f_SW)-c6o1*c1o54*(VeloX+VeloY))/(c1o1+q);
- //(D.f[dMM0])[ksw]=zero;
- }
-
- q = q_dirSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1-vx2 )*/+c9o2*(-vx1-vx2 )*(-vx1-vx2 )-cu_sq);
- (D.f[dPP0])[kne]=(c1o1-q)/(c1o1+q)*(f_SW-f_NE+(f_SW+f_NE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_SW+f_NE)-c6o1*c1o54*(-VeloX-VeloY))/(c1o1+q);
- //(D.f[dPP0])[kne]=zero;
- }
-
- q = q_dirSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1-vx2 )*/+c9o2*( vx1-vx2 )*( vx1-vx2 )-cu_sq);
- (D.f[dMP0])[knw]=(c1o1-q)/(c1o1+q)*(f_SE-f_NW+(f_SE+f_NW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_SE+f_NW)-c6o1*c1o54*( VeloX-VeloY))/(c1o1+q);
- //(D.f[dMP0])[knw]=zero;
- }
-
- q = q_dirNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1+vx2 )*/+c9o2*(-vx1+vx2 )*(-vx1+vx2 )-cu_sq);
- (D.f[dPM0])[kse]=(c1o1-q)/(c1o1+q)*(f_NW-f_SE+(f_NW+f_SE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_NW+f_SE)-c6o1*c1o54*(-VeloX+VeloY))/(c1o1+q);
- //(D.f[dPM0])[kse]=zero;
- }
-
- q = q_dirTE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 +vx3)*/+c9o2*( vx1 +vx3)*( vx1 +vx3)-cu_sq);
- (D.f[dM0M])[kbw]=(c1o1-q)/(c1o1+q)*(f_TE-f_BW+(f_TE+f_BW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TE+f_BW)-c6o1*c1o54*( VeloX+VeloZ))/(c1o1+q);
- //(D.f[dM0M])[kbw]=zero;
- }
-
- q = q_dirBW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 -vx3)*/+c9o2*(-vx1 -vx3)*(-vx1 -vx3)-cu_sq);
- (D.f[dP0P])[kte]=(c1o1-q)/(c1o1+q)*(f_BW-f_TE+(f_BW+f_TE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BW+f_TE)-c6o1*c1o54*(-VeloX-VeloZ))/(c1o1+q);
- //(D.f[dP0P])[kte]=zero;
- }
-
- q = q_dirBE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx1 -vx3)*/+c9o2*( vx1 -vx3)*( vx1 -vx3)-cu_sq);
- (D.f[dM0P])[ktw]=(c1o1-q)/(c1o1+q)*(f_BE-f_TW+(f_BE+f_TW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BE+f_TW)-c6o1*c1o54*( VeloX-VeloZ))/(c1o1+q);
- //(D.f[dM0P])[ktw]=zero;
- }
-
- q = q_dirTW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*(-vx1 +vx3)*/+c9o2*(-vx1 +vx3)*(-vx1 +vx3)-cu_sq);
- (D.f[dP0M])[kbe]=(c1o1-q)/(c1o1+q)*(f_TW-f_BE+(f_TW+f_BE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TW+f_BE)-c6o1*c1o54*(-VeloX+VeloZ))/(c1o1+q);
- //(D.f[dP0M])[kbe]=zero;
- }
-
- q = q_dirTN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2+vx3)*/+c9o2*( vx2+vx3)*( vx2+vx3)-cu_sq);
- (D.f[d0MM])[kbs]=(c1o1-q)/(c1o1+q)*(f_TN-f_BS+(f_TN+f_BS-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TN+f_BS)-c6o1*c1o54*( VeloY+VeloZ))/(c1o1+q);
- //(D.f[d0MM])[kbs]=zero;
- }
-
- q = q_dirBS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2-vx3)*/+c9o2*( -vx2-vx3)*( -vx2-vx3)-cu_sq);
- (D.f[d0PP])[ktn]=(c1o1-q)/(c1o1+q)*(f_BS-f_TN+(f_BS+f_TN-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BS+f_TN)-c6o1*c1o54*( -VeloY-VeloZ))/(c1o1+q);
- //(D.f[d0PP])[ktn]=zero;
- }
-
- q = q_dirBN[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( vx2-vx3)*/+c9o2*( vx2-vx3)*( vx2-vx3)-cu_sq);
- (D.f[d0MP])[kts]=(c1o1-q)/(c1o1+q)*(f_BN-f_TS+(f_BN+f_TS-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BN+f_TS)-c6o1*c1o54*( VeloY-VeloZ))/(c1o1+q);
- //(D.f[d0MP])[kts]=zero;
- }
-
- q = q_dirTS[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o54* (drho/*+three*( -vx2+vx3)*/+c9o2*( -vx2+vx3)*( -vx2+vx3)-cu_sq);
- (D.f[d0PM])[kbn]=(c1o1-q)/(c1o1+q)*(f_TS-f_BN+(f_TS+f_BN-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TS+f_BN)-c6o1*c1o54*( -VeloY+VeloZ))/(c1o1+q);
- //(D.f[d0PM])[kbn]=zero;
- }
-
- q = q_dirTNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2+vx3)*/+c9o2*( vx1+vx2+vx3)*( vx1+vx2+vx3)-cu_sq);
- (D.f[dMMM])[kbsw]=(c1o1-q)/(c1o1+q)*(f_TNE-f_BSW+(f_TNE+f_BSW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TNE+f_BSW)-c6o1*c1o216*( VeloX+VeloY+VeloZ))/(c1o1+q);
- //(D.f[dMMM])[kbsw]=zero;
- }
-
- q = q_dirBSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2-vx3)*/+c9o2*(-vx1-vx2-vx3)*(-vx1-vx2-vx3)-cu_sq);
- (D.f[dPPP])[ktne]=(c1o1-q)/(c1o1+q)*(f_BSW-f_TNE+(f_BSW+f_TNE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BSW+f_TNE)-c6o1*c1o216*(-VeloX-VeloY-VeloZ))/(c1o1+q);
- //(D.f[dPPP])[ktne]=zero;
- }
-
- q = q_dirBNE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1+vx2-vx3)*/+c9o2*( vx1+vx2-vx3)*( vx1+vx2-vx3)-cu_sq);
- (D.f[dMMP])[ktsw]=(c1o1-q)/(c1o1+q)*(f_BNE-f_TSW+(f_BNE+f_TSW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BNE+f_TSW)-c6o1*c1o216*( VeloX+VeloY-VeloZ))/(c1o1+q);
- //(D.f[dMMP])[ktsw]=zero;
- }
-
- q = q_dirTSW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1-vx2+vx3)*/+c9o2*(-vx1-vx2+vx3)*(-vx1-vx2+vx3)-cu_sq);
- (D.f[dPPM])[kbne]=(c1o1-q)/(c1o1+q)*(f_TSW-f_BNE+(f_TSW+f_BNE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TSW+f_BNE)-c6o1*c1o216*(-VeloX-VeloY+VeloZ))/(c1o1+q);
- //(D.f[dPPM])[kbne]=zero;
- }
-
- q = q_dirTSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2+vx3)*/+c9o2*( vx1-vx2+vx3)*( vx1-vx2+vx3)-cu_sq);
- (D.f[dMPM])[kbnw]=(c1o1-q)/(c1o1+q)*(f_TSE-f_BNW+(f_TSE+f_BNW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TSE+f_BNW)-c6o1*c1o216*( VeloX-VeloY+VeloZ))/(c1o1+q);
- //(D.f[dMPM])[kbnw]=zero;
- }
-
- q = q_dirBNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2-vx3)*/+c9o2*(-vx1+vx2-vx3)*(-vx1+vx2-vx3)-cu_sq);
- (D.f[dPMP])[ktse]=(c1o1-q)/(c1o1+q)*(f_BNW-f_TSE+(f_BNW+f_TSE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BNW+f_TSE)-c6o1*c1o216*(-VeloX+VeloY-VeloZ))/(c1o1+q);
- //(D.f[dPMP])[ktse]=zero;
- }
-
- q = q_dirBSE[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*( vx1-vx2-vx3)*/+c9o2*( vx1-vx2-vx3)*( vx1-vx2-vx3)-cu_sq);
- (D.f[dMPP])[ktnw]=(c1o1-q)/(c1o1+q)*(f_BSE-f_TNW+(f_BSE+f_TNW-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_BSE+f_TNW)-c6o1*c1o216*( VeloX-VeloY-VeloZ))/(c1o1+q);
- //(D.f[dMPP])[ktnw]=zero;
- }
-
- q = q_dirTNW[k];
- if (q>=c0o1 && q<=c1o1)
- {
- feq=c1o216*(drho/*+three*(-vx1+vx2+vx3)*/+c9o2*(-vx1+vx2+vx3)*(-vx1+vx2+vx3)-cu_sq);
- (D.f[dPMM])[kbse]=(c1o1-q)/(c1o1+q)*(f_TNW-f_BSE+(f_TNW+f_BSE-c2o1*feq*om1)/(c1o1-om1))*c1o2+(q*(f_TNW+f_BSE)-c6o1*c1o216*(-VeloX+VeloY+VeloZ))/(c1o1+q);
- //(D.f[dPMM])[kbse]=zero;
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
diff --git a/src/gpu/core/LBM/LB.h b/src/gpu/core/LBM/LB.h
index 8cef301f55ceccfa3842d35464b9c9dfbe63885e..0ecb62caf05dea3d420b55845f76798e10b566d5 100644
--- a/src/gpu/core/LBM/LB.h
+++ b/src/gpu/core/LBM/LB.h
@@ -257,21 +257,6 @@ struct ProcessNeighborF3
int numberOfGs;
};
-// DEPRECATED
-struct PathLineParticles
-{
- bool *stuck, *hot;
- real *coordXabsolut, *coordYabsolut, *coordZabsolut;
- real *coordXlocal, *coordYlocal, *coordZlocal;
- real *veloX, *veloY, *veloZ;
- real *randomLocationInit;
- uint *timestep;
- uint *ID;
- uint *cellBaseID;
- uint numberOfParticles, numberOfTimestepsParticles;
- uint memSizeID, memSizeTimestep, memSizerealAll, memSizereal, memSizeBool, memSizeBoolBC;
-};
-
//////////////////////////////////////////////////////////////////////////
// DEPRECATED
inline int vectorPosition(int i, int j, int k, int Lx, int Ly)
diff --git a/src/gpu/core/LBM/Simulation.cpp b/src/gpu/core/LBM/Simulation.cpp
index a02f69b16b8d8f50b43b19a7f4a09567dd9b9ca0..7100b876bf4ffc3bd66c4238d5095caaa7801894 100644
--- a/src/gpu/core/LBM/Simulation.cpp
+++ b/src/gpu/core/LBM/Simulation.cpp
@@ -28,11 +28,6 @@
#include "PreProcessor/InitLattice.h"
#include "PreProcessor/ReaderMeasurePoints.h"
//////////////////////////////////////////////////////////////////////////
-#include "FindQ/FindQ.h"
-#include "FindQ/DefineBCs.h"
-//////////////////////////////////////////////////////////////////////////
-#include "Particles/Particles.h"
-//////////////////////////////////////////////////////////////////////////
#include "Calculation/UpdateGrid27.h"
#include "Calculation/PlaneCalculations.h"
#include "Calculation/DragLift.h"
@@ -167,33 +162,6 @@ void Simulation::init(GridProvider &gridProvider, BoundaryConditionFactory *bcFa
std::vector<PreProcessorType> preProTypes = kernels.at(0)->getPreProcessorTypes();
preProcessor = preProcessorFactory->makePreProcessor(preProTypes, para);
- //////////////////////////////////////////////////////////////////////////
- // Particles preprocessing
- //////////////////////////////////////////////////////////////////////////
- if (para->getCalcParticles()) {
- rearrangeGeometry(para.get(), cudaMemoryManager.get());
- //////////////////////////////////////////////////////////////////////////
- allocParticles(para.get(), cudaMemoryManager.get());
- //////////////////////////////////////////////////////////////////////////
- ////CUDA random number generation
- // para->cudaAllocRandomValues();
-
- ////init
- // initRandomDevice(para->getRandomState(),
- // para->getParD(0)->plp.numberOfParticles,
- // para->getParD(0)->numberofthreads);
-
- ////generate random values
- // generateRandomValuesDevice( para->getRandomState(),
- // para->getParD(0)->plp.numberOfParticles,
- // para->getParD(0)->plp.randomLocationInit,
- // para->getParD(0)->numberofthreads);
-
- //////////////////////////////////////////////////////////////////////////////
- initParticles(para.get());
- }
- ////////////////////////////////////////////////////////////////////////////
-
//////////////////////////////////////////////////////////////////////////
// Allocate Memory for Drag Lift Calculation
//////////////////////////////////////////////////////////////////////////
@@ -361,11 +329,9 @@ void Simulation::init(GridProvider &gridProvider, BoundaryConditionFactory *bcFa
//////////////////////////////////////////////////////////////////////////
VF_LOG_INFO("Write initialized Files ...");
dataWriter->writeInit(para, cudaMemoryManager);
- if (para->getCalcParticles())
- copyAndPrintParticles(para.get(), cudaMemoryManager.get(), 0, true);
VF_LOG_INFO("... done.");
- VF_LOG_INFO("Write vtk files for debugging...");
+ // VF_LOG_INFO("Write vtk files for debugging...");
// NeighborDebugWriter::writeNeighborLinkLinesDebug(para.get());
// InterfaceDebugWriter::writeInterfaceLinesDebugCF(para.get());
@@ -386,7 +352,7 @@ void Simulation::init(GridProvider &gridProvider, BoundaryConditionFactory *bcFa
DistributionDebugWriter::allocateDistributionsOnHost(*cudaMemoryManager);
#endif
- VF_LOG_INFO("...done");
+ // VF_LOG_INFO("...done");
//////////////////////////////////////////////////////////////////////////
VF_LOG_INFO("used Device Memory: {} MB", cudaMemoryManager->getMemsizeGPU() / 1000000.0);
@@ -509,11 +475,6 @@ void Simulation::calculateTimestep(uint timestep)
{
this->updateGrid27->updateGrid(0, timestep);
////////////////////////////////////////////////////////////////////////////////
- //Particles
- ////////////////////////////////////////////////////////////////////////////////
- if (para->getCalcParticles()) propagateParticles(para.get(), timestep);
- ////////////////////////////////////////////////////////////////////////////////
- ////////////////////////////////////////////////////////////////////////////////
// run Analyzers for kinetic energy and enstrophy for TGV in 3D
// these analyzers only work on level 0
////////////////////////////////////////////////////////////////////////////////
@@ -961,7 +922,6 @@ void Simulation::readAndWriteFiles(uint timestep)
printDragLift(para.get(), cudaMemoryManager.get(), timestep);
}
////////////////////////////////////////////////////////////////////////
- if (para->getCalcParticles()) copyAndPrintParticles(para.get(), cudaMemoryManager.get(), timestep, false);
#if DEBUG_FS
// Write distributions (f's) for debugging purposes.
diff --git a/src/gpu/core/LBM/Simulation.h b/src/gpu/core/LBM/Simulation.h
index 4a9c89ba0aec09439bf8f440b9af2bc02054f167..f7f2840b7e049dcfd0bf69cf87c0e6cebb624279 100644
--- a/src/gpu/core/LBM/Simulation.h
+++ b/src/gpu/core/LBM/Simulation.h
@@ -74,7 +74,6 @@ private:
Buffer2D <int> geo_sbuf_b;
Buffer2D <int> geo_rbuf_b;
-
vf::parallel::Communicator& communicator;
SPtr<Parameter> para;
std::shared_ptr<DataWriter> dataWriter;
@@ -92,29 +91,10 @@ private:
uint previousTimestepForAveraging;
uint previousTimestepForTurbulenceIntensityCalculation;
uint timestepForMeasuringPoints;
-
//Forcing Calculation
std::shared_ptr<ForceCalculations> forceCalculator;
-
- // TODO: https://git.rz.tu-bs.de/irmb/VirtualFluids_dev/-/issues/29
- //KQ - Schlaff
- // unsigned int kNQ, kSQ, kEQ, kWQ;
- // QforBoundaryConditions QnH, QnD;
- // QforBoundaryConditions QsH, QsD;
- // QforBoundaryConditions QeH, QeD;
- // QforBoundaryConditions QwH, QwD;
- // real *VxNH, *VyNH, *VzNH, *deltaVNH;
- // real *VxND, *VyND, *VzND, *deltaVND;
- // real *VxSH, *VySH, *VzSH, *deltaVSH;
- // real *VxSD, *VySD, *VzSD, *deltaVSD;
- // real *VxEH, *VyEH, *VzEH, *deltaVEH;
- // real *VxED, *VyED, *VzED, *deltaVED;
- // real *VxWH, *VyWH, *VzWH, *deltaVWH;
- // real *VxWD, *VyWD, *VzWD, *deltaVWD;
-
-
std::unique_ptr<KineticEnergyAnalyzer> kineticEnergyAnalyzer;
std::unique_ptr<EnstrophyAnalyzer> enstrophyAnalyzer;
std::unique_ptr<UpdateGrid27> updateGrid27;
diff --git a/src/gpu/core/Output/NeighborDebugWriter.hpp b/src/gpu/core/Output/NeighborDebugWriter.hpp
index a05aad82137fc378b7f899d31c1b06d53199d694..fcd067d4976a235b53fe1c1a9e056829e9c892ea 100644
--- a/src/gpu/core/Output/NeighborDebugWriter.hpp
+++ b/src/gpu/core/Output/NeighborDebugWriter.hpp
@@ -15,20 +15,15 @@
namespace NeighborDebugWriter
{
-inline void writeNeighborLinkLines(LBMSimulationParameter *parH, int direction, const std::string &name,
- WbWriter *writer)
+inline void writeNeighborLinkLines(LBMSimulationParameter *parH, int direction, const std::string &name, WbWriter *writer)
{
VF_LOG_INFO("Write node links in direction {}.", direction);
- const unsigned long long numberOfNodes = parH->numberOfNodes;
std::vector<UbTupleFloat3> nodes;
- nodes.reserve(numberOfNodes);
std::vector<UbTupleInt2> cells;
- cells.reserve(numberOfNodes/2);
- for (size_t position = 0; position < numberOfNodes; position++) {
- if (parH->typeOfGridNode[position] != GEO_FLUID)
- continue;
+ for (size_t position = 0; position < parH->numberOfNodes; position++) {
+ if (parH->typeOfGridNode[position] != GEO_FLUID) continue;
const double x1 = parH->coordinateX[position];
const double x2 = parH->coordinateY[position];
@@ -54,7 +49,8 @@ inline void writeNeighborLinkLinesDebug(Parameter *para)
for (size_t direction = vf::lbm::dir::STARTDIR; direction <= vf::lbm::dir::ENDDIR; direction++) {
const std::string fileName = para->getFName() + "_" + StringUtil::toString<int>(level) + "_Link_" +
std::to_string(direction) + "_Debug.vtk";
- writeNeighborLinkLines(para->getParH(level).get(), (int)direction, fileName, WbWriterVtkXmlBinary::getInstance());
+ writeNeighborLinkLines(para->getParH(level).get(), (int)direction, fileName,
+ WbWriterVtkXmlBinary::getInstance());
}
}
}
diff --git a/src/gpu/core/Output/NeighborDebugWriterTest.cpp b/src/gpu/core/Output/NeighborDebugWriterTest.cpp
index b4b449a13c645bf5e7316f72dacb8470d080cbb3..33b6f1ae6afee209767aad0b3364b35a3544beac 100644
--- a/src/gpu/core/Output/NeighborDebugWriterTest.cpp
+++ b/src/gpu/core/Output/NeighborDebugWriterTest.cpp
@@ -2,7 +2,7 @@
#include "NeighborDebugWriter.hpp"
#include "gpu/core/Utilities/testUtilitiesGPU.h"
-class WbWriterSpy : public WbWriter
+class WbWriterVtkXmlBinarySpy : public WbWriter
{
public:
std::string writeLines(const std::string & /*filename*/, std::vector<UbTupleFloat3> &nodes,
@@ -40,7 +40,7 @@ protected:
const unsigned long long numberOfNodes = 3;
const uint direction = vf::lbm::dir::dP00; // x
std::unique_ptr<LBMSimulationParameter> parH = std::make_unique<LBMSimulationParameter>();
- WbWriterSpy writerSpy;
+ WbWriterVtkXmlBinarySpy writerSpy;
std::vector<uint> typeOfGridNode;
std::vector<uint> neighbors;
std::vector<real> coordinates;
diff --git a/src/gpu/core/Output/UnstructuredGridWriter.hpp b/src/gpu/core/Output/UnstructuredGridWriter.hpp
index df6bf0cc4fc2fc61b1d179528860c3bcc89e4a5f..3447313a3ce6e452886fbfa155f2e7e759ce14de 100644
--- a/src/gpu/core/Output/UnstructuredGridWriter.hpp
+++ b/src/gpu/core/Output/UnstructuredGridWriter.hpp
@@ -1832,70 +1832,6 @@ namespace UnstructuredGridWriter
-
- //////////////////////////////////////////////////////////////////////////
- void writeUnstrucuredParticles(Parameter* para, int level, std::string& fname)
- {
- vector< UbTupleFloat3 > particlePosition;
- vector< string > particleDataNames;
- particleDataNames.push_back("ID");
- particleDataNames.push_back("timestep");
- particleDataNames.push_back("particleVx");
- particleDataNames.push_back("particleVy");
- particleDataNames.push_back("particleVz");
- //particleDataNames.push_back("tauxx");
- //particleDataNames.push_back("tauyy");
- //particleDataNames.push_back("tauzz");
- //particleDataNames.push_back("tauxy");
- //particleDataNames.push_back("tauxz");
- //particleDataNames.push_back("tauyz");
- vector< vector< double > > particleData(particleDataNames.size());
- //////////////////////////////////////////////////////////////////////////
- unsigned int numberOfParticles = para->getParH(level)->plp.numberOfParticles;
- unsigned int timestep = para->getParH(level)->plp.numberOfTimestepsParticles;
- //////////////////////////////////////////////////////////////////////////
- unsigned int pos = 0;
- unsigned int sizeOfNodes = numberOfParticles * timestep;
- //////////////////////////////////////////////////////////////////////////
- particlePosition.resize(sizeOfNodes);
- for (unsigned int i = 0; i < particleDataNames.size(); i++)
- {
- particleData[i].resize(sizeOfNodes);
- }
- //////////////////////////////////////////////////////////////////////////
- for (unsigned int i = 0; i < timestep; i++)
- {
- for (unsigned int j = 0; j < numberOfParticles; j++)
- {
- //////////////////////////////////////////////////////////////////////////
- double x1 = (double)para->getParH(level)->plp.coordXabsolut[pos];
- double x2 = (double)para->getParH(level)->plp.coordYabsolut[pos];
- double x3 = (double)para->getParH(level)->plp.coordZabsolut[pos];
- //////////////////////////////////////////////////////////////////////////
- particlePosition[pos]=( makeUbTuple( (float)(x1 ),(float)(x2 ),(float)(x3 ) ) );
- particleData[0][pos] = (double)para->getParH(level)->plp.ID[j];
- particleData[1][pos] = (double)para->getParH(level)->plp.timestep[i];
- particleData[2][pos] = (double)para->getParH(level)->plp.veloX[pos];
- particleData[3][pos] = (double)para->getParH(level)->plp.veloY[pos];
- particleData[4][pos] = (double)para->getParH(level)->plp.veloZ[pos];
- //////////////////////////////////////////////////////////////////////////
- pos++;
- }
- }
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- WbWriterVtkXmlBinary::getInstance()->writeNodesWithNodeData(fname,particlePosition,particleDataNames,particleData);
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- }
- //////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
//////////////////////////////////////////////////////////////////////////
void writeUnstrucuredGridEff2ndMomentsLT(Parameter* para, int level, vector<string >& fname)
{
diff --git a/src/gpu/core/Parameter/Parameter.cpp b/src/gpu/core/Parameter/Parameter.cpp
index 14aacb94a6da732d581b9820b2d34390b1472aff..3ae7a1e4350859057cec570182a5599f69cb3ac0 100644
--- a/src/gpu/core/Parameter/Parameter.cpp
+++ b/src/gpu/core/Parameter/Parameter.cpp
@@ -279,26 +279,6 @@ void Parameter::readConfigData(const vf::basics::ConfigurationFile &configData)
quadricLimiterD = configData.getValue<real>("QuadricLimiterD");
this->setQuadricLimiters(quadricLimiterP, quadricLimiterM, quadricLimiterD);
- //////////////////////////////////////////////////////////////////////////
- // Particles
- if (configData.contains("calcParticles"))
- this->setCalcParticles(configData.getValue<bool>("calcParticles"));
-
- if (configData.contains("baseLevel"))
- this->setParticleBasicLevel(configData.getValue<int>("baseLevel"));
-
- if (configData.contains("initLevel"))
- this->setParticleInitLevel(configData.getValue<int>("initLevel"));
-
- if (configData.contains("numberOfParticles"))
- this->setNumberOfParticles(configData.getValue<int>("numberOfParticles"));
-
- if (configData.contains("startXHotWall"))
- this->setStartXHotWall(configData.getValue<real>("startXHotWall"));
-
- if (configData.contains("endXHotWall"))
- this->setEndXHotWall(configData.getValue<real>("endXHotWall"));
-
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
// Restart
if (configData.contains("TimeDoCheckPoint"))
@@ -677,30 +657,6 @@ void Parameter::setMaxLevel(int numberOfLevels)
parH.resize(this->maxlevel + 1);
parD.resize(this->maxlevel + 1);
}
-void Parameter::setParticleBasicLevel(int pbl)
-{
- this->particleBasicLevel = pbl;
-}
-void Parameter::setParticleInitLevel(int pil)
-{
- this->particleInitLevel = pil;
-}
-void Parameter::setNumberOfParticles(int nop)
-{
- this->numberOfParticles = nop;
-}
-void Parameter::setCalcParticles(bool calcParticles)
-{
- this->calcParticles = calcParticles;
-}
-void Parameter::setStartXHotWall(real startXHotWall)
-{
- this->startXHotWall = startXHotWall;
-}
-void Parameter::setEndXHotWall(real endXHotWall)
-{
- this->endXHotWall = endXHotWall;
-}
void Parameter::setTimestepEnd(unsigned int tend)
{
this->tend = tend;
@@ -1659,14 +1615,6 @@ real Parameter::getAngularVelocity()
{
return angularVelocity;
}
-real Parameter::getStartXHotWall()
-{
- return this->startXHotWall;
-}
-real Parameter::getEndXHotWall()
-{
- return this->endXHotWall;
-}
unsigned int Parameter::getStepEnsight()
{
return this->stepEnsight;
@@ -1735,18 +1683,6 @@ int Parameter::getCoarse() const
{
return coarse;
}
-int Parameter::getParticleBasicLevel()
-{
- return this->particleBasicLevel;
-}
-int Parameter::getParticleInitLevel()
-{
- return this->particleInitLevel;
-}
-int Parameter::getNumberOfParticles()
-{
- return this->numberOfParticles;
-}
bool Parameter::getEvenOrOdd(int level)
{
return parD[level]->isEvenTimestep;
@@ -1811,10 +1747,6 @@ bool Parameter::getCalcCp()
{
return this->calcCp;
}
-bool Parameter::getCalcParticles()
-{
- return this->calcParticles;
-}
bool Parameter::getWriteVeloASCIIfiles()
{
return this->writeVeloASCII;
@@ -2521,10 +2453,6 @@ std::string Parameter::getOutflowBoundaryNormalZ()
{
return this->outflowNormalZ;
}
-curandState *Parameter::getRandomState()
-{
- return this->devState;
-}
std::string Parameter::getMainKernel()
{
@@ -2618,7 +2546,7 @@ void Parameter::setUseStreams(bool useStreams)
this->useStreams = useStreams;
return;
} else {
- std::cout << "Can't use streams with only one process!" << std::endl;
+ VF_LOG_INFO( "Can't use streams with only one process!");
}
}
this->useStreams = false;
diff --git a/src/gpu/core/Parameter/Parameter.h b/src/gpu/core/Parameter/Parameter.h
index 9ac555274ea03b8994f3f5e2c43016225fe7736e..6f6f7b17426dd55a291b46177c39c08d5e20f25a 100644
--- a/src/gpu/core/Parameter/Parameter.h
+++ b/src/gpu/core/Parameter/Parameter.h
@@ -429,9 +429,6 @@ struct LBMSimulationParameter {
// deltaPhi
real deltaPhi;
- // particles
- PathLineParticles plp;
-
////////////////////////////////////////////////////////////////////////////
// 1D domain decomposition
std::vector<ProcessNeighbor27> sendProcessNeighbor;
@@ -490,12 +487,6 @@ public:
void setDiffusivity(real Diffusivity);
void setD3Qxx(int d3qxx);
void setMaxLevel(int numberOfLevels);
- void setParticleBasicLevel(int pbl);
- void setParticleInitLevel(int pil);
- void setNumberOfParticles(int nop);
- void setCalcParticles(bool calcParticles);
- void setStartXHotWall(real startXHotWall);
- void setEndXHotWall(real endXHotWall);
void setTimestepEnd(unsigned int tend);
void setTimestepOut(unsigned int tout);
void setTimestepStartOut(unsigned int tStartOut);
@@ -692,8 +683,6 @@ public:
real *getQuadricLimitersDev();
real getPhi();
real getAngularVelocity();
- real getStartXHotWall();
- real getEndXHotWall();
unsigned int getStepEnsight();
unsigned int getOutputCount();
unsigned int getStartTurn();
@@ -706,16 +695,12 @@ public:
bool getCalcMedian();
bool getCalcDragLift();
bool getCalcCp();
- bool getCalcParticles();
bool getWriteVeloASCIIfiles();
bool getCalcPlaneConc();
//! \returns index of finest level
int getFine() const;
//! \returns index of coarsest level
int getCoarse() const;
- int getParticleBasicLevel();
- int getParticleInitLevel();
- int getNumberOfParticles();
int getFactorNZ();
int getD3Qxx();
//! \returns the maximum level of grid refinement
@@ -917,8 +902,6 @@ public:
std::string getOutflowBoundaryNormalY();
std::string getOutflowBoundaryNormalZ();
real getOutflowPressureCorrectionFactor();
- // CUDA random number
- curandState *getRandomState();
// Kernel
std::string getMainKernel();
bool getMultiKernelOn();
@@ -1075,19 +1058,6 @@ private:
bool kernelNeedsFluidNodeIndicesToRun = false;
std::string adKernel;
- //////////////////////////////////////////////////////////////////////////
- // particles
- int particleBasicLevel{ 0 };
- int particleInitLevel{ 0 };
- int numberOfParticles{ 0 };
- bool calcParticles{ false };
- real startXHotWall{ (real)0.0 };
- real endXHotWall{ (real)0.0 };
- //////////////////////////////////////////////////////////////////////////
- // CUDA random number generation
- curandState *devState;
- //////////////////////////////////////////////////////////////////////////
-
// Temperature
TempforBoundaryConditions *TempH, *TempD;
// Temperature Velocity
diff --git a/src/gpu/core/Parameter/ParameterTest.cpp b/src/gpu/core/Parameter/ParameterTest.cpp
index a73233d4315ebbf677be49f260646ccb2dae3955..9bc865869d6d40810366d6aca8a4054a72979d09 100644
--- a/src/gpu/core/Parameter/ParameterTest.cpp
+++ b/src/gpu/core/Parameter/ParameterTest.cpp
@@ -114,13 +114,6 @@ TEST(ParameterTest, check_all_Parameter_CanBePassedToConstructor)
EXPECT_THAT((real)limiters_actual[i], RealEq(limiters[i]));
}
- EXPECT_THAT(para.getCalcParticles(), testing::Eq(true));
- EXPECT_THAT(para.getParticleBasicLevel(), testing::Eq(1));
- EXPECT_THAT(para.getParticleInitLevel(), testing::Eq(2));
- EXPECT_THAT(para.getNumberOfParticles(), testing::Eq(1111));
- EXPECT_THAT(para.getStartXHotWall(), RealEq(4.1));
- EXPECT_THAT(para.getEndXHotWall(), RealEq(4.2));
-
EXPECT_THAT(para.getTimeDoCheckPoint(), testing::Eq(33));
EXPECT_THAT(para.getTimeDoRestart(), testing::Eq(44));
EXPECT_THAT(para.getDoCheckPoint(), testing::Eq(true));
diff --git a/src/gpu/core/Particles/Particles.cpp b/src/gpu/core/Particles/Particles.cpp
deleted file mode 100644
index 721c9660247d372bd6f3309d3ce3ead95a06538a..0000000000000000000000000000000000000000
--- a/src/gpu/core/Particles/Particles.cpp
+++ /dev/null
@@ -1,485 +0,0 @@
-#include "Particles/Particles.h"
-//#include "Output/UnstructuredGridWriter.hpp"
-#include "Output/FileWriter.h"
-#include <cuda_runtime.h>
-#include <helper_cuda.h>
-
-#include <stdio.h>
-
-#include <fstream>
-#include <sstream>
-#include <random>
-
-//#include <math.h>
-//#include "LB.h"
-
-//using namespace std;
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-void allocParticles(Parameter* para, CudaMemoryManager* cudaMemoryManager)
-{
- for (int lev = para->getParticleBasicLevel(); lev <= para->getFine(); lev++)
- {
- //////////////////////////////////////////////////////////////////////////
- //all level store the same number of time steps
- para->getParH(lev)->plp.numberOfTimestepsParticles = para->getTimestepOut() * (unsigned int)pow(2,para->getParticleBasicLevel());
- para->getParD(lev)->plp.numberOfTimestepsParticles = para->getTimestepOut() * (unsigned int)pow(2,para->getParticleBasicLevel());
- //////////////////////////////////////////////////////////////////////////
- //all level store the same number of Particles
- para->getParH(lev)->plp.numberOfParticles = para->getNumberOfParticles();
- para->getParD(lev)->plp.numberOfParticles = para->getParH(lev)->plp.numberOfParticles;
- //////////////////////////////////////////////////////////////////////////
- //set memory size
- para->getParH(lev)->plp.memSizeTimestep = sizeof(unsigned int)*(para->getParH(lev)->plp.numberOfTimestepsParticles);
- para->getParH(lev)->plp.memSizeID = sizeof(unsigned int)*(para->getParH(lev)->plp.numberOfParticles);
- para->getParH(lev)->plp.memSizereal = sizeof(real)*(para->getParH(lev)->plp.numberOfParticles);
- para->getParH(lev)->plp.memSizerealAll = sizeof(real)*(para->getParH(lev)->plp.numberOfParticles * para->getParH(lev)->plp.numberOfTimestepsParticles);
- para->getParH(lev)->plp.memSizeBool = sizeof(bool)*(para->getParH(lev)->plp.numberOfParticles);
- para->getParH(lev)->plp.memSizeBoolBC = sizeof(bool)*(para->getParH(lev)->geometryBC.numberOfBCnodes);//depends on Geometry!!!
- para->getParD(lev)->plp.memSizeTimestep = para->getParH(lev)->plp.memSizeTimestep;
- para->getParD(lev)->plp.memSizeID = para->getParH(lev)->plp.memSizeID;
- para->getParD(lev)->plp.memSizereal = para->getParH(lev)->plp.memSizereal;
- para->getParD(lev)->plp.memSizerealAll = para->getParH(lev)->plp.memSizerealAll;
- para->getParD(lev)->plp.memSizeBool = para->getParH(lev)->plp.memSizeBool;
- para->getParD(lev)->plp.memSizeBoolBC = para->getParH(lev)->plp.memSizeBoolBC;
- //////////////////////////////////////////////////////////////////////////
- //alloc particles
- cudaMemoryManager->cudaAllocParticles(lev);
- //////////////////////////////////////////////////////////////////////////
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-void initParticles(Parameter* para)
-{
- para->setOutputCount((unsigned int) 0);
- for (int lev = para->getParticleBasicLevel(); lev <= para->getFine(); lev++)
- {
- //////////////////////////////////////////////////////////////////////////
- //set the time steps
- for (unsigned int t = 0; t < para->getParH(lev)->plp.numberOfTimestepsParticles; t++)
- {
- para->getParH(lev)->plp.timestep[t] = t;
- }
- //////////////////////////////////////////////////////////////////////////
- //set bool stuck to the wall
- for (unsigned int p = 0; p < para->getParH(lev)->plp.numberOfParticles; p++)
- {
- para->getParH(lev)->plp.stuck[p] = false;
- }
- //////////////////////////////////////////////////////////////////////////
- //set bool "hot wall"
- for (uint h = 0; h < para->getParH(lev)->geometryBC.numberOfBCnodes; h++)
- {
- if (para->getParH(lev)->coordinateX[para->getParH(lev)->geometryBC.k[h]] < para->getStartXHotWall() ||
- para->getParH(lev)->coordinateX[para->getParH(lev)->geometryBC.k[h]] > para->getEndXHotWall())
- {
- para->getParH(lev)->plp.hot[h] = false;
- }
- else
- {
- para->getParH(lev)->plp.hot[h] = true;
- }
- }
- //////////////////////////////////////////////////////////////////////////
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.timestep, para->getParH(lev)->plp.timestep, para->getParH(lev)->plp.memSizeTimestep, cudaMemcpyHostToDevice));
- //////////////////////////////////////////////////////////////////////////
- //test output
- int maximumT = para->getParH(lev)->plp.numberOfParticles * para->getParH(lev)->plp.numberOfTimestepsParticles;
- for (int i = 0; i < maximumT; i++)
- {
- para->getParH(lev)->plp.coordXlocal[i] = (real)0.0;
- para->getParH(lev)->plp.coordYlocal[i] = (real)0.0;
- para->getParH(lev)->plp.coordZlocal[i] = (real)0.0;
- para->getParH(lev)->plp.coordXabsolut[i] = (real)0.0;
- para->getParH(lev)->plp.coordYabsolut[i] = (real)0.0;
- para->getParH(lev)->plp.coordZabsolut[i] = (real)0.0;
- para->getParH(lev)->plp.veloX[i] = (real)0.0;
- para->getParH(lev)->plp.veloY[i] = (real)0.0;
- para->getParH(lev)->plp.veloZ[i] = (real)0.0;
- }
- //////////////////////////////////////////////////////////////////////////
- // real centerX = 1.0f; //uebergabeparameter
- real centerY = 10.5f; //uebergabeparameter
- real centerZ = 10.5f; //uebergabeparameter
- real diameter = 15.0f;//21.0f; //uebergabeparameter
- unsigned int numberOfParticleSizes = 41; //uebergabeparameter
- //////////////////////////////////////////////////////////////////////////
- //random
- std::random_device rd; // obtain a random number from hardware
- std::mt19937 eng(rd()); // seed the generator
- std::uniform_int_distribution<> distr(1, numberOfParticleSizes); // define the range
- std::uniform_real_distribution<> distr1(centerY-(diameter/2.), centerY+(diameter/2.));
- std::uniform_real_distribution<> distr2(centerZ-(diameter/2.), centerZ+(diameter/2.));
- std::vector< int > radius;
- std::vector< double > yCoordVec;
- std::vector< double > zCoordVec;
- double dist;
- //////////////////////////////////////////////////////////////////////////
- real dx = (real)(1.0/pow(2,lev));
- std::vector< int > tempID;
- //////////////////////////////////////////////////////////////////////////
-
- for (unsigned int i = 0; i < para->getParH(lev)->plp.numberOfParticles; i++)
- {
- radius.push_back(distr(eng));
- yCoordVec.push_back(distr1(eng));
- zCoordVec.push_back(distr2(eng));
-
- dist = pow((zCoordVec[i]-centerZ),2) + pow((yCoordVec[i]-centerY),2);
- if(dist > pow((diameter/2),2))
- {
- zCoordVec[i] = sqrt(pow((diameter/2),2) - pow((yCoordVec[i]-centerY),2)) + centerZ;
- }
- para->getParH(lev)->plp.coordXabsolut[i] = (real)2.0;
- para->getParH(lev)->plp.coordYabsolut[i] = (real)yCoordVec[i];
- para->getParH(lev)->plp.coordZabsolut[i] = (real)zCoordVec[i];
-
- // find IDs
- for (size_t index = 0; index < para->getParH(lev)->numberOfNodes; index++)
- {
- if ((para->getParH(lev)->coordinateX[index] <= para->getParH(lev)->plp.coordXabsolut[i]) &&
- ((para->getParH(lev)->plp.coordXabsolut[i] - para->getParH(lev)->coordinateX[index]) <= dx))
- {
- tempID.push_back((int)index);
- }
- }
-
- //std::cout << "tempID[i]: " << tempID[i] << endl;
- // local paricle IDs
- para->getParH(lev)->plp.ID[i] = i;
- }
- //std::cout << "size tempID: " << tempID.size() << endl;
- //////////////////////////////////////////////////////////////////////////
- for (unsigned int i = 0; i < para->getParH(lev)->plp.numberOfParticles; i++)
- {
- for (std::size_t ii = 0; ii < tempID.size(); ii++)
- {
- if ((para->getParH(lev)->coordinateY[tempID[ii]] <= para->getParH(lev)->plp.coordYabsolut[i]) &&
- ((para->getParH(lev)->plp.coordYabsolut[i] - para->getParH(lev)->coordinateY[tempID[ii]]) <= dx) &&
- (para->getParH(lev)->coordinateZ[tempID[ii]] <= para->getParH(lev)->plp.coordZabsolut[i]) &&
- ((para->getParH(lev)->plp.coordZabsolut[i] - para->getParH(lev)->coordinateZ[tempID[ii]]) <= dx))
- {
- para->getParH(lev)->plp.cellBaseID[i] = tempID[ii];
- para->getParH(lev)->plp.coordXlocal[i] = (para->getParH(lev)->plp.coordXabsolut[i] - para->getParH(lev)->coordinateX[tempID[ii]]);
- para->getParH(lev)->plp.coordYlocal[i] = (para->getParH(lev)->plp.coordYabsolut[i] - para->getParH(lev)->coordinateY[tempID[ii]]);
- para->getParH(lev)->plp.coordZlocal[i] = (para->getParH(lev)->plp.coordZabsolut[i] - para->getParH(lev)->coordinateZ[tempID[ii]]);
- }
- }
- //std::cout << "ID: " << i << ", CellBaseID: " << para->getParH(lev)->plp.cellBaseID[i]
- //<< ", localX: " << para->getParH(lev)->plp.coordXlocal[i]
- //<< ", localY: " << para->getParH(lev)->plp.coordYlocal[i]
- //<< ", localZ: " << para->getParH(lev)->plp.coordZlocal[i] << endl;
- }
- //////////////////////////////////////////////////////////////////////////
-
- //////////////////////////////////////////////////////////////////////////
- //calc 1
- size_t in_var_max = 50; //declearation of max size of input data values
- std::vector<double>sum(in_var_max); //std::vector sum is used for calculation
- std::vector<int>c(in_var_max); //This vector c stores the no.of counts that each particle size classes has occurred
- std::vector <int> c_temp1(in_var_max);
- static int c_temp2[50];
-
- //This loop is used to assign the no.of counts of the various particle size classes which are randomly generated
- for(unsigned int i = 0; i < para->getParH(lev)->plp.numberOfParticles; i++)
- {
- c_temp1[radius[i]-1]+=1;
- }//end of for loop
-
- int numberOfValues; //variable to store the number of actual values given in a file
- std::vector<double>d_a(in_var_max); //vector to store the diameter of the actual data given
- std::vector<double>q_a(in_var_max); //vector q_a to store vol % of the actual data given
- std::vector<double>q(in_var_max); //vector q to store vol % of the calculated data
- //////////////////////////////////////////////////////////////////////////
-
- //////////////////////////////////////////////////////////////////////////
- //read file
- std::ifstream fin; //object fin to read the file data
- fin.open("Actual_data.dat"); //opens the desired file name
-
- fin>>numberOfValues;
-
- //The following loop reads the data from the file as long as the file reaches the END OF LINE
- int j=0;
- while(!fin.eof() && j < numberOfValues)
- {
- fin>>(d_a[j]);
- fin>>(q_a[j]);
- j++;
- }
- //////////////////////////////////////////////////////////////////////////
-
- //////////////////////////////////////////////////////////////////////////
- //calc 2
- //this loop calculates the desired (q%) for each particle size classes from the following counts of respective classes
- for(int i = 0; i < numberOfValues; i++)
- {
- c_temp2[i]+=c_temp1[i];
- c[i] = c_temp2[i];
- sum[i] = (q_a[i]/numberOfValues) * para->getParH(lev)->plp.numberOfParticles;//calculates the total q% for each particle size classes
- q[i] = sum[i]/c[i];//desired (q%) value,obtained by dividing with the no.of counts for each particle size classes
- }
- //////////////////////////////////////////////////////////////////////////
-
- //////////////////////////////////////////////////////////////////////////
- //post processing
- //For loop;loops over every element of q
- for(int k=0; k < numberOfValues; k++)
- {
- int count=0; //to count the no.of occurance for reach the acceptable values
- while(q[k]>q_a[k]) //checks whether the obtained results are greater than actual results - if greater performs the following operations
- {
- q[k] = sum[k]/c[k];
- if(q[k]<q_a[k]) break;
- c[k]+=1; //Here I added the no.of count of the particular particle size class by 1
- q[k] = sum[k]/c[k]; //calc the (q%) again
- count++; //increase the count variable by 1
- }
-
- while(count>0) //This loops runs only when count becomes greater than 0
- {
- if(k!=numberOfValues && c[k+1]!=0) //if condition checks for the non zero term and also not the end of vector
- c[k+1]-=1; //this reduce the no.of count of neighbouring particle size class by 1 to counteract the increase in before while loop
- count--; //decreasing count variable by 1
- }
- }//end of for loop
- //////////////////////////////////////////////////////////////////////////
-
- //////////////////////////////////////////////////////////////////////////
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.hot, para->getParH(lev)->plp.hot, para->getParH(lev)->plp.memSizeBoolBC, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.stuck, para->getParH(lev)->plp.stuck, para->getParH(lev)->plp.memSizeBool, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.ID, para->getParH(lev)->plp.ID, para->getParH(lev)->plp.memSizeID, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.cellBaseID, para->getParH(lev)->plp.cellBaseID, para->getParH(lev)->plp.memSizeID, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordXlocal, para->getParH(lev)->plp.coordXlocal, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordYlocal, para->getParH(lev)->plp.coordYlocal, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordZlocal, para->getParH(lev)->plp.coordZlocal, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordXabsolut, para->getParH(lev)->plp.coordXabsolut, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordYabsolut, para->getParH(lev)->plp.coordYabsolut, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordZabsolut, para->getParH(lev)->plp.coordZabsolut, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.veloX, para->getParH(lev)->plp.veloX, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.veloY, para->getParH(lev)->plp.veloY, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.veloZ, para->getParH(lev)->plp.veloZ, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- ////////////////////////////////////////////////////////////////////////////
- ////put some particles in the flow domain
- //InitParticlesDevice(para->getParD(lev)->coordX_SP,
- // para->getParD(lev)->coordY_SP,
- // para->getParD(lev)->coordZ_SP,
- // para->getParD(lev)->plp.coordXlocal,
- // para->getParD(lev)->plp.coordYlocal,
- // para->getParD(lev)->plp.coordZlocal,
- // para->getParD(lev)->plp.coordXabsolut,
- // para->getParD(lev)->plp.coordYabsolut,
- // para->getParD(lev)->plp.coordZabsolut,
- // para->getParD(lev)->plp.veloX,
- // para->getParD(lev)->plp.veloY,
- // para->getParD(lev)->plp.veloZ,
- // para->getParD(lev)->plp.randomLocationInit,
- // para->getParD(lev)->plp.ID,
- // para->getParD(lev)->plp.cellBaseID,
- // para->getParD(lev)->geoSP,
- // para->getParD(lev)->neighborX_SP,
- // para->getParD(lev)->neighborY_SP,
- // para->getParD(lev)->neighborZ_SP,
- // para->getParD(lev)->neighborWSB_SP,
- // lev,
- // para->getParD(lev)->plp.numberOfParticles,
- // para->getParD(lev)->size_Mat_SP,
- // para->getParD(lev)->numberofthreads);
- ////////////////////////////////////////////////////////////////////////////
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-void propagateParticles(Parameter* para, unsigned int t)
-{
- for (int lev = para->getParticleBasicLevel(); lev <= para->getFine(); lev++)
- {
- unsigned int tPLP = t - (para->getOutputCount() * para->getParH(lev)->plp.numberOfTimestepsParticles);
- //////////////////////////////////////////////////////////////////////////
- //put some particles in the flow domain
- MoveParticlesDevice(para->getParD(lev)->coordinateX,
- para->getParD(lev)->coordinateY,
- para->getParD(lev)->coordinateZ,
- para->getParD(lev)->plp.coordXlocal,
- para->getParD(lev)->plp.coordYlocal,
- para->getParD(lev)->plp.coordZlocal,
- para->getParD(lev)->plp.coordXabsolut,
- para->getParD(lev)->plp.coordYabsolut,
- para->getParD(lev)->plp.coordZabsolut,
- para->getParD(lev)->plp.veloX,
- para->getParD(lev)->plp.veloY,
- para->getParD(lev)->plp.veloZ,
- para->getParD(lev)->distributions.f[0],
- para->getParD(lev)->omega,
- para->getParD(lev)->plp.ID,
- para->getParD(lev)->plp.cellBaseID,
- para->getParD(lev)->typeOfGridNode,
- para->getParD(lev)->neighborX,
- para->getParD(lev)->neighborY,
- para->getParD(lev)->neighborZ,
- para->getParD(lev)->neighborInverse,
- lev,
- tPLP,
- para->getParD(lev)->plp.numberOfTimestepsParticles,
- para->getParD(lev)->plp.numberOfParticles,
- para->getParD(lev)->numberOfNodes,
- para->getParD(lev)->numberofthreads,
- para->getParD(lev)->isEvenTimestep);
-
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-void copyAndPrintParticles(Parameter* para, CudaMemoryManager* cudaMemoryManager, unsigned int t, bool isInit)
-{
- //cout << endl << " t " << t << endl;
-
- //////////////////////////////////////////////////////////////////////////
- //count the number of outputs
- if (!isInit)
- {
- para->setOutputCount(para->getOutputCount() + (unsigned int)1);
- }
- //////////////////////////////////////////////////////////////////////////
-
- for (int lev = para->getParticleBasicLevel(); lev <= para->getFine(); lev++)
- {
- //////////////////////////////////////////////////////////////////////////
- //copy particles from device to host
- cudaMemoryManager->cudaCopyParticles(lev);
- //////////////////////////////////////////////////////////////////////////
- ////test output
- //int maximumT = para->getParH(lev)->plp.numberOfParticles * para->getParH(lev)->plp.numberOfTimestepsParticles;
- //cout << " maximumT : " << maximumT << endl;
- //for (int i = 0; i < maximumT; i++)
- //{
- // cout << " i : " << i << endl;
- // cout << " Xlocal : " << para->getParH(lev)->plp.coordXlocal[i] << endl;
- // cout << " Ylocal : " << para->getParH(lev)->plp.coordYlocal[i] << endl;
- // cout << " Zlocal : " << para->getParH(lev)->plp.coordZlocal[i] << endl;
- // cout << " Xglobal: " << para->getParH(lev)->plp.coordXabsolut[i] << endl;
- // cout << " Yglobal: " << para->getParH(lev)->plp.coordYabsolut[i] << endl;
- // cout << " Zglobal: " << para->getParH(lev)->plp.coordZabsolut[i] << endl;
- // cout << " vX : " << para->getParH(lev)->plp.veloX[i] << endl;
- // cout << " vY : " << para->getParH(lev)->plp.veloY[i] << endl;
- // cout << " vZ : " << para->getParH(lev)->plp.veloZ[i] << endl;
- //}
- }
-
- //////////////////////////////////////////////////////////////////////////
- //write particles
- //FileWriter().writeParticle(para, t);
- //////////////////////////////////////////////////////////////////////////
-
- //////////////////////////////////////////////////////////////////////////
- if (!isInit)
- {
- for (int lev = para->getParticleBasicLevel(); lev <= para->getFine(); lev++)
- {
- //////////////////////////////////////////////////////////////////////////
- int maximumT = (para->getParH(lev)->plp.numberOfParticles * para->getParH(lev)->plp.numberOfTimestepsParticles);
- int maximumP = para->getParH(lev)->plp.numberOfParticles;
- int j = (maximumT-maximumP);
- for (int i = 0; i < maximumP; i++, j++)
- {
- para->getParH(lev)->plp.coordXlocal[i] = para->getParH(lev)->plp.coordXlocal[j] ;
- para->getParH(lev)->plp.coordYlocal[i] = para->getParH(lev)->plp.coordYlocal[j] ;
- para->getParH(lev)->plp.coordZlocal[i] = para->getParH(lev)->plp.coordZlocal[j] ;
- para->getParH(lev)->plp.coordXabsolut[i] = para->getParH(lev)->plp.coordXabsolut[j];
- para->getParH(lev)->plp.coordYabsolut[i] = para->getParH(lev)->plp.coordYabsolut[j];
- para->getParH(lev)->plp.coordZabsolut[i] = para->getParH(lev)->plp.coordZabsolut[j];
- para->getParH(lev)->plp.veloX[i] = para->getParH(lev)->plp.veloX[j] ;
- para->getParH(lev)->plp.veloY[i] = para->getParH(lev)->plp.veloY[j] ;
- para->getParH(lev)->plp.veloZ[i] = para->getParH(lev)->plp.veloZ[j] ;
- }
- //para->getParH(lev)->plp.coordXlocal[0] = para->getParH(lev)->plp.coordXlocal[maximumT] ;
- //para->getParH(lev)->plp.coordYlocal[0] = para->getParH(lev)->plp.coordYlocal[maximumT] ;
- //para->getParH(lev)->plp.coordZlocal[0] = para->getParH(lev)->plp.coordZlocal[maximumT] ;
- //para->getParH(lev)->plp.coordXabsolut[0] = para->getParH(lev)->plp.coordXabsolut[maximumT];
- //para->getParH(lev)->plp.coordYabsolut[0] = para->getParH(lev)->plp.coordYabsolut[maximumT];
- //para->getParH(lev)->plp.coordZabsolut[0] = para->getParH(lev)->plp.coordZabsolut[maximumT];
- //para->getParH(lev)->plp.veloX[0] = para->getParH(lev)->plp.veloX[maximumT] ;
- //para->getParH(lev)->plp.veloY[0] = para->getParH(lev)->plp.veloY[maximumT] ;
- //para->getParH(lev)->plp.veloZ[0] = para->getParH(lev)->plp.veloZ[maximumT] ;
- //////////////////////////////////////////////////////////////////////////
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordXlocal, para->getParH(lev)->plp.coordXlocal, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordYlocal, para->getParH(lev)->plp.coordYlocal, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordZlocal, para->getParH(lev)->plp.coordZlocal, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordXabsolut, para->getParH(lev)->plp.coordXabsolut, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordYabsolut, para->getParH(lev)->plp.coordYabsolut, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.coordZabsolut, para->getParH(lev)->plp.coordZabsolut, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.veloX, para->getParH(lev)->plp.veloX, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.veloY, para->getParH(lev)->plp.veloY, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- checkCudaErrors( cudaMemcpy(para->getParD(lev)->plp.veloZ, para->getParH(lev)->plp.veloZ, para->getParH(lev)->plp.memSizerealAll, cudaMemcpyHostToDevice));
- ////////////////////////////////////////////////////////////////////////////
- }
- }
- //////////////////////////////////////////////////////////////////////////
-
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
-
-
-
-
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-void rearrangeGeometry(Parameter* para, CudaMemoryManager* cudaMemoryManager)
-{
- for (int lev = para->getCoarse(); lev <= para->getFine(); lev++)
- {
- int counter1 = 0;
- int counter2 = 0;
- //////////////////////////////////////////////////////////////////////////
- //redefine fluid nodes
- for (size_t index = 0; index < para->getParH(lev)->numberOfNodes; index++)
- {
- if (para->getParH(lev)->typeOfGridNode[index] == GEO_FLUID_OLD)
- {
- para->getParH(lev)->typeOfGridNode[index] = GEO_FLUID;
- counter1++;
- }
- counter2++;
- }
- printf("number of changed fluid nodes: %d \n", counter1);
- printf("total number of nodes: %d \n", counter2);
- //////////////////////////////////////////////////////////////////////////
- //store the index information of the BC nodes in the geometry array
- for (uint index = 0; index < para->getParH(lev)->geometryBC.numberOfBCnodes; index++)
- {
- para->getParH(lev)->typeOfGridNode[para->getParH(lev)->geometryBC.k[index]] = index + OFFSET_BCsInGeo;
- }
- //////////////////////////////////////////////////////////////////////////
- //copy geometry nodes to the device
- cudaMemoryManager->cudaCopySP(lev);
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-
-
diff --git a/src/gpu/core/Particles/Particles.h b/src/gpu/core/Particles/Particles.h
deleted file mode 100644
index 805817e2f7c6c64b27d60109ad8b6ee2c60cf5cc..0000000000000000000000000000000000000000
--- a/src/gpu/core/Particles/Particles.h
+++ /dev/null
@@ -1,18 +0,0 @@
-#ifndef Particles_H
-#define Particles_H
-
-#include "LBM/LB.h"
-#include "GPU/GPU_Interface.h"
-#include "GPU/CudaMemoryManager.h"
-#include "StringUtilities/StringUtil.h"
-#include "Parameter/Parameter.h"
-
-//void calcDragLift(Parameter* para, int lev);
-void allocParticles(Parameter* para, CudaMemoryManager* cudaMemoryManager);
-void initParticles(Parameter* para);
-void propagateParticles(Parameter* para, unsigned int t);
-void copyAndPrintParticles(Parameter* para, CudaMemoryManager* cudaMemoryManager, unsigned int t, bool isInit);
-
-void rearrangeGeometry(Parameter* para, CudaMemoryManager* cudaMemoryManager);
-
-#endif
diff --git a/src/gpu/core/PreCollisionInteractor/Actuator/ActuatorFarm.cu b/src/gpu/core/PreCollisionInteractor/Actuator/ActuatorFarm.cu
index ee72fb189c6a7a41b3cdd991599e9485f60682cc..381a4b018704537c1c01acd65286be6eee528e26 100644
--- a/src/gpu/core/PreCollisionInteractor/Actuator/ActuatorFarm.cu
+++ b/src/gpu/core/PreCollisionInteractor/Actuator/ActuatorFarm.cu
@@ -437,7 +437,7 @@ void ActuatorFarm::swapDeviceArrays()
std::string ActuatorFarm::getFilename(Parameter* para, uint t) const
{
- return para->getOutputPath() + this->outputName + "_t_" + std::to_string(t);
+ return para->getOutputPath() + this->outputName + "_ID_" + std::to_string(para->getMyProcessID()) + "_t_" + std::to_string(t);
}
void ActuatorFarm::write(const std::string& filename) const
diff --git a/src/gpu/core/PreCollisionInteractor/Probes/PlanarAverageProbe.cu b/src/gpu/core/PreCollisionInteractor/Probes/PlanarAverageProbe.cu
index 43be448998b5fe73ccc1444450f55acdceab9232..95dbb8027c4064312db84cd645ed6fe932432e4c 100644
--- a/src/gpu/core/PreCollisionInteractor/Probes/PlanarAverageProbe.cu
+++ b/src/gpu/core/PreCollisionInteractor/Probes/PlanarAverageProbe.cu
@@ -1,24 +1,24 @@
+#include "LBM/GPUHelperFunctions/KernelUtilities.h"
#include "Probe.h"
#include "PlanarAverageProbe.h"
-#include <cuda_helper/CudaGrid.h>
-
+#include <algorithm>
#include <cuda.h>
#include <cuda_runtime.h>
#include <helper_cuda.h>
-
#include <thrust/device_vector.h>
#include <thrust/reduce.h>
#include <thrust/device_ptr.h>
#include <thrust/inner_product.h>
-#include "Parameter/Parameter.h"
-#include "DataStructureInitializer/GridProvider.h"
-#include "GPU/CudaMemoryManager.h"
-#include "GPU/GPU_Interface.h"
-#include "basics/constants/NumericConstants.h"
+#include <basics/constants/NumericConstants.h>
+
+#include "gpu/core/DataStructureInitializer/GridProvider.h"
+#include "gpu/core/GPU/CudaMemoryManager.h"
+#include "gpu/core/GPU/GPU_Interface.h"
+#include "gpu/core/Parameter/Parameter.h"
+#include "gpu/cuda_helper/CudaGrid.h"
-#include <algorithm>
using namespace vf::basics::constant;
///////////////////////////////////////////////////////////////////////////////////
@@ -75,38 +75,20 @@ struct nth_moment
__global__ void moveIndicesInPosNormalDir( uint* pointIndices, uint nPoints, uint* neighborNormal, real* coordsX, real* coordsY, real* coordsZ )
{
- const uint x = threadIdx.x;
- const uint y = blockIdx.x;
- const uint z = blockIdx.y;
-
- const uint nx = blockDim.x;
- const uint ny = gridDim.x;
-
- const uint node = nx*(ny*z + y) + x;
-
- if(node>=nPoints) return;
+ const uint nodeIndex = vf::gpu::getNodeIndex();
- uint k = pointIndices[node];
+ if(nodeIndex>=nPoints) return;
- pointIndices[node] = neighborNormal[k];
+ pointIndices[nodeIndex] = neighborNormal[pointIndices[nodeIndex]];
}
__global__ void moveIndicesInNegNormalDir( uint* pointIndices, uint nPoints, uint* neighborWSB, uint* neighborInplane1, uint* neighborInplane2, real* coordsX, real* coordsY, real* coordsZ )
{
- const uint x = threadIdx.x;
- const uint y = blockIdx.x;
- const uint z = blockIdx.y;
-
- const uint nx = blockDim.x;
- const uint ny = gridDim.x;
-
- const uint node = nx*(ny*z + y) + x;
+ const uint node = vf::gpu::getNodeIndex();
if(node>=nPoints) return;
- uint k = pointIndices[node];
-
- pointIndices[node] = neighborWSB[neighborInplane1[neighborInplane2[k]]];
+ pointIndices[node] = neighborWSB[neighborInplane1[neighborInplane2[pointIndices[node]]]];
}
///////////////////////////////////////////////////////////////////////////////////
@@ -145,52 +127,52 @@ std::vector<PostProcessingVariable> PlanarAverageProbe::getPostProcessingVariabl
switch (statistic)
{
case Statistic::SpatialMeans:
- postProcessingVariables.push_back( PostProcessingVariable("vx_spatMean", this->velocityRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vy_spatMean", this->velocityRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vz_spatMean", this->velocityRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("nut_spatMean", this->viscosityRatio) );
+ postProcessingVariables.emplace_back("vx_spatialMean", this->velocityRatio);
+ postProcessingVariables.emplace_back("vy_spatialMean", this->velocityRatio);
+ postProcessingVariables.emplace_back("vz_spatialMean", this->velocityRatio);
+ postProcessingVariables.emplace_back("EddyViscosity_spatialMean", this->viscosityRatio);
break;
case Statistic::SpatioTemporalMeans:
- postProcessingVariables.push_back( PostProcessingVariable("vx_spatTmpMean", this->velocityRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vy_spatTmpMean", this->velocityRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vz_spatTmpMean", this->velocityRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("nut_spatTmpMean", this->viscosityRatio) );
+ postProcessingVariables.emplace_back("vx_spatioTemporalMean", this->velocityRatio);
+ postProcessingVariables.emplace_back("vy_spatioTemporalMean", this->velocityRatio);
+ postProcessingVariables.emplace_back("vz_spatioTemporalMean", this->velocityRatio);
+ postProcessingVariables.emplace_back("EddyViscosity_spatioTemporalMean", this->viscosityRatio);
break;
case Statistic::SpatialCovariances:
- postProcessingVariables.push_back( PostProcessingVariable("vxvx_spatMean", this->stressRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vyvy_spatMean", this->stressRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vzvz_spatMean", this->stressRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vxvy_spatMean", this->stressRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vxvz_spatMean", this->stressRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vyvz_spatMean", this->stressRatio) );
+ postProcessingVariables.emplace_back("vxvx_spatialMean", this->stressRatio);
+ postProcessingVariables.emplace_back("vyvy_spatialMean", this->stressRatio);
+ postProcessingVariables.emplace_back("vzvz_spatialMean", this->stressRatio);
+ postProcessingVariables.emplace_back("vxvy_spatialMean", this->stressRatio);
+ postProcessingVariables.emplace_back("vxvz_spatialMean", this->stressRatio);
+ postProcessingVariables.emplace_back("vyvz_spatialMean", this->stressRatio);
break;
case Statistic::SpatioTemporalCovariances:
- postProcessingVariables.push_back( PostProcessingVariable("vxvx_spatTmpMean", this->stressRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vyvy_spatTmpMean", this->stressRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vzvz_spatTmpMean", this->stressRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vxvy_spatTmpMean", this->stressRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vxvz_spatTmpMean", this->stressRatio) );
- postProcessingVariables.push_back( PostProcessingVariable("vyvz_spatTmpMean", this->stressRatio) );
+ postProcessingVariables.emplace_back("vxvx_spatioTemporalMean", this->stressRatio);
+ postProcessingVariables.emplace_back("vyvy_spatioTemporalMean", this->stressRatio);
+ postProcessingVariables.emplace_back("vzvz_spatioTemporalMean", this->stressRatio);
+ postProcessingVariables.emplace_back("vxvy_spatioTemporalMean", this->stressRatio);
+ postProcessingVariables.emplace_back("vxvz_spatioTemporalMean", this->stressRatio);
+ postProcessingVariables.emplace_back("vyvz_spatioTemporalMean", this->stressRatio);
break;
case Statistic::SpatialSkewness:
- postProcessingVariables.push_back( PostProcessingVariable("Sx_spatMean", this->nondimensional) );
- postProcessingVariables.push_back( PostProcessingVariable("Sy_spatMean", this->nondimensional) );
- postProcessingVariables.push_back( PostProcessingVariable("Sz_spatMean", this->nondimensional) );
+ postProcessingVariables.emplace_back("SkewnessX_spatialMean", this->nondimensional);
+ postProcessingVariables.emplace_back("SkewnessY_spatialMean", this->nondimensional);
+ postProcessingVariables.emplace_back("SkewnessZ_spatialMean", this->nondimensional);
break;
case Statistic::SpatioTemporalSkewness:
- postProcessingVariables.push_back( PostProcessingVariable("Sx_spatTmpMean", this->nondimensional) );
- postProcessingVariables.push_back( PostProcessingVariable("Sy_spatTmpMean", this->nondimensional) );
- postProcessingVariables.push_back( PostProcessingVariable("Sz_spatTmpMean", this->nondimensional) );
+ postProcessingVariables.emplace_back("SkewnessX_spatioTemporalMean", this->nondimensional);
+ postProcessingVariables.emplace_back("SkewnessY_spatioTemporalMean", this->nondimensional);
+ postProcessingVariables.emplace_back("SkewnessZ_spatioTemporalMean", this->nondimensional);
break;
case Statistic::SpatialFlatness:
- postProcessingVariables.push_back( PostProcessingVariable("Fx_spatMean", this->nondimensional) );
- postProcessingVariables.push_back( PostProcessingVariable("Fy_spatMean", this->nondimensional) );
- postProcessingVariables.push_back( PostProcessingVariable("Fz_spatMean", this->nondimensional) );
+ postProcessingVariables.emplace_back("FlatnessX_spatialMean", this->nondimensional);
+ postProcessingVariables.emplace_back("FlatnessY_spatialMean", this->nondimensional);
+ postProcessingVariables.emplace_back("FlatnessZ_spatialMean", this->nondimensional);
break;
case Statistic::SpatioTemporalFlatness:
- postProcessingVariables.push_back( PostProcessingVariable("Fx_spatTmpMean", this->nondimensional) );
- postProcessingVariables.push_back( PostProcessingVariable("Fy_spatTmpMean", this->nondimensional) );
- postProcessingVariables.push_back( PostProcessingVariable("Fz_spatTmpMean", this->nondimensional) );
+ postProcessingVariables.emplace_back("FlatnessX_spatioTemporalMean", this->nondimensional);
+ postProcessingVariables.emplace_back("FlatnessY_spatioTemporalMean", this->nondimensional);
+ postProcessingVariables.emplace_back("FlatnessZ_spatioTemporalMean", this->nondimensional);
break;
default:
@@ -211,31 +193,31 @@ void PlanarAverageProbe::findPoints(Parameter* para, GridProvider* gridProvider,
real /* *pointCoordsInplane1_par, *pointCoordsInplane2_par,*/ *pointCoordsNormal_par;
std::vector<real> *pointCoordsInplane1, *pointCoordsInplane2, *pointCoordsNormal;
-
- if(this->planeNormal == 'x'){
- pointCoordsNormal = &pointCoordsX_level;
- pointCoordsInplane1 = &pointCoordsY_level;
- pointCoordsInplane2 = &pointCoordsZ_level;
- pointCoordsNormal_par = para->getParH(level)->coordinateX;
- // pointCoordsInplane1_par = para->getParH(level)->coordY_SP;
- // pointCoordsInplane2_par = para->getParH(level)->coordZ_SP;
- }
- if(this->planeNormal == 'y'){
- pointCoordsNormal = &pointCoordsY_level;
- pointCoordsInplane1 = &pointCoordsX_level;
- pointCoordsInplane2 = &pointCoordsZ_level;
- pointCoordsNormal_par = para->getParH(level)->coordinateY;
- // pointCoordsInplane1_par = para->getParH(level)->coordX_SP;
- // pointCoordsInplane2_par = para->getParH(level)->coordZ_SP;
- }
- if(this->planeNormal == 'z'){
- pointCoordsNormal = &pointCoordsZ_level;
- pointCoordsInplane1 = &pointCoordsX_level;
- pointCoordsInplane2 = &pointCoordsY_level;
- pointCoordsNormal_par = para->getParH(level)->coordinateZ;
- // pointCoordsInplane1_par = para->getParH(level)->coordX_SP;
- // pointCoordsInplane2_par = para->getParH(level)->coordY_SP;
- }
+
+ if (this->planeNormal == 'x') {
+ pointCoordsNormal = &pointCoordsX_level;
+ pointCoordsInplane1 = &pointCoordsY_level;
+ pointCoordsInplane2 = &pointCoordsZ_level;
+ pointCoordsNormal_par = para->getParH(level)->coordinateX;
+ // pointCoordsInplane1_par = para->getParH(level)->coordY_SP;
+ // pointCoordsInplane2_par = para->getParH(level)->coordZ_SP;
+ }
+ if (this->planeNormal == 'y') {
+ pointCoordsNormal = &pointCoordsY_level;
+ pointCoordsInplane1 = &pointCoordsX_level;
+ pointCoordsInplane2 = &pointCoordsZ_level;
+ pointCoordsNormal_par = para->getParH(level)->coordinateY;
+ // pointCoordsInplane1_par = para->getParH(level)->coordX_SP;
+ // pointCoordsInplane2_par = para->getParH(level)->coordZ_SP;
+ }
+ if (this->planeNormal == 'z') {
+ pointCoordsNormal = &pointCoordsZ_level;
+ pointCoordsInplane1 = &pointCoordsX_level;
+ pointCoordsInplane2 = &pointCoordsY_level;
+ pointCoordsNormal_par = para->getParH(level)->coordinateZ;
+ // pointCoordsInplane1_par = para->getParH(level)->coordX_SP;
+ // pointCoordsInplane2_par = para->getParH(level)->coordY_SP;
+ }
// Find all points along the normal direction
for(size_t j = 1; j < para->getParH(level)->numberOfNodes; j++ )
diff --git a/src/gpu/core/PreCollisionInteractor/Probes/PlanarAverageProbe.h b/src/gpu/core/PreCollisionInteractor/Probes/PlanarAverageProbe.h
index c2370231c0bc341ca9b3980578ce4aadc1b75c7a..bd23cf29e2dd2445f05602f76743d63aeb5c612a 100644
--- a/src/gpu/core/PreCollisionInteractor/Probes/PlanarAverageProbe.h
+++ b/src/gpu/core/PreCollisionInteractor/Probes/PlanarAverageProbe.h
@@ -40,8 +40,6 @@
#ifndef PlanarAverageProbe_H
#define PlanarAverageProbe_H
-#include <iostream>
-
#include "Probe.h"
__global__ void moveIndicesInNegNormalDir( uint* pointIndices, uint nPoints, uint* neighborWSB, uint* neighborInplane1, uint* neighborInplane2, real* coordsX, real* coordsY, real* coordsZ );
@@ -52,34 +50,17 @@ __global__ void moveIndicesInPosNormalDir( uint* pointIndices, uint nPoints, uin
class PlanarAverageProbe : public Probe
{
-public:
- PlanarAverageProbe(
- const std::string _probeName,
- const std::string _outputPath,
- uint _tStartAvg,
- uint _tStartTmpAvg,
- uint _tAvg,
- uint _tStartOut,
- uint _tOut,
- char _planeNormal
- ): Probe(_probeName,
- _outputPath,
- _tStartAvg,
- _tStartTmpAvg,
- _tAvg,
- _tStartOut,
- _tOut,
- false,
- false),
- planeNormal(_planeNormal)
-
- {
+public:
+ PlanarAverageProbe(const std::string _probeName, const std::string _outputPath, uint _tStartAvg, uint _tStartTmpAvg,
+ uint _tAvg, uint _tStartOut, uint _tOut, char _planeNormal)
+ : Probe(_probeName, _outputPath, _tStartAvg, _tStartTmpAvg, _tAvg, _tStartOut, _tOut, false, false),
+ planeNormal(_planeNormal)
+ {
if (_tStartTmpAvg<_tStartAvg) throw std::runtime_error("Probe: tStartTmpAvg must be larger than tStartAvg!");
if(!(_planeNormal == 'x' || _planeNormal == 'y' || _planeNormal == 'z'))
throw std::runtime_error("PlanarAverageProbe: planeNormal must be 'x', 'y' or 'z'!");
}
-
private:
bool isAvailableStatistic(Statistic _variable) override;
diff --git a/src/gpu/core/PreCollisionInteractor/Probes/Probe.cu b/src/gpu/core/PreCollisionInteractor/Probes/Probe.cu
index 0bed2fff2e9861950a502cc7cc5017ee63ad4f36..0060515550d19607e11cfbd0473d8b71bc3b510a 100644
--- a/src/gpu/core/PreCollisionInteractor/Probes/Probe.cu
+++ b/src/gpu/core/PreCollisionInteractor/Probes/Probe.cu
@@ -32,19 +32,24 @@
#include "Probe.h"
-#include <cuda.h>
+
+#include <cmath>
#include <cuda_runtime.h>
+#include <cuda.h>
+#include <filesystem>
#include <helper_cuda.h>
+#include <memory>
-#include "gpu/core/GPU/GeometryUtils.h"
#include <basics/constants/NumericConstants.h>
-#include "basics/writer/WbWriterVtkXmlBinary.h"
-#include <StringUtilities/StringUtil.h>
+#include <basics/writer/WbWriterVtkXmlBinary.h>
+#include <basics/StringUtilities/StringUtil.h>
-#include "Parameter/Parameter.h"
-#include "DataStructureInitializer/GridProvider.h"
-#include "GPU/CudaMemoryManager.h"
-#include "Output/FilePartCalculator.h"
+#include "gpu/core/DataStructureInitializer/GridProvider.h"
+#include "gpu/core/GPU/CudaMemoryManager.h"
+#include "gpu/core/GPU/GeometryUtils.h"
+#include "gpu/core/LBM/GPUHelperFunctions/KernelUtilities.h"
+#include "gpu/core/Output/FilePartCalculator.h"
+#include "gpu/core/Parameter/Parameter.h"
using namespace vf::basics::constant;
@@ -58,20 +63,10 @@ uint calcOldTimestep(uint currentTimestep, uint lastTimestepInOldSeries)
return currentTimestep > 0 ? currentTimestep - 1 : lastTimestepInOldSeries;
}
-__device__ void calculatePointwiseQuantities(
- uint oldTimestepInTimeseries,
- uint timestepInTimeseries,
- uint timestepInAverage,
- uint nTimesteps,
- real* quantityArray,
- bool* quantities,
- uint* quantityArrayOffsets,
- uint nPoints,
- uint node,
- real vx,
- real vy,
- real vz,
- real rho)
+__device__ void calculatePointwiseQuantities(uint oldTimestepInTimeseries, uint timestepInTimeseries, uint timestepInAverage,
+ uint nTimesteps, real* quantityArray, bool* quantities,
+ uint* quantityArrayOffsets, uint nPoints, uint node, real vx, real vy, real vz,
+ real rho)
{
//"https://en.wikipedia.org/wiki/Algorithms_for_calculating_variance#Welford's_online_algorithm"
// also has extensions for higher order and covariances
@@ -127,22 +122,12 @@ __device__ void calculatePointwiseQuantities(
}
}
-__global__ void calcQuantitiesKernel( uint* pointIndices,
- uint nPoints, uint oldTimestepInTimeseries, uint timestepInTimeseries, uint timestepInAverage, uint nTimesteps,
- real* vx, real* vy, real* vz, real* rho,
- uint* neighborX, uint* neighborY, uint* neighborZ,
- bool* quantities,
- uint* quantityArrayOffsets, real* quantityArray
- )
+__global__ void calcQuantitiesKernel(uint* pointIndices, uint nPoints, uint oldTimestepInTimeseries,
+ uint timestepInTimeseries, uint timestepInAverage, uint nTimesteps, real* vx, real* vy,
+ real* vz, real* rho, uint* neighborX, uint* neighborY, uint* neighborZ,
+ bool* quantities, uint* quantityArrayOffsets, real* quantityArray)
{
- const uint x = threadIdx.x;
- const uint y = blockIdx.x;
- const uint z = blockIdx.y;
-
- const uint nx = blockDim.x;
- const uint ny = gridDim.x;
-
- const uint node = nx*(ny*z + y) + x;
+ const uint node = vf::gpu::getNodeIndex();
if(node>=nPoints) return;
@@ -157,26 +142,15 @@ __global__ void calcQuantitiesKernel( uint* pointIndices,
rho_interp = rho[k];
calculatePointwiseQuantities(oldTimestepInTimeseries, timestepInTimeseries, timestepInAverage, nTimesteps, quantityArray, quantities, quantityArrayOffsets, nPoints, node, u_interpX, u_interpY, u_interpZ, rho_interp);
-
}
-__global__ void interpAndCalcQuantitiesKernel( uint* pointIndices,
- uint nPoints, uint oldTimestepInTimeseries, uint timestepInTimeseries, uint timestepInAverage, uint nTimesteps,
- real* distX, real* distY, real* distZ,
- real* vx, real* vy, real* vz, real* rho,
- uint* neighborX, uint* neighborY, uint* neighborZ,
- bool* quantities,
- uint* quantityArrayOffsets, real* quantityArray
- )
+__global__ void interpAndCalcQuantitiesKernel(uint* pointIndices, uint nPoints, uint oldTimestepInTimeseries,
+ uint timestepInTimeseries, uint timestepInAverage, uint nTimesteps,
+ real* distX, real* distY, real* distZ, real* vx, real* vy, real* vz, real* rho,
+ uint* neighborX, uint* neighborY, uint* neighborZ, bool* quantities,
+ uint* quantityArrayOffsets, real* quantityArray)
{
- const uint x = threadIdx.x;
- const uint y = blockIdx.x;
- const uint z = blockIdx.y;
-
- const uint nx = blockDim.x;
- const uint ny = gridDim.x;
-
- const uint node = nx*(ny*z + y) + x;
+ const uint node = vf::gpu::getNodeIndex();
if(node>=nPoints) return;
@@ -245,7 +219,7 @@ void Probe::addProbeStruct( Parameter* para, CudaMemoryManager* cudaMemoryManage
std::vector<real>& pointCoordsX, std::vector<real>& pointCoordsY, std::vector<real>& pointCoordsZ,
int level)
{
- probeParams[level] = SPtr<ProbeStruct>(new ProbeStruct);
+ probeParams[level] = std::make_shared<ProbeStruct>();
probeParams[level]->nTimesteps = this->getNumberOfTimestepsInTimeseries(para, level);
probeParams[level]->nPoints = uint(pointCoordsX.size()); // Note, need to have both nPoints and nIndices because they differ in PlanarAverage
probeParams[level]->nIndices = uint(probeIndices.size());
@@ -259,7 +233,7 @@ void Probe::addProbeStruct( Parameter* para, CudaMemoryManager* cudaMemoryManage
std::copy(pointCoordsZ.begin(), pointCoordsZ.end(), probeParams[level]->pointCoordsZ);
// Note, dist only needed for kernels that do interpolate
- if( distX.size()>0 && distY.size()>0 && distZ.size()>0 )
+ if( !distX.empty() && !distY.empty() && !distZ.empty() )
{
probeParams[level]->hasDistances=true;
cudaMemoryManager->cudaAllocProbeDistances(this, level);
@@ -455,7 +429,7 @@ void Probe::writeGridFile(Parameter* para, int level, int t, uint part)
SPtr<ProbeStruct> probeStruct = this->getProbeStruct(level);
uint startpos = (part-1) * FilePartCalculator::limitOfNodesForVTK;
- uint sizeOfNodes = min(FilePartCalculator::limitOfNodesForVTK, probeStruct->nPoints - startpos);
+ uint sizeOfNodes = std::min(FilePartCalculator::limitOfNodesForVTK, probeStruct->nPoints - startpos);
uint endpos = startpos + sizeOfNodes;
//////////////////////////////////////////////////////////////////////////
@@ -514,6 +488,7 @@ t0 point1.quant1 point2.quant1 ... point1.quant2 point2.quant2 ...
t1 point1.quant1 point2.quant1 ... point1.quant2 point2.quant2 ...
*/
auto probeStruct = this->getProbeStruct(level);
+ std::filesystem::create_directories(this->outputPath);
std::string fname = this->outputPath + this->makeTimeseriesFileName(level, para->getMyProcessID());
std::ofstream out(fname.c_str(), std::ios::out | std::ios::binary);
@@ -521,7 +496,7 @@ t1 point1.quant1 point2.quant1 ... point1.quant2 point2.quant2 ...
out << "TimeseriesOutput \n";
out << "Quantities: ";
- for(std::string name : getVarNames())
+ for(const std::string& name : getVarNames())
out << name << ", ";
out << "\n";
out << "Number of points in this file: \n";
diff --git a/src/gpu/core/PreCollisionInteractor/Probes/Probe.h b/src/gpu/core/PreCollisionInteractor/Probes/Probe.h
index 4836a1102cd16df7ea373a36f8d67384c0392d5f..119181fae622596e8ff47ba48cec711490f6205c 100644
--- a/src/gpu/core/PreCollisionInteractor/Probes/Probe.h
+++ b/src/gpu/core/PreCollisionInteractor/Probes/Probe.h
@@ -43,13 +43,12 @@
#ifndef Probe_H
#define Probe_H
-#include <iostream>
-
#include <cuda.h>
-#include "PreCollisionInteractor/PreCollisionInteractor.h"
#include <basics/PointerDefinitions.h>
-#include "WbWriterVtkXmlBinary.h"
+#include "basics/writer/WbWriterVtkXmlBinary.h"
+
+#include "gpu/core/PreCollisionInteractor/PreCollisionInteractor.h"
//=======================================================================================
//! \note How to add new Statistics
@@ -114,6 +113,7 @@ struct ProbeStruct{
uint *arrayOffsetsH, *arrayOffsetsD;
bool isEvenTAvg = true;
};
+
__host__ __device__ int calcArrayIndex(int node, int nNodes, int timestep, int nTimesteps, int array);
__global__ void calcQuantitiesKernel( uint* pointIndices,
diff --git a/src/gpu/core/PreProcessor/InitLattice.cpp b/src/gpu/core/PreProcessor/InitLattice.cpp
index 1702e4e44fa6b04f59cb517d92df61f35104c9ba..5f1937b09a8cabc29cddb480a196442c53f13962 100644
--- a/src/gpu/core/PreProcessor/InitLattice.cpp
+++ b/src/gpu/core/PreProcessor/InitLattice.cpp
@@ -36,7 +36,6 @@
#include "GPU/GPU_Interface.h"
#include "Parameter/Parameter.h"
#include "PreProcessor/PreProcessor.h"
-#include "Temperature/FindTemperature.h"
void initLattice(SPtr<Parameter> para, SPtr<PreProcessor> preProcessor, SPtr<PreProcessor> preProcessorAD, SPtr<CudaMemoryManager> cudaMemoryManager)
diff --git a/src/gpu/core/Temperature/FindQTemp.cpp b/src/gpu/core/Temperature/FindQTemp.cpp
deleted file mode 100644
index c2fd7b995b5b9fe28981ed9a11caf8bf6464e292..0000000000000000000000000000000000000000
--- a/src/gpu/core/Temperature/FindQTemp.cpp
+++ /dev/null
@@ -1,375 +0,0 @@
-#include "Temperature/FindQTemp.h"
-
-////////////////////////////////////////////////////////////////////////////////
-void findTempPress(Parameter* para)
-{
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// E W N S T B ////////////////////////
- int ex[6]={ 1, -1, 0, 0, 0, 0};
- int ey[6]={ 0, 0, 1, -1, 0, 0};
- int ez[6]={ 0, 0, 0, 0, 1, -1};
- real T, test;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m, mm, l;
- int nx = para->getParH(para->getCoarse())->nx;
- int ny = para->getParH(para->getCoarse())->ny;
- unsigned int nnx = para->getParH(para->getCoarse())->gridNX;
- unsigned int nny = para->getParH(para->getCoarse())->gridNY;
- unsigned int nnz = para->getParH(para->getCoarse())->gridNZ;
- int* geo_mat = para->getParH(para->getCoarse())->geo;
- unsigned int* kk = para->getParH(para->getCoarse())->k;
- // real TempBC = para->getTemperatureBC();
- // real VelBC = para->getVelocity();
- TempPressforBoundaryConditions Temp = para->getParH(para->getCoarse())->TempPress;
- Temp.kTemp = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- k = nnz + STARTOFFZ - 2;
- {
- //for(k=STARTOFFZ+1; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY+1; j<=nny+STARTOFFY-2 ; j++){
- for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- test = (real)-1.f;
- for(l=0;l<=5;l++){
- mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if((geo_mat[mm] == GEO_SOLID) || (geo_mat[mm] == GEO_VOID)){
- if (ez[l]==1)
- {
- T = (real)1.f;
- }
- //else if (ez[l]==-1)
- //{
- // T = (real)1.f;//2.f;
- //}
- test = (real)1.f;
- }
- }
- if (test == (real)1.f)
- {
- if (T == (real)1.f)
- {
- Temp.k[Temp.kTemp] = kk[m];
- Temp.temp[Temp.kTemp] = (real)0.f;//TempBC;
- Temp.velo[Temp.kTemp] = (real)0.f;//VelBC;
- Temp.kTemp++;
- }
- //else if (T == (real)2.f)
- //{
- // Temp.k[Temp.kTemp] = kk[m];
- // Temp.temp[Temp.kTemp] = -TempBC;
- // Temp.velo[Temp.kTemp] = -VelBC;
- // Temp.kTemp++;
- //}
- //else
- //{
- // Temp.k[Temp.kTemp] = kk[m];
- // Temp.temp[Temp.kTemp] = 0.0;
- // Temp.kTemp++;
- //}
- }
- }
- }
- }
- }
-}
-
-////////////////////////////////////////////////////////////////////////////////
-void findKforTempPress(Parameter* para)
-{
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// E W N S T B ////////////////////////
- int ex[6]={ 1, -1, 0, 0, 0, 0,};
- int ey[6]={ 0, 0, 1, -1, 0, 0,};
- int ez[6]={ 0, 0, 0, 0, 1, -1,};
- real ON;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m, mm, l;
- real test = (real)0.f;
- int nx = para->getParH(para->getCoarse())->nx;
- int ny = para->getParH(para->getCoarse())->ny;
- unsigned int nnx = para->getParH(para->getCoarse())->gridNX;
- unsigned int nny = para->getParH(para->getCoarse())->gridNY;
- unsigned int nnz = para->getParH(para->getCoarse())->gridNZ;
- int* geo_mat = para->getParH(para->getCoarse())->geo;
- TempPressforBoundaryConditions Temp = para->getParH(para->getCoarse())->TempPress;
- Temp.kTemp = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- k = nnz + STARTOFFZ - 2;
- {
- //for(k=STARTOFFZ+1; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY+1; j<=nny+STARTOFFY-2 ; j++){
- for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- test =(real)0.f;
- for(l=0;l<=5;l++){
- mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if((geo_mat[mm] == GEO_SOLID) || (geo_mat[mm] == GEO_VOID)){
- ON =(real) 1.f;
- }
- else{
- ON = (real)0.f;
- }
- test += ON;
- }
- if (test>0)
- {
- Temp.kTemp++;
- }
- }
- }
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////
-void findTempVel(Parameter* para)
-{
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// E W N S T B ////////////////////////
- int ex[6]={ 1, -1, 0, 0, 0, 0};
- int ey[6]={ 0, 0, 1, -1, 0, 0};
- int ez[6]={ 0, 0, 0, 0, 1, -1};
- real T, test;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m, mm, l;
- int nx = para->getParH(para->getCoarse())->nx;
- int ny = para->getParH(para->getCoarse())->ny;
- unsigned int nnx = para->getParH(para->getCoarse())->gridNX;
- unsigned int nny = para->getParH(para->getCoarse())->gridNY;
- // unsigned int nnz = para->getParH(para->getCoarse())->gridNZ;
- int* geo_mat = para->getParH(para->getCoarse())->geo;
- unsigned int* kk = para->getParH(para->getCoarse())->k;
- real TempBC = para->getTemperatureBC();
- real VelBC = para->getVelocity();
- TempVelforBoundaryConditions Temp = para->getParH(para->getCoarse())->TempVel;
- Temp.kTemp = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- k = STARTOFFZ + 1;
- {
- //for(k=STARTOFFZ+1; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY+1; j<=nny+STARTOFFY-2 ; j++){
- for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- test = (real)-1.f;
- for(l=0;l<=5;l++){
- mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if((geo_mat[mm] == GEO_SOLID) || (geo_mat[mm] == GEO_VOID)){
- /*if (ez[l]==1)
- {
- T = (real)1.f;
- }
- else*/ if (ez[l]==-1)
- {
- T = (real)1.f;//2.f;
- }
- test = (real)1.f;
- }
- }
- if (test == (real)1.f)
- {
- if (T == (real)1.f)
- {
- Temp.k[Temp.kTemp] = kk[m];
- Temp.temp[Temp.kTemp] = TempBC;
- Temp.velo[Temp.kTemp] = VelBC;
- Temp.kTemp++;
- }
- //else if (T == (real)2.f)
- //{
- // Temp.k[Temp.kTemp] = kk[m];
- // Temp.temp[Temp.kTemp] = -TempBC;
- // Temp.velo[Temp.kTemp] = -VelBC;
- // Temp.kTemp++;
- //}
- //else
- //{
- // Temp.k[Temp.kTemp] = kk[m];
- // Temp.temp[Temp.kTemp] = 0.0;
- // Temp.kTemp++;
- //}
- }
- }
- }
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-void findKforTempVel(Parameter* para)
-{
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// E W N S T B ////////////////////////
- int ex[6]={ 1, -1, 0, 0, 0, 0,};
- int ey[6]={ 0, 0, 1, -1, 0, 0,};
- int ez[6]={ 0, 0, 0, 0, 1, -1,};
- real ON;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m, mm, l;
- real test = (real)0.f;
- int nx = para->getParH(para->getCoarse())->nx;
- int ny = para->getParH(para->getCoarse())->ny;
- unsigned int nnx = para->getParH(para->getCoarse())->gridNX;
- unsigned int nny = para->getParH(para->getCoarse())->gridNY;
- // unsigned int nnz = para->getParH(para->getCoarse())->gridNZ;
- int* geo_mat = para->getParH(para->getCoarse())->geo;
- TempVelforBoundaryConditions Temp = para->getParH(para->getCoarse())->TempVel;
- Temp.kTemp = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- k = STARTOFFZ + 1;
- {
- //for(k=STARTOFFZ+1; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY+1; j<=nny+STARTOFFY-2 ; j++){
- for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- test =(real)0.f;
- for(l=0;l<=5;l++){
- mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if((geo_mat[mm] == GEO_SOLID) || (geo_mat[mm] == GEO_VOID)){
- ON =(real) 1.f;
- }
- else{
- ON = (real)0.f;
- }
- test += ON;
- }
- if (test>0)
- {
- Temp.kTemp++;
- }
- }
- }
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-void findTemp(Parameter* para)
-{
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// E W N S T B ////////////////////////
- int ex[6]={ 1, -1, 0, 0, 0, 0};
- int ey[6]={ 0, 0, 1, -1, 0, 0};
- int ez[6]={ 0, 0, 0, 0, 1, -1};
-
- real ON[7] = {0, 0, 0, 0, 0, 0, 0};
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m, mm, l;
- int nx = para->getParH(para->getCoarse())->nx;
- int ny = para->getParH(para->getCoarse())->ny;
- int *geo_mat = para->getParH(para->getCoarse())->geo;
- unsigned int nnx = para->getParH(para->getCoarse())->gridNX;
- unsigned int nny = para->getParH(para->getCoarse())->gridNY;
- unsigned int nnz = para->getParH(para->getCoarse())->gridNZ;
- unsigned int* kk = para->getParH(para->getCoarse())->k;
- real TempBC = para->getTemperatureBC();
- TempforBoundaryConditions Temp = para->getParH(para->getCoarse())->Temp;
- Temp.kTemp = 0;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- for(k=STARTOFFZ+1; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY+1; j<=nny+STARTOFFY-2 ; j++){
- for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- ON[6] = (real)-1.f;
- for(l=0;l<=5;l++){
- mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if((geo_mat[mm] == GEO_SOLID) || (geo_mat[mm] == GEO_VOID)){
- if (ey[l]==1)
- {
- ON[2] = (real)1.f;
- }
- else if (ey[l]==-1)
- {
- ON[2] = (real)2.f;
- }
- ON[6] = (real)1.f;
- }
- }
- if (ON[6] == (real)1.f)
- {
- if (ON[2] == (real)1.f)
- {
- Temp.k[Temp.kTemp] = kk[m];
- Temp.temp[Temp.kTemp] = TempBC;
- Temp.kTemp++;
- }
- else if (ON[2] == (real)2.f)
- {
- Temp.k[Temp.kTemp] = kk[m];
- Temp.temp[Temp.kTemp] = -TempBC;
- Temp.kTemp++;
- }
- else
- {
- Temp.k[Temp.kTemp] = kk[m];
- Temp.temp[Temp.kTemp] = 0.0;
- Temp.kTemp++;
- }
- }
- }
- }
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
-
-
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-void findKforTemp(Parameter* para)
-{
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- ////////////// E W N S T B ////////////////////////
- int ex[6]={ 1, -1, 0, 0, 0, 0,};
- int ey[6]={ 0, 0, 1, -1, 0, 0,};
- int ez[6]={ 0, 0, 0, 0, 1, -1,};
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- unsigned int i, j, k, m, mm, l;
- real test = (real)0.f;
- real ON;
- para->getTempH()->kTemp = 0;
- int nx = para->getParH(para->getCoarse())->nx;
- int ny = para->getParH(para->getCoarse())->ny;
- unsigned int nnx = para->getParH(para->getCoarse())->gridNX;
- unsigned int nny = para->getParH(para->getCoarse())->gridNY;
- unsigned int nnz = para->getParH(para->getCoarse())->gridNZ;
- int *geo_mat = para->getParH(para->getCoarse())->geo;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- for(k=STARTOFFZ+1; k<=nnz+STARTOFFZ-2 ; k++){
- for(j=STARTOFFY+1; j<=nny+STARTOFFY-2 ; j++){
- for(i=STARTOFFX+1; i<=nnx+STARTOFFX-2 ; i++){
- m = nx*(ny*k + j) + i;
- if(geo_mat[m]==GEO_FLUID){
- test =(real)0.f;
- for(l=0;l<=5;l++){
- mm = nx*(ny*(k+ez[l]) + (j+ey[l])) + (i+ex[l]);
- if((geo_mat[mm] == GEO_SOLID) || (geo_mat[mm] == GEO_VOID)){
- ON =(real) 1.f;
- }
- else{
- ON = (real)0.f;
- }
- test += ON;
- }
- if (test>0)
- {
- para->getParH(para->getCoarse())->Temp.kTemp++;
- }
- }
- }
- }
- }
-}
-////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
diff --git a/src/gpu/core/Temperature/FindQTemp.h b/src/gpu/core/Temperature/FindQTemp.h
deleted file mode 100644
index 8704431e95d86ddfc4df8f14ed189592250283be..0000000000000000000000000000000000000000
--- a/src/gpu/core/Temperature/FindQTemp.h
+++ /dev/null
@@ -1,22 +0,0 @@
-#ifndef FIND_Q_TEMP_H
-#define FIND_Q_TEMP_H
-
-#include "LBM/LB.h"
-#include "lbm/constants/D3Q27.h"
-#include "Parameter/Parameter.h"
-
-
-void findTempPress(Parameter* para);
-
-void findKforTempPress(Parameter* para);
-
-void findTempVel(Parameter* para);
-
-void findKforTempVel(Parameter* para);
-
-void findTemp(Parameter* para);
-
-void findKforTemp(Parameter* para);
-
-
-#endif
diff --git a/src/gpu/core/Temperature/FindTemperature.cpp b/src/gpu/core/Temperature/FindTemperature.cpp
deleted file mode 100644
index 6883a720a557c125c399e15ef1d7631a0a03969b..0000000000000000000000000000000000000000
--- a/src/gpu/core/Temperature/FindTemperature.cpp
+++ /dev/null
@@ -1,87 +0,0 @@
-// _ ___ __ __________ _ __ ______________ __
-// | | / (_)____/ /___ ______ _/ / ____/ /_ __(_)___/ /____ / ___/ __ / / / /
-// | | / / / ___/ __/ / / / __ `/ / /_ / / / / / / __ / ___/ / /___/ /_/ / / / /
-// | |/ / / / / /_/ /_/ / /_/ / / __/ / / /_/ / / /_/ (__ ) / /_) / ____/ /__/ /
-// |___/_/_/ \__/\__,_/\__,_/_/_/ /_/\__,_/_/\__,_/____/ \____/_/ \_____/
-//
-//////////////////////////////////////////////////////////////////////////
-#include "Temperature/FindTemperature.h"
-#include <cuda_runtime.h>
-#include <helper_cuda.h>
-
-#include "GPU/CudaMemoryManager.h"
-#include "GPU/GPU_Interface.h"
-#include "Parameter/Parameter.h"
-#include "Temperature/FindQTemp.h"
-
-void initTemperatur(Parameter* para, CudaMemoryManager* cudaMemoryManager, int lev)
-{
- cudaMemoryManager->cudaAllocTempFs(lev);
-
- cudaMemoryManager->cudaCopyConcentrationHostToDevice(lev);
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- para->getParD(lev)->isEvenTimestep = false;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //InitADDev27( );
- getLastCudaError("Kernel execution failed");
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- para->getParD(lev)->isEvenTimestep = true;
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- //InitADDev27( );
- getLastCudaError("Kernel execution failed");
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
- CalcConcentration27(
- para->getParD(lev)->numberofthreads,
- para->getParD(lev)->concentration,
- para->getParD(lev)->typeOfGridNode,
- para->getParD(lev)->neighborX,
- para->getParD(lev)->neighborY,
- para->getParD(lev)->neighborZ,
- para->getParD(lev)->numberOfNodes,
- para->getParD(lev)->distributionsAD.f[0],
- para->getParD(lev)->isEvenTimestep);
- ////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
-
- cudaMemoryManager->cudaCopyConcentrationDeviceToHost(lev);
-}
-
-
-void findTempSim(Parameter* para, CudaMemoryManager* cudaMemoryManager)
-{
- findKforTemp(para);
-
- cudaMemoryManager->cudaAllocTempNoSlipBC(para->getCoarse());
-
- findTemp(para);
-
- cudaMemoryManager->cudaCopyTempNoSlipBCHD(para->getCoarse());
-}
-
-
-void findTempVelSim(Parameter* para, CudaMemoryManager* cudaMemoryManager)
-{
- findKforTempVel(para);
-
- cudaMemoryManager->cudaAllocTempVeloBC(para->getCoarse());
-
- findTempVel(para);
-
- cudaMemoryManager->cudaCopyTempVeloBCHD(para->getCoarse());
-}
-
-
-void findTempPressSim(Parameter* para, CudaMemoryManager* cudaMemoryManager)
-{
- findKforTempPress(para);
-
- cudaMemoryManager->cudaAllocTempPressBC(para->getCoarse());
-
- findTempPress(para);
-
- cudaMemoryManager->cudaCopyTempPressBCHD(para->getCoarse());
-}
diff --git a/src/gpu/core/Temperature/FindTemperature.h b/src/gpu/core/Temperature/FindTemperature.h
deleted file mode 100644
index a4918536d21ca611d75eb6b498a44c72e4a322a8..0000000000000000000000000000000000000000
--- a/src/gpu/core/Temperature/FindTemperature.h
+++ /dev/null
@@ -1,18 +0,0 @@
-#ifndef FIND_TEMPERATURE_H
-#define FIND_TEMPERATURE_H
-
-
-class CudaMemoryManager;
-class Parameter;
-
-
-void initTemperatur(Parameter* para, CudaMemoryManager* cudaMemoryManager, int lev);
-
-void findTempSim(Parameter* para, CudaMemoryManager* cudaMemoryManager);
-
-void findTempVelSim(Parameter* para, CudaMemoryManager* cudaMemoryManager);
-
-void findTempPressSim(Parameter* para, CudaMemoryManager* cudaMemoryManager);
-
-
-#endif