From 1696340ada377ed0dc5b06183d8155bebfcba69a Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Wed, 27 Sep 2023 11:28:39 +0330
Subject: [PATCH 01/60] updated cmake for version-1.0 and including MPI

---
 CMakeLists.txt                    | 56 +++++++++++++++----------------
 cmake/bashrc                      |  2 +-
 cmake/globals.cmake               | 49 +++++++++++++++++++++++++++
 cmake/makeExecutableGlobals.cmake |  2 +-
 cmake/makeLibraryGlobals.cmake    |  2 +-
 phasicFlowConfig.H.in             |  5 +--
 6 files changed, 82 insertions(+), 34 deletions(-)

diff --git a/CMakeLists.txt b/CMakeLists.txt
index f9740a90..6dc84aef 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -1,52 +1,66 @@
 cmake_minimum_required(VERSION 3.16 FATAL_ERROR)
 
 # set the project name and version
-project(phasicFlow VERSION 0.1 )
+project(phasicFlow VERSION 1.0 )
 
 set(CMAKE_CXX_STANDARD 17 CACHE STRING "" FORCE)
 set(CMAKE_CXX_STANDARD_REQUIRED True)
 set(CMAKE_INSTALL_PREFIX ${phasicFlow_SOURCE_DIR} CACHE PATH "Install path of phasicFlow" FORCE)
 set(CMAKE_BUILD_TYPE Release CACHE STRING "build type" FORCE)
+set(BUILD_SHARED_LIBS ON CACHE BOOL "Build using shared libraries" FORCE)
+mark_as_advanced(FORCE var BUILD_SHARED_LIBS)
 
 message(STATUS ${CMAKE_INSTALL_PREFIX})
 
-mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA_LAMBDA)
-mark_as_advanced(FORCE var Kokkos_ENABLE_OPENMP)
-mark_as_advanced(FORCE var Kokkos_ENABLE_SERIAL)
-mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA_LAMBDA)
-mark_as_advanced(FORCE var BUILD_SHARED_LIBS)
+include(cmake/globals.cmake)
 
-option(USE_STD_PARALLEL_ALG "Use TTB std parallel algorithms" ON)
+#Kokkos directory to be included 
+set(Kokkos_Source_DIR)
+
+if(DEFINED ENV{Kokkos_DIR})
+   set(Kokkos_Source_DIR $ENV{Kokkos_DIR})
+else()
+  set(Kokkos_Source_DIR $ENV{HOME}/Kokkos/kokkos)
+endif()
+message(STATUS "Kokkos source directory is ${Kokkos_Source_DIR}")
+add_subdirectory(${Kokkos_Source_DIR} ${phasicFlow_BINARY_DIR}/kokkos)
+Kokkos_cmake_settings()
+
+
+option(pFlow_STD_Parallel_Alg "Use TTB std parallel algorithms" ON)
 option(pFlow_Build_Serial "Build phasicFlow and backends for serial execution" OFF)
 option(pFlow_Build_OpenMP "Build phasicFlow and backends for OpenMP execution" OFF)
 option(pFlow_Build_Cuda   "Build phasicFlow and backends for Cuda execution" OFF)
-option(pFlow_Build_Double "Build phasicFlow with double precision variables" ON)
+option(pFlow_Build_Double "Build phasicFlow with double precision floating-oint variables" ON)
+option(pFlow_Build_MPI    "Build for MPI parallelization. This will enable multi-gpu run, CPU run on clusters (distributed memory machine). Use this combination Cuda+MPI, OpenMP + MPI or Serial+MPI " OFF)
 
-set(BUILD_SHARED_LIBS ON CACHE BOOL "Build using shared libraries" FORCE)
 
 if(pFlow_Build_Serial)
 	set(Kokkos_ENABLE_SERIAL ON CACHE BOOL "Serial execution" FORCE) 
 	set(Kokkos_ENABLE_OPENMP OFF CACHE BOOL "OpenMP execution" FORCE)
 	set(Kokkos_ENABLE_CUDA OFF CACHE BOOL "Cuda execution" FORCE)
 	set(Kokkos_ENABLE_CUDA_LAMBDA OFF CACHE BOOL "Cuda execution" FORCE)
+	set(Kokkos_ENABLE_CUDA_CONSTEXPR OFF CACHE BOOL "Enable constexpr on cuda code" FORCE)
 elseif(pFlow_Build_OpenMP )
 	set(Kokkos_ENABLE_SERIAL ON CACHE BOOL "Serial execution" FORCE) 
 	set(Kokkos_ENABLE_OPENMP ON CACHE BOOL "OpenMP execution" FORCE)
 	set(Kokkos_ENABLE_CUDA OFF CACHE BOOL "Cuda execution" FORCE)
 	set(Kokkos_ENABLE_CUDA_LAMBDA OFF CACHE BOOL "Cuda execution" FORCE)
 	set(Kokkos_DEFAULT_HOST_PARALLEL_EXECUTION_SPACE SERIAL CACHE STRING "" FORCE)
+	set(Kokkos_ENABLE_CUDA_CONSTEXPR OFF CACHE BOOL "Enable constexpr on cuda code" FORCE)
 elseif(pFlow_Build_Cuda)
 	set(Kokkos_ENABLE_SERIAL ON CACHE BOOL "Serial execution" FORCE) 
 	set(Kokkos_ENABLE_OPENMP OFF CACHE BOOL "OpenMP execution" FORCE)
 	set(Kokkos_ENABLE_CUDA ON CACHE BOOL "Cuda execution" FORCE)
 	set(Kokkos_ENABLE_CUDA_LAMBDA ON CACHE BOOL "Cuda execution" FORCE)
+	set(Kokkos_ENABLE_CUDA_CONSTEXPR ON CACHE BOOL "Enable constexpr on cuda code" FORCE)
 endif()
 
+if(pFlow_Build_MPI)
+	find_package(MPI REQUIRED)
+endif()
 
 
-include(cmake/globals.cmake)
-message(STATUS "Valid file extensions are ${validFiles}")
-
 include(cmake/makeLibraryGlobals.cmake)
 include(cmake/makeExecutableGlobals.cmake)
 
@@ -55,20 +69,6 @@ configure_file(phasicFlowConfig.H.in phasicFlowConfig.H)
 #add a global include directory 
 include_directories(src/setHelpers src/demComponent "${PROJECT_BINARY_DIR}")
 
-#main subdirectories of the code 
-set(Kokkos_Source_DIR)
-
-if(DEFINED ENV{Kokkos_DIR})
-   set(Kokkos_Source_DIR $ENV{Kokkos_DIR})
-#  add_subdirectory($ENV{Kokkos_DIR} ${phasicFlow_BINARY_DIR}/kokkos)
-#  message(STATUS "Kokkos directory is $ENV{Kokkos_DIR}")
-else()
-#  add_subdirectory($ENV{HOME}/Kokkos/kokkos ${phasicFlow_BINARY_DIR}/kokkos)
-  set(Kokkos_Source_DIR $ENV{HOME}/Kokkos/kokkos)
-endif()
-
-message(STATUS "Kokkos source directory is ${Kokkos_Source_DIR}")
-add_subdirectory(${Kokkos_Source_DIR} ${phasicFlow_BINARY_DIR}/kokkos)
 
 add_subdirectory(src)
 
@@ -79,10 +79,8 @@ add_subdirectory(utilities)
 add_subdirectory(DEMSystems)
 #add_subdirectory(testIO)
 
-
 install(FILES "${PROJECT_BINARY_DIR}/phasicFlowConfig.H"
-  DESTINATION include
-)
+  DESTINATION include)
 
 include(InstallRequiredSystemLibraries)
 set(CPACK_RESOURCE_FILE_LICENSE "${CMAKE_CURRENT_SOURCE_DIR}/LICENSE")
diff --git a/cmake/bashrc b/cmake/bashrc
index 50f8fa60..976d8c5f 100644
--- a/cmake/bashrc
+++ b/cmake/bashrc
@@ -1,5 +1,5 @@
 
-export pFlow_PROJECT_VERSION=v0.1
+export pFlow_PROJECT_VERSION=v-1.0
 
 export pFlow_PROJECT=phasicFlow
 
diff --git a/cmake/globals.cmake b/cmake/globals.cmake
index b3158dd8..b2c084a3 100644
--- a/cmake/globals.cmake
+++ b/cmake/globals.cmake
@@ -2,3 +2,52 @@
 set(validFiles)
 list(APPEND validFiles *.C *.cpp *.cxx *.c *.cu *.H *.hpp *.hxx *.h *.cuh)
 
+macro(Kokkos_cmake_settings)
+
+mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA_LAMBDA)
+mark_as_advanced(FORCE var Kokkos_CXX_STANDARD)
+mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA_CONSTEXPR)
+mark_as_advanced(FORCE var Kokkos_ENABLE_OPENMP)
+mark_as_advanced(FORCE var Kokkos_ENABLE_SERIAL)
+mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA)
+mark_as_advanced(FORCE var Kokkos_ENABLE_HIP)
+mark_as_advanced(FORCE var Kokkos_ENABLE_AGGRESSIVE_VECTORIZATION)
+mark_as_advanced(FORCE var Kokkos_ENABLE_BENCHMARKS)
+mark_as_advanced(FORCE var Kokkos_ENABLE_COMPILE_AS_CMAKE_LANGUAGE)
+mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA_LDG_INTRINSIC)
+mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA_RELOCATABLE_DEVICE_CODE)
+mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA_UVM)
+mark_as_advanced(FORCE var Kokkos_ENABLE_DEPRECATED_CODE_3)
+mark_as_advanced(FORCE var Kokkos_ENABLE_DEPRECATED_CODE_4)
+mark_as_advanced(FORCE var Kokkos_ENABLE_DEPRECATION_WARNINGS)
+mark_as_advanced(FORCE var Kokkos_ENABLE_DESUL_ATOMICS_EXTERNAL)
+mark_as_advanced(FORCE var Kokkos_ENABLE_EXAMPLES)
+mark_as_advanced(FORCE var Kokkos_ENABLE_HEADER_SELF_CONTAINMENT_TESTS)
+mark_as_advanced(FORCE var Kokkos_ENABLE_HIP_MULTIPLE_KERNEL_INSTANTIATIONS)
+mark_as_advanced(FORCE var Kokkos_ENABLE_HIP_RELOCATABLE_DEVICE_CODE)
+mark_as_advanced(FORCE var Kokkos_ENABLE_HPX)
+mark_as_advanced(FORCE var Kokkos_ENABLE_HWLOC)
+mark_as_advanced(FORCE var Kokkos_ENABLE_IMPL_CUDA_MALLOC_ASYNC)
+mark_as_advanced(FORCE var Kokkos_ENABLE_IMPL_HPX_ASYNC_DISPATCH)
+mark_as_advanced(FORCE var Kokkos_ENABLE_LARGE_MEM_TESTS)
+mark_as_advanced(FORCE var Kokkos_ENABLE_DEBUG_DUALVIEW_MODIFY_CHECK)
+mark_as_advanced(FORCE var Kokkos_ENABLE_LIBQUADMATH)
+mark_as_advanced(FORCE var Kokkos_ENABLE_LIBRT)
+mark_as_advanced(FORCE var Kokkos_ENABLE_MEMKIND)
+mark_as_advanced(FORCE var Kokkos_ENABLE_ONEDPL)
+mark_as_advanced(FORCE var Kokkos_ENABLE_OPENACC)
+mark_as_advanced(FORCE var Kokkos_ENABLE_OPENMPTARGET)
+mark_as_advanced(FORCE var Kokkos_ENABLE_ROCM)
+mark_as_advanced(FORCE var Kokkos_ENABLE_SYCL)
+mark_as_advanced(FORCE var Kokkos_ENABLE_TESTS)
+mark_as_advanced(FORCE var Kokkos_ENABLE_THREADS)
+mark_as_advanced(FORCE var Kokkos_ENABLE_TUNING)
+mark_as_advanced(FORCE var Kokkos_ENABLE_UNSUPPORTED_ARCHS)
+mark_as_advanced(FORCE var Kokkos_HPX_DIR)
+mark_as_advanced(FORCE var Kokkos_HWLOC_DIR)
+mark_as_advanced(FORCE var Kokkos_MEMKIND_DIR)
+mark_as_advanced(FORCE var Kokkos_ROCM_DIR)
+mark_as_advanced(FORCE var Kokkos_THREADS_DIR)
+
+endmacro()
+
diff --git a/cmake/makeExecutableGlobals.cmake b/cmake/makeExecutableGlobals.cmake
index 24eb6e0f..06c48e14 100644
--- a/cmake/makeExecutableGlobals.cmake
+++ b/cmake/makeExecutableGlobals.cmake
@@ -31,7 +31,7 @@ target_include_directories(${target_name}
 
 message(STATUS "\nCreating make file for executable ${target_name}")
 message(STATUS "  ${target_name} link libraries are: ${${target_link_libs}}")
-message(STATUS "  ${target_name} source files are: ${source_files}")
+message(STATUS "  ${target_name} source files are: ${${source_files}}")
 message(STATUS "  ${target_name} include dirs are: ${includeDirs}\n")
 
 
diff --git a/cmake/makeLibraryGlobals.cmake b/cmake/makeLibraryGlobals.cmake
index b5e30156..4197983b 100644
--- a/cmake/makeLibraryGlobals.cmake
+++ b/cmake/makeLibraryGlobals.cmake
@@ -42,7 +42,7 @@ target_include_directories(${target_name}
 message(STATUS "\nCreating make file for library ${target_name}")
 message(STATUS "  ${target_name} link libraries are: ${${target_link_libs}}")
 message(STATUS "  ${target_name} source files are: ${source_files}")
-message(STATUS "  ${target_name} include dirs are: ${includeDirs}\n")
+message(STATUS "  ${target_name} include dirs are: ${includeDirs}\n \n")
 
 install(TARGETS ${target_name} DESTINATION lib)
 install(FILES ${includeFiles}  DESTINATION include/${target_name})
diff --git a/phasicFlowConfig.H.in b/phasicFlowConfig.H.in
index 919867e4..0f1b3224 100644
--- a/phasicFlowConfig.H.in
+++ b/phasicFlowConfig.H.in
@@ -5,5 +5,6 @@
 #cmakedefine pFlow_Build_Serial
 #cmakedefine pFlow_Build_OpenMP
 #cmakedefine pFlow_Build_Cuda
-#cmakedefine USE_STD_PARALLEL_ALG
-#cmakedefine pFlow_Build_Double
\ No newline at end of file
+#cmakedefine pFlow_STD_Parallel_Alg
+#cmakedefine pFlow_Build_Double
+#cmakedefine pFlow_Build_MPI

From 503ee6be5e10a4de7a0cb826496d93c5fd0e13e0 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Thu, 28 Sep 2023 07:44:39 +0330
Subject: [PATCH 02/60] Types folder updated

---
 CMakeLists.txt                                |   6 +-
 src/CMakeLists.txt                            |  12 +-
 src/phasicFlow/CMakeLists-old.txt             |  87 +++++
 src/phasicFlow/CMakeLists.txt                 |  77 +----
 src/phasicFlow/containers/List/List/List.hpp  |   3 +-
 src/phasicFlow/globals/error.cpp              |  25 ++
 src/phasicFlow/globals/error.hpp              |  62 ++--
 src/phasicFlow/globals/globalSettings.hpp     |   5 +-
 src/phasicFlow/globals/pFlowMacros.hpp        |   2 +-
 src/phasicFlow/streams/Stream/Istream.hpp     |  67 ++--
 src/phasicFlow/streams/Stream/Ostream.hpp     |  65 ++--
 src/phasicFlow/streams/TStream/iTstream.hpp   |  45 ++-
 src/phasicFlow/streams/TStream/oTstream.hpp   |  62 ++--
 src/phasicFlow/streams/iStream/iIstream.hpp   | 135 ++++----
 src/phasicFlow/streams/iStream/iIstreamI.hpp  |  15 +-
 src/phasicFlow/streams/iStream/iOstream.hpp   |  19 +-
 src/phasicFlow/streams/token/token.hpp        |  18 +-
 src/phasicFlow/streams/token/tokenI.hpp       |   2 +-
 src/phasicFlow/typeSelection/typeInfo.hpp     |  10 +-
 src/phasicFlow/types/basicTypes/Logical.hpp   | 108 +++---
 .../types/basicTypes/bTypesFunctions.cpp      |  99 ++----
 .../types/basicTypes/bTypesFunctions.hpp      | 132 ++++----
 .../types/basicTypes/builtinTypes.hpp         |  10 +-
 src/phasicFlow/types/basicTypes/math.hpp      |  26 +-
 src/phasicFlow/types/triple/triple.hpp        | 307 +++++++++---------
 src/phasicFlow/types/types.cpp                |  10 +-
 src/phasicFlow/types/types.hpp                |  31 +-
 27 files changed, 718 insertions(+), 722 deletions(-)
 create mode 100644 src/phasicFlow/CMakeLists-old.txt

diff --git a/CMakeLists.txt b/CMakeLists.txt
index 6dc84aef..aef27fa7 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -72,11 +72,11 @@ include_directories(src/setHelpers src/demComponent "${PROJECT_BINARY_DIR}")
 
 add_subdirectory(src)
 
-add_subdirectory(solvers)
+#add_subdirectory(solvers)
 
-add_subdirectory(utilities)
+#add_subdirectory(utilities)
 
-add_subdirectory(DEMSystems)
+#add_subdirectory(DEMSystems)
 #add_subdirectory(testIO)
 
 install(FILES "${PROJECT_BINARY_DIR}/phasicFlowConfig.H"
diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt
index b6a61171..ff2582b5 100644
--- a/src/CMakeLists.txt
+++ b/src/CMakeLists.txt
@@ -1,15 +1,15 @@
 
 add_subdirectory(phasicFlow)
 
-add_subdirectory(Integration)
+#add_subdirectory(Integration)
 
-add_subdirectory(Property)
+#add_subdirectory(Property)
 
-add_subdirectory(Particles)
+#add_subdirectory(Particles)
 
-add_subdirectory(Interaction)
+#add_subdirectory(Interaction)
 
-add_subdirectory(MotionModel)
+#add_subdirectory(MotionModel)
 
-add_subdirectory(Geometry)
+#add_subdirectory(Geometry)
 
diff --git a/src/phasicFlow/CMakeLists-old.txt b/src/phasicFlow/CMakeLists-old.txt
new file mode 100644
index 00000000..b6b68815
--- /dev/null
+++ b/src/phasicFlow/CMakeLists-old.txt
@@ -0,0 +1,87 @@
+
+list(APPEND SourceFiles 
+types/basicTypes/bTypesFunctions.cpp
+types/basicTypes/Logical.cpp
+types/types.cpp
+
+globals/error.cpp
+
+streams/token/tokenIO.cpp
+streams/token/token.cpp
+streams/iStream/IOstream.cpp
+streams/iStream/iIstream.cpp
+streams/iStream/iOstream.cpp
+streams/Stream/Istream.cpp
+streams/Stream/Ostream.cpp
+streams/Fstream/iFstream.cpp
+streams/Fstream/oFstream.cpp
+streams/Fstream/fileStream.cpp 
+streams/TStream/iTstream.cpp
+streams/TStream/oTstream.cpp
+streams/streams.cpp 
+
+dictionary/dictionary.cpp
+dictionary/entry/iEntry.cpp
+dictionary/entry/dataEntry.cpp 
+dictionary/twoPartEntry/twoPartEntry.cpp
+
+fileSystem/fileSystem.cpp
+
+commandLine/commandLine.cpp
+
+random/randomReal/randomReal.cpp
+random/randomReal/randomReals.cpp
+
+Timer/Timer.cpp
+Timer/Timers.cpp
+
+repository/Time/Time.cpp
+repository/Time/timeControl.cpp
+repository/systemControl/systemControl.cpp
+repository/systemControl/dynamicLinkLibs.cpp
+repository/repository/repository.cpp
+repository/IOobject/objectFile.cpp
+repository/IOobject/IOobject.cpp
+repository/IOobject/IOfileHeader.cpp
+
+structuredData/box/box.cpp
+structuredData/cells/cells.cpp
+structuredData/cylinder/cylinder.cpp
+structuredData/sphere/sphere.cpp
+structuredData/iBox/iBoxs.cpp
+structuredData/line/line.cpp
+structuredData/zAxis/zAxis.cpp
+structuredData/pointStructure/pointStructure.cpp
+structuredData/pointStructure/mortonIndexing.cpp
+structuredData/pointStructure/selectors/pStructSelector/pStructSelector.cpp
+structuredData/pointStructure/selectors/selectBox/selectBox.cpp
+structuredData/pointStructure/selectors/selectRange/selectRange.cpp 
+structuredData/pointStructure/selectors/selectRandom/selectRandom.cpp
+structuredData/trisurfaceStructure/triSurface.cpp
+structuredData/trisurfaceStructure/multiTriSurface.cpp
+structuredData/trisurfaceStructure/stlFile.cpp
+structuredData/peakableRegion/sphereRegion/sphereRegion.cpp
+structuredData/peakableRegion/cylinderRegion/cylinderRegion.cpp
+structuredData/peakableRegion/boxRegion/boxRegion.cpp
+structuredData/peakableRegion/peakableRegion/peakableRegion.cpp
+structuredData/peakableRegion/peakableRegions.cpp
+
+containers/Vector/Vectors.cpp
+containers/Field/Fields.cpp
+containers/symArrayHD/symArrays.cpp
+containers/triSurfaceField/triSurfaceFields.cpp
+containers/bitsetHD/bitsetHDs.cpp
+containers/indexContainer/indexContainer.cpp
+
+setFieldList/setFieldList.cpp
+setFieldList/setFieldEntry.cpp
+
+eventSubscriber/eventSubscriber.cpp
+eventSubscriber/eventObserver.cpp)
+
+set(link_libs Kokkos::kokkos tbb)
+
+pFlow_add_library_install(phasicFlow SourceFiles link_libs)
+
+target_include_directories(phasicFlow PUBLIC ./Kokkos ./algorithms ./globals)
+
diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index b6b68815..b9ab1280 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -4,84 +4,11 @@ types/basicTypes/bTypesFunctions.cpp
 types/basicTypes/Logical.cpp
 types/types.cpp
 
-globals/error.cpp
-
-streams/token/tokenIO.cpp
-streams/token/token.cpp
-streams/iStream/IOstream.cpp
-streams/iStream/iIstream.cpp
-streams/iStream/iOstream.cpp
-streams/Stream/Istream.cpp
-streams/Stream/Ostream.cpp
-streams/Fstream/iFstream.cpp
-streams/Fstream/oFstream.cpp
-streams/Fstream/fileStream.cpp 
-streams/TStream/iTstream.cpp
-streams/TStream/oTstream.cpp
-streams/streams.cpp 
-
-dictionary/dictionary.cpp
-dictionary/entry/iEntry.cpp
-dictionary/entry/dataEntry.cpp 
-dictionary/twoPartEntry/twoPartEntry.cpp
-
-fileSystem/fileSystem.cpp
-
-commandLine/commandLine.cpp
-
-random/randomReal/randomReal.cpp
-random/randomReal/randomReals.cpp
-
-Timer/Timer.cpp
-Timer/Timers.cpp
-
-repository/Time/Time.cpp
-repository/Time/timeControl.cpp
-repository/systemControl/systemControl.cpp
-repository/systemControl/dynamicLinkLibs.cpp
-repository/repository/repository.cpp
-repository/IOobject/objectFile.cpp
-repository/IOobject/IOobject.cpp
-repository/IOobject/IOfileHeader.cpp
-
-structuredData/box/box.cpp
-structuredData/cells/cells.cpp
-structuredData/cylinder/cylinder.cpp
-structuredData/sphere/sphere.cpp
-structuredData/iBox/iBoxs.cpp
-structuredData/line/line.cpp
-structuredData/zAxis/zAxis.cpp
-structuredData/pointStructure/pointStructure.cpp
-structuredData/pointStructure/mortonIndexing.cpp
-structuredData/pointStructure/selectors/pStructSelector/pStructSelector.cpp
-structuredData/pointStructure/selectors/selectBox/selectBox.cpp
-structuredData/pointStructure/selectors/selectRange/selectRange.cpp 
-structuredData/pointStructure/selectors/selectRandom/selectRandom.cpp
-structuredData/trisurfaceStructure/triSurface.cpp
-structuredData/trisurfaceStructure/multiTriSurface.cpp
-structuredData/trisurfaceStructure/stlFile.cpp
-structuredData/peakableRegion/sphereRegion/sphereRegion.cpp
-structuredData/peakableRegion/cylinderRegion/cylinderRegion.cpp
-structuredData/peakableRegion/boxRegion/boxRegion.cpp
-structuredData/peakableRegion/peakableRegion/peakableRegion.cpp
-structuredData/peakableRegion/peakableRegions.cpp
-
-containers/Vector/Vectors.cpp
-containers/Field/Fields.cpp
-containers/symArrayHD/symArrays.cpp
-containers/triSurfaceField/triSurfaceFields.cpp
-containers/bitsetHD/bitsetHDs.cpp
-containers/indexContainer/indexContainer.cpp
-
-setFieldList/setFieldList.cpp
-setFieldList/setFieldEntry.cpp
-
-eventSubscriber/eventSubscriber.cpp
-eventSubscriber/eventObserver.cpp)
+globals/error.cpp)
 
 set(link_libs Kokkos::kokkos tbb)
 
 pFlow_add_library_install(phasicFlow SourceFiles link_libs)
 
-target_include_directories(phasicFlow PUBLIC ./Kokkos ./algorithms ./globals)
+target_include_directories(phasicFlow PUBLIC ./globals)
 
diff --git a/src/phasicFlow/containers/List/List/List.hpp b/src/phasicFlow/containers/List/List/List.hpp
index e416ae92..f20bfaff 100644
--- a/src/phasicFlow/containers/List/List/List.hpp
+++ b/src/phasicFlow/containers/List/List/List.hpp
@@ -227,9 +227,8 @@ iIstream& operator >>(iIstream& is, List<T>& lst);
 
 using int64List 	= List<int64>;
 using int32List 	= List<int32>;
-using int16List 	= List<int16>;
 using int8List 		= List<int8>;
-using labelList 	= List<label>;
+using uint64List 	= List<uint64>;
 using uint32List 	= List<uint32>;
 
 using realList 		= List<real>;
diff --git a/src/phasicFlow/globals/error.cpp b/src/phasicFlow/globals/error.cpp
index 0f9cde3d..5eb8bf43 100644
--- a/src/phasicFlow/globals/error.cpp
+++ b/src/phasicFlow/globals/error.cpp
@@ -21,10 +21,17 @@ Licence:
 #include <iostream>
 #include <stdlib.h>
 
+#ifdef pFlow_Build_MPI
+	#include <mpi.h>
+#endif
+
+#include <Kokkos_Core.hpp>
+
 #include "error.hpp"
 #include "streams.hpp"
 
 
+
 static pFlow::Ostream& errorStream   = pFlow::errReport;
 
 
@@ -93,4 +100,22 @@ pFlow::iOstream& reportAndExit()
 	return errorStream;
 }
 
+int exitPhasicFlow()
+{
+// Kokkos should be finalized first
+Kokkos::finalize();
 
+#ifdef pFlow_Build_MPI
+	int flag=0;
+	MPI_Initialized(&flag)
+	if(flag == 1)
+	{
+		MPI_Abort(MPI_COMM_WORLD, EXIT_FAILURE);
+		MPI_Finalize();
+    }
+    exit(EXIT_FAILURE);
+#else
+    exit(EXIT_FAILURE);
+#endif
+	return EXIT_FAILURE;
+}
diff --git a/src/phasicFlow/globals/error.hpp b/src/phasicFlow/globals/error.hpp
index 52f56157..8ce8c153 100644
--- a/src/phasicFlow/globals/error.hpp
+++ b/src/phasicFlow/globals/error.hpp
@@ -18,7 +18,6 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-
 #ifndef __error_hpp__
 #define __error_hpp__
 
@@ -26,36 +25,17 @@ Licence:
 #include "builtinTypes.hpp"
 
 
+//- Forward decleartions 
 namespace pFlow
 {
 	class iOstream;	
 }
 
 
-// reports a fatal error and exit the applicaiton 
-#define fatalError \
-	fatalErrorMessage(__FILE__, __LINE__)
+//- Decleartions 
 
-#define fatalErrorIn( functionName ) \
-	fatalErrorInMessage((functionName), __FILE__, __LINE__ )
-
-#define fatalErrorInFunction fatalErrorIn(FUNCTION_NAME)
-
-#define Not_Implemented(functionName) \
-    notImplementedErrorMessage ((functionName), __FILE__, __LINE__ )
-        
-#define notImplementedFunction Not_Implemented(FUNCTION_NAME);
-
-#define ioErrorInFile( fileName, lineNumber) \
-	ioErrorMessage( fileName, lineNumber, FUNCTION_NAME, __FILE__, __LINE__ )
-
-#define warningIn( functionName ) \
-	warningMessage((functionName), __FILE__, __LINE__ )
-
-#define warningInFunction warningIn(FUNCTION_NAME)
-
-#define fatalExit \
-	reportAndExit()
+/// Take actions to fatal exit phasicFlow
+int fatalExitPhasicFlow();
 
 pFlow::iOstream& fatalErrorMessage(const char* fileName, int linNumber );
 pFlow::iOstream& fatalErrorInMessage(const char* fnName, const char* fileName, int linNumber );
@@ -65,4 +45,38 @@ pFlow::iOstream& ioErrorMessage(const char* fileName, int fileLineNumber, const
 pFlow::iOstream& warningMessage(const char* fnName, const char* fileName, int linNumber );
 pFlow::iOstream& reportAndExit();
 
+
+/// Report a fatal error and exit the applicaiton 
+#define fatalError \
+	fatalErrorMessage(__FILE__, __LINE__)
+
+/// Report a fatal error and supplied function name and exit the application 
+#define fatalErrorIn( functionName ) \
+	fatalErrorInMessage((functionName), __FILE__, __LINE__ )
+
+/// Report a fatal error and function name and exit the application 
+#define fatalErrorInFunction fatalErrorIn(FUNCTION_NAME)
+
+/// Report that a function is yet not implemented with supplied function name. 
+#define Not_Implemented(functionName) \
+    notImplementedErrorMessage ((functionName), __FILE__, __LINE__ )
+
+/// Report that a function is yet not implemented. 
+#define notImplementedFunction Not_Implemented(FUNCTION_NAME);
+
+/// Report an error in file operation with supplied fileName and lineNumber. 
+#define ioErrorInFile( fileName, lineNumber) \
+	ioErrorMessage( fileName, lineNumber, FUNCTION_NAME, __FILE__, __LINE__ )
+
+/// Report a warning with supplied function name
+#define warningIn( functionName ) \
+	warningMessage((functionName), __FILE__, __LINE__ )
+
+/// Report a warning
+#define warningInFunction warningIn(FUNCTION_NAME)
+
+/// Fatal exit 
+#define fatalExit \
+	reportAndExit()
+
 #endif
diff --git a/src/phasicFlow/globals/globalSettings.hpp b/src/phasicFlow/globals/globalSettings.hpp
index 64a17455..cb9e19ea 100755
--- a/src/phasicFlow/globals/globalSettings.hpp
+++ b/src/phasicFlow/globals/globalSettings.hpp
@@ -25,10 +25,7 @@ Licence:
 
 namespace pFlow
 {
-
-const inline double vectorGrowthFactor__ = 1.1;
-
-
+const inline double vectorGrowthFactor__ = 1.2;
 }
 
 
diff --git a/src/phasicFlow/globals/pFlowMacros.hpp b/src/phasicFlow/globals/pFlowMacros.hpp
index fd3a5bf6..544fc150 100755
--- a/src/phasicFlow/globals/pFlowMacros.hpp
+++ b/src/phasicFlow/globals/pFlowMacros.hpp
@@ -70,7 +70,7 @@ Licence:
 
 #define ForAll(i, container) for(auto i=0; i < container.size(); ++i)
 
-#ifdef USE_STD_PARALLEL_ALG
+#ifdef pFlow_STD_Parallel_Alg
 static inline const bool useStdParallel__ = true;
 #else
 static inline const bool useStdParallel__ = false;
diff --git a/src/phasicFlow/streams/Stream/Istream.hpp b/src/phasicFlow/streams/Stream/Istream.hpp
index ae2bcab8..b74d7dbc 100755
--- a/src/phasicFlow/streams/Stream/Istream.hpp
+++ b/src/phasicFlow/streams/Stream/Istream.hpp
@@ -46,128 +46,125 @@ class Istream
     std::istream& is_;
 
 
-    //- Get the next valid character
+    /// Get the next valid character
     char nextValid();
 
-    //- Read a word token
+    /// Read a word token
     void readWordToken(token& t);
 
     
-    //- Read a variable name starting with '$'.
+    /// Read a variable name starting with '$'.
     //  Handles "$var" and "${var}" forms, permits '/' scoping character.
     Istream& readVariable(word& str);
 
-    //- No copy assignment
+    /// No copy assignment
     void operator=(const Istream&) = delete;
 
 
 public:
 
 
-    //- Construct wrapper around std::istream, set stream status
+    /// Construct wrapper around std::istream, set stream status
     Istream( std::istream& is, const word& streamName, writeFormat wf = ASCII);
 
-    //- Destructor
+    /// Destructor
     virtual ~Istream() = default;
 
 
     //// - Methods
 
-    //- Return the name of the stream
+    /// Return the name of the stream
     virtual const word& name() const
     {
         return name_;
     }
 
-    //- Return non-const access to the name of the stream
+    /// Return non-const access to the name of the stream
     virtual word& name()
     {
         return name_;
     }
 
-    //- Return flags of output stream
+    /// Return flags of output stream
     virtual ios_base::fmtflags flags() const;
 
 
     //// Read Functions
 
-    //- Raw, low-level get character function.
+    /// Raw, low-level get character function.
     Istream& get(char& c);
 
-    //- Raw, low-level peek function.
+    /// Raw, low-level peek function.
     //  Does not remove the character from the stream.
     //  Returns the next character in the stream or EOF if the
     //  end of file is read.
     int peek();
 
-    //- Raw, low-level getline (until delimiter) into a string.
+    /// Raw, low-level getline (until delimiter) into a string.
     Istream& getLine(word& str, char delim = '\n');
 
-    //- Low-level discard until delimiter
+    /// Low-level discard until delimiter
     //  return the number of characters extracted
     std::streamsize getLine(std::nullptr_t, char delim = '\n');
 
-    //- Raw, low-level putback character function.
+    /// Raw, low-level putback character function.
     Istream& putback(const char c);
 
-    //- Return next token from stream
+    /// Return next token from stream
     virtual iIstream& read(token& t) override;
 
-    //- Read a character
+    /// Read a character
     virtual iIstream& read(char& c) override;
 
-    //- Read a word
+    /// Read a word
     virtual iIstream& read(word& str) override;
 
-    //- Read a string
+    /// Read a string
     virtual iIstream& readString(word& str) override;
 
-    //- Read a int64
+    /// Read a int64
     virtual iIstream& read(int64&) override;
 
-    //- Read a int32
+    /// Read a int32
     virtual iIstream& read(int32&) override;
 
-    //- Read a int16
-    virtual iIstream& read(int16&) override;
-
-    //- Read a int8
+    /// Read a int8
     virtual iIstream& read(int8&) override;
 
-    //- Read a label
-    virtual iIstream& read(label&) override;
+    /// Read a uint64
+    virtual iIstream& read(uint64&) override;
 
-    //- Read a uint32
+    /// Read a uint32
     virtual iIstream& read(uint32&) override;
 
-    //- Read a uint16
-    virtual iIstream& read(uint16&) override;
+    /// Read a uint8
+    virtual iIstream& read(uint8&) override;
 
-    //- Read a float
+    /// Read a float
     virtual iIstream& read(float& val) override;
 
-    //- Read a double
+    /// Read a double
     virtual iIstream& read(double& val) override;
 
     iIstream& read(char* buffer, std::streamsize count) override;
 
     
-    //- Rewind the stream so that it may be read again
+    /// Rewind the stream so that it may be read again
     virtual void rewind();
 
 
-    //- Set stream flags
+    /// Set stream flags
     virtual ios_base::fmtflags flags(const ios_base::fmtflags flags);
 
 
 
-    //- Access to underlying std::istream
+    /// Access to underlying std::istream
     virtual std::istream& stdStream()
     {
         return is_;
     }
 
-    //- Const access to underlying std::istream
+    /// Const access to underlying std::istream
     virtual const std::istream& stdStream() const
     {
         return is_;
diff --git a/src/phasicFlow/streams/Stream/Ostream.hpp b/src/phasicFlow/streams/Stream/Ostream.hpp
index 727b65e4..da3e0bd9 100755
--- a/src/phasicFlow/streams/Stream/Ostream.hpp
+++ b/src/phasicFlow/streams/Stream/Ostream.hpp
@@ -48,112 +48,115 @@ public:
     
     Ostream ( std::ostream& os, const word& streamName, writeFormat wf = ASCII);
 
-    //- no copy construct 
+    /// no copy construct 
     Ostream(const Ostream&) = delete;
 
-    //- No copy assignment
+    /// No copy assignment
     void operator=(const Ostream&) = delete;
 
 
     //// - Methods
 
-    //- Return the name of the stream
+    /// Return the name of the stream
         virtual const word& name() const
         {
             return name_;
         }
 
-        //- Return non-const access to the name of the stream
+        /// Return non-const access to the name of the stream
         virtual word& name()
         {
             return name_;
         }
 
-        //- Return flags of output stream
+        /// Return flags of output stream
         virtual ios_base::fmtflags flags() const;
 
 
-        //- Write token to stream or otherwise handle it.
+        /// Write token to stream or otherwise handle it.
         //  return false if the token type was not handled by this method
         bool write(const token& tok)override;
 
-        //- Write character
+        /// Write character
         iOstream& write(const char c)override;
 
-        //- Write character string
+        /// Write character string
         iOstream& write(const char* str)override;
 
-        //- Write word
+        /// Write word
         iOstream& write(const word& str)override;
     
-        //- Write std::string surrounded by quotes.
+        /// Write std::string surrounded by quotes.
         //  Optional write without quotes.
         iOstream& writeQuoted ( const word& str, const bool quoted=true ) override;
 
-        //- Write int64
+        /// Write int64
         iOstream& write(const int64 val) override;
 
-        //- Write int32
+        /// Write int32
         iOstream& write(const int32 val) override;
 
-        //- Write label
-        iOstream& write(const label val) override;
+        /// Write int32
+        iOstream& write(const int8 val) override;
 
-        //- Write uint32
+        /// Write uint64
+        iOstream& write(const uint64 val) override;
+
+        /// Write uint32
         iOstream& write(const uint32 val) override;
 
-        //- Write uint16
-        iOstream& write(const uint16 val) override;
+        /// Write uint8
+        iOstream& write(const uint8 val) override;
 
-        //- Write float
+        /// Write float
         iOstream& write(const float val) override;
 
-        //- Write double
+        /// Write double
         iOstream& write(const double val) override;
 
         /// Write a block of binray data 
         iOstream& write(const char* binaryData, std::streamsize count) override;
 
-        //- Add indentation characters
+        /// Add indentation characters
         void indent() override;
 
-        //- Set stream flags
+        /// Set stream flags
         ios_base::fmtflags flags(const ios_base::fmtflags f) override;
 
-        //- Flush stream
+        /// Flush stream
         void flush() override;
 
-        //- Add newline and flush stream
+        /// Add newline and flush stream
         void endl() override;
 
-        //- Get the current padding character
+        /// Get the current padding character
         char fill() const override;
 
-        //- Set padding character for formatted field up to field width
+        /// Set padding character for formatted field up to field width
         //  \return previous padding character
         char fill(const char fillch) override;
 
-        //- Get width of output field
+        /// Get width of output field
         int width() const override;
 
-        //- Set width of output field
+        /// Set width of output field
         //  \return previous width
         int width(const int w) override;
 
-        //- Get precision of output field
+        /// Get precision of output field
         int precision() const override;
 
-        //- Set precision of output field
+        /// Set precision of output field
         //  return old precision
         int precision(const int p) override;
 
-        //- Access to underlying std::ostream
+        /// Access to underlying std::ostream
         virtual std::ostream& stdStream() 
         {
             return os_;
         }
 
-        //- Const access to underlying std::ostream
+        /// Const access to underlying std::ostream
         virtual const std::ostream& stdStream() const
         {
             return os_;
diff --git a/src/phasicFlow/streams/TStream/iTstream.hpp b/src/phasicFlow/streams/TStream/iTstream.hpp
index eb77f94e..930b2f65 100755
--- a/src/phasicFlow/streams/TStream/iTstream.hpp
+++ b/src/phasicFlow/streams/TStream/iTstream.hpp
@@ -46,7 +46,7 @@ public:
 
     //// - Constructors 
 
-        //- construct with a name
+        /// construct with a name
         iTstream(const word& streamName);
 
         // - construct with name and copy
@@ -72,55 +72,52 @@ public:
         // move assignment from tokenList
         void operator=(tokenList&& tList);
 
-        //- Destructor
+        /// Destructor
         virtual ~iTstream() = default;
 
 
     //// Member Functions   
 
-        //- Return the name of the stream
+        /// Return the name of the stream
         virtual const word& name() const;
 
-        //- Return non-const access to the name of the stream
+        /// Return non-const access to the name of the stream
         virtual word& name();
 
-        //- Return next token from stream
+        /// Return next token from stream
         virtual iIstream& read(token& t)override;
 
-        //- Read a character
+        /// Read a character
         virtual iIstream& read(char& c)override;
 
-        //- Read a word
+        /// Read a word
         virtual iIstream& read(word& str)override;
 
-        //- Read a string
+        /// Read a string
         virtual iIstream& readString(word& str)override;
 
-       //- Read a int64
+        /// Read a int64
         virtual iIstream& read(int64&) override;
 
-        //- Read a int32
+        /// Read a int32
         virtual iIstream& read(int32&) override;
-
-        //- Read a int16
-        virtual iIstream& read(int16&) override;
-
-        //- Read a int8
+        
+        /// Read a int8
         virtual iIstream& read(int8&) override;
 
-        //- Read a label
-        virtual iIstream& read(label&) override;
+        /// Read a uint64
+        virtual iIstream& read(uint64&) override;
 
-        //- Read a uint32
+        /// Read a uint32
         virtual iIstream& read(uint32&) override;
 
-        //- Read a uint16
-        virtual iIstream& read(uint16&) override;
+        /// Read a uint8
+        virtual iIstream& read(uint8&) override;
 
-        //- Read a floatScalar
+        /// Read a floatScalar
         virtual iIstream& read(float&) override;
 
-        //- Read a doubleScalar
+        /// Read a doubleScalar
         virtual iIstream& read(double&) override;
 
         iIstream& read(char* buffer, std::streamsize count) override;
@@ -147,13 +144,13 @@ public:
         // - append token to the end of token and rewind the stream 
         void appendToken(const token& t);
    
-        //- Return flags of output stream
+        /// Return flags of output stream
         ios_base::fmtflags flags() const
         {
             return ios_base::fmtflags(0);
         }
 
-        //- Set flags of stream
+        /// Set flags of stream
         ios_base::fmtflags flags(const ios_base::fmtflags)
         {
             return ios_base::fmtflags(0);        
diff --git a/src/phasicFlow/streams/TStream/oTstream.hpp b/src/phasicFlow/streams/TStream/oTstream.hpp
index 92b37f60..5458cbbd 100755
--- a/src/phasicFlow/streams/TStream/oTstream.hpp
+++ b/src/phasicFlow/streams/TStream/oTstream.hpp
@@ -61,45 +61,47 @@ public:
 
     //// - Write
 
-        //- Write token to stream or otherwise handle it.
+        /// Write token to stream or otherwise handle it.
         //  return false if the token type was not handled by this method
         virtual bool write(const token& tok);
 
-        //- Write single character. Whitespace is suppressed.
+        /// Write single character. Whitespace is suppressed.
         virtual iOstream& write(const char c);
 
-        //- Write the word-characters of a character string.
+        /// Write the word-characters of a character string.
         //  Sends as a single char, or as word.
         virtual iOstream& write(const char* str);
 
-        //- Write word
+        /// Write word
         virtual iOstream& write(const word& str);
 
         
-        //- Write std::string surrounded by quotes.
+        /// Write std::string surrounded by quotes.
         //  Optional write without quotes.
         virtual iOstream& writeQuoted(const std::string& str, const bool quoted=true );
 
-        //- Write int64
+        /// Write int64
         virtual iOstream& write(const int64 val) override;
 
-        //- Write int32
+        /// Write int32
         virtual iOstream& write(const int32 val) override;
 
-        
-        //- Write label
-        virtual iOstream& write(const label val) override;
+        /// Write int8
+        virtual iOstream& write(const int8 val) override;
 
-        //- Write uint32
+        /// Write uint64
+        virtual iOstream& write(const uint64 val) override;
+
+        /// Write uint32
         virtual iOstream& write(const uint32 val) override;
 
-        //- Write uint16
-        virtual iOstream& write(const uint16 val) override;
+        /// Write uint8
+        virtual iOstream& write(const uint8 val) override;
 
-        //- Write float
+        /// Write float
         virtual iOstream& write(const float val) override;
 
-        //- Write double
+        /// Write double
         virtual iOstream& write(const double val) override;
 
         /// Write a block of binray data
@@ -107,80 +109,80 @@ public:
             const char* binaryData, 
             std::streamsize count) override;
 
-        // - append token to the stream
+        /// append token to the stream
         virtual void append(const token& tok);
         
-        // - append a list of tokens to the stream
+        /// append a list of tokens to the stream
         virtual void append(const tokenList& tLisk);
         
     
 
     //// - Stream state functions
 
-        //- Reset the output buffer and rewind the stream
+        /// Reset the output buffer and rewind the stream
         void reset();
 
-        //- Rewind the output stream
+        /// Rewind the output stream
         virtual void rewind();
 
-        //- Add indentation characters
+        /// Add indentation characters
         virtual void indent()
         {}
 
-        //- Flush stream
+        /// Flush stream
         virtual void flush()
         {}
 
-        //- Add newline and flush stream
+        /// Add newline and flush stream
         virtual void endl()
         {}
 
-        //- Get the current padding character
+        /// Get the current padding character
         //  \return previous padding character
         virtual char fill() const
         {
             return 0;
         }
 
-        //- Set padding character for formatted field up to field width
+        /// Set padding character for formatted field up to field width
         virtual char fill(const char)
         {
             return 0;
         }
 
-        //- Get width of output field
+        /// Get width of output field
         virtual int width() const
         {
             return 0;
         }
 
-        //- Set width of output field
+        /// Set width of output field
         //  \return previous width
         virtual int width(const int)
         {
              return 0;
         }
 
-        //- Get precision of output field
+        /// Get precision of output field
         virtual int precision() const
         {
              return 0;
         }
 
-        //- Set precision of output field
+        /// Set precision of output field
         //  \return old precision
         virtual int precision(const int)
         {
              return 0;
         }
 
-        //- Return flags of output stream
+        /// Return flags of output stream
         virtual ios_base::fmtflags flags() const
         {
             return ios_base::fmtflags(0);
         }
 
-        //- Set flags of stream
+        /// Set flags of stream
         ios_base::fmtflags flags(const ios_base::fmtflags)
         {
             return ios_base::fmtflags(0);
diff --git a/src/phasicFlow/streams/iStream/iIstream.hpp b/src/phasicFlow/streams/iStream/iIstream.hpp
index cf32961b..f63c170f 100755
--- a/src/phasicFlow/streams/iStream/iIstream.hpp
+++ b/src/phasicFlow/streams/iStream/iIstream.hpp
@@ -29,7 +29,10 @@ Licence:
 namespace pFlow
 {
 
-
+/**
+ *  Interface input stream class 
+ * 
+ */
 class iIstream // interface class for input streams
 :
 	public IOstream
@@ -37,17 +40,17 @@ class iIstream // interface class for input streams
 
 	// Private Data
 
-    //- Has a token been put back on the stream?
+    /// Has a token been put back on the stream?
     bool putBack_;
 
-    //- The last token put back on the stream
+    /// The last token put back on the stream
     token putBackToken_;
 
 public:
 
-    //// - Constructors    
+    ///// Constructors    
 
-    	// - default
+    	/// default
 	    iIstream():
 			IOstream(),
 	        putBack_(false)	
@@ -58,85 +61,82 @@ public:
 	    	putBack_(false)
 	    {}
 
-	    // - Copy construct
+	    /// Copy construct
 	    iIstream(const iIstream&) = default;
 
-	    // - Destructor
+	    /// Destructor
 	    virtual ~iIstream() = default;
 
 
 
     //// member methods
 
-	    //- Put back token
-	    //  Only a single put back is permitted
+	    /// Put back token
+	    ///  Only a single put back is permitted
 	    void putBack(const token& tok);
 
-	    //- Get the put back token if there is one and return true.
-	    //  Return false if no put back token is available.
+	    /// Get the put back token if there is one and return true.
+	    ///  Return false if no put back token is available.
 	    bool getBack(token& tok);
 
-	    //- Peek at the put back token without removing it.
-	    //  Returns false if no put back token is available and set the
-	    //  token to undefined.
+	    /// Peek at the put back token without removing it.
+	    ///  Returns false if no put back token is available and set the
+	    ///  token to undefined.
 	    bool peekBack(token& tok);
 
-	    //- reset the put back token;
+	    /// reset the put back token;
 	    void resetPutBack()
 	    {
 	    	putBackToken_.reset();
 	    	putBack_ = false;
 	    }
 
-	    //- Return next token from stream
+	    /// Return next token from stream
 	    virtual iIstream& read(token&) = 0;
 
-	    //- Read a character
+	    /// Read a character
 	    virtual iIstream& read(char&) = 0;
 
-	    //- Read a string (including enclosing double-quotes)
+	    /// Read a string (including enclosing double-quotes)
 	    virtual iIstream& read(word&) = 0;
 
-	    //- Read a string 
+	    /// Read a string 
 	    virtual iIstream& readString(word&) = 0;    
 
-	    //- Read a int64
+	    /// Read a int64
 	    virtual iIstream& read(int64&) = 0;
 
-	    //- Read a int32
+	    /// Read a int32
 	    virtual iIstream& read(int32&) = 0;
 
-	    //- Read a int16
-	    virtual iIstream& read(int16&) = 0;
-
-	    //- Read a int8
+	    /// Read a int8
 	    virtual iIstream& read(int8&) = 0;
 
-	    //- Read a label
-	    virtual iIstream& read(label&) = 0;
+	    /// Read a uint64
+	    virtual iIstream& read(uint64&) = 0;
 
-	    //- Read a uin32
+	    /// Read a uin32
 	    virtual iIstream& read(uint32&) = 0;
 
-	    //- Read a uin16
-	    virtual iIstream& read(uint16&) = 0;
+	    /// Read a uint8
+	    virtual iIstream& read(uint8&) = 0;
 
-	    //- Read a floatScalar
+	    /// Read a floatScalar
 	    virtual iIstream& read(float&) = 0;
 
-	    //- Read a doubleScalar
+	    /// Read a doubleScalar
 	    virtual iIstream& read(double&) = 0;
 
 	    virtual iIstream& read(char* buffer, std::streamsize count) =0;
 
 	    
-	    //- Rewind the stream so that it may be read again
+	    /// Rewind the stream so that it may be read again
 	    virtual void rewind() = 0;
 
 
-    //// - find and lookups
+    ///// find and lookups
 
-        // - search for all tokesn and find the first word token tbat matchs w
+        /// search for all tokesn and find the first word token tbat matchs w
         virtual bool findToken( const word & w );
 
         /// search for all tokesn after the current file position 
@@ -144,69 +144,69 @@ public:
         virtual bool findTokenResume(const word& w);
 
 
-        // - search for all tokesn and find the first word token that matchs 
+        /// search for all tokesn and find the first word token that matchs 
         virtual bool findTokenSilent( const word & w, int32 limitLine = 100 );
 
         /// search for all tokesn after the current file position 
         /// and find the first word token tbat matchs w
         virtual bool findTokenResumeSilent( const word & w, int32 limitLine = 100 );
 
-        // - search for all tokens and find the first word token and also next word token
-        //   chekck if it is eneded with end statement ;
+        /// search for all tokens and find the first word token and also next word token
+        /// chekck if it is eneded with end statement ;
         virtual bool findTokenAndNext( const word& w, word& nextW, bool checkEndStatement = true);
 
 
         virtual bool findTokenAndNextSilent( const word& w, word& nextW, int32 limitLine = 100);
 
-        // - find a pair of keyword and data terminated by ;
-        //   keyword data;
-        //   return false if keyword does not exist or reading fails. 
+        /// find a pair of keyword and data terminated by ;
+        ///  keyword data;
+        ///  return false if keyword does not exist or reading fails. 
         template<typename T>
         bool findKeywordAndVal(const word& keyword, T& val, bool checkEndStatement = true);
 
-        // - lookup for keyword and data;
-        //   fatalExit if fails
+        /// lookup for keyword and data;
+        ///  fatalExit if fails
         template<typename T>
         T lookupData(const word& keyword);
 
-        // - lookup for keyword and data;
-        //   set to setVal if lookup fails. 
+        /// lookup for keyword and data;
+        ///  set to setVal if lookup fails. 
         template<typename T>
         T lookupDataOrSet(const word& keyword, const T& setVal);
         
-        // - read the data next to keword 
-        //   keyword    data; 
-        //   check the keyword is correct or not 
+        /// read the data next to keword 
+        /// keyword    data; 
+        /// check the keyword is correct or not 
         template<typename T>
         bool nextData(const word& keyword, T& data);
 
 	//// Read List punctuation tokens
 
-	    //- Begin read of data chunk, starts with '('.
-	    //  return true or FatalIOError
+	    /// Begin read of data chunk, starts with '('.
+	    /// return true or FatalIOError
 	    bool readBegin(const char* funcName);
 
-	    //- End read of data chunk, ends with ')'
-	    //  return true or FatalIOError
+	    /// End read of data chunk, ends with ')'
+	    /// return true or FatalIOError
 	    bool readEnd(const char* funcName);
 
-	    //- Begin read of data chunk, starts with '('.
-	    //  return true or FatalIOError
+	    /// Begin read of data chunk, starts with '('.
+	    /// return true or FatalIOError
 	    bool readBeginSquare(const char* funcName);
 
-	    //- Begin read of data chunk, starts with '('.
-	    //  return true or FatalIOError
+	    /// Begin read of data chunk, starts with '('.
+	    /// return true or FatalIOError
 	    bool readEndSquare(const char* funcName);
 
-	    //- Begin read of list data, starts with '(' or '{'
-	    //  return starting delimiter or FatalIOError
+	    /// Begin read of list data, starts with '(' or '{'
+	    /// return starting delimiter or FatalIOError
 	    char readBeginList(const char* funcName);
 
-	    //- End read of list data, ends with ')' or '}'
-	    //  return closing delimiter or FatalIOError
+	    /// End read of list data, ends with ')' or '}'
+	    /// return closing delimiter or FatalIOError
 	    char readEndList(const char* funcName);
 
-	    // End statement character ;
+	    /// End statement character ;
 	    char readEndStatement(const char* funcName);
 
     	
@@ -217,13 +217,13 @@ public:
 
 typedef iIstream& (*iIstreamManip)(iIstream&);
 
-//- operator>> handling for manipulators without arguments
+/// operator>> handling for manipulators without arguments
 inline iIstream& operator>>(iIstream& is, iIstreamManip f)
 {
     return f(is);
 }
 
-//- operator>> handling for manipulators without arguments
+/// operator>> handling for manipulators without arguments
 inline iIstream& operator>>(iIstream& is, IOstreamManip f)
 {
     f(is);
@@ -233,22 +233,19 @@ inline iIstream& operator>>(iIstream& is, IOstreamManip f)
 
 // read operation for basic types it gets from the 
 // token stream
-
 inline iIstream& operator>>( iIstream& is, word & w);
 
 inline iIstream& operator>>( iIstream& is, int64& val);
 
 inline iIstream& operator>>( iIstream& is, int32& val);
 
-inline iIstream& operator>>( iIstream& is, int16& val);
-
 inline iIstream& operator>>( iIstream& is, int8& val);
 
+inline iIstream& operator>>( iIstream& is, uint64& val);
+
 inline iIstream& operator>>( iIstream& is, uint32& val);
 
-inline iIstream& operator>>( iIstream& is, uint16& val);
-
-inline iIstream& operator>>( iIstream& is, label& val);
+inline iIstream& operator>>( iIstream& is, uint8& val);
 
 inline iIstream& operator>>( iIstream& is, float& val);
 
diff --git a/src/phasicFlow/streams/iStream/iIstreamI.hpp b/src/phasicFlow/streams/iStream/iIstreamI.hpp
index f8cea3d3..9ddb739a 100755
--- a/src/phasicFlow/streams/iStream/iIstreamI.hpp
+++ b/src/phasicFlow/streams/iStream/iIstreamI.hpp
@@ -200,13 +200,6 @@ inline pFlow::iIstream& pFlow::operator>>( iIstream& is, int32& val)
     return is;
 }
 
-inline pFlow::iIstream& pFlow::operator>>( iIstream& is, int16& val)
-{
-    int64 lval(0);
-    is>>lval;
-    val = static_cast<int16>(lval);
-    return is;
-}
 
 inline pFlow::iIstream& pFlow::operator>>( iIstream& is, int8& val)
 {
@@ -216,11 +209,11 @@ inline pFlow::iIstream& pFlow::operator>>( iIstream& is, int8& val)
     return is;
 }
 
-inline pFlow::iIstream& pFlow::operator>>( iIstream& is, label& val)
+inline pFlow::iIstream& pFlow::operator>>( iIstream& is, uint64& val)
 {
     int64 lval(0);
     is>>lval;
-    val = static_cast<label>(lval);
+    val = static_cast<uint64>(lval);
     return is;
 }
 
@@ -232,11 +225,11 @@ inline pFlow::iIstream& pFlow::operator>>( iIstream& is, uint32& val)
     return is;
 }
 
-inline pFlow::iIstream& pFlow::operator>>( iIstream& is, uint16& val)
+inline pFlow::iIstream& pFlow::operator>>( iIstream& is, uint8& val)
 {
     int64 lval(0);
     is>>lval;
-    val = static_cast<uint16>(lval);
+    val = static_cast<uint8>(lval);
     return is;
 }
 
diff --git a/src/phasicFlow/streams/iStream/iOstream.hpp b/src/phasicFlow/streams/iStream/iOstream.hpp
index 6c083a9b..37540301 100644
--- a/src/phasicFlow/streams/iStream/iOstream.hpp
+++ b/src/phasicFlow/streams/iStream/iOstream.hpp
@@ -118,14 +118,17 @@ public:
         /// Write int32
         virtual iOstream& write(const int32 val) = 0;
 
-        /// Write label
-        virtual iOstream& write(const label val) = 0;
+        /// Write int8
+        virtual iOstream& write(const int8 val) = 0;
+
+        /// Write uint64
+        virtual iOstream& write(const uint64 val) = 0;
 
         /// Write uint32
         virtual iOstream& write(const uint32 val) = 0;
 
-        /// Write uint16
-        virtual iOstream& write(const uint16 val) = 0;
+        /// Write uint8
+        virtual iOstream& write(const uint8 val) = 0;
 
         /// Write float
         virtual iOstream& write(const float val) = 0;
@@ -377,17 +380,13 @@ inline iOstream& operator<<( iOstream& os, const int32& val)
     return os.write(val);
 }
 
-inline iOstream& operator<<( iOstream& os, const int16& val)
-{
-    return os.write(val);
-}
 
 inline iOstream& operator<<( iOstream& os, const int8& val)
 {
     return os.write(val);
 }
 
-inline iOstream& operator<<( iOstream& os, const label& val)
+inline iOstream& operator<<( iOstream& os, const uint64& val)
 {
     return os.write(val);
 }
@@ -397,7 +396,7 @@ inline iOstream& operator<<( iOstream& os, const uint32& val)
     return os.write(val);
 }
 
-inline iOstream& operator<<( iOstream& os, const uint16& val)
+inline iOstream& operator<<( iOstream& os, const uint8& val)
 {
     return os.write(val);
 }
diff --git a/src/phasicFlow/streams/token/token.hpp b/src/phasicFlow/streams/token/token.hpp
index 5dd3ebaa..06a35f3f 100755
--- a/src/phasicFlow/streams/token/token.hpp
+++ b/src/phasicFlow/streams/token/token.hpp
@@ -17,28 +17,30 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-// based on OpenFOAM stream, with some modifications/simplifications
-// to be tailored to our needs
-
-
 #ifndef __token_hpp__
 #define __token_hpp__
 
 
 #include "bTypes.hpp"
 
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
+
 
 namespace pFlow
 {
 
-// Forward Declarations
+//- Forward Declarations
 class token;
 class iIstream;
 class iOstream;
+
 iOstream& operator<<(iOstream& os, const token& tok);
 
 
+/**
+ *  Token class 
+ *  based on OpenFOAM stream, with some modifications/simplifications
+ *  to be tailored to our needs 
+ */
 class token
 {
 public:
@@ -212,8 +214,8 @@ public:
     //- Construct punctuation character token
     inline explicit token(punctuationToken p, int32 lineNumber=0);
 
-    //- Construct label token
-    inline explicit token(const label val, int32 lineNumber=0);
+    //- Construct uint64 token
+    inline explicit token(const uint64 val, int32 lineNumber=0);
 
     //- Construct uint32 token
     inline explicit token(const uint32 val, int32 lineNumber=0);
diff --git a/src/phasicFlow/streams/token/tokenI.hpp b/src/phasicFlow/streams/token/tokenI.hpp
index 1b261866..63dddb50 100755
--- a/src/phasicFlow/streams/token/tokenI.hpp
+++ b/src/phasicFlow/streams/token/tokenI.hpp
@@ -144,7 +144,7 @@ inline pFlow::token::token(punctuationToken p, int32 lineNumber)
     data_.punctuationVal = p;
 }
 
-inline pFlow::token::token(const label val, int32 lineNumber)
+inline pFlow::token::token(const uint64 val, int32 lineNumber)
 :
     data_(),
     type_(tokenType::INT64),
diff --git a/src/phasicFlow/typeSelection/typeInfo.hpp b/src/phasicFlow/typeSelection/typeInfo.hpp
index 31614d9a..3aefa7e3 100644
--- a/src/phasicFlow/typeSelection/typeInfo.hpp
+++ b/src/phasicFlow/typeSelection/typeInfo.hpp
@@ -137,18 +137,18 @@ namespace pFlow
 	template<>
 	inline word basicTypeName<int32>(){ return "int32"; }
 
-	template<>
-	inline word basicTypeName<int16>(){ return "int16"; }
-
-	template<>
+		template<>
 	inline word basicTypeName<int8>(){ return "int8"; }
 
 	template<>
-	inline word basicTypeName<label>(){ return "label"; }
+	inline word basicTypeName<uint64>(){ return "uint64"; }
 
 	template<>
 	inline word basicTypeName<uint32>(){ return "uint32"; }
 
+	template<>
+	inline word basicTypeName<uint8>(){ return "uint8"; }
+
 	template<>
 	inline word basicTypeName<real>(){ return "real"; }
 
diff --git a/src/phasicFlow/types/basicTypes/Logical.hpp b/src/phasicFlow/types/basicTypes/Logical.hpp
index 69770936..35183963 100755
--- a/src/phasicFlow/types/basicTypes/Logical.hpp
+++ b/src/phasicFlow/types/basicTypes/Logical.hpp
@@ -17,7 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
 #ifndef __Logical_hpp__
 #define __Logical_hpp__
 
@@ -25,22 +24,32 @@ Licence:
 #include "bTypesFunctions.hpp"
 #include "typeInfo.hpp"
 
+
 namespace pFlow
 {
 
+//- Forward 
 class iIstream;
 class iOstream;
 
-// allias for bool
+/**
+ *  Holds a bool value and converts strings to bool 
+ * 
+ */
 class Logical
 {
 protected:
+
+	/// bool value 
 	bool s_ = false;
 
+	/// Set numbe of of Yes or No
 	int  yesNoSet_ = 0;
 
+	/// Set of Yes or Nos
 	inline static const word YesNo__[4][2] = {{"Yes", "No"},{"on","off"},{"true","false"}, {"Ok","No"}};
 
+	/// Construct from bool and set number 
 	inline explicit Logical(bool s, int yns)
 	:	
 		s_(s),
@@ -49,58 +58,75 @@ protected:
 
 public:
 
+	/// Type info
 	TypeInfoNV("Logical");
 	
+	//// Constructors 
 
-	inline Logical(){}
+		/// Default constructor 
+		inline Logical(){}
+			
+		/// Construct from bool 
+		inline explicit Logical(bool s)
+		:
+		 	s_(s)
+		{}
+
+		/// Construct from word 
+		Logical(const word& l);
 		
+		/// Construct from char string 
+		Logical(const char* ch);
 
-	inline explicit Logical(bool s)
-	:
-	 	s_(s),
-	 	yesNoSet_(0)
-	{}
+		/// Copy 
+		Logical(const Logical&) = default;
 
-	Logical(const word& l);
+		/// Move 
+		Logical(Logical&&) = default;
+
+		/// Copy assignment 
+		Logical& operator=(const Logical&) = default;
+
+		/// Move assignment 
+		Logical& operator=(Logical&&) = default;
+
+		/// Assignment with bool
+		inline Logical& operator=(const bool& b)
+		{ 
+			s_ = b;
+			yesNoSet_ = 0;
+			return *this;
+		}
 	
-	Logical(const char* ch);
-
-	Logical(const Logical&) = default;
-
-	Logical(Logical&&) = default;
-
-	Logical& operator=(const Logical&) = default;
-
-	Logical& operator=(Logical&&) = default;
-
-	inline Logical& operator=(const bool& b)
-	{ 
-		s_ = b;
-		yesNoSet_ = 0;
-		return *this;
-	}
+	//// Methods 
 	
-	inline bool operator()() const
-	{
-		return s_;
-	}
-	
-	inline explicit operator bool() const
-	{
-		return s_;
-	}
+		/// () operator, return bool value 
+		inline bool operator()() const
+		{
+			return s_;
+		}
+		
+		/// Return bool value 
+		inline explicit operator bool() const
+		{
+			return s_;
+		}
 
-	inline Logical operator!()const
-	{
-		return Logical(!s_, yesNoSet_);
-	}
+		/// Not operator 
+		inline Logical operator!()const
+		{
+			return Logical(!s_, yesNoSet_);
+		}
 
 	//// IO operations
-	bool read(iIstream& is);
+	
+		bool read(iIstream& is);
 
-	bool write(iOstream& os)const; 
+		bool write(iOstream& os)const; 
 
-	bool static evaluteWord(const word& l, bool& b, int& yesNoSet );
+	//// Static members 
+
+		bool static evaluteWord(const word& l, bool& b, int& yesNoSet );
 	
 
 };
diff --git a/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp b/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp
index 50dcafb3..29c3f99a 100755
--- a/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp
+++ b/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp
@@ -41,6 +41,29 @@ pFlow::int32 pFlow::countChar( const char* s, const char c)
     );
 }
 
+pFlow::word pFlow::toUpper(const word & inStr)
+{
+    word oStr(inStr);
+    transform(inStr.begin(), inStr.end(), oStr.begin(), ::toupper);
+    return oStr;
+}
+
+bool pFlow::isYes(const word & str)
+{
+    word s = toUpper(str);
+
+    if( s == "YES" || s=="Y" || s == "OK" || s == "TRUE" || s == "ON" || s=="T") return true;
+    return false;
+}
+
+bool pFlow::isNo(const word & str)
+{
+    word s = toUpper(str);
+
+    if( s == "NO" || s == "N" || "FALSE" || s == "OFF" || s == "F") return true;
+    return false;
+}
+
 pFlow::word pFlow::real2Fixed(const real & v, int32 numPrecision)
 {
     std::stringstream ss;
@@ -104,29 +127,6 @@ pFlow::word pFlow::real2FixedStripZeros(const real & v, int32 numPrecision)
     return removeDecimalZeros(strVal);
 }
 
-pFlow::word pFlow::toUpper(const word & inStr)
-{
-    word oStr(inStr);
-    transform(inStr.begin(), inStr.end(), oStr.begin(), ::toupper);
-    return oStr;
-}
-
-bool pFlow::isYes(const word & str)
-{
-    word s = toUpper(str);
-
-    if( s == "YES" || s == "OK" || s == "TRUE" || s == "ON" || s=="T") return true;
-    return false;
-}
-
-bool pFlow::isNo(const word & str)
-{
-    word s = toUpper(str);
-
-    if( s == "NO" || s == "N" || "FALSE" || s == "OFF" || s == "F") return true;
-    return false;
-}
-
 
 pFlow::word pFlow::angleBracketsNames(const word& w1, const word& w2)
 {
@@ -222,25 +222,6 @@ bool pFlow::validWordWithQuote(const word& w)
     return true;
 }
 
-
-bool pFlow::readLabel( const word& w, label & val)
-{
-    try{
-        val = std::stoull(w);
-    }
-    catch (...)
-    {
-        return false;
-    }
-    return true;
-}
-
-bool pFlow::readLabel( const char* buf, label & val)
-{
-    word w(buf);
-    return readLabel(w, val);
-}
-
 bool pFlow::readUint32( const word& w, uint32 & val)
 {
     try{
@@ -296,42 +277,13 @@ bool pFlow::readInt32( const char* buf, int32 & val)
 }
 
 
-bool pFlow::readInt16( const word& w, int16 & val)
-{
-    try{
-        val = static_cast<int16>(std::stoi(w));
-    }
-    catch (...)
-    {
-        return false;
-    }
-    return true;
-}
-
-bool pFlow::readInt16( const char* buf, int16 & val)
-{
-    word w(buf);
-    return readInt16(w, val);
-}
-
-bool pFlow::readInt8( const word& w, int8 & val)
-{
-    try{
-        val = static_cast<int8>(std::stoi(w));
-    }
-    catch (...)
-    {
-        return false;
-    }
-    return true;
-}
-
 bool pFlow::readInt8( const char* buf, int8 & val)
 {
     word w(buf);
     return readInt8(w, val);
 }
-#include <iostream>
+
+//#include <iostream>
 bool pFlow::readReal( const word& w, real & val)
 {
     try{
@@ -364,7 +316,6 @@ bool pFlow::readReal( const char* buf, real & val )
         return false;
     }
     
-    
     return true;
 }
 
diff --git a/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp b/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp
index de3e746e..84a4542f 100755
--- a/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp
+++ b/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp
@@ -17,6 +17,10 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
+/*! \file bTypeFunctions.hpp
+   
+    \brief Helper functions for built-in types.  
+ */ 
 
 #ifndef __bTypesFunctions_hpp__
 #define __bTypesFunctions_hpp__
@@ -27,127 +31,132 @@ Licence:
 #include "math.hpp"
 
 
-// helper functions and constants for basic types 
+
 namespace pFlow
 {
 
-
+/// Zero real variable 
 inline const real  zero = 0.0;
+
+/// one real variable 
 inline const real  one  = 1.0;
 
+/// zero int32 variable 
 inline const int32  zero32 = 0;
+
+/// one int32 variable 
 inline const int32  one32  = 1;
 
+/// null/empty word 
 inline const word nullWord;
 
+/// white space 
 inline const word whiteSpace(" \t\n\v\f\r");
 
-
+/// Count numer of chars c in a word
 int32 countChar (const word& s, const char c);
 
+/// Count numer of chars c in a char string
 int32 countChar(const char* s, const char c);
 
+/// convert a word to all caps
 word toUpper(const word & inStr);
 
+/// Check if str equals "Yes", "Y", "True", "Ok", "ON", or "T"
 bool isYes(const word & str);
 
+/// Check if str equals "No", "N", "False", or "Off"
 bool isNo(const word & str);
 
+/// Convert floating point variable to string with fixed number of precisions 
 word real2Fixed(const real & v, int32 numPrecision = 6);
 
+/// Convert floating point variable to string with general format  
 word real2Word(const real & v, int32 numPrecision = 6);
 
-word removeDecimalZeros(const word& str);
-
-word real2FixedStripZeros(const real & v, int32 numPrecision = 6);
-
+/// Convert int32 to word 
 word int322Word(const int32 & v);
 
+/// Remove zeros from decimal part of a string number 
+word removeDecimalZeros(const word& str);
+
+/// Convert to fixed point variable and remove zeros 
+word real2FixedStripZeros(const real & v, int32 numPrecision = 6);
  
+/// Output <w1,w2> 
 word angleBracketsNames(const word& w1, const word& w2);
 
- 
+/// Output base<w1,w2>
 word angleBracketsNames2(const word& base, const word& w1, const word& w2);
 
+/// Output base<w1,sw2,w3>
 word angleBracketsNames3(const word& base, const word& w1, const word& w2, const word& w3);
 
+/// Group words and output bw.tw
 word groupNames(const word& bw, const word& tw, char sep = '.');
 
+/// Find the base in a group separated by "." and return it. 
 word baseName(const word& w, char sep = '.');
 
+/// Find tail name in a group separated by "." and return it. 
 word tailName(const word& w, char sep = '.');
 
-
-// is the character valid for a word name  
+/// Is the character valid for a word name?
 bool validWord(char c);
 
+/// Is c a valid character including quote?
 bool validWordWithQuote(char c);
 
-
+/// Is a valid word?
 bool validWord(const word& w);
 
+/// Is a valid word with qoute?
 bool validWordWithQuote(const word& c);
 
-
-bool readLabel( const word& w, label & val);
-
-
-bool readLabel( const char* buf, label & val);
-
-
+/// Convert word to uint32
 bool readUint32( const word& w, uint32 & val);
 
-
+/// Convert char string to uint32
 bool readUint32( const char* buf, uint32 & val);
 
-
+/// Convert word to int64
 bool readInt64( const word& w, int64 & val);
 
-
+/// Convert char string to int64
 bool readInt64( const char* buf, int64 & val);
 
-
+/// Convert word to int32
 bool readInt32( const word& w, int32 & val);
 
-
+/// Convert char string to int32
 bool readInt32( const char* buf, int32 & val);
 
 
-bool readInt16( const word& w, int16 & val);
-
-
-bool readInt16( const char* buf, int16 & val);
-
-
+/// Convert word to int8
 bool readInt8( const word& w, int8 & val);
 
-
+/// Convert char string to int8
 bool readInt8( const char* buf, int8 & val);
 
-
+/// Convert word to real 
 bool readReal( const word& w, real & val);
 
-
+/// Convert char string to real 
 bool readReal( const char* buf, real & val );
 
-
+/// Convert word to bool
 bool readBoolian_Str( const word& w, bool & val);
 
-
+/// Convert char string to bool 
 bool readBoolian_Str( const char* buf, bool & val);
 
+
 inline
 bool readValue(const word& w, real& val)
 {
     return readReal(w,val);
 }
 
-inline
-bool readValue(const word& w, label& val)
-{
-    return readLabel(w,val);
-}
-
 inline
 bool readValue(const word& w, uint32& val)
 {
@@ -166,11 +175,6 @@ bool readValue(const word& w, int32& val)
     return readInt32(w,val);
 }
 
-inline
-bool readValue(const word& w, int16& val)
-{
-    return readInt16(w,val);
-}
 
 inline
 bool readValue(const word& w, int8& val)
@@ -185,53 +189,53 @@ bool readValue(const word& w, bool& val)
 }
 
 
-INLINE_FUNCTION_HD bool equal(const real& s1, const real& s2)
+INLINE_FUNCTION_HD 
+bool equal(const real& s1, const real& s2)
 {
     return abs(s1 - s2) <= smallValue;
 }
 
-INLINE_FUNCTION_HD bool equal(const int64& s1, const int64& s2)
+INLINE_FUNCTION_HD 
+bool equal(const int64& s1, const int64& s2)
 {
     return s1 == s2;
 }
 
-INLINE_FUNCTION_HD bool equal(const int32& s1, const int32& s2)
+INLINE_FUNCTION_HD 
+bool equal(const int32& s1, const int32& s2)
 {
 	return s1 == s2;
 }
 
-INLINE_FUNCTION_HD bool equal(const int16& s1, const int16& s2)
+INLINE_FUNCTION_HD 
+bool equal(const int8& s1, const int8& s2)
 {
     return s1 == s2;
 }
 
-INLINE_FUNCTION_HD bool equal(const int8& s1, const int8& s2)
+INLINE_FUNCTION_HD 
+bool equal(const uint32& s1, const uint32& s2)
 {
     return s1 == s2;
 }
 
-INLINE_FUNCTION_HD bool equal(const uint32& s1, const uint32& s2)
-{
-    return s1 == s2;
-}
-
-INLINE_FUNCTION_HD bool equal(const label& s1, const label& s2)
-{
-    return s1 == s2;
-}
-
-// host only
-INLINE_FUNCTION bool equal(const word& s1, const word& s2)
+/// Are two words equal (host only)?
+INLINE_FUNCTION 
+bool equal(const word& s1, const word& s2)
 {
 	return s1==s2;
 }
 
-INLINE_FUNCTION_HD real degree2Radian(const real &theta)
+/// Convert degree to radians
+INLINE_FUNCTION_HD 
+real degree2Radian(const real &theta)
 {
     return theta / 180.0 * Pi;
 }
 
-INLINE_FUNCTION_HD real radian2Degree(const real &phi)
+/// Convert radians to degree
+INLINE_FUNCTION_HD 
+real radian2Degree(const real &phi)
 {
     return phi / Pi * 180.0;
 }
diff --git a/src/phasicFlow/types/basicTypes/builtinTypes.hpp b/src/phasicFlow/types/basicTypes/builtinTypes.hpp
index 52adf430..1abe89bd 100755
--- a/src/phasicFlow/types/basicTypes/builtinTypes.hpp
+++ b/src/phasicFlow/types/basicTypes/builtinTypes.hpp
@@ -48,22 +48,22 @@ inline const bool usingDouble__ = false;
 
 using int8    = signed char;
 
-using int16   = short int;
-
 using int32   = int;
 
 using int64   = long long int;
 
-using uint16  = unsigned short int  ;
+using uint8  = unsigned char  ;
 
 using uint32  = unsigned int;
 
-using label   = std::size_t;
+using uint64  = unsigned long long int;
+
+using size_t  = std::size_t;
 
 using word    = std::string;
 
 inline 
-auto floatingPointDescription()
+word floatingPointDescription()
 {
   return word("In this build, ") + word(floatingPointType__) +
          word(" is used for floating point operations.");
diff --git a/src/phasicFlow/types/basicTypes/math.hpp b/src/phasicFlow/types/basicTypes/math.hpp
index 6c2b0f64..0ac62f6c 100755
--- a/src/phasicFlow/types/basicTypes/math.hpp
+++ b/src/phasicFlow/types/basicTypes/math.hpp
@@ -88,12 +88,12 @@ INLINE_FUNCTION_HD int32 mod(int32 x, int32 y)
 	return x%y;
 }
 
-INLINE_FUNCTION_HD int64 mod(label x, label y)
+INLINE_FUNCTION_HD int64 mod(uint64 x, uint64 y)
 {
 	return x%y;
 }
 
-INLINE_FUNCTION_HD int32 mod(uint32 x, uint32 y)
+INLINE_FUNCTION_HD auto mod(uint32 x, uint32 y)
 {
 	return x%y;
 }
@@ -319,7 +319,7 @@ INLINE_FUNCTION_HD int64 min(int64 x, int64 y)
 #endif
 }
 
-INLINE_FUNCTION_HD label min(label x, label y)
+INLINE_FUNCTION_HD uint64 min(uint64 x, uint64 y)
 {
 #ifdef __CUDACC__
 	return ::min(x, y);
@@ -338,14 +338,7 @@ INLINE_FUNCTION_HD uint32 min(uint32 x, uint32 y)
 #endif
 }
 
-INLINE_FUNCTION_HD uint32 min(uint16 x, uint16 y)
-{
-#ifdef __CUDACC__
-	return ::min(x, y);
-#else
-	return std::min(x, y);
-#endif
-}
+
 
 INLINE_FUNCTION_HD real max(real x, real y)
 {
@@ -374,7 +367,7 @@ INLINE_FUNCTION_HD int32 max(int32 x, int32 y)
 #endif
 }
 
-INLINE_FUNCTION_HD label max(label x, label y)
+INLINE_FUNCTION_HD uint64 max(uint64 x, uint64 y)
 {
 #ifdef __CUDACC__
 	return ::max(x, y);
@@ -393,15 +386,6 @@ INLINE_FUNCTION_HD uint32 max(uint32 x, uint32 y)
 #endif
 }
 
-INLINE_FUNCTION_HD uint32 max(uint16 x, uint16 y)
-{
-#ifdef __CUDACC__
-	return ::max(x, y);
-#else
-	return std::max(x, y);
-#endif
-
-}
 
 } // pFlow
 
diff --git a/src/phasicFlow/types/triple/triple.hpp b/src/phasicFlow/types/triple/triple.hpp
index 50c6e83b..616c1e36 100644
--- a/src/phasicFlow/types/triple/triple.hpp
+++ b/src/phasicFlow/types/triple/triple.hpp
@@ -17,7 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
 #ifndef __triple_hpp__
 #define __triple_hpp__
 
@@ -33,193 +32,201 @@ Licence:
 namespace pFlow
 {
 
-
+/// - Forward
 template<typename T> class triple;
 
 
 #include "tripleFwd.hpp"
 
-
-// for 3D vectors
-// it should be used only for numeric types, real, unit 
+/**
+ * A set of 3 variables that can be used for vector variables.
+ * The template parameter should be numeric type only.
+ *  
+ */
 template <typename T>
 struct triple
 {
-	// data members
+	/// data members
 	T x_;
 	T y_;
 	T z_;
 
-	// initilizes to zero
-	INLINE_FUNCTION_HD triple():
-	x_(0),
-	y_(0),
-	z_(0)
-	{}
+	//// Constructors
 
-	// Constructors
-	INLINE_FUNCTION_HD triple(const T &x, const T &y, const T &z):
-	x_(x),
-	y_(y),
-	z_(z)
-	{}
+		/// Initilize to zero
+		INLINE_FUNCTION_HD 
+		triple():
+		x_(0),
+		y_(0),
+		z_(0)
+		{}
 
-	INLINE_FUNCTION_HD triple(const T &v):
-	triple(v, v, v)
-	{}
+		
+		/// Construct from x, y, z
+		INLINE_FUNCTION_HD 
+		triple(const T &x, const T &y, const T &z):
+		x_(x),
+		y_(y),
+		z_(z)
+		{}
 
-	// type conversion trough assignment  
-	template <typename T2>
-	INLINE_FUNCTION_HD triple<T> & operator = (const triple<T2> & rhs)
-	{
-		this->x_ = static_cast<T>(rhs.x_);
-		this->y_ = static_cast<T>(rhs.y_);
-		this->z_ = static_cast<T>(rhs.z_);
-		return *this;
-	}
+		/// Construct from v
+		INLINE_FUNCTION_HD 
+		triple(const T &v):
+		triple(v, v, v)
+		{}
 
-	// type casting through copy constructor 
-	template<typename T2>
-	INLINE_FUNCTION_HD triple(const triple<T2> &src):
-	x_(static_cast<T>(src.x_)),
-	y_(static_cast<T>(src.y_)),
-	z_(static_cast<T>(src.z_))
-	{
-	}
+		/// Type conversion trough assignment  
+		template <typename T2>
+		INLINE_FUNCTION_HD triple<T> & operator = (const triple<T2> & rhs)
+		{
+			this->x_ = static_cast<T>(rhs.x_);
+			this->y_ = static_cast<T>(rhs.y_);
+			this->z_ = static_cast<T>(rhs.z_);
+			return *this;
+		}
+
+		/// Type casting through copy constructor 
+		template<typename T2>
+		INLINE_FUNCTION_HD triple(const triple<T2> &src)
+		:
+			x_(static_cast<T>(src.x_)),
+			y_(static_cast<T>(src.y_)),
+			z_(static_cast<T>(src.z_))
+		{}
 	
-	// copy construct
-	INLINE_FUNCTION_HD
-	triple(const triple<T>& src) = default;
+		/// Copy construct
+		INLINE_FUNCTION_HD
+		triple(const triple<T>& src) = default;
 
-	// volatile copy construct
-	/*INLINE_FUNCTION_HD
-	triple(volatile triple<T>& src):
-		x_(src.x_),
-		y_(src.y_),
-		z_(src.z_)
-	{}*/
-
-	/*INLINE_FUNCTION_HD
-	triple& operator=(volatile triple<T>& src)	
-	{
-		x_ = src.x_;
-		y_ = src.y_;
-		z_ = src.z_;
-	}*/
-
-	// move construct
-	INLINE_FUNCTION_HD
-	triple(triple<T>&& src) = default;
-
-	// copy assignment
-	INLINE_FUNCTION_HD
-	triple<T>& operator=(const triple<T>& src) = default;
-
-	// move assignment
-	INLINE_FUNCTION_HD
-	triple<T>& operator=(triple<T>&& src) = default;
-
-	// clone 
-	INLINE_FUNCTION 
-	uniquePtr<triple<T>> clone() const
-	{
-		return makeUnique<triple<T>>(*this);
-	}
-
-	INLINE_FUNCTION
-	triple<T>* clonePtr()const
-	{
-		return new triple<T>(*this);
-	}
-
-	//// member methods
-
-	// access
-	INLINE_FUNCTION_HD T & x(){ return x_; }
-	INLINE_FUNCTION_HD const T & x()const { return x_; }
 	
-	INLINE_FUNCTION_HD T & y(){ return y_; }
-	INLINE_FUNCTION_HD const T & y()const { return y_; }
 
-	INLINE_FUNCTION_HD T & z(){ return z_; }
-	INLINE_FUNCTION_HD const T & z()const { return z_; }
+		/// Move construct
+		INLINE_FUNCTION_HD
+		triple(triple<T>&& src) = default;
 
-	// methods
-	friend FUNCTION_HD T dot <T> (const triple<T> & oprnd1, const triple<T> & oprnd2);
-	
-	friend FUNCTION_HD triple<T> cross <T>(const triple<T> & v1, const triple<T> & v2);
-	
-	INLINE_FUNCTION_HD T length() const; 
+		/// copy assignment
+		INLINE_FUNCTION_HD
+		triple<T>& operator=(const triple<T>& src) = default;
 
-	INLINE_FUNCTION_HD void normalize(); 
+		/// move assignment
+		INLINE_FUNCTION_HD
+		triple<T>& operator=(triple<T>&& src) = default;
 
+		/// clone 
+		INLINE_FUNCTION 
+		uniquePtr<triple<T>> clone() const
+		{
+			return makeUnique<triple<T>>(*this);
+		}
 
+		INLINE_FUNCTION
+		triple<T>* clonePtr()const
+		{
+			return new triple<T>(*this);
+		}
+
+	////// member methods
+
+		/// access component
+		INLINE_FUNCTION_HD T & x(){ return x_; }
+
+		/// access component
+		INLINE_FUNCTION_HD const T & x()const { return x_; }
+		
+		/// access component
+		INLINE_FUNCTION_HD T & y(){ return y_; }
+		
+		/// access component
+		INLINE_FUNCTION_HD const T & y()const { return y_; }
+
+		/// access component
+		INLINE_FUNCTION_HD T & z(){ return z_; }
+		
+		/// access component
+		INLINE_FUNCTION_HD const T & z()const { return z_; }
+
+	//// methods
+
+		/// Dot product of two vectors
+		friend FUNCTION_HD T dot <T> (const triple<T> & oprnd1, const triple<T> & oprnd2);
+		
+		/// Cross product of two vectors
+		friend FUNCTION_HD triple<T> cross <T>(const triple<T> & v1, const triple<T> & v2);
+		
+		/// Length of the vector 
+		INLINE_FUNCTION_HD T length() const; 
+
+		/// Normalize the vector 
+		INLINE_FUNCTION_HD void normalize(); 
 
 	//// operators 
 	
-	// + operator
-	friend FUNCTION_HD triple<T> operator+ <T> (const triple<T> & oprnd1, const triple<T> & oprnd2);
+		/// + operator
+		friend FUNCTION_HD triple<T> operator+ <T> (const triple<T> & oprnd1, const triple<T> & oprnd2);
 
-	friend FUNCTION_HD triple<T> operator+ <T> (const triple<T> & oprnd1, const T & oprnd2);
-	
-	friend FUNCTION_HD triple<T> operator+ <T> (const T & oprnd1, const triple<T> & oprnd2);	
-	
-	// - operator 
-	friend FUNCTION_HD triple<T> operator - <T> (const triple<T> & oprnd1, const triple<T> & oprnd2);
-	
-	friend FUNCTION_HD triple<T> operator - <T> (const triple<T> & oprnd1, const T & oprnd2);
-	
-	friend FUNCTION_HD triple<T> operator - <T> (const T & oprnd1, const triple<T> & oprnd2);
-	
-	// * operators
-	friend FUNCTION_HD triple<T> operator * <T> (const triple<T> & oprnd1, const triple<T> & oprnd2);
-	
-	friend FUNCTION_HD triple<T> operator * <T> (const triple<T> & oprnd1, const T & oprnd2);
-	
-	friend FUNCTION_HD triple<T> operator * <T> (const T & oprnd1, const triple<T> & oprnd2);
+		friend FUNCTION_HD triple<T> operator+ <T> (const triple<T> & oprnd1, const T & oprnd2);
+		
+		friend FUNCTION_HD triple<T> operator+ <T> (const T & oprnd1, const triple<T> & oprnd2);	
+		
+		/// - operator 
+		friend FUNCTION_HD triple<T> operator - <T> (const triple<T> & oprnd1, const triple<T> & oprnd2);
+		
+		friend FUNCTION_HD triple<T> operator - <T> (const triple<T> & oprnd1, const T & oprnd2);
+		
+		friend FUNCTION_HD triple<T> operator - <T> (const T & oprnd1, const triple<T> & oprnd2);
+		
+		/// * operators
+		friend FUNCTION_HD triple<T> operator * <T> (const triple<T> & oprnd1, const triple<T> & oprnd2);
+		
+		friend FUNCTION_HD triple<T> operator * <T> (const triple<T> & oprnd1, const T & oprnd2);
+		
+		friend FUNCTION_HD triple<T> operator * <T> (const T & oprnd1, const triple<T> & oprnd2);
 
-	// / operators
-	friend FUNCTION_HD triple<T> operator / <T> (const triple<T> & oprnd1, const triple<T> & oprnd2);
-	
-	friend FUNCTION_HD triple<T> operator / <T> (const triple<T> & oprnd1, const T & oprnd2);
-	
-	friend FUNCTION_HD triple<T> operator / <T> (const T & oprnd1, const triple<T> & oprnd2);
+		/// / operators
+		friend FUNCTION_HD triple<T> operator / <T> (const triple<T> & oprnd1, const triple<T> & oprnd2);
+		
+		friend FUNCTION_HD triple<T> operator / <T> (const triple<T> & oprnd1, const T & oprnd2);
+		
+		friend FUNCTION_HD triple<T> operator / <T> (const T & oprnd1, const triple<T> & oprnd2);
 
 
-	INLINE_FUNCTION_HD void operator+= (const triple & oprnd2);
+		INLINE_FUNCTION_HD void operator+= (const triple & oprnd2);
 
-	INLINE_FUNCTION_HD void operator-= (const triple & oprnd2);
+		INLINE_FUNCTION_HD void operator-= (const triple & oprnd2);
 
-	INLINE_FUNCTION_HD void operator*= (const triple & oprnd2);
+		INLINE_FUNCTION_HD void operator*= (const triple & oprnd2);
 
-	INLINE_FUNCTION_HD void operator/= (const triple & oprnd2);
+		INLINE_FUNCTION_HD void operator/= (const triple & oprnd2);
 	
 	
-	// unary negate operator 
-	INLINE_FUNCTION_HD triple operator- ()const;
-	
-	// unary plus operator 
-	INLINE_FUNCTION_HD triple operator+ ()const;
+		/// unary negate operator 
+		INLINE_FUNCTION_HD triple operator- ()const;
+		
+		/// unary plus operator 
+		INLINE_FUNCTION_HD triple operator+ ()const;
+		
+
+		friend FUNCTION_HD bool operator == <T> (const triple<T> &opr1, const triple<T> &opr2);
+
+		friend FUNCTION_HD bool operator < <T> (const triple<T> &opr1, const triple<T> &opr2);
+
+		friend FUNCTION_HD bool operator > <T> (const triple<T> &opr1, const triple<T> &opr2);
+
+		friend FUNCTION_HD bool operator >= <T> (const triple<T> &opr1, const triple<T> &opr2);
+
+		friend FUNCTION_HD bool operator <= <T> (const triple<T> &opr1, const triple<T> &opr2);
 	
+	//// IO operators
 
-	friend FUNCTION_HD bool operator == <T> (const triple<T> &opr1, const triple<T> &opr2);
+		/// << operator 	
+		friend iOstream& operator<< <T> (iOstream& str, const triple<T> & ov);
+		
+		/// >> operator 
+		friend iIstream& operator >> <T> (iIstream & str, triple<T> & iv);
 
-	friend FUNCTION_HD bool operator < <T> (const triple<T> &opr1, const triple<T> &opr2);
-
-	friend FUNCTION_HD bool operator > <T> (const triple<T> &opr1, const triple<T> &opr2);
-
-	friend FUNCTION_HD bool operator >= <T> (const triple<T> &opr1, const triple<T> &opr2);
-
-	friend FUNCTION_HD bool operator <= <T> (const triple<T> &opr1, const triple<T> &opr2);
-	
-	// << operator 	
-	friend iOstream& operator<< <T> (iOstream& str, const triple<T> & ov);
-	
-	// >> operator 
-	friend iIstream& operator >> <T> (iIstream & str, triple<T> & iv);
-
-	// same as >> operator, but faster, good for mass read
-	friend void readIstream <T>( iIstream& str, triple<T> &iv);
+		/// same as >> operator, but faster, good for mass read
+		friend void readIstream <T>( iIstream& str, triple<T> &iv);
 
 };
 
@@ -227,7 +234,7 @@ template<typename T>
 bool INLINE_FUNCTION_HD equal( const triple<T>& opr1, const triple<T>& opr2 );
 
 
-} // end of pFlow
+} /// end of pFlow
 
 #include "tripleI.hpp"
 #include "tripleMath.hpp"
diff --git a/src/phasicFlow/types/types.cpp b/src/phasicFlow/types/types.cpp
index d5d77bbc..a9b58805 100644
--- a/src/phasicFlow/types/types.cpp
+++ b/src/phasicFlow/types/types.cpp
@@ -25,15 +25,11 @@ namespace pFlow
 		
 	const realx3 zero3(0.0);
 	const realx3 one3(1.0);
-	const uint32x3 zeroU3(0);
-	const uint32x3 oneU3(1);
-
+	
 	const realx3x3   zero33(zero3);
 	const realx3x3   one33(one3);
-	const uint32x3x3 zeroU33(zeroU3);
-	const uint32x3x3 oneU33(oneU3);
-
-	const real4 zero4(zero);
+	
+	const realx4 zero4(zero);
 	
 
 } // pFlow
\ No newline at end of file
diff --git a/src/phasicFlow/types/types.hpp b/src/phasicFlow/types/types.hpp
index e4523725..7025b734 100644
--- a/src/phasicFlow/types/types.hpp
+++ b/src/phasicFlow/types/types.hpp
@@ -37,31 +37,23 @@ namespace pFlow
 {
 
 using int8x3 	= triple<int8>;
-using int16x3 	= triple<int16>;
 using int32x3 	= triple<int32>;
 using int64x3	= triple<int64>;
-using uint16x3 	= triple<uint16>;
+using uint8x3   = triple<uint8>;
 using uint32x3 	= triple<uint32>;
-using int32x3 	= triple<int32>;
-using int64x3 	= triple<int64>;
-using labelx3 	= triple<label>;
+using uint64x3 	= triple<uint64>;
 using realx3 	= triple<real>;
 
-using uint16x3x3= triple<uint16x3>;
-using uint32x3x3= triple<uint32x3>;
 using int32x3x3 = triple<int32x3>;
-using labelx3x3 = triple<labelx3>;
+using uint32x3x3= triple<uint32x3>;
 using realx3x3 	= triple<realx3>;
 
-using real4 	= quadruple<real>;
+using realx4 	= quadruple<real>;
 
 
 template<>
 inline word basicTypeName<int8x3>(){	return "int8x3"; }
 
-template<>
-inline word basicTypeName<int16x3>(){	return "int16x3"; }
-
 template<>
 inline word basicTypeName<int32x3>(){	return "int32x3"; }
 
@@ -69,19 +61,19 @@ template<>
 inline word basicTypeName<int64x3>(){	return "int64x3"; }
 
 template<>
-inline word basicTypeName<uint16x3>(){	return "uint16x3"; }
+inline word basicTypeName<uint8x3>(){	return "uint8x3"; }
 
 template<>
 inline word basicTypeName<uint32x3>(){	return "uint32x3"; }
 
 template<>
-inline word basicTypeName<labelx3>(){	return "labelx3"; }
+inline word basicTypeName<uint64x3>(){	return "unit64x3"; }
 
 template<>
 inline word basicTypeName<realx3>(){	return "realx3";	}
 
 template<>
-inline word basicTypeName<uint16x3x3>(){ return "uint16x3x3"; }
+inline word basicTypeName<int32x3x3>(){ return "int32x3x3"; }
 
 template<>
 inline word basicTypeName<uint32x3x3>(){ return "uint32x3x3"; }
@@ -91,20 +83,17 @@ inline word basicTypeName<realx3x3>(){ return "realx3x3"; }
 
 
 template<>
-inline word basicTypeName<real4>(){	return "real4";	}
+inline word basicTypeName<realx4>(){	return "realx4";	}
 
 
 extern const realx3 zero3;
 extern const realx3 one3;
-extern const uint32x3 zeroU3;
-extern const uint32x3 oneU3;
+
 
 extern const realx3x3 zero33;
 extern const realx3x3 one33;
-extern const uint32x3x3 zeroU33;
-extern const uint32x3x3 oneU33;
-
 
+extern const realx4 zero4; 
 
 } // pFlow
 

From bb7dc17c67755b44fc0d3877e003402f858f983b Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Thu, 28 Sep 2023 23:14:12 +0330
Subject: [PATCH 03/60] processors is added and error part modified

---
 CMakeLists.txt                           |   1 +
 src/phasicFlow/CMakeLists.txt            |   2 +
 src/phasicFlow/globals/error.cpp         |  29 ++---
 src/phasicFlow/globals/error.hpp         |   4 +-
 src/phasicFlow/processors/processors.cpp | 151 +++++++++++++++++++++++
 src/phasicFlow/processors/processors.hpp | 136 ++++++++++++++++++++
 6 files changed, 300 insertions(+), 23 deletions(-)
 create mode 100644 src/phasicFlow/processors/processors.cpp
 create mode 100644 src/phasicFlow/processors/processors.hpp

diff --git a/CMakeLists.txt b/CMakeLists.txt
index aef27fa7..64532366 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -58,6 +58,7 @@ endif()
 
 if(pFlow_Build_MPI)
 	find_package(MPI REQUIRED)
+	link_libraries(MPI::MPI_CXX)
 endif()
 
 
diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index b9ab1280..155dc7db 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -4,6 +4,8 @@ types/basicTypes/bTypesFunctions.cpp
 types/basicTypes/Logical.cpp
 types/types.cpp
 
+processors/processors.cpp
+
 globals/error.cpp)
 
 set(link_libs Kokkos::kokkos tbb)
diff --git a/src/phasicFlow/globals/error.cpp b/src/phasicFlow/globals/error.cpp
index 5eb8bf43..d32d771e 100644
--- a/src/phasicFlow/globals/error.cpp
+++ b/src/phasicFlow/globals/error.cpp
@@ -21,13 +21,11 @@ Licence:
 #include <iostream>
 #include <stdlib.h>
 
-#ifdef pFlow_Build_MPI
-	#include <mpi.h>
-#endif
 
 #include <Kokkos_Core.hpp>
 
 #include "error.hpp"
+#include "processors.hpp"
 #include "streams.hpp"
 
 
@@ -93,29 +91,18 @@ pFlow::iOstream& warningMessage(const char* fnName, const char* fileName, int li
 	return errorStream;
 }
 
-pFlow::iOstream& reportAndExit()
+pFlow::iOstream& reportAndExit(int errorCode)
 {
 	errorStream<<"\n>>> phasicFlow is exiting . . ." << pFlow::endl;
-	exit(EXIT_FAILURE);
+	fatalExitPhasicFlow(errorCode);
 	return errorStream;
 }
 
-int exitPhasicFlow()
+int fatalExitPhasicFlow(int errorCode)
 {
-// Kokkos should be finalized first
-Kokkos::finalize();
+	// Kokkos should be finalized first
+	Kokkos::finalize();
 
-#ifdef pFlow_Build_MPI
-	int flag=0;
-	MPI_Initialized(&flag)
-	if(flag == 1)
-	{
-		MPI_Abort(MPI_COMM_WORLD, EXIT_FAILURE);
-		MPI_Finalize();
-    }
-    exit(EXIT_FAILURE);
-#else
-    exit(EXIT_FAILURE);
-#endif
-	return EXIT_FAILURE;
+	pFlow::processors::abort(errorCode);
+	return errorCode;
 }
diff --git a/src/phasicFlow/globals/error.hpp b/src/phasicFlow/globals/error.hpp
index 8ce8c153..a58a30c0 100644
--- a/src/phasicFlow/globals/error.hpp
+++ b/src/phasicFlow/globals/error.hpp
@@ -35,7 +35,7 @@ namespace pFlow
 //- Decleartions 
 
 /// Take actions to fatal exit phasicFlow
-int fatalExitPhasicFlow();
+int fatalExitPhasicFlow(int errorCode = EXIT_FAILURE);
 
 pFlow::iOstream& fatalErrorMessage(const char* fileName, int linNumber );
 pFlow::iOstream& fatalErrorInMessage(const char* fnName, const char* fileName, int linNumber );
@@ -43,7 +43,7 @@ pFlow::iOstream& notImplementedErrorMessage(const char*fnName, const char* fileN
 pFlow::iOstream& ioErrorMessage(const pFlow::word& fileName, int fileLineNumber, const char* fnName, const char* fName, int lNumber);
 pFlow::iOstream& ioErrorMessage(const char* fileName, int fileLineNumber, const char* fnName, const char* fName, int lNumber);
 pFlow::iOstream& warningMessage(const char* fnName, const char* fileName, int linNumber );
-pFlow::iOstream& reportAndExit();
+pFlow::iOstream& reportAndExit(int errorCode = EXIT_FAILURE);
 
 
 /// Report a fatal error and exit the applicaiton 
diff --git a/src/phasicFlow/processors/processors.cpp b/src/phasicFlow/processors/processors.cpp
new file mode 100644
index 00000000..544b01ed
--- /dev/null
+++ b/src/phasicFlow/processors/processors.cpp
@@ -0,0 +1,151 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "phasicFlowConfig.H"
+
+#ifdef pFlow_Build_MPI
+	#include <mpi.h>
+#endif
+
+// from PhasicFlow
+#include "error.hpp"
+#include "processors.hpp"
+#include "streams.hpp"
+
+
+
+void pFlow::processors::initProcessors(int argc, char *argv[])
+{
+
+#ifdef pFlow_Build_MPI
+	if(!processors::isInitialized())
+	{
+		CheckMPI(MPI_Init(&argc, &argv), true);
+		isSelfInitialized_ = true;
+
+		processors::globalSize_ = MPI::COMM_WORLD.Get_size();
+		processors::globalRank_ = MPI::COMM_WORLD.Get_rank();
+		//CheckMPI(MPI_comm_size( MPI_COMM_WORLD, &processors::globalSize_), true );
+		//CheckMPI(MPI_comm_rank( MPI_COMM_WORLD, &processors::globalRank_), true );
+	}
+#else
+
+#endif
+
+}
+
+void pFlow::processors::finalizeProcessors()
+{
+
+#ifdef pFlow_Build_MPI
+	if(isSelfInitialized_ && !isFinalized())
+	{
+		CheckMPI(MPI_Finalize(), true);
+	}
+#else
+
+#endif
+}
+
+pFlow::processors::processors()
+{
+
+#ifdef pFlow_Build_MPI	
+	if(isParallel() && !isInitialized())
+	{
+		fatalErrorInFunction<<
+		"MPI communication is not initialized yet!"<<endl;
+		processors::abort(MPI_ERR_OP);
+	}
+#endif
+	
+}
+
+pFlow::processors::~processors()
+{}
+
+
+bool pFlow::processors::isInitialized()
+{
+	
+#ifdef pFlow_Build_MPI
+	int res;
+	MPI_Initialized(&res);
+	return res;
+#endif
+	return false;
+
+}
+
+bool pFlow::processors::isFinalized()
+{
+
+#ifdef pFlow_Build_MPI
+	int res;
+	MPI_Finalized(&res);
+	return res;
+#endif
+	return false;
+
+}
+
+void pFlow::processors::abort(int error)
+{
+
+#ifdef pFlow_Build_MPI
+	int flag=0;
+	MPI_Initialized(&flag);
+	if(flag == 1)
+	{
+		MPI_Abort(MPI_COMM_WORLD, error);
+		MPI_Finalize();
+  }
+    exit(error);
+#else
+    exit(error);
+#endif
+
+}
+
+bool pFlow::checkMPI(const char* funcName, int error, bool forceAbort, const char* fileName, int lineNumebr)
+{
+
+#ifdef pFlow_Build_MPI
+	
+	if(error == MPI_SUCCESS) return true;
+	fatalErrorInMessage(funcName, fileName, lineNumebr);
+	
+	if(!forceAbort) return false;
+	reportAndExit(error);
+	
+	return false;
+
+#else
+
+	return true;
+
+#endif
+}
+
+
+
+
+
+
diff --git a/src/phasicFlow/processors/processors.hpp b/src/phasicFlow/processors/processors.hpp
new file mode 100644
index 00000000..49fe3d1f
--- /dev/null
+++ b/src/phasicFlow/processors/processors.hpp
@@ -0,0 +1,136 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __processors_H__
+#define __processors_H__ 
+
+
+namespace pFlow
+{
+	// - Forward
+	bool checkMPI
+	(
+		const char* funcName,
+		int 				error, 
+		bool 				forceAbort, 
+		const char* fileName, 
+		int 				lineNumebr
+	);
+}
+
+// - Macro for automating line and file logs
+#define CheckMPI(caller, fAbort)\
+   pFlow::checkMPI(#caller, (caller), fAbort, __FILE__, __LINE__);
+
+
+namespace pFlow
+{
+
+/**
+ * This class holds the information about the global execution 
+ * world and number of processors in communication.
+ * 
+ */
+class processors
+{
+protected:
+
+	/// Is the static member initProcessors is called
+	static inline 
+	bool isSelfInitialized_ = false;
+
+	/// Global rank of the current processor
+	static inline
+	int globalRank_ = 0;
+
+	/// The global size of all processors 
+	static inline
+	int globalSize_ = 1;
+
+public:
+
+	/// Initialize MPI processors
+	static 
+	void initProcessors(int argc, char *argv[]);
+
+	/// Finalize MPI processors 
+	static
+	void finalizeProcessors();
+
+	/// Constructor 
+	processors();
+	
+
+	/// Destructor 
+	~processors();
+	
+	/// Master processors number (globaly in MPI).
+	static
+	int masterNo()
+	{
+		return 0;
+	}
+
+	/// Is this a parallel MPI run.
+	static
+	bool isParallel()
+	{
+		return processors::globalSize()>1;
+	}
+	
+	/// Is MPI initialized?
+	static
+	bool isInitialized();
+	
+	/// Is MPI finalized?
+	static
+	bool isFinalized();
+	
+	/// Is this processor the master processor?
+	static
+	bool isMaster()
+	{
+		return processors::globalRank() == processors::masterNo();
+	}
+	
+	/// Global size of processors
+	static
+	int globalSize()
+	{
+		return globalSize_;
+	}
+	
+	/// Rank of the processor in the global MPI
+	static
+	int globalRank()
+	{
+		return globalRank_;
+	}
+
+	/// Abort MPI run or regular run
+	static
+	void abort(int error);
+
+}; //processors
+
+
+} // pFlow
+
+#endif //__processors_H__
\ No newline at end of file

From 100a211645f1680861ea73aed96cf1aaea3a23fe Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sat, 30 Sep 2023 20:18:17 +0330
Subject: [PATCH 04/60] streams updated, processorsStream, masterStream

---
 CMakeLists.txt                                |   3 +-
 src/phasicFlow/CMakeLists.txt                 |  34 +-
 src/phasicFlow/fileSystem/fileSystem.cpp      |   4 +-
 src/phasicFlow/fileSystem/fileSystem.hpp      | 195 +++++-----
 src/phasicFlow/globals/error.cpp              |  30 +-
 src/phasicFlow/processors/processors.cpp      |   8 +-
 src/phasicFlow/streams/Fstream/fileStream.cpp |   6 -
 src/phasicFlow/streams/Fstream/fileStream.hpp |  50 ++-
 src/phasicFlow/streams/Fstream/iFstream.cpp   |   3 -
 src/phasicFlow/streams/Fstream/iFstream.hpp   |  28 +-
 src/phasicFlow/streams/Fstream/oFstream.cpp   |   2 -
 src/phasicFlow/streams/Fstream/oFstream.hpp   |  22 +-
 src/phasicFlow/streams/Stream/Istream.cpp     |  14 +-
 src/phasicFlow/streams/Stream/Istream.hpp     | 132 +++----
 src/phasicFlow/streams/Stream/Ostream.cpp     |  20 +-
 src/phasicFlow/streams/Stream/Ostream.hpp     |  41 ++-
 .../streams/TStream/helperTstream.hpp         |  20 +-
 src/phasicFlow/streams/TStream/iTstream.cpp   |  14 +-
 src/phasicFlow/streams/TStream/iTstream.hpp   |  53 +--
 src/phasicFlow/streams/TStream/oTstream.cpp   |  11 +-
 src/phasicFlow/streams/TStream/oTstream.hpp   |  64 ++--
 src/phasicFlow/streams/iStream/IOstream.hpp   |  17 +-
 src/phasicFlow/streams/iStream/iIstream.cpp   |  18 +
 src/phasicFlow/streams/iStream/iIstream.hpp   |  28 +-
 src/phasicFlow/streams/iStream/iOstream.hpp   |  33 +-
 .../streams/masterOstream/masterOstream.cpp   | 178 +++++++++
 .../streams/masterOstream/masterOstream.hpp   | 123 +++++++
 .../processorOstream/processorOstream.cpp     | 153 ++++++++
 .../processorOstream/processorOstream.hpp     | 139 +++++++
 src/phasicFlow/streams/streams.cpp            |   7 +-
 src/phasicFlow/streams/streams.hpp            |  44 ++-
 src/phasicFlow/streams/token/token.hpp        | 343 +++++++++---------
 src/phasicFlow/streams/token/tokenI.hpp       |  18 +
 .../types/basicTypes/bTypesFunctions.cpp      |  11 +
 34 files changed, 1304 insertions(+), 562 deletions(-)
 create mode 100755 src/phasicFlow/streams/masterOstream/masterOstream.cpp
 create mode 100755 src/phasicFlow/streams/masterOstream/masterOstream.hpp
 create mode 100755 src/phasicFlow/streams/processorOstream/processorOstream.cpp
 create mode 100755 src/phasicFlow/streams/processorOstream/processorOstream.hpp

diff --git a/CMakeLists.txt b/CMakeLists.txt
index 64532366..3ce683a4 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -58,7 +58,6 @@ endif()
 
 if(pFlow_Build_MPI)
 	find_package(MPI REQUIRED)
-	link_libraries(MPI::MPI_CXX)
 endif()
 
 
@@ -78,7 +77,7 @@ add_subdirectory(src)
 #add_subdirectory(utilities)
 
 #add_subdirectory(DEMSystems)
-#add_subdirectory(testIO)
+add_subdirectory(testIO)
 
 install(FILES "${PROJECT_BINARY_DIR}/phasicFlowConfig.H"
   DESTINATION include)
diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 155dc7db..6ebacce2 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -4,13 +4,37 @@ types/basicTypes/bTypesFunctions.cpp
 types/basicTypes/Logical.cpp
 types/types.cpp
 
+
+
+globals/error.cpp
+
+streams/token/tokenIO.cpp
+streams/token/token.cpp
+streams/iStream/IOstream.cpp
+streams/iStream/iOstream.cpp
+streams/iStream/iIstream.cpp
+streams/Stream/Ostream.cpp
+streams/Stream/Istream.cpp
+streams/processorOstream/processorOstream.cpp
+streams/masterOstream/masterOstream.cpp
+streams/TStream/iTstream.cpp
+streams/TStream/oTstream.cpp
+streams/Fstream/iFstream.cpp
+streams/Fstream/oFstream.cpp
+streams/Fstream/fileStream.cpp 
+streams/streams.cpp 
+
+fileSystem/fileSystem.cpp
+
 processors/processors.cpp
+)
 
-globals/error.cpp)
-
-set(link_libs Kokkos::kokkos tbb)
+set(link_libs)
+if(MPI_FOUND)
+	set(link_libs Kokkos::kokkos tbb PRIVATE MPI::MPI_CXX)
+else()
+	set(link_libs Kokkos::kokkos tbb)
+endif()
 
 pFlow_add_library_install(phasicFlow SourceFiles link_libs)
-
 target_include_directories(phasicFlow PUBLIC ./globals)
-
diff --git a/src/phasicFlow/fileSystem/fileSystem.cpp b/src/phasicFlow/fileSystem/fileSystem.cpp
index 0e82fe80..79065498 100644
--- a/src/phasicFlow/fileSystem/fileSystem.cpp
+++ b/src/phasicFlow/fileSystem/fileSystem.cpp
@@ -284,13 +284,13 @@ pFlow::fileSystem pFlow::operator +
 	return path;
 }
 
-pFlow::iOstream& pFlow::operator << (iOstream& os, fileSystem fs)
+pFlow::iOstream& pFlow::operator << (iOstream& os, const fileSystem& fs)
 {
 	os << fs.path_.c_str();
 	return os;
 }
 
-std::ostream& pFlow::operator << (std::ostream& os, fileSystem fs)
+std::ostream& pFlow::operator << (std::ostream& os, const fileSystem& fs)
 {
 	os << fs.path_.c_str();
 	return os;
diff --git a/src/phasicFlow/fileSystem/fileSystem.hpp b/src/phasicFlow/fileSystem/fileSystem.hpp
index 655bc0e8..2904407e 100644
--- a/src/phasicFlow/fileSystem/fileSystem.hpp
+++ b/src/phasicFlow/fileSystem/fileSystem.hpp
@@ -29,21 +29,20 @@ Licence:
 namespace pFlow
 {
 
-
+// - Forward 
 class iOstream;
-class ostream;
 class fileSystem;
 
 iOstream& operator <<
 (
 	iOstream& os,
-	fileSystem fs
+	const fileSystem& fs
 );
 
 std::ostream& operator <<
 (
 	std::ostream& os,
-	fileSystem fs
+	const fileSystem& fs
 );
 
 
@@ -59,29 +58,40 @@ fileSystem operator +
 	const word fName
 );
 
-// a class to manage file/directory names 
+/**
+ * Manages file pathes, manupulate and combines them. 
+ * 
+ */
 class fileSystem
 {
+public:
+	
+	using 	pathType = std::filesystem::path;
+
 protected:
 	
+	/// File path 
 	std::filesystem::path path_;
+	
+	/// Is this a directory path?
 	bool isDir_;
 
 
-	// protected static variables
+	/// Not premitted chars in file name 	
 	inline static word notPermittedCharsFile = word(" ") + word("\t\n\0;:?*/<>\"?\'");
 	
-	// protected methods 
-
+	/// Is name is valid for a file? 
 	bool static validFileName(const word& name)
 	{
 		return name.find_first_of(notPermittedCharsFile);
 	}
 
+	/// Is a valid file name?
 	bool static checkFileName(const word& name);
 
 public:
 
+	/// return current working directory 
 	inline static fileSystem CWD() 
 	{
 		return fileSystem(std::filesystem::current_path().c_str());
@@ -89,92 +99,103 @@ public:
 	
 public:
 
+	//// - Constructors 
 
-	typedef std::filesystem::path 	pathType;
+		/// Default
+		fileSystem():
+			path_(),
+			isDir_(true)
+		{}
 
+		/// From dir and file name 
+		fileSystem( const word& dir, const word& file = "");
+		
+		/// From dir and file name 
+		fileSystem( const char* dir, const char* file = "");
 
-	fileSystem():
-		path_(),
-		isDir_(true)
-	{}
-	// Constructors
-	fileSystem( const word& dir, const word& file = "");
-	fileSystem( const char* dir, const char* file = "");
-	fileSystem( const pathType& path );
+		/// Copy
+		fileSystem( const pathType& path );
 
-	fileSystem(const fileSystem&) = default;
+		/// Copy 
+		fileSystem(const fileSystem&) = default;
+		
+		/// Move 
+		fileSystem(fileSystem&&) = default;
+
+		/// Copy assignment 
+		fileSystem& operator = (const fileSystem&) = default;
+
+		/// Move assignment 
+		fileSystem& operator = (fileSystem&&) = default;
+
+		/// Destructor 
+		~fileSystem() = default;
 	
-	fileSystem(fileSystem&&) = default;
+	//// - Methods
+		
+		/// Is directory?
+		bool isDir() const
+		{
+			return isDir_;
+		}
+		
+		/// Const access to path
+		const pathType& path()const
+		{
+			return path_;
+		}
 
-	fileSystem& operator = (const fileSystem&) = default;
+		/// Path in word type 
+		word wordPath()const
+		{
+			return word(path_.c_str());
+		}
 
-	fileSystem& operator = (fileSystem&&) = default;
+		/// Dir part of the path 
+		fileSystem dirPath() const;
 
-	~fileSystem() = default;
+		/// File name part of the path (if any)
+		word fileName() const;
+
+		/// Absolute path of this
+		fileSystem absolute()const;
+
+
+		/// Canonical path of this (it should exist)
+		fileSystem canonical()const;
+
+		/// Only operate on dir path
+		/// Check if the dir path exists
+		bool dirExist()const;	
+
+		/// Check if the path exists
+		bool exist()const;
+
+		/// Operate on dir path only
+		/// Create dir based on the path and returns the canonical path
+		fileSystem createDirs()const;
+
+
+		/// If this is dir path, add the filename to dir path
+		/// if it is file path, replace the file name 
+		void operator += (const word& fileName);
+
+		/// It operates on dir path only
+		/// Add the dir path of fs to this 
+		void operator /=(const fileSystem& fs );
+
+		/// Create a dir path from dir path of fs1 and fas2 in the 
+		/// form of fs1/fs2 
+		friend fileSystem operator /(const fileSystem& fs1, const fileSystem& fs2 );
+
+
+		/// Return the dir path of this
+		fileSystem operator()(bool retDir = true) const;
 	
-	// Methods
-	bool isDir() const
-	{
-		return isDir_;
-	}
-	
-	const pathType& path()const
-	{
-		return path_;
-	}
+	//// - IO
+	friend iOstream& operator << (iOstream& os, const fileSystem& fs);
 
-	word wordPath()const
-	{
-		return word(path_.c_str());
-	}
-
-	// dir path of this
-	fileSystem dirPath() const;
-
-	// file name of this (if any)
-	word fileName() const;
-
-	// absolute path of this
-	fileSystem absolute()const;
-
-
-	//fileSystem relative()const;
-
-	// canonical path of this (it should exist)
-	fileSystem canonical()const;
-
-	// only operate on dir path
-	// check if the dir path exists
-	bool dirExist()const;	
-
-	// check if the path exists
-	bool exist()const;
-
-	// operate on dir path only
-	// create dir based on the path and returns the canonical path
-	fileSystem createDirs()const;
-
-
-	// if this is dir path, add the filename to dir path
-	// if it is file path, replace the file name 
-	void operator += (const word& fileName);
-
-	// it operates on dir path only
-	// it adds the dir path of fs to this 
-	void operator /=(const fileSystem& fs );
-
-	// Create a dir path from dir path of fs1 and fas2 in the 
-	// form of fs1/fs2 
-	friend fileSystem operator /(const fileSystem& fs1, const fileSystem& fs2 );
-
-
-	// return the dir path of this
-	fileSystem operator()(bool retDir = true) const;
-	
-
-	friend iOstream& operator << (iOstream& os, fileSystem fs);
-
-	friend std::ostream& operator << (std::ostream& os, fileSystem fs);
+	friend std::ostream& operator << (std::ostream& os, const fileSystem& fs);
 	
 };
 
@@ -182,18 +203,22 @@ public:
 using fileSystemList = List<fileSystem>;
 
 
-
+/// Free function to reture current working directory 
 inline fileSystem CWD()
 {
 	return fileSystem::CWD();
 }
 
+/// Free function to check if the path is dir path
 bool isDirectory(const fileSystem& path);
 
+/// free function to check if the path is regular file 
 bool isRegularFile(const fileSystem& path);
 
+/// A list of sub-directories that exist in path. 
 fileSystemList subDirectories(const fileSystem& path);
 
+/// A list of file paths that exist in the path.
 fileSystemList containingFiles(const fileSystem& path);
 
 } // pFlow
diff --git a/src/phasicFlow/globals/error.cpp b/src/phasicFlow/globals/error.cpp
index d32d771e..c3b20b5a 100644
--- a/src/phasicFlow/globals/error.cpp
+++ b/src/phasicFlow/globals/error.cpp
@@ -37,8 +37,8 @@ pFlow::iOstream& fatalErrorMessage(const char* fileName, int linNumber )
 {	
 	
 	errorStream<<"\n>>> Fatal error in phasicFlow\n" <<
-				 "Error occured in source file "<< redText(fileName) <<
-				 " at line "<<redText(linNumber)<<'\n';
+				 "Error occured in source file "<< Red_Text(fileName) <<
+				 " at line "<<Red_Text(linNumber)<<'\n';
 	return errorStream;
 
 }
@@ -47,9 +47,9 @@ pFlow::iOstream& fatalErrorInMessage(const char* fnName, const char* fileName, i
 {	
 
 	errorStream<<"\n>>> Fatal error in phasicFlow\n" <<
-	 			 " Error is issued in function " << redText(fnName)<<
-	 			 ", located in file "<< redText(fileName) <<
-	             " at line "<< redText(linNumber) << '\n';
+	 			 " Error is issued in function " << Red_Text(fnName)<<
+	 			 ", located in file "<< Red_Text(fileName) <<
+	             " at line "<< Red_Text(linNumber) << '\n';
 	return errorStream;
 }
 
@@ -57,9 +57,9 @@ pFlow::iOstream& notImplementedErrorMessage(const char*fnName, const char* fileN
 {
 
 	errorStream<<"\n>>> Fatal error in phasicFlow\n";
-	errorStream<<" Function "<< redText(fnName) << " has not implmented yet!\n" <<
-				 " Function definition is in source file "<< redText(fileName) << 
-	             " at line "<< redText(lineNumber) <<'\n';
+	errorStream<<" Function "<< Red_Text(fnName) << " has not implmented yet!\n" <<
+				 " Function definition is in source file "<< Red_Text(fileName) << 
+	             " at line "<< Red_Text(lineNumber) <<'\n';
 	return errorStream;
 }
 
@@ -68,10 +68,10 @@ pFlow::iOstream& ioErrorMessage(const char* fileName, int fileLineNumber, const
 {
 	
 	errorStream<<"\n>>> Fatal IO file error\n"<<
-				 " IO error at number "<<redText(fileLineNumber)<<
-				 " of file " << redText(fileName)<<'\n';
-	errorStream<<" IO operation is peformed from function "<<redText(fnName) <<
-	             " in file "<< redText(fName)<< " at line "<< redText(lNumber) <<'\n';
+				 " IO error at number "<<Red_Text(fileLineNumber)<<
+				 " of file " << Red_Text(fileName)<<'\n';
+	errorStream<<" IO operation is peformed from function "<<Red_Text(fnName) <<
+	             " in file "<< Red_Text(fName)<< " at line "<< Red_Text(lNumber) <<'\n';
 	return errorStream;
 }
 
@@ -85,9 +85,9 @@ pFlow::iOstream& warningMessage(const char* fnName, const char* fileName, int li
 {
 	
 	errorStream<<"\n>>> Warning in phasicFlow\n"<<
-				 " Warning is issued in function " << yellowText(fnName)<<
-	             " in source file "<< yellowText(fileName) <<
-	             " at line "<< yellowText(linNumber) <<'\n';
+				 " Warning is issued in function " << Yellow_Text(fnName)<<
+	             " in source file "<< Yellow_Text(fileName) <<
+	             " at line "<< Yellow_Text(linNumber) <<'\n';
 	return errorStream;
 }
 
diff --git a/src/phasicFlow/processors/processors.cpp b/src/phasicFlow/processors/processors.cpp
index 544b01ed..735e75db 100644
--- a/src/phasicFlow/processors/processors.cpp
+++ b/src/phasicFlow/processors/processors.cpp
@@ -42,8 +42,12 @@ void pFlow::processors::initProcessors(int argc, char *argv[])
 
 		processors::globalSize_ = MPI::COMM_WORLD.Get_size();
 		processors::globalRank_ = MPI::COMM_WORLD.Get_rank();
-		//CheckMPI(MPI_comm_size( MPI_COMM_WORLD, &processors::globalSize_), true );
-		//CheckMPI(MPI_comm_rank( MPI_COMM_WORLD, &processors::globalRank_), true );
+		
+		pFlow::pOutput.activatePrefix();
+		pFlow::pOutput.setPrefixNum(processors::globalRank_);
+
+		pFlow::mOutput.setMasterSlave(processors::isMaster());
+		pFlow::errReport.setMasterSlave(processors::isMaster());
 	}
 #else
 
diff --git a/src/phasicFlow/streams/Fstream/fileStream.cpp b/src/phasicFlow/streams/Fstream/fileStream.cpp
index 8edf2d3a..a577d83c 100755
--- a/src/phasicFlow/streams/Fstream/fileStream.cpp
+++ b/src/phasicFlow/streams/Fstream/fileStream.cpp
@@ -17,9 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-// based on OpenFOAM stream, with some modifications/simplifications
-// to be tailored to our needs
-
 
 #include "fileStream.hpp"
 #include "error.hpp"
@@ -133,6 +130,3 @@ std::ofstream& pFlow::fileStream::outStream()
 {
 	return outStream_();
 }
-
-
-
diff --git a/src/phasicFlow/streams/Fstream/fileStream.hpp b/src/phasicFlow/streams/Fstream/fileStream.hpp
index 8804200c..0cf6f34b 100755
--- a/src/phasicFlow/streams/Fstream/fileStream.hpp
+++ b/src/phasicFlow/streams/Fstream/fileStream.hpp
@@ -33,49 +33,61 @@ Licence:
 namespace pFlow
 {
 
+/**
+ * Creates and manages an input/output file stream 
+ * with specified format. 
+ * 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs.
+ */
 class fileStream
 {
 protected:
 
-	// - in file stream 
+	/// in file stream 
 	uniquePtr<std::ifstream> inStream_;
 	
-	// - out file stream
+	/// out file stream
 	uniquePtr<std::ofstream> outStream_;
 
 	bool binary_ = false;
 	
-	// - open input file
+	/// open input file
 	void openInFile(const fileSystem& path);
 	
-	// - open output file
+	/// open output file
 	void openOutFile(const fileSystem& path);
 	
-	// - close streams 
+	/// close streams 
 	void close();
 
 public:
 
-	// - Constructors
+	//// - Constructors
 
-	fileStream( const fileSystem& path, bool outStream = false, bool binary = false);
-	
-	fileStream(const fileStream&)= delete;
+		/// From file path and input type and format. 
+		fileStream( const fileSystem& path, bool outStream = false, bool binary = false);
+		
+		/// No copy
+		fileStream(const fileStream&)= delete;
 
-	fileStream& operator=(const fileStream&)=delete;
+		/// No assignment
+		fileStream& operator=(const fileStream&)=delete;
 
-	virtual ~fileStream() 
-	{
-		close();
-	}
+		/// Destructor
+		virtual ~fileStream() 
+		{
+			close();
+		}
 	
 	
-	// - access 
-
-	std::ifstream& inStream();
+	//// - Access 
 	
-	std::ofstream& outStream();
-
+		/// Access input file stream 
+		std::ifstream& inStream();
+		
+		/// Access output file stream 
+		std::ofstream& outStream();
 };
 
 }
diff --git a/src/phasicFlow/streams/Fstream/iFstream.cpp b/src/phasicFlow/streams/Fstream/iFstream.cpp
index 2eb0a4fe..01043a95 100755
--- a/src/phasicFlow/streams/Fstream/iFstream.cpp
+++ b/src/phasicFlow/streams/Fstream/iFstream.cpp
@@ -17,9 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-// based on OpenFOAM stream, with some modifications/simplifications
-// to be tailored to our needs
-
 
 #include "iFstream.hpp"
 
diff --git a/src/phasicFlow/streams/Fstream/iFstream.hpp b/src/phasicFlow/streams/Fstream/iFstream.hpp
index a37baf81..dc90a8c2 100755
--- a/src/phasicFlow/streams/Fstream/iFstream.hpp
+++ b/src/phasicFlow/streams/Fstream/iFstream.hpp
@@ -17,9 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-// based on OpenFOAM stream, with some modifications/simplifications
-// to be tailored to our needs
-
 #ifndef __iFstream_hpp__
 #define __iFstream_hpp__
 
@@ -31,7 +28,12 @@ Licence:
 namespace pFlow
 {
 
-
+/**
+ * Input file stream for reading binary or ascii data from a file. 
+ * 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs.
+ */
 class iFstream
 :
 	public fileStream,
@@ -39,17 +41,19 @@ class iFstream
 {
 public:
 
-	// - Constructor 
-	iFstream (const fileSystem& path, bool binary = false);
+	//// - Constructors
 
-	// no copy constructor
-	iFstream( const iFstream& src) = delete;
+		/// From file path and format 
+		iFstream (const fileSystem& path, bool binary = false);
 
-	// no assignment
-	iFstream& operator = (const iFstream& rhs) = delete;
+		/// No copy constructor
+		iFstream( const iFstream& src) = delete;
 
-	// - Destructor
-	virtual ~iFstream() = default;
+		/// No assignment
+		iFstream& operator = (const iFstream& rhs) = delete;
+
+		/// Destructor
+		virtual ~iFstream() = default;
 
 };
 
diff --git a/src/phasicFlow/streams/Fstream/oFstream.cpp b/src/phasicFlow/streams/Fstream/oFstream.cpp
index 5e975843..54e1606a 100755
--- a/src/phasicFlow/streams/Fstream/oFstream.cpp
+++ b/src/phasicFlow/streams/Fstream/oFstream.cpp
@@ -17,8 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-// based on OpenFOAM stream, with some modifications/simplifications
-// to be tailored to our needs
 
 
 #include "oFstream.hpp"
diff --git a/src/phasicFlow/streams/Fstream/oFstream.hpp b/src/phasicFlow/streams/Fstream/oFstream.hpp
index 0fa6d86d..3092b2ca 100755
--- a/src/phasicFlow/streams/Fstream/oFstream.hpp
+++ b/src/phasicFlow/streams/Fstream/oFstream.hpp
@@ -17,10 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-// based on OpenFOAM stream, with some modifications/simplifications
-// to be tailored to our needs
-
-
 #ifndef __oFstream_hpp__
 #define __oFstream_hpp__
 
@@ -32,7 +28,13 @@ Licence:
 namespace pFlow
 {
 
-
+/**
+ * Output file stream to send binary or ascii data to a file.  
+ * 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs
+ *
+ */
 class oFstream
 :
 	public fileStream,
@@ -40,16 +42,18 @@ class oFstream
 {
 public:
 
-	// Constructor
+	//// - Constructors
+	
+	/// From file path and format 
 	oFstream (const fileSystem& path, bool binary = false);
 
-	// no copy constructor
+	/// No copy constructor
 	oFstream( const oFstream& src) = delete;
 
-	// no assignment
+	/// No assignment
 	oFstream& operator = (const oFstream& rhs) = delete;
 
-	// Destructor
+	/// Destructor
 	virtual ~oFstream() = default;
 
 };
diff --git a/src/phasicFlow/streams/Stream/Istream.cpp b/src/phasicFlow/streams/Stream/Istream.cpp
index 06e3a4ed..cda6117e 100755
--- a/src/phasicFlow/streams/Stream/Istream.cpp
+++ b/src/phasicFlow/streams/Stream/Istream.cpp
@@ -17,10 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-// based on OpenFOAM stream, with some modifications/simplifications
-// to be tailored to our needs
-
-
 #include "Istream.hpp"
 #include "token.hpp"
 #include "error.hpp"
@@ -797,12 +793,6 @@ pFlow::iIstream& pFlow::Istream::read(int32& val)
     return *this;
 }
 
-pFlow::iIstream& pFlow::Istream::read(int16& val)
-{
-    is_ >> val;
-    setState(is_.rdstate());
-    return *this;
-}
 
 pFlow::iIstream& pFlow::Istream::read(int8& val)
 {
@@ -811,7 +801,7 @@ pFlow::iIstream& pFlow::Istream::read(int8& val)
     return *this;
 }
 
-pFlow::iIstream& pFlow::Istream::read(label& val)
+pFlow::iIstream& pFlow::Istream::read(uint64& val)
 {
     is_ >> val;
     setState(is_.rdstate());
@@ -825,7 +815,7 @@ pFlow::iIstream& pFlow::Istream::read(uint32& val)
     return *this;
 }
 
-pFlow::iIstream& pFlow::Istream::read(uint16& val)
+pFlow::iIstream& pFlow::Istream::read(uint8& val)
 {
     is_ >> val;
     setState(is_.rdstate());
diff --git a/src/phasicFlow/streams/Stream/Istream.hpp b/src/phasicFlow/streams/Stream/Istream.hpp
index b74d7dbc..2b3b4879 100755
--- a/src/phasicFlow/streams/Stream/Istream.hpp
+++ b/src/phasicFlow/streams/Stream/Istream.hpp
@@ -17,10 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-// based on OpenFOAM stream, with some modifications/simplifications
-// to be tailored to our needs
-
-
 #ifndef __Istream_hpp__
 #define __Istream_hpp__
 
@@ -34,16 +30,23 @@ Licence:
 namespace pFlow
 {
 
-
+/**
+ * Standard input stream for binary and ascii data 
+ * 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs.
+ */
 class Istream
 :
     public iIstream
 {
-    // Private Data
+    //- Private Data
 
-    word    name_;
+        /// Stream name 
+        word    name_;
 
-    std::istream& is_;
+        /// Input stream 
+        std::istream& is_;
 
 
     /// Get the next valid character
@@ -63,90 +66,91 @@ class Istream
 
 public:
 
+    //// - Constructors 
 
-    /// Construct wrapper around std::istream, set stream status
-    Istream( std::istream& is, const word& streamName, writeFormat wf = ASCII);
+        /// Construct wrapper around std::istream, set stream status
+        Istream( std::istream& is, const word& streamName, writeFormat wf = ASCII);
 
-    /// Destructor
-    virtual ~Istream() = default;
+        /// Destructor
+        virtual ~Istream() = default;
 
 
     //// - Methods
 
-    /// Return the name of the stream
-    virtual const word& name() const
-    {
-        return name_;
-    }
+        /// Return the name of the stream
+        virtual const word& name() const
+        {
+            return name_;
+        }
 
-    /// Return non-const access to the name of the stream
-    virtual word& name()
-    {
-        return name_;
-    }
+        /// Return non-const access to the name of the stream
+        virtual word& name()
+        {
+            return name_;
+        }
 
-    /// Return flags of output stream
-    virtual ios_base::fmtflags flags() const;
+        /// Return flags of output stream
+        virtual ios_base::fmtflags flags() const;
 
 
-    //// Read Functions
+    //// - Read Functions
 
-    /// Raw, low-level get character function.
-    Istream& get(char& c);
+        /// Raw, low-level get character function.
+        Istream& get(char& c);
 
-    /// Raw, low-level peek function.
-    //  Does not remove the character from the stream.
-    //  Returns the next character in the stream or EOF if the
-    //  end of file is read.
-    int peek();
+        /// Raw, low-level peek function.
+        ///  Does not remove the character from the stream.
+        ///  Returns the next character in the stream or EOF if the
+        ///  end of file is read.
+        int peek();
 
-    /// Raw, low-level getline (until delimiter) into a string.
-    Istream& getLine(word& str, char delim = '\n');
+        /// Raw, low-level getline (until delimiter) into a string.
+        Istream& getLine(word& str, char delim = '\n');
 
-    /// Low-level discard until delimiter
-    //  return the number of characters extracted
-    std::streamsize getLine(std::nullptr_t, char delim = '\n');
+        /// Low-level discard until delimiter
+        ///  return the number of characters extracted
+        std::streamsize getLine(std::nullptr_t, char delim = '\n');
 
-    /// Raw, low-level putback character function.
-    Istream& putback(const char c);
+        /// Raw, low-level putback character function.
+        Istream& putback(const char c);
 
-    /// Return next token from stream
-    virtual iIstream& read(token& t) override;
+        /// Return next token from stream
+        virtual iIstream& read(token& t) override;
 
-    /// Read a character
-    virtual iIstream& read(char& c) override;
+        /// Read a character
+        virtual iIstream& read(char& c) override;
 
-    /// Read a word
-    virtual iIstream& read(word& str) override;
+        /// Read a word
+        virtual iIstream& read(word& str) override;
 
-    /// Read a string
-    virtual iIstream& readString(word& str) override;
+        /// Read a string
+        virtual iIstream& readString(word& str) override;
 
-    /// Read a int64
-    virtual iIstream& read(int64&) override;
+        /// Read a int64
+        virtual iIstream& read(int64&) override;
 
-    /// Read a int32
-    virtual iIstream& read(int32&) override;
+        /// Read a int32
+        virtual iIstream& read(int32&) override;
 
-    /// Read a int8
-    virtual iIstream& read(int8&) override;
+        /// Read a int8
+        virtual iIstream& read(int8&) override;
 
-    /// Read a uint64
-    virtual iIstream& read(uint64&) override;
+        /// Read a uint64
+        virtual iIstream& read(uint64&) override;
 
-    /// Read a uint32
-    virtual iIstream& read(uint32&) override;
+        /// Read a uint32
+        virtual iIstream& read(uint32&) override;
 
-    /// Read a uint8
-    virtual iIstream& read(uint8&) override;
+        /// Read a uint8
+        virtual iIstream& read(uint8&) override;
 
-    /// Read a float
-    virtual iIstream& read(float& val) override;
+        /// Read a float
+        virtual iIstream& read(float& val) override;
 
-    /// Read a double
-    virtual iIstream& read(double& val) override;
+        /// Read a double
+        virtual iIstream& read(double& val) override;
 
-    iIstream& read(char* buffer, std::streamsize count) override;
+        iIstream& read(char* buffer, std::streamsize count) override;
 
     
     /// Rewind the stream so that it may be read again
diff --git a/src/phasicFlow/streams/Stream/Ostream.cpp b/src/phasicFlow/streams/Stream/Ostream.cpp
index 51f2f28d..aa89bd54 100755
--- a/src/phasicFlow/streams/Stream/Ostream.cpp
+++ b/src/phasicFlow/streams/Stream/Ostream.cpp
@@ -17,8 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-// based on OpenFOAM stream, with some modifications/simplifications
-// to be tailored to our needs
 
 #include "error.hpp"
 #include "token.hpp"
@@ -181,21 +179,14 @@ pFlow::iOstream& pFlow::Ostream::write(const int32 val)
     return *this;
 }
 
-/*pFlow::iOstream& pFlow::Ostream::write(const int16 val)
+pFlow::iOstream& pFlow::Ostream::write(const int8 val)
 {
     os_ << val;
     setState(os_.rdstate());
     return *this;
 }
 
-pFlow::iOstream& pFlow::Ostream::write(const int8 val)
-{
-    os_ << val;
-    setState(os_.rdstate());
-    return *this;
-}*/
-
-pFlow::iOstream& pFlow::Ostream::write(const label val)
+pFlow::iOstream& pFlow::Ostream::write(const uint64 val)
 {
     os_ << val;
     setState(os_.rdstate());
@@ -209,7 +200,7 @@ pFlow::iOstream& pFlow::Ostream::write(const uint32 val)
     return *this;
 }
 
-pFlow::iOstream& pFlow::Ostream::write(const uint16 val)
+pFlow::iOstream& pFlow::Ostream::write(const uint8 val)
 {
     os_ << val;
     setState(os_.rdstate());
@@ -253,9 +244,6 @@ pFlow::iOstream& pFlow::Ostream::write
     return *this;
 }
 
-
-
-
 void pFlow::Ostream::indent()
 {
     for (unsigned short i = 0; i < indentLevel_*indentSize_; ++i)
@@ -270,14 +258,12 @@ void pFlow::Ostream::flush()
     os_.flush();
 }
 
-
 void pFlow::Ostream::endl()
 {
     write('\n');
     os_.flush();
 }
 
-
 std::ios_base::fmtflags pFlow::Ostream::flags() const
 {
     return os_.flags();
diff --git a/src/phasicFlow/streams/Stream/Ostream.hpp b/src/phasicFlow/streams/Stream/Ostream.hpp
index da3e0bd9..25b2b09c 100755
--- a/src/phasicFlow/streams/Stream/Ostream.hpp
+++ b/src/phasicFlow/streams/Stream/Ostream.hpp
@@ -30,34 +30,44 @@ Licence:
 namespace pFlow
 {
 
-
-
+/**
+ * Standard output stream for BINARY and ASCII formats
+ * 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs
+ */
 class Ostream
 :
     public iOstream
 {
+private:
 
+    // - private data members 
+
+    /// Stream name 
     word name_;
 
+    /// Output stream 
     std::ostream& os_;
 
 
 public:
 
-    // Constructors
+    ///- Constructors
     
-    Ostream ( std::ostream& os, const word& streamName, writeFormat wf = ASCII);
+        /// Construct from components 
+        Ostream ( std::ostream& os, const word& streamName, writeFormat wf = ASCII);
 
-    /// no copy construct 
-    Ostream(const Ostream&) = delete;
+        /// No copy construct 
+        Ostream(const Ostream&) = delete;
 
-    /// No copy assignment
-    void operator=(const Ostream&) = delete;
+        /// No copy assignment
+        void operator=(const Ostream&) = delete;
 
 
     //// - Methods
 
-    /// Return the name of the stream
+        /// Return the name of the stream
         virtual const word& name() const
         {
             return name_;
@@ -74,7 +84,7 @@ public:
 
 
         /// Write token to stream or otherwise handle it.
-        //  return false if the token type was not handled by this method
+        ///  return false if the token type was not handled by this method
         bool write(const token& tok)override;
 
         /// Write character
@@ -87,7 +97,7 @@ public:
         iOstream& write(const word& str)override;
     
         /// Write std::string surrounded by quotes.
-        //  Optional write without quotes.
+        ///  Optional write without quotes.
         iOstream& writeQuoted ( const word& str, const bool quoted=true ) override;
 
         /// Write int64
@@ -133,21 +143,21 @@ public:
         char fill() const override;
 
         /// Set padding character for formatted field up to field width
-        //  \return previous padding character
+        ///  \return previous padding character
         char fill(const char fillch) override;
 
         /// Get width of output field
         int width() const override;
 
         /// Set width of output field
-        //  \return previous width
+        ///  \return previous width
         int width(const int w) override;
 
         /// Get precision of output field
         int precision() const override;
 
         /// Set precision of output field
-        //  return old precision
+        ///  return old precision
         int precision(const int p) override;
 
         /// Access to underlying std::ostream
@@ -165,10 +175,9 @@ public:
 };
 
 
-
 } // pFlow
 
 
-#endif
+#endif //__Ostream_hpp__
 
 
diff --git a/src/phasicFlow/streams/TStream/helperTstream.hpp b/src/phasicFlow/streams/TStream/helperTstream.hpp
index 6a43874c..9fae802c 100755
--- a/src/phasicFlow/streams/TStream/helperTstream.hpp
+++ b/src/phasicFlow/streams/TStream/helperTstream.hpp
@@ -1,8 +1,26 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
 #ifndef __helperTstream_hpp__
 #define __helperTstream_hpp__
 
 
-
 inline bool validTokenForStream(const token tok)
 {
 	if( tok.good() && !tok.isPunctuation() )return true;
diff --git a/src/phasicFlow/streams/TStream/iTstream.cpp b/src/phasicFlow/streams/TStream/iTstream.cpp
index d5f6ab2a..a786561a 100755
--- a/src/phasicFlow/streams/TStream/iTstream.cpp
+++ b/src/phasicFlow/streams/TStream/iTstream.cpp
@@ -222,16 +222,6 @@ pFlow::iIstream& pFlow::iTstream::read
     return *this;
 }
 
-pFlow::iIstream& pFlow::iTstream::read
-(
-    int16& val
-)
-{
-    notImplementedFunction;
-    fatalExit;
-    CONSUME_PARAM(val);
-    return *this;
-}
  
 pFlow::iIstream& pFlow::iTstream::read
 (
@@ -246,7 +236,7 @@ pFlow::iIstream& pFlow::iTstream::read
 
 pFlow::iIstream& pFlow::iTstream::read
 (
-    label& val
+    uint64& val
 )
 {
     notImplementedFunction;
@@ -268,7 +258,7 @@ pFlow::iIstream& pFlow::iTstream::read
 
 pFlow::iIstream& pFlow::iTstream::read
 (
-    uint16& val
+    uint8& val
 )
 {
     notImplementedFunction;
diff --git a/src/phasicFlow/streams/TStream/iTstream.hpp b/src/phasicFlow/streams/TStream/iTstream.hpp
index 930b2f65..8bb2e824 100755
--- a/src/phasicFlow/streams/TStream/iTstream.hpp
+++ b/src/phasicFlow/streams/TStream/iTstream.hpp
@@ -10,7 +10,7 @@
 namespace pFlow
 {
 
-// helper functions declearation
+//- helper functions declearation
 inline bool validTokenForStream(const token tok);
 
 inline bool isBeginToken(const token& tok);
@@ -18,28 +18,34 @@ inline bool isBeginToken(const token& tok);
 inline bool isEndToken(const token& tok);
 
 
+/**
+ * Input token stream. 
+ * 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs.
+ */
 class iTstream
 :
     public iIstream
 {
 protected:
     
-    // - name of the stream
+    /// name of the stream
     word    name_;
 
-    // - list of tokens in this stream
+    /// list of tokens in this stream
     tokenList  tokenList_;
 
-    // - current token
+    /// current token
     tokenList::iterator currentToken_;
 
-    // - check if end of list is reached 
+    /// check if end of list is reached 
     bool isLastToken();
 
-    // - rewind the stream 
+    /// rewind the stream 
     void setFirstToken();
 
-    // - check for valid tokens in the tokenList 
+    /// check for valid tokens in the tokenList 
     void validate();
 
 public:
@@ -49,34 +55,35 @@ public:
         /// construct with a name
         iTstream(const word& streamName);
 
-        // - construct with name and copy
+        /// construct with name and copy
         iTstream(const word& streamName, const tokenList& tList);
 
-        // - construct with name and move 
+        /// construct with name and move 
         iTstream(const word& streamName, tokenList && tList);
 
-        // - copy construct
+        /// copy construct
         iTstream(const iTstream&) = default;
-        // - move construct 
+        
+        /// move construct 
         iTstream(iTstream&&) = default;
 
-        // - copy assignment
+        /// copy assignment
         iTstream& operator=(const iTstream&) = default;
 
-        // - move assignment 
+        /// move assignment 
         iTstream& operator=(iTstream&&) = default;
 
-        // copy assignment from tokenList
+        /// copy assignment from tokenList
         void operator=(const tokenList& tList);
         
-        // move assignment from tokenList
+        /// move assignment from tokenList
         void operator=(tokenList&& tList);
 
         /// Destructor
         virtual ~iTstream() = default;
 
 
-    //// Member Functions   
+    //// - Member Functions   
 
         /// Return the name of the stream
         virtual const word& name() const;
@@ -122,26 +129,26 @@ public:
 
         iIstream& read(char* buffer, std::streamsize count) override;
 
-        // - Rewind the stream so that it may be read again
+        /// Rewind the stream so that it may be read again
         virtual void rewind();
 
-        // - reset the iTstream and make the stream empty
+        /// reset the iTstream and make the stream empty
         virtual void reset();
 
-        // - const access to token list
+        /// const access to token list
         const tokenList& tokens()const;
 
-        // - size
+        /// size
         size_t size()const; 
 
-        // - size
+        /// size
         size_t numTokens()const;
         
-        // - append a list of tokens to the end of tokens
+        /// append a list of tokens to the end of tokens
         //   and rewind the stream
         void appendTokens(const tokenList & tList);
 
-        // - append token to the end of token and rewind the stream 
+        /// append token to the end of token and rewind the stream 
         void appendToken(const token& t);
    
         /// Return flags of output stream
diff --git a/src/phasicFlow/streams/TStream/oTstream.cpp b/src/phasicFlow/streams/TStream/oTstream.cpp
index 5f158545..2ef897ca 100755
--- a/src/phasicFlow/streams/TStream/oTstream.cpp
+++ b/src/phasicFlow/streams/TStream/oTstream.cpp
@@ -108,10 +108,17 @@ pFlow::iOstream& pFlow::oTstream::write(const int32 val)
     return *this;
 }
 
+pFlow::iOstream& pFlow::oTstream::write(const int8 val)
+{
+    append(token(val)); // tokenType::INT64
+
+    return *this;
+}
 
 
 
-pFlow::iOstream& pFlow::oTstream::write(const label val)
+
+pFlow::iOstream& pFlow::oTstream::write(const uint64 val)
 {
     append(token(static_cast<int64>(val))); // tokenType::INT64
 
@@ -125,7 +132,7 @@ pFlow::iOstream& pFlow::oTstream::write(const uint32 val)
     return *this;
 }
 
-pFlow::iOstream& pFlow::oTstream::write(const uint16 val)
+pFlow::iOstream& pFlow::oTstream::write(const uint8 val)
 {
     append(token(static_cast<int64>(val))); // tokenType::INT64
 
diff --git a/src/phasicFlow/streams/TStream/oTstream.hpp b/src/phasicFlow/streams/TStream/oTstream.hpp
index 5458cbbd..c86b0090 100755
--- a/src/phasicFlow/streams/TStream/oTstream.hpp
+++ b/src/phasicFlow/streams/TStream/oTstream.hpp
@@ -1,4 +1,22 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
+-----------------------------------------------------------------------------*/
 #ifndef __oTstream_hpp__
 #define __oTstream_hpp__
 
@@ -6,20 +24,27 @@
 #include "iOstream.hpp"
 
 
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
-
 namespace pFlow
 {
 
 
-// helper functions declearation
+//- Helper functions declearation
+
+/// Is tok a valid token for this stream?
 inline bool validTokenForStream(const token tok);
 
+/// Is tok a begin token?
 inline bool isBeginToken(const token& tok);
 
+/// Is tok an end token?
 inline bool isEndToken(const token& tok);
 
-
+/**
+ * Output token stream
+ * 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs.
+ */
 class oTstream
 :
     public iOstream
@@ -27,49 +52,49 @@ class oTstream
 
 protected:
 
-    // - name of stream
+    /// name of stream
     word    name_;
 
-    // - tokenList
+    /// tokenList
     tokenList  tokenList_;
 
 public:
     
     //// - Constructors
 
-        // - emtpy stream with a name
+        /// emtpy stream with a name
         oTstream(const word& nm);
         
-        // - copy construcotr 
+        /// copy construcotr 
         oTstream(const oTstream& src);
 
-        // - move construct 
+        /// move construct 
         oTstream(oTstream&&) = default;
 
-        // - destructor 
+        /// destructor 
         virtual ~oTstream() = default;
 
     
     //// -  Methods
     
-        // give const access 
+        // Give const access 
         const tokenList& tokens()const;
 
-        // give access 
+        // Give access 
         tokenList& tokens();
     
 
     //// - Write
 
         /// Write token to stream or otherwise handle it.
-        //  return false if the token type was not handled by this method
+        ///  return false if the token type was not handled by this method
         virtual bool write(const token& tok);
 
         /// Write single character. Whitespace is suppressed.
         virtual iOstream& write(const char c);
 
         /// Write the word-characters of a character string.
-        //  Sends as a single char, or as word.
+        ///  Sends as a single char, or as word.
         virtual iOstream& write(const char* str);
 
         /// Write word
@@ -77,7 +102,7 @@ public:
 
         
         /// Write std::string surrounded by quotes.
-        //  Optional write without quotes.
+        ///  Optional write without quotes.
         virtual iOstream& writeQuoted(const std::string& str, const bool quoted=true );
 
         /// Write int64
@@ -138,7 +163,7 @@ public:
         {}
 
         /// Get the current padding character
-        //  \return previous padding character
+        ///  \return previous padding character
         virtual char fill() const
         {
             return 0;
@@ -157,7 +182,7 @@ public:
         }
 
         /// Set width of output field
-        //  \return previous width
+        ///  \return previous width
         virtual int width(const int)
         {
              return 0;
@@ -170,7 +195,7 @@ public:
         }
 
         /// Set precision of output field
-        //  \return old precision
+        ///  \return old precision
         virtual int precision(const int)
         {
              return 0;
@@ -192,12 +217,9 @@ public:
 
 #include "helperTstream.hpp"
 
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
 } // End namespace pFlow
 
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
 #endif
 
-// ************************************************************************* //
diff --git a/src/phasicFlow/streams/iStream/IOstream.hpp b/src/phasicFlow/streams/iStream/IOstream.hpp
index 046aa1f0..a0f037de 100644
--- a/src/phasicFlow/streams/iStream/IOstream.hpp
+++ b/src/phasicFlow/streams/iStream/IOstream.hpp
@@ -17,13 +17,9 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
-
 #ifndef __IOstream_hpp__
 #define __IOstream_hpp__
 
-// based on OpenFOAM stream, with some modifications/simplifications
-// to be tailored to our needs
 
 #include <iostream>
 
@@ -42,6 +38,12 @@ using std::cerr;
 namespace pFlow
 {
 
+/**
+ * A base calss for input/output streams
+ * 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs
+ */
 class IOstream
 {
 
@@ -115,7 +117,7 @@ protected:
 
 public:
 
-    //- Constructors
+    ////- Constructors
 
         /// Default
         explicit IOstream():
@@ -144,7 +146,7 @@ public:
         virtual ~IOstream() = default;
           
         
-    //- Member Functions
+    ////- Member Functions
 
         /// Return the name of the stream
         virtual const word& name() const;
@@ -299,13 +301,13 @@ public:
             flags(flags() & ~f);
         }
 
-
 }; // end of IOstream
 
 
 /// An IOstream manipulator
 typedef IOstream& (*IOstreamManip)(IOstream&);
 
+
 inline IOstream& dec(IOstream& io)
 {
     io.setf(ios_base::dec, ios_base::dec|ios_base::hex|ios_base::oct);
@@ -337,7 +339,6 @@ inline IOstream& scientific(IOstream& io)
 }
 
 
-
 } // pFlow
 
 #endif  //  __IOstream__hpp__
diff --git a/src/phasicFlow/streams/iStream/iIstream.cpp b/src/phasicFlow/streams/iStream/iIstream.cpp
index 96849244..f91798b2 100755
--- a/src/phasicFlow/streams/iStream/iIstream.cpp
+++ b/src/phasicFlow/streams/iStream/iIstream.cpp
@@ -1,4 +1,22 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
+-----------------------------------------------------------------------------*/
 #include "iIstream.hpp"
 
 
diff --git a/src/phasicFlow/streams/iStream/iIstream.hpp b/src/phasicFlow/streams/iStream/iIstream.hpp
index f63c170f..90a2f81d 100755
--- a/src/phasicFlow/streams/iStream/iIstream.hpp
+++ b/src/phasicFlow/streams/iStream/iIstream.hpp
@@ -17,7 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
 #ifndef __iIstream_hpp__
 #define __iIstream_hpp__
 
@@ -30,25 +29,27 @@ namespace pFlow
 {
 
 /**
- *  Interface input stream class 
+ * Interface class for any input stream  
  * 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs
  */
-class iIstream // interface class for input streams
+class iIstream
 :
 	public IOstream
 {
 
-	// Private Data
+	//- Private Data
 
-    /// Has a token been put back on the stream?
-    bool putBack_;
+	    /// Has a token been put back on the stream?
+	    bool putBack_;
 
-    /// The last token put back on the stream
-    token putBackToken_;
+	    /// The last token put back on the stream
+	    token putBackToken_;
 
 public:
 
-    ///// Constructors    
+    ////- Constructors    
 
     	/// default
 	    iIstream():
@@ -69,7 +70,7 @@ public:
 
 
 
-    //// member methods
+    ////- member methods
 
 	    /// Put back token
 	    ///  Only a single put back is permitted
@@ -134,7 +135,7 @@ public:
 	    virtual void rewind() = 0;
 
 
-    ///// find and lookups
+    ////- find and lookups
 
         /// search for all tokesn and find the first word token tbat matchs w
         virtual bool findToken( const word & w );
@@ -231,8 +232,7 @@ inline iIstream& operator>>(iIstream& is, IOstreamManip f)
 }
 
 
-// read operation for basic types it gets from the 
-// token stream
+// read operation for basic types it gets from the token stream
 inline iIstream& operator>>( iIstream& is, word & w);
 
 inline iIstream& operator>>( iIstream& is, int64& val);
@@ -259,4 +259,4 @@ inline iIstream& operator>>( iIstream& is, double& val);
 #include "iIstreamI.hpp"
 
 
-#endif
+#endif //__iIstream_hpp__
diff --git a/src/phasicFlow/streams/iStream/iOstream.hpp b/src/phasicFlow/streams/iStream/iOstream.hpp
index 37540301..76141a01 100644
--- a/src/phasicFlow/streams/iStream/iOstream.hpp
+++ b/src/phasicFlow/streams/iStream/iOstream.hpp
@@ -17,17 +17,13 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
-
 #ifndef __iOstream_hpp__
 #define __iOstream_hpp__
 
-// based on OpenFOAM stream, with some modifications/simplifications
-// to be tailored to our needs
-
 
 #include "IOstream.hpp"
 
+/// char constants to alter output format and color 
 const inline char* defaultColor = "\033[0m";
 const inline char* blackColor   = "\033[30m";
 const inline char* redColor     = "\033[31m";
@@ -41,22 +37,25 @@ const inline char* whiteColor   = "\033[37m";
 const inline char* boldChar     = "\033[1m";
 
 
-
 namespace pFlow
 {
 
 // Forward Declarations
 class token;
 
-
-
+/**
+ * Interface class for any output stream. 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs
+ * 
+ */
 class iOstream
 :
     public IOstream
 {
 protected:
 
-    // Protected Data
+    //- Protected Data
 
         /// Indentation of the entry from the start of the keyword
         static constexpr const unsigned short entryIndentation_ = 16;
@@ -71,7 +70,7 @@ protected:
 public:
     
 
-    // Constructors
+    ////- Constructors
 
         /// Default
         explicit iOstream()
@@ -89,7 +88,7 @@ public:
         virtual ~iOstream() = default;
 
 
-    /// Write Functions
+    ////- Write Functions
 
         /// Write token to stream or otherwise handle it.
         /// return false if the token type was not handled by this method
@@ -140,7 +139,7 @@ public:
         virtual iOstream& write(const char* binaryData, std::streamsize count) = 0;
         
     
-    // - Indent 
+    //// - Indent 
 
         /// Add indentation characters
         virtual void indent() = 0;
@@ -178,7 +177,7 @@ public:
         /// Decrement the indent level
         void decrIndent();
 
-    //- Punctuations
+    ////- Punctuations
     
         /// Write begin block group with a name
         ///  Increments indentation, adds newline.
@@ -231,7 +230,7 @@ public:
         }
 
 
-    //- Stream state functions
+    ////- Stream state functions
 
         /// Flush stream
         virtual void flush() = 0;
@@ -258,7 +257,7 @@ public:
         virtual int precision(const int p) = 0;
 
 
-    //- Member Operators
+    ////- Member Operators
 
         /// Return a non-const reference to const iOstream
         /// Needed for write functions where the stream argument is temporary:
@@ -411,16 +410,14 @@ inline iOstream& operator<<( iOstream& os, const double& val)
 {
     return os.write(val);
 }
+
 // Useful aliases for tab and newline characters
 constexpr char tab = '\t';
 constexpr char nl = '\n';
 
 
-
-
 } //  pFlow
 
 
 #endif
 
-// ************************************************************************* //
diff --git a/src/phasicFlow/streams/masterOstream/masterOstream.cpp b/src/phasicFlow/streams/masterOstream/masterOstream.cpp
new file mode 100755
index 00000000..6c02c7a2
--- /dev/null
+++ b/src/phasicFlow/streams/masterOstream/masterOstream.cpp
@@ -0,0 +1,178 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#include "masterOstream.hpp"
+#include "token.hpp"
+
+
+pFlow::masterOstream::masterOstream
+(
+    std::ostream& os,
+    const word& streamName
+)
+:
+    Ostream(os, streamName, writeFormat::ASCII)
+{}
+
+
+pFlow::iOstream& pFlow::masterOstream::write(const char c)
+{
+    if(showOutput())
+    {
+        Ostream::write(c);
+    }
+    return *this;
+}
+
+
+pFlow::iOstream& pFlow::masterOstream::write(const char* str)
+{
+    if(showOutput())
+    {
+        Ostream::write(str);
+    }
+    return *this;
+}
+
+
+pFlow::iOstream& pFlow::masterOstream::write(const word& str)
+{
+    if(showOutput())
+    {
+        Ostream::write(str);
+    }
+    return *this;
+}
+
+
+pFlow::iOstream& pFlow::masterOstream::writeQuoted
+(
+    const word& str,
+    const bool quoted
+)
+{
+    if(showOutput())
+    {
+        Ostream::writeQuoted(str, quoted);
+    }
+    return *this;
+}
+
+
+
+pFlow::iOstream& pFlow::masterOstream::write(const int64 val)
+{
+    if(showOutput())
+    {
+        Ostream::write(val);
+    }
+    return *this;   
+}
+
+
+pFlow::iOstream& pFlow::masterOstream::write(const int32 val)
+{
+    if(showOutput())
+    {
+        Ostream::write(val);
+    }
+    return *this; 
+}
+
+
+pFlow::iOstream& pFlow::masterOstream::write(const int8 val)
+{
+    if(showOutput())
+    {
+        Ostream::write(val);
+    }
+    return *this; 
+}
+
+pFlow::iOstream& pFlow::masterOstream::write(const uint64 val)
+{
+    if(showOutput())
+    {
+        Ostream::write(val);
+    }
+    return *this; 
+}
+
+pFlow::iOstream& pFlow::masterOstream::write(const uint32 val)
+{
+    if(showOutput())
+    {
+        Ostream::write(val);
+    }
+    return *this; 
+}
+
+pFlow::iOstream& pFlow::masterOstream::write(const uint8 val)
+{
+    if(showOutput())
+    {
+        Ostream::write(val);
+    }
+    return *this; 
+}
+
+pFlow::iOstream& pFlow::masterOstream::write(const float val)
+{
+    if(showOutput())
+    {
+        Ostream::write(val);
+    }
+    return *this; 
+}
+
+
+pFlow::iOstream& pFlow::masterOstream::write(const double val)
+{
+    if(showOutput())
+    {
+        Ostream::write(val);
+    }
+    return *this; 
+}
+
+
+pFlow::iOstream& pFlow::masterOstream::write
+(
+    const char* binaryData, 
+    std::streamsize count
+)
+{
+    if(showOutput())
+    {
+        Ostream::write(binaryData, count);
+    }
+    return *this; 
+}
+
+
+void pFlow::masterOstream::indent()
+{
+    
+    if(showOutput())
+    {
+        Ostream::indent();
+    }    
+}
\ No newline at end of file
diff --git a/src/phasicFlow/streams/masterOstream/masterOstream.hpp b/src/phasicFlow/streams/masterOstream/masterOstream.hpp
new file mode 100755
index 00000000..6568bb0d
--- /dev/null
+++ b/src/phasicFlow/streams/masterOstream/masterOstream.hpp
@@ -0,0 +1,123 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __masterOstream_hpp__
+#define __masterOstream_hpp__
+
+#include "Ostream.hpp"
+
+namespace pFlow
+{
+
+/**
+ * Output stream for MPI parallel run, when we need to 
+ * know which the processor number in the output line. 
+ * The processor number is shown as a prefix for the output line. 
+ * 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs.
+ */
+class masterOstream
+:
+    public Ostream
+{
+protected:
+
+    /// Print prefix?
+    bool isThisMaster_	= true;
+
+    
+    inline bool showOutput() const
+    {
+        return isThisMaster_;
+    }
+
+public:
+
+    //// - Constructors
+        
+        /// From components 
+        masterOstream(std::ostream& os, const word& streamName);
+
+        /// No copy construct 
+        masterOstream(const masterOstream&) = delete;
+
+        /// No copy assignment
+        void operator=(const masterOstream&) = delete;
+
+
+
+    //// - Methods
+        void setMasterSlave(bool master)
+        {
+            isThisMaster_ = master;
+        }
+
+        /// Write character
+        iOstream& write(const char c)override;
+
+        /// Write character string
+        iOstream& write(const char* str)override;
+
+        /// Write word
+        iOstream& write(const word& str)override;
+    
+        /// Write std::string surrounded by quotes.
+        //  Optional write without quotes.
+        iOstream& writeQuoted ( const word& str, const bool quoted=true ) override;
+
+        /// Write int64
+        iOstream& write(const int64 val) override;
+
+        /// Write int32
+        iOstream& write(const int32 val) override;
+
+        /// Write int32
+        iOstream& write(const int8 val) override;
+
+        /// Write uint64
+        iOstream& write(const uint64 val) override;
+
+        /// Write uint32
+        iOstream& write(const uint32 val) override;
+
+        /// Write uint8
+        iOstream& write(const uint8 val) override;
+
+        /// Write float
+        iOstream& write(const float val) override;
+
+        /// Write double
+        iOstream& write(const double val) override;
+        
+        /// Write a block of binray data 
+        iOstream& write(const char* binaryData, std::streamsize count) override;
+
+        /// Add indentation characters
+        void indent() override;
+
+
+}; // masterOstream
+
+
+
+} // pFlow
+
+
+#endif // __masterOstream_hpp__
diff --git a/src/phasicFlow/streams/processorOstream/processorOstream.cpp b/src/phasicFlow/streams/processorOstream/processorOstream.cpp
new file mode 100755
index 00000000..5f39d158
--- /dev/null
+++ b/src/phasicFlow/streams/processorOstream/processorOstream.cpp
@@ -0,0 +1,153 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include <cstring>
+
+#include "processorOstream.hpp"
+#include "token.hpp"
+
+
+pFlow::processorOstream::processorOstream
+(
+    std::ostream& os,
+    const word& streamName
+)
+:
+    Ostream(os, streamName, writeFormat::ASCII)
+{}
+
+
+pFlow::iOstream& pFlow::processorOstream::write(const char c)
+{
+    checkForPrefix();
+    Ostream::write(c);
+
+    if (c == token::NL)
+    {
+        printPrefix_ = true;
+    }
+
+    return *this;
+
+}
+
+
+pFlow::iOstream& pFlow::processorOstream::write(const char* str)
+{
+    checkForPrefix();
+    Ostream::write(str);
+
+    size_t len = std::strlen(str);
+    if (len && str[len-1] == token::NL)
+    {
+        printPrefix_ = true;
+    }
+
+    return *this;
+}
+
+
+pFlow::iOstream& pFlow::processorOstream::write(const word& str)
+{
+    checkForPrefix();
+    return Ostream::write(str);
+}
+
+
+pFlow::iOstream& pFlow::processorOstream::writeQuoted
+(
+    const word& str,
+    const bool quoted
+)
+{
+    checkForPrefix();
+    return Ostream::writeQuoted(str, quoted);
+}
+
+
+
+pFlow::iOstream& pFlow::processorOstream::write(const int64 val)
+{
+    checkForPrefix();
+    return Ostream::write(val);
+}
+
+
+pFlow::iOstream& pFlow::processorOstream::write(const int32 val)
+{
+    checkForPrefix();
+    return Ostream::write(val);
+}
+
+
+pFlow::iOstream& pFlow::processorOstream::write(const int8 val)
+{
+    checkForPrefix();
+    return Ostream::write(val);
+}
+
+pFlow::iOstream& pFlow::processorOstream::write(const uint64 val)
+{
+    checkForPrefix();
+    return Ostream::write(val);
+}
+
+pFlow::iOstream& pFlow::processorOstream::write(const uint32 val)
+{
+    checkForPrefix();
+    return Ostream::write(val);
+}
+
+pFlow::iOstream& pFlow::processorOstream::write(const uint8 val)
+{
+    checkForPrefix();
+    return Ostream::write(val);
+}
+
+pFlow::iOstream& pFlow::processorOstream::write(const float val)
+{
+    checkForPrefix();
+    return Ostream::write(val);
+}
+
+
+pFlow::iOstream& pFlow::processorOstream::write(const double val)
+{
+    checkForPrefix();
+    return Ostream::write(val);
+}
+
+
+pFlow::iOstream& pFlow::processorOstream::write
+(
+    const char* binaryData, 
+    std::streamsize count
+)
+{
+    checkForPrefix();
+    return Ostream::write(binaryData, count);
+}
+
+
+void pFlow::processorOstream::indent()
+{
+    checkForPrefix();
+    Ostream::indent();
+}
diff --git a/src/phasicFlow/streams/processorOstream/processorOstream.hpp b/src/phasicFlow/streams/processorOstream/processorOstream.hpp
new file mode 100755
index 00000000..6f6dd7e6
--- /dev/null
+++ b/src/phasicFlow/streams/processorOstream/processorOstream.hpp
@@ -0,0 +1,139 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __processorOstream_hpp__
+#define __processorOstream_hpp__
+
+#include "Ostream.hpp"
+
+namespace pFlow
+{
+
+/**
+ * Output stream for MPI parallel run, when we need to 
+ * know which the processor number in the output line. 
+ * The processor number is shown as a prefix for the output line. 
+ * 
+ * It is based on OpenFOAM stream, with some modifications/simplifications
+ * to be tailored to our needs.
+ */
+class processorOstream
+:
+    public Ostream
+{
+protected:
+
+    /// Print prefix?
+    bool printPrefix_	= false;
+
+    /// Prefix word  
+    word prefix_ 		= "";
+
+    /// Output the prefix if required. 
+    inline
+    void checkForPrefix()
+    {
+    	if(printPrefix_ && prefix_.size())
+    	{
+    		Ostream::write(prefix_.c_str());
+    		printPrefix_ = false;
+    	}
+    }
+
+public:
+
+    //// - Constructors
+        
+        /// From components 
+        processorOstream(std::ostream& os, const word& streamName);
+
+        /// No copy construct 
+        processorOstream(const processorOstream&) = delete;
+
+        /// No copy assignment
+        void operator=(const processorOstream&) = delete;
+
+
+    //// - Methods
+
+        /// Set processor number to be used in the prefix. 
+        word setPrefixNum(int procNum)
+        {
+            prefix_ = word("[")+int322Word(procNum)+word("] ");
+            return prefix_;
+        }
+
+        /// Activate prefix for this stream.
+        void activatePrefix()
+        {
+            printPrefix_ = true;
+        }
+        
+        /// Write character
+        iOstream& write(const char c)override;
+
+        /// Write character string
+        iOstream& write(const char* str)override;
+
+        /// Write word
+        iOstream& write(const word& str)override;
+    
+        /// Write std::string surrounded by quotes.
+        //  Optional write without quotes.
+        iOstream& writeQuoted ( const word& str, const bool quoted=true ) override;
+
+        /// Write int64
+        iOstream& write(const int64 val) override;
+
+        /// Write int32
+        iOstream& write(const int32 val) override;
+
+        /// Write int32
+        iOstream& write(const int8 val) override;
+
+        /// Write uint64
+        iOstream& write(const uint64 val) override;
+
+        /// Write uint32
+        iOstream& write(const uint32 val) override;
+
+        /// Write uint8
+        iOstream& write(const uint8 val) override;
+
+        /// Write float
+        iOstream& write(const float val) override;
+
+        /// Write double
+        iOstream& write(const double val) override;
+        
+        /// Write a block of binray data 
+        iOstream& write(const char* binaryData, std::streamsize count) override;
+
+        /// Add indentation characters
+        void indent() override;
+
+
+}; // processorOstream
+
+
+
+} // pFlow
+
+
+#endif // __processorOstream_hpp__
diff --git a/src/phasicFlow/streams/streams.cpp b/src/phasicFlow/streams/streams.cpp
index 337b7e81..12ad3690 100755
--- a/src/phasicFlow/streams/streams.cpp
+++ b/src/phasicFlow/streams/streams.cpp
@@ -3,6 +3,11 @@
 
 pFlow::Ostream pFlow::output(std::cout, "pFlow Ostream");
 
+pFlow::masterOstream pFlow::mOutput(cout, "pFlow masterOstream");
+
+pFlow::processorOstream pFlow::pOutput(cout, "pFlow processorOstream");
+
 pFlow::Istream pFlow::input( std::cin, "sFlow Istream"); 
 
-pFlow::Ostream pFlow::errReport( std::cerr, "pFlow error report stream");
+pFlow::masterOstream pFlow::errReport( std::cerr, "pFlow error report stream");
+
diff --git a/src/phasicFlow/streams/streams.hpp b/src/phasicFlow/streams/streams.hpp
index de60dc6f..c4808d1b 100755
--- a/src/phasicFlow/streams/streams.hpp
+++ b/src/phasicFlow/streams/streams.hpp
@@ -13,38 +13,44 @@
 
 #include "iTstream.hpp"
 
+#include "processorOstream.hpp"
+
+#include "masterOstream.hpp"
+
 namespace pFlow
 {
 
-
 	extern Ostream output;
 
+	extern masterOstream mOutput;
+
+	extern processorOstream pOutput;
+
 	extern Istream input; 
 
-	extern Ostream errReport;
-
+	extern masterOstream errReport;
 
 }
 
-#define redText(text)     	redColor<<text<<defaultColor
-#define yellowText(text)  	yellowColor<<text<<defaultColor
-#define blueText(text)    	blueColor<<text<<defaultColor
-#define greenText(text)   	greenColor<<text<<defaultColor
-#define magentaText(text) 	magentaColor<<text<<defaultColor
-#define cyanText(text) 		cyanColor<<text<<defaultColor
-#define boldText(text) 		boldChar<<text<<defaultColor
+#define Red_Text(text)     	redColor<<text<<defaultColor
+#define Yellow_Text(text)  	yellowColor<<text<<defaultColor
+#define Blue_Text(text)    	blueColor<<text<<defaultColor
+#define Green_Text(text)   	greenColor<<text<<defaultColor
+#define Magenta_Text(text) 	magentaColor<<text<<defaultColor
+#define Cyan_Text(text) 		cyanColor<<text<<defaultColor
+#define Bold_Text(text) 		boldChar<<text<<defaultColor
 
-#define INFORMATION pFlow::output<<boldChar<<magentaColor<<"> INFO: "<<defaultColor<<magentaColor
-#define endINFO defaultColor<<pFlow::nl
+#define INFORMATION pFlow::mOutput<<boldChar<<magentaColor<<"> INFO: "<<defaultColor<<magentaColor
+#define END_INFO defaultColor<<pFlow::endl
 
-#define REPORT(n) pFlow::output.space(2*n)
-#define endREPORT pFlow::nl
+#define REPORT(n) pFlow::mOutput.space(2*n)
+#define END_REPORT pFlow::endl
 
 
-#define yWARNING pFlow::output<<boldChar<<yellowColor<<"> WARNING\n"<<defaultColor<<yellowColor<<"  " 
-#define endyWARNING defaultColor<<pFlow::nl
+#define WARNING pFlow::errReport<<boldChar<<yellowColor<<"> WARNING\n"<<defaultColor<<yellowColor<<"  " 
+#define END_WARNING defaultColor<<pFlow::endl
 
-#define ERR pFlow::output<<boldChar<<redColor<<"> ERROR\n"<<defaultColor<<redColor<<"  " 
-#define endERR defaultColor<<pFlow::nl
+#define ERR pFlow::errReport<<boldChar<<redColor<<"> ERROR\n"<<defaultColor<<redColor<<"  " 
+#define END_ERR defaultColor<<pFlow::endl
 
-#endif
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/streams/token/token.hpp b/src/phasicFlow/streams/token/token.hpp
index 06a35f3f..c0ba324f 100755
--- a/src/phasicFlow/streams/token/token.hpp
+++ b/src/phasicFlow/streams/token/token.hpp
@@ -28,7 +28,7 @@ Licence:
 namespace pFlow
 {
 
-//- Forward Declarations
+/// Forward Declarations
 class token;
 class iIstream;
 class iOstream;
@@ -45,69 +45,69 @@ class token
 {
 public:
 
-    //- Enumeration defining the types of token.
-    //  Since these values are also used to tag content in Pstream,
-    //  the maximum number of types is limited to 30.
+    /// Enumeration defining the types of token.
+    /// Since these values are also used to tag content in Pstream,
+    /// the maximum number of types is limited to 30.
     enum tokenType
     {
         UNDEFINED = 0,    //!< An undefined token-type
 
         // Fundamental types
-        FLAG,             //!< stream flag (1-byte bitmask)
-        PUNCTUATION,      //!< single character punctuation
-        BOOL,             //!< boolean type
-        INT64,             //!< int64 (integer) type
-        FLOAT,            //!< float (single-precision) type
-        DOUBLE,           //!< double (double-precision) type
+        FLAG,             /// stream flag (1-byte bitmask)
+        PUNCTUATION,      /// single character punctuation
+        BOOL,             /// boolean type
+        INT64,            /// int64 (integer) type
+        FLOAT,            /// float (single-precision) type
+        DOUBLE,           /// double (double-precision) type
 
         // Pointer types
-        WORD,             //!< A pFlow::word
-        STRING, 		  //!< A string whth double quuote
-        DIRECTIVE,        //!< A dictionary \c \#directive (word variant)
-        VARIABLE,         //!< A dictionary \c \$variable (string variant)
+        WORD,             /// A pFlow::word
+        STRING, 		  /// A string whth double quuote
+        DIRECTIVE,        /// A dictionary \c \#directive (word variant)
+        VARIABLE,         /// A dictionary \c \$variable (string variant)
 
-        ERROR,            //!< A token error encountered
+        ERROR,            /// A token error encountered
     };
 
 
-    //**************- Stream or output control flags (1-byte width)
+    /// Stream or output control flags (1-byte width)
     enum flagType
     {
-        NO_FLAG = 0,   //!< No flags
-        ASCII   = 1,   //!< ASCII-mode stream
-        BINARY  = 2    //!< BINARY-mode stream
+        NO_FLAG = 0,   /// No flags
+        ASCII   = 1,   /// ASCII-mode stream
+        BINARY  = 2    /// BINARY-mode stream
     };
 
 
-    //- Standard punctuation tokens (a character)
+    /// Standard punctuation tokens (a character)
     enum punctuationToken : char
     {
-        NULL_TOKEN     = '\0',  //!< Nul character
-        SPACE          = ' ',   //!< Space [isspace]
-        TAB            = '\t',  //!< Tab [isspace]
-        NL             = '\n',  //!< Newline [isspace]
+        NULL_TOKEN     = '\0',  /// Nul character
+        SPACE          = ' ',   /// Space [isspace]
+        TAB            = '\t',  /// Tab [isspace]
+        NL             = '\n',  /// Newline [isspace]
 
-        END_STATEMENT  = ';',   //!< End entry [#isseparator]
-        BEGIN_LIST     = '(',   //!< Begin list [#isseparator]
-        END_LIST       = ')',   //!< End list [#isseparator]
-        BEGIN_SQR      = '[',   //!< Begin dimensions [#isseparator]
-        END_SQR        = ']',   //!< End dimensions [#isseparator]
-        BEGIN_BLOCK    = '{',   //!< Begin block [#isseparator]
-        END_BLOCK      = '}',   //!< End block [#isseparator]
-        COLON          = ':',   //!< Colon [#isseparator]
-        COMMA          = ',',   //!< Comma [#isseparator]
-        DOLLAR         = '$',   //!< Dollar - start variable
-        SQUOTE         = '\'',  //!< Single quote
-        DQUOTE         = '"',   //!< Double quote
+        END_STATEMENT  = ';',   /// End entry [#isseparator]
+        BEGIN_LIST     = '(',   /// Begin list [#isseparator]
+        END_LIST       = ')',   /// End list [#isseparator]
+        BEGIN_SQR      = '[',   /// Begin dimensions [#isseparator]
+        END_SQR        = ']',   /// End dimensions [#isseparator]
+        BEGIN_BLOCK    = '{',   /// Begin block [#isseparator]
+        END_BLOCK      = '}',   /// End block [#isseparator]
+        COLON          = ':',   /// Colon [#isseparator]
+        COMMA          = ',',   /// Comma [#isseparator]
+        DOLLAR         = '$',   /// Dollar - start variable
+        SQUOTE         = '\'',  /// Single quote
+        DQUOTE         = '"',   /// Double quote
 
-        SUBTRACT       = '-',   //!< Subtract or start of negative number
-        DIVIDE         = '/',   //!< Divide [#isseparator]
+        SUBTRACT       = '-',   /// Subtract or start of negative number
+        DIVIDE         = '/',   /// Divide [#isseparator]
 
-        BEGIN_STRING   = DQUOTE, //!< Begin string with double quote
-        END_STRING     = DQUOTE  //!< End string with double quote
+        BEGIN_STRING   = DQUOTE, /// Begin string with double quote
+        END_STRING     = DQUOTE  /// End string with double quote
     };
 
-    //- An undefined token
+    /// An undefined token
     static const inline token undefinedToken();
 
     static token endList()
@@ -157,7 +157,7 @@ public:
 
 private:
 
-    //- A %union of token types
+    /// A %union of token types
     union content
     {
         // Fundamental values. Largest first for any {} initialization.
@@ -174,279 +174,285 @@ private:
     };
 
 
-    // Private Data
+    //// -  Private Data
 
-    //- The data content (as a union).
+    /// The data content (as a union).
     //  For memory alignment this should appear as the first member.
     content data_;
 
-    //- The token type
+    /// The token type
     tokenType type_;
 
-    //- Line number in the file the token was read from
+    /// Line number in the file the token was read from
     int32 lineNumber_;
 
 
     // Private Member Functions
 
-    //- Set as UNDEFINED and zero the union content without any checking
+    /// Set as UNDEFINED and zero the union content without any checking
     inline void setUndefined();
 
-    // Parse error, expected 'expected', found ...
+    /// Parse error, expected 'expected', found ...
     void parseError(const char* expected) const;
 
 
 public:
 
-    // Static Data Members
 
-    // Constructors
+    //// - Constructors
 
-    //- Default construct, initialized to an UNDEFINED token.
-    inline constexpr token() noexcept;
+        /// Default construct, initialized to an UNDEFINED token.
+        inline constexpr token() noexcept;
 
-    //- Copy construct
-    inline token(const token& t);
+        /// Copy construct
+        inline token(const token& t);
 
-    //- Move construct. The original token is left as UNDEFINED.
-    inline token(token&& t);
+        /// Move construct. The original token is left as UNDEFINED.
+        inline token(token&& t);
 
-    //- Construct punctuation character token
-    inline explicit token(punctuationToken p, int32 lineNumber=0);
+        /// Construct punctuation character token
+        inline explicit token(punctuationToken p, int32 lineNumber=0);
 
-    //- Construct uint64 token
-    inline explicit token(const uint64 val, int32 lineNumber=0);
+        /// Construct int64 token
+        inline explicit token(const uint64 val, int32 lineNumber=0);
 
-    //- Construct uint32 token
-    inline explicit token(const uint32 val, int32 lineNumber=0);
+        /// Construct int64 token
+        inline explicit token(const uint32 val, int32 lineNumber=0);
 
-    //- Construct int64 token
-    inline explicit token(const int64 val, int32 lineNumber=0);
+        /// Construct int8 token
+        inline explicit token(const uint8 val, int32 lineNumber=0);
 
-    //- Construct int64 token
-    inline explicit token(const int32 val, int32 lineNumber=0);
+        /// Construct int64 token
+        inline explicit token(const int64 val, int32 lineNumber=0);
 
-    //- Construct float token
-    inline explicit token(const float val, int32 lineNumber=0);
+        /// Construct int64 token
+        inline explicit token(const int32 val, int32 lineNumber=0);
 
-    //- Construct double token
-    inline explicit token(const double val, int32 lineNumber=0);
+        /// Construct int64 token
+        inline explicit token(const int8 val, int32 lineNumber=0);
 
-    //- Copy construct word & string token
-    inline explicit token(const word& w, int32 lineNumber=0, bool isString = false);
+        /// Construct float token
+        inline explicit token(const float val, int32 lineNumber=0);
+
+        /// Construct double token
+        inline explicit token(const double val, int32 lineNumber=0);
+
+        /// Copy construct word & string token
+        inline explicit token(const word& w, int32 lineNumber=0, bool isString = false);
 
 
-    //- Move construct word & string token
-    inline explicit token(word&& w, int32 lineNumber=0, bool isString = false);
+        /// Move construct word & string token
+        inline explicit token(word&& w, int32 lineNumber=0, bool isString = false);
 
-    //- Construct from iIstream
-    explicit token(iIstream& is);
+        /// Construct from iIstream
+        explicit token(iIstream& is);
 
 
-    //- Destructor
-    inline ~token();
+        /// Destructor
+        inline ~token();
 
 
-    // Static Functions
+    //// - Static Functions
 
-        //- Create a bool token.
+        /// Create a bool token.
         inline static token boolean(bool on);
 
-        //- Create a token with stream flags, no sanity check
-        //
-        //  \param bitmask the flags to set
+        /// Create a token with stream flags, no sanity check
+        ///
+        ///  \param bitmask the flags to set
         inline static token flag(int bitmask);
 
-        //- True if the character is a punctuation separator (eg, in ISstream).
-        //  Since it could also start a number, SUBTRACT is not included as
-        //  a separator.
-        //
-        //  \param c the character to test, passed as int for consistency with
-        //      isdigit, isspace etc.
+        /// True if the character is a punctuation separator (eg, in ISstream).
+        ///  Since it could also start a number, SUBTRACT is not included as
+        ///  a separator.
+        ///
+        ///  \param c the character to test, passed as int for consistency with
+        ///      isdigit, isspace etc.
         inline static bool isseparator(int c);
 
 
-    // Member Functions
+    //// - Member Functions
 
-    // Status
+    // - Status
 
-        //- Return the name of the token type
+        /// Return the name of the token type
         word name() const;
 
-        //- Return the token type
+        /// Return the token type
         inline tokenType type() const;
 
-        //- Change the token type, for similar types.
-        //  This can be used to change between string-like variants
-        //  (eg, STRING, VARIABLE, etc)
-        //  To change types entirely (eg, STRING to DOUBLE),
-        //  use the corresponding assignment operator.
-        //
-        //  \return true if the change was successful or no change was required
+        /// Change the token type, for similar types.
+        ///  This can be used to change between string-like variants
+        ///  (eg, STRING, VARIABLE, etc)
+        ///  To change types entirely (eg, STRING to DOUBLE),
+        ///  use the corresponding assignment operator.
+        ///
+        ///  \return true if the change was successful or no change was required
         inline bool setType(const tokenType tokType);
 
-        //- The line number for the token
+        /// The line number for the token
         inline int32 lineNumber() const;
 
-        //- The line number for the token
+        /// The line number for the token
         inline int32& lineNumber();
 
-        //- True if token is not UNDEFINED or ERROR
+        /// True if token is not UNDEFINED or ERROR
         inline bool good() const;
 
-        //- Token is UNDEFINED
+        /// Token is UNDEFINED
         inline bool undefined() const;
 
-        //- Token is ERROR
+        /// Token is ERROR
         inline bool error() const;
 
-        //- Token is BOOL
+        /// Token is BOOL
         inline bool isBool() const;
 
-        //- Token is FLAG
+        /// Token is FLAG
         inline bool isFlag() const;
 
-        //- Token is PUNCTUATION
+        /// Token is PUNCTUATION
         inline bool isPunctuation() const;
 
-        //- Token is PUNCTUATION and isseparator
+        /// Token is PUNCTUATION and isseparator
         inline bool isSeparator() const;
 
-        //- Tolen is end statement 
+        /// Token is end statement 
         inline bool isEndStatement() const;
 
+        /// Token is end endBlock 
         inline bool isEndBlock()const;
 
-        //- Token is INT64
+        /// Token is int64
         inline bool isInt64() const;
 
-        //- Token is INT32
+        /// Token is int32
         inline bool isInt32() const;
 
-        //- Token is FLOAT
+        /// Token is float
         inline bool isFloat() const;
 
-        //- Token is DOUBLE
+        /// Token is double
         inline bool isDouble() const;
 
-        //- Token is FLOAT or DOUBLE
+        /// Token is float or double
         inline bool isReal() const;
 
-        //- Token is INT64, FLOAT or DOUBLE
+        /// Token is int, float or duble
         inline bool isNumber() const;
 
-        //- Token is WORD or DIRECTIVE word
+        /// Token is word or DIRECTIVE word
         inline bool isWord() const;
 
-        //- Token is DIRECTIVE (word variant)
+        /// Token is DIRECTIVE (word variant)
         inline bool isDirective() const;
 
-        //- Token is STRING, VARIABLE or VERBATIM string
+        /// Token is STRING, VARIABLE or VERBATIM string
         inline bool isString() const;
 
-        //- Token is VARIABLE (string variant)
+        /// Token is VARIABLE (string variant)
         inline bool isVariable() const;
 
-        //- Token is WORD, DIRECTIVE, STRING, VARIABLE or VERBATIM
+        /// Token is WORD, DIRECTIVE, STRING, VARIABLE or VERBATIM
         inline bool isStringType() const;
 
 
-    // Access
+    //- Access
 
-        //- Return boolean token value.
-        //  Report FatalIOError and return false if token is not BOOL or INT64
+        /// Return boolean token value.
+        ///  Report FatalIOError and return false if token is not BOOL or INT64
         inline bool boolToken() const;
 
-        //- Return flag bitmask value.
-        //  Report FatalIOError and return NO_FLAG if token is not FLAG
+        /// Return flag bitmask value.
+        ///  Report FatalIOError and return NO_FLAG if token is not FLAG
         inline int flagToken() const;
 
-        //- Return punctuation character.
-        //  Report FatalIOError and return \b \\0 if token is not PUNCTUATION
+        /// Return punctuation character.
+        ///  Report FatalIOError and return \b \\0 if token is not PUNCTUATION
         inline punctuationToken pToken() const;
 
-        //- Return int64 value.
+        /// Return int64 value.
         //  Report FatalIOError and return \b 0 if token is not INT64
         inline int64 int64Token() const;
 
-        //- Return int32 value.
-        //  Report FatalIOError and return \b 0 if token is not INT64
+        /// Return int32 value.
+        ///  Report FatalIOError and return \b 0 if token is not INT64
         inline int32 int32Token() const;
 
-        //- Return float value.
-        //  Report FatalIOError and return \b 0 if token is not FLOAT
+        /// Return float value.
+        ///  Report FatalIOError and return \b 0 if token is not FLOAT
         inline float floatToken() const;
 
-        //- Return double value.
-        //  Report FatalIOError and return \b 0 if token is not DOUBLE
+        /// Return double value.
+        ///  Report FatalIOError and return \b 0 if token is not DOUBLE
         inline double doubleToken() const;
 
-        //- Return float or double value.
-        //  Report FatalIOError and return \b 0 if token is not a
-        //  FLOAT or DOUBLE
+        /// Return float or double value.
+        ///  Report FatalIOError and return \b 0 if token is not a
+        ///  FLOAT or DOUBLE
         inline real realToken() const;
 
-        //- Return int64, float or double value.
-        //  Report FatalIOError and return \b 0 if token is not a
-        //  INT64, FLOAT or DOUBLE
+        /// Return int64, float or double value.
+        ///  Report FatalIOError and return \b 0 if token is not a
+        ///  INT64, FLOAT or DOUBLE
         inline real number() const;
 
-        //- Return const reference to the word contents.
-        //  Report FatalIOError and return \b "" if token is not a
-        //  WORD or DIRECTIVE
+        /// Return const reference to the word contents.
+        ///  Report FatalIOError and return \b "" if token is not a
+        ///  WORD or DIRECTIVE
         inline const word& wordToken() const;
 
-        //- Return const reference to the string contents.
-        //  Report FatalIOError and return \b "" if token is not a
-        //  STRING, VARIABLE, VERBATIM or an upcast WORD or DIRECTIVE
+        /// Return const reference to the string contents.
+        ///  Report FatalIOError and return \b "" if token is not a
+        ///  STRING, VARIABLE, VERBATIM or an upcast WORD or DIRECTIVE
         inline const word& stringToken() const;
 
 
-    // Edit
+    //- Edit
 
-        //- Reset token to UNDEFINED and clear any allocated storage
+        /// Reset token to UNDEFINED and clear any allocated storage
         inline void reset();
 
-        //- Clear token and set to be ERROR.
+        /// Clear token and set to be ERROR.
         inline void setBad();
 
-        //- Swap token contents: type, data, line-number
+        /// Swap token contents: type, data, line-number
         inline void swap(token& tok);
 
 
-    // Assignment
+    //- Assignment
 
-        //- Copy assign
+        /// Copy assign
         inline void operator=(const token& tok);
 
-        //- Move assign
+        /// Move assign
         inline void operator=(token&& tok);
 
-        //- Copy assign from punctuation
+        /// Copy assign from punctuation
         inline void operator=(const punctuationToken p);
 
-        //- Copy assign from int64
+        /// Copy assign from int64
         inline void operator=(const int64 val);
 
-         //- Copy assign from int32
+         /// Copy assign from int32
         inline void operator=(const int32 val);
 
-        //- Copy assign from float
+        /// Copy assign from float
         inline void operator=(const float val);
 
-        //- Copy assign from double
+        /// Copy assign from double
         inline void operator=(const double val);
 
-        //- Copy assign from word
+        /// Copy assign from word
         inline void operator=(const word& w);
 
                 
 
-        //- Move assign from word
+        /// Move assign from word
         inline void operator=(word&& w);
 
         
-    // Equality
+    //- Equality
 
         inline bool operator==(const token& tok) const;
         inline bool operator==(const punctuationToken p) const;
@@ -457,7 +463,7 @@ public:
         inline bool operator==(const word& w) const;
 
 
-    // Inequality
+    //- Inequality
 
         inline bool operator!=(const token& tok) const;
         inline bool operator!=(const punctuationToken p) const;
@@ -470,7 +476,8 @@ public:
         iOstream& printInfo(iOstream& os)const;
 
         std::ostream& printInfo(std::ostream& os)const;
-    // IOstream Operators
+    
+    //- IOstream Operators
 
         friend iOstream& operator<<(iOstream& os, const token& tok);
         friend iOstream& operator<<(iOstream& os, const punctuationToken& pt);
@@ -529,18 +536,10 @@ inline token newLineToken()
 }
 
 
-
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
-
 } // End namespace pFlow
 
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
 #include "tokenI.hpp"
 
 
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
-
 #endif
-
-// ************************************************************************* //
diff --git a/src/phasicFlow/streams/token/tokenI.hpp b/src/phasicFlow/streams/token/tokenI.hpp
index 63dddb50..459018e7 100755
--- a/src/phasicFlow/streams/token/tokenI.hpp
+++ b/src/phasicFlow/streams/token/tokenI.hpp
@@ -162,6 +162,15 @@ inline pFlow::token::token(const uint32 val, int32 lineNumber)
     data_.int64Val = static_cast<int64>(val);
 }
 
+inline pFlow::token::token(const uint8 val, int32 lineNumber)
+:
+    data_(),
+    type_(tokenType::INT64),
+    lineNumber_(lineNumber)
+{
+    data_.int64Val = static_cast<int64>(val);
+}
+
 inline pFlow::token::token(const int64 val, int32 lineNumber)
 :
     data_(),
@@ -180,6 +189,15 @@ inline pFlow::token::token(const int32 val, int32 lineNumber)
     data_.int64Val = static_cast<int64>(val);
 }
 
+inline pFlow::token::token(const int8 val, int32 lineNumber)
+:
+    data_(),
+    type_(tokenType::INT64),
+    lineNumber_(lineNumber)
+{
+    data_.int64Val = static_cast<int64>(val);
+}
+
 inline pFlow::token::token(const float val, int32 lineNumber)
 :
     data_(),
diff --git a/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp b/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp
index 29c3f99a..0e29b280 100755
--- a/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp
+++ b/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp
@@ -276,6 +276,17 @@ bool pFlow::readInt32( const char* buf, int32 & val)
     return readInt32(w, val);
 }
 
+bool pFlow::readInt8( const word& w, int8 & val)
+{
+    try{
+        val = std::stoi(w);
+    }
+    catch (...)
+    {
+        return false;
+    }
+    return true;   
+}
 
 bool pFlow::readInt8( const char* buf, int8 & val)
 {

From 8eec685c751803d48f8673554508a0c2eb7be323 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 1 Oct 2023 01:22:40 +0330
Subject: [PATCH 05/60] bashrc for Zoltan

---
 cmake/bashrc | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/cmake/bashrc b/cmake/bashrc
index 976d8c5f..823f276d 100644
--- a/cmake/bashrc
+++ b/cmake/bashrc
@@ -20,6 +20,8 @@ export pFlow_SRC_DIR="$pFlow_PROJECT_DIR/src"
 
 export Kokkos_DIR="$kokkosDir"
 
+export Zoltan_DIR="$projectDir/Zoltan"
+
 # Cleanup variables (done as final statement for a clean exit code)
 unset projectDir
 
@@ -27,5 +29,7 @@ export PATH="$pFlow_BIN_DIR:$PATH"
 
 export LD_LIBRARY_PATH="$pFlow_LIB_DIR:$LD_LIBRARY_PATH"
 
+export LD_LIBRARY_PATH="$Zoltan_DIR/build/lib:$LD_LIBRARY_PATH"
+
 
 #------------------------------------------------------------------------------

From 59c148afa64cc15fcf17acc926a987ffbf8949f4 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 1 Oct 2023 18:47:24 +0330
Subject: [PATCH 06/60] MPI part

---
 src/CMakeLists.txt                            |   2 +
 src/MPIParallelization/CMakeLists.txt         |  33 ++++++
 src/MPIParallelization/partitioning.cpp       |  92 +++++++++++++++
 src/MPIParallelization/partitioning.hpp       | 110 ++++++++++++++++++
 .../types/basicTypes/builtinTypes.hpp         |   2 +
 5 files changed, 239 insertions(+)
 create mode 100644 src/MPIParallelization/CMakeLists.txt
 create mode 100644 src/MPIParallelization/partitioning.cpp
 create mode 100644 src/MPIParallelization/partitioning.hpp

diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt
index ff2582b5..e809444e 100644
--- a/src/CMakeLists.txt
+++ b/src/CMakeLists.txt
@@ -13,3 +13,5 @@ add_subdirectory(phasicFlow)
 
 #add_subdirectory(Geometry)
 
+
+add_subdirectory(MPIParallelization)
diff --git a/src/MPIParallelization/CMakeLists.txt b/src/MPIParallelization/CMakeLists.txt
new file mode 100644
index 00000000..3bac9dbb
--- /dev/null
+++ b/src/MPIParallelization/CMakeLists.txt
@@ -0,0 +1,33 @@
+#add Zoltan
+set(Zoltan_Install_DIR)
+if(DEFINED ENV{Zoltan_DIR})
+   set(Zoltan_Install_DIR $ENV{Zoltan_DIR}/build)
+else()
+  set(Zoltan_Install_DIR $ENV{HOME}/PhasicFlow/Zoltan/build)
+endif()
+message(STATUS "Zoltan install directory is ${Zoltan_Install_DIR}")
+
+set(ZOLTAN_PREFIX "${Zoltan_Install_DIR}" CACHE STRING "Zoltan install directory")
+
+find_path(ZOLTAN_INCLUDE_DIR zoltan.h PATHS "${ZOLTAN_PREFIX}/include")
+
+message(STATUS "Zoltan include path: ${ZOLTAN_INCLUDE_DIR}")
+
+find_library(ZOLTAN_LIBRARY zoltan PATHS "${ZOLTAN_PREFIX}/lib")
+message(STATUS "Zoltan lib path: ${ZOLTAN_LIBRARY}")
+
+
+set(SourceFiles partitioning)
+
+set(link_libs Kokkos::kokkos phasicFlow PRIVATE MPI::MPI_CXX ${ZOLTAN_LIBRARY} -lm )
+
+pFlow_add_library_install(MPIParallelization SourceFiles link_libs)
+target_include_directories(MPIParallelization PRIVATE ${ZOLTAN_INCLUDE_DIR})
+
+
+
+
+
+
+
+
diff --git a/src/MPIParallelization/partitioning.cpp b/src/MPIParallelization/partitioning.cpp
new file mode 100644
index 00000000..a786a89c
--- /dev/null
+++ b/src/MPIParallelization/partitioning.cpp
@@ -0,0 +1,92 @@
+
+#include "zoltan_cpp.h"
+
+#include "partitioning.hpp"
+#include "error.hpp"
+#include "streams.hpp"
+
+void pFlow::partitioning::freeZoltan()
+{
+	if(validPointers_)
+	{
+		Zoltan::LB_Free_Part(&importGlobalGids_, &importLocalGids_, 
+                      	 	 &importProcs_, &importToPart_);
+
+		Zoltan::LB_Free_Part(&exportGlobalGids_, &exportLocalGids_, 
+                      		 &exportProcs_, &exportToPart_);
+        validPointers_ = false;
+	}
+	
+	zoltan_.release();
+}
+
+
+pFlow::partitioning::partitioning(int argc, char *argv[], const box& globalBox)
+:
+	globalBox_(globalBox)
+{
+	if(!zoltanInitialized__)
+	{
+		auto rc = Zoltan_Initialize(argc, argv, &version_);
+		if (rc != ZOLTAN_OK)
+		{
+			fatalErrorInFunction<<"Cannot initialize zoltan"<<endl;
+			fatalExit;
+		}
+		zoltanInitialized__ = true;
+	}
+
+	// Creates Zoltan object 
+	zoltan_ = std::make_unique<Zoltan>(MPI::COMM_WORLD);
+
+	zoltan_->Set_Param("DEBUG_LEVEL", "0");
+  	zoltan_->Set_Param("LB_METHOD", "RCB");
+  	zoltan_->Set_Param("NUM_GID_ENTRIES", "1"); 
+  	zoltan_->Set_Param("NUM_LID_ENTRIES", "1");
+  	zoltan_->Set_Param("OBJ_WEIGHT_DIM", "0");
+    zoltan_->Set_Param("RETURN_LISTS", "ALL");
+	
+}
+
+pFlow::partitioning::~partitioning()
+{
+	freeZoltan();
+}
+
+void pFlow::partitioning::printBox()const
+{
+	pOutput<< "localBox:" << localBox_<<endl;
+}
+
+
+ 
+/*int partitioning::getNumberOfPoints(void *data, int *ierr)
+{
+	auto* obj = static_cast<pointCollection *>(data);
+
+	*ierr = ZOLTAN_OK;
+
+	return obj->numberOfPOints();
+}
+
+
+void partitioning::getPointList(
+	void *data, 
+	int sizeGID, 
+	int sizeLID,
+    ZOLTAN_ID_PTR globalID, 
+    ZOLTAN_ID_PTR localID,
+    int wgt_dim, 
+    float *obj_wgts, 
+    int *ierr)
+{
+		
+	auto* obj = static_cast<pointCollection *>(data);
+	*ierr = ZOLTAN_OK;
+
+	for (int i=0; i< obj->numberOfPOints(); i++)
+	{
+		globalID[i] = obj->globalIDList()[i];
+		localID[i] = i;
+	}
+}*/
\ No newline at end of file
diff --git a/src/MPIParallelization/partitioning.hpp b/src/MPIParallelization/partitioning.hpp
new file mode 100644
index 00000000..5d6da480
--- /dev/null
+++ b/src/MPIParallelization/partitioning.hpp
@@ -0,0 +1,110 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __rcbPartitioning_hpp__
+#define __rcbPartitioning_hpp__
+
+#include "box.hpp"
+#include "processors.hpp"
+
+
+
+namespace pFlow
+{
+
+class Zoltan;
+
+
+class partitioning
+{
+
+protected:
+
+	float 					version_ 	= 0.0;
+
+	std::unique_ptr<Zoltan> zoltan_ 	= nullptr;
+
+	bool					validPointers_ = false;
+
+	const box& 				globalBox_;
+
+	box 					localBox_; 	
+
+	int32 	changes_, numImport_, numExport_;
+  	
+  	id_t* importGlobalGids_, importLocalGids_, exportGlobalGids_, exportLocalGids_; 
+  	
+  	int32*importProcs_, *importToPart_, *exportProcs_, *exportToPart_;
+
+	static inline bool 		zoltanInitialized__ = false;
+
+	void freeZoltan();
+
+public:
+
+	partitioning(int argc, char *argv[], const box& globalBox);
+
+	virtual 
+	~partitioning();
+
+		
+	virtual 
+	bool partition() = 0;
+
+	inline
+	auto localBox()const
+	{
+		return localBox_;
+	}
+
+	inline
+	const auto& globalBox()const
+	{
+		return globalBox_;
+	}
+
+	inline 
+	bool partitionsChanged()const
+	{
+		return changes_ == 1;
+	}
+
+	void printBox()const;
+
+	/*static 
+	int getNumberOfPoints(void *data, int32 *ierr);
+
+	static 
+	void getPointList(
+		void *data, 
+		int32 sizeGID, 
+		int32 sizeLID,
+        id_t* globalID, 
+        id_t* localID,
+        int32 wgt_dim, 
+        float *obj_wgts, 
+        int32 *ierr);*/
+};
+
+
+}
+
+
+#endif //__rcbPartitioning_hpp__
\ No newline at end of file
diff --git a/src/phasicFlow/types/basicTypes/builtinTypes.hpp b/src/phasicFlow/types/basicTypes/builtinTypes.hpp
index 1abe89bd..340179ec 100755
--- a/src/phasicFlow/types/basicTypes/builtinTypes.hpp
+++ b/src/phasicFlow/types/basicTypes/builtinTypes.hpp
@@ -58,6 +58,8 @@ using uint32  = unsigned int;
 
 using uint64  = unsigned long long int;
 
+using id_t    = uint32;
+
 using size_t  = std::size_t;
 
 using word    = std::string;

From 5a94fc5688be3a5f3e2c54fb44e7276d6c227a88 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 1 Oct 2023 20:04:46 +0330
Subject: [PATCH 07/60] dictionary is updated

---
 src/CMakeLists.txt                            |   2 +-
 src/phasicFlow/CMakeLists.txt                 |   6 +
 src/phasicFlow/dictionary/dictionary.cpp      |  20 +-
 src/phasicFlow/dictionary/dictionary.hpp      | 188 ++++++++++--------
 src/phasicFlow/dictionary/entry/dataEntry.hpp |  52 +++--
 src/phasicFlow/dictionary/entry/iEntry.hpp    |  45 +++--
 6 files changed, 181 insertions(+), 132 deletions(-)

diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt
index e809444e..31049334 100644
--- a/src/CMakeLists.txt
+++ b/src/CMakeLists.txt
@@ -14,4 +14,4 @@ add_subdirectory(phasicFlow)
 #add_subdirectory(Geometry)
 
 
-add_subdirectory(MPIParallelization)
+#add_subdirectory(MPIParallelization)
diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 6ebacce2..5114f190 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -27,6 +27,12 @@ streams/streams.cpp
 fileSystem/fileSystem.cpp
 
 processors/processors.cpp
+
+dictionary/dictionary.cpp
+dictionary/entry/iEntry.cpp
+dictionary/entry/dataEntry.cpp 
+dictionary/twoPartEntry/twoPartEntry.cpp
+
 )
 
 set(link_libs)
diff --git a/src/phasicFlow/dictionary/dictionary.cpp b/src/phasicFlow/dictionary/dictionary.cpp
index 4d9f5464..a52d1d76 100644
--- a/src/phasicFlow/dictionary/dictionary.cpp
+++ b/src/phasicFlow/dictionary/dictionary.cpp
@@ -468,15 +468,6 @@ bool pFlow::dictionary::add
 	return addPtr(keyword, ptr);
 }
 
-bool pFlow::dictionary::add
-(
-	const word& keyword,
-	const int16& v
-)
-{
-	uniquePtr<iEntry> ptr = makeUnique<dataEntry>(keyword, *this, token(v));
-	return addPtr(keyword, ptr);
-}
 
 bool pFlow::dictionary::add
 (
@@ -491,7 +482,7 @@ bool pFlow::dictionary::add
 bool pFlow::dictionary::add
 (
 	const word& keyword,
-	const label& v
+	const uint64& v
 )
 {
 	uniquePtr<iEntry> ptr = makeUnique<dataEntry>(keyword, *this, token(v));
@@ -508,6 +499,15 @@ bool pFlow::dictionary::add
 	return addPtr(keyword, ptr);
 }
 
+bool pFlow::dictionary::add
+(
+	const word& keyword,
+	const uint8& v
+)
+{
+	uniquePtr<iEntry> ptr = makeUnique<dataEntry>(keyword, *this, token(v));
+	return addPtr(keyword, ptr);
+}
 
 bool pFlow::dictionary::addDict
 (
diff --git a/src/phasicFlow/dictionary/dictionary.hpp b/src/phasicFlow/dictionary/dictionary.hpp
index 3ad26c06..661882d5 100644
--- a/src/phasicFlow/dictionary/dictionary.hpp
+++ b/src/phasicFlow/dictionary/dictionary.hpp
@@ -34,7 +34,36 @@ Licence:
 namespace pFlow
 {
 
-
+/**
+ *  Dictionary holds a set of data entries or sub-dictionaries that are enclosed 
+ * 	in a curely braces or are in a file. 
+ *  
+ *  data entry format is: 
+ *  ```
+ *  entryName 	value;
+ *  ```
+ *  and a dictionary in a file can be: 
+ * ```
+ * entryName2  value2;
+ * 
+ * entryName3  value3;
+ * 
+ * subDict1
+ * {
+ *    entryName4 value4;
+ *   
+ *    ....
+ *   
+ * }
+ * 
+ * subDict2
+ * {
+ 	* ...
+ * }
+ * 
+ * ```
+ * 
+ */
 class dictionary
 :
 	public iEntry
@@ -43,39 +72,39 @@ protected:
 
 	//// - Data members
 
-		// global name of dictionary, separated with dots
+		/// global name of dictionary, separated with dots
 		word name_;
 
-		// all the entries (data and dictionary) of the current dictionary
+		/// all the entries (data and dictionary) of the current dictionary
 		wordOrderedMapPtr<iEntry> entries_;
 
-		// entries in order of insertion
+		/// entries in order of insertion
 		List<iEntry*> orderedEntries_;
 
-		// - ref to parrent dictionary
+		/// ref to parrent dictionary
 		const dictionary& parDict_;
 
 		bool isGlobal_;
 
 
-	//// - protected methods 
+	///// protected methods 
 
-		// - find an entry based on keyword
-		//   return nullptr if not found
+		/// find an entry based on keyword
+		///   return nullptr if not found
 		iEntry* findEntry(const word& keyword);
 
-		// - find and entry based on keyword
-		//   return nullptr if not found
+		/// find and entry based on keyword
+		///   return nullptr if not found
 		iEntry* findEntry(const word& keyword)const;
 
-		// - reads a dataEntry with keyword from dictionary
+		/// reads a dataEntry with keyword from dictionary
 		template<typename T>
 		bool readDataEntry( const word& keyword, T& val)const;
 
-		// - read dictionary from stream - without keyword
+		/// read dictionary from stream - without keyword
 		bool readDictionary(iIstream & is);
 
-		// - write dictionary to stream - with keyword
+		/// write dictionary to stream - with keyword
 		bool writeDictionary(iOstream& os, bool withBlock = true)const;
 	
 
@@ -88,184 +117,184 @@ public:
 
 	//// - Constructors
 
-		// - cunstructs a null dictionary
+		/// cunstructs a null dictionary
 		dictionary();
 
-		// - construct an empty dictionary with keyword
+		/// construct an empty dictionary with keyword
 		dictionary(const word& keyword);
 
-		// - construct an empty dictionary with keyword and make it global/fileDictionary (if true)
+		/// construct an empty dictionary with keyword and make it global/fileDictionary (if true)
 		dictionary(const word& keyword, bool global);
 
-		// - construct a dictionary with name and read it from file 
+		/// construct a dictionary with name and read it from file 
 		dictionary(const word& keyword, const fileSystem& file);
 
-		// - cunstruct an empty dictionary with keyword and parDict
+		/// cunstruct an empty dictionary with keyword and parDict
 		dictionary(const word& keyword, const dictionary& parDict);
 
-		// - cunstruct a dictionary with keyword and parDict and from stream
+		/// cunstruct a dictionary with keyword and parDict and from stream
 		dictionary( const word& keyword, const dictionary& parDict, iIstream& is);
 
-		// - copy construct with keyword and new parrent dict
-		//   discard the keyword and parDict of dict
+		/// copy construct with keyword and new parrent dict
+		/// discard the keyword and parDict of dict
 		dictionary(const word& keyword, const dictionary& parDict, const dictionary& dict);
 
-		// - copy construct as default behavior
-		// 	 entries_ are copied smoothly. set parrent dict to nullDict
+		/// copy construct as default behavior
+		/// entries_ are copied smoothly. set parrent dict to nullDict
 		dictionary(const dictionary& );
 
 
-		// - assignment preserve name of this dictionary 
-		// - only entries are transfered with ownership
+		/// assignment preserve name of this dictionary 
+		/// only entries are transfered with ownership
 		dictionary& operator=(const dictionary& rhs);
 
 
 	//// - Methods
 
-		// - pointer to this dictionary
+		/// pointer to this dictionary
 		virtual dictionary* dictPtr();
 		
-		// - pointer to this dictionary
+		/// pointer to this dictionary
 		virtual const dictionary* dictPtr() const;
 		
-		// - if this is a dictionary
+		/// if this is a dictionary
 		virtual bool isDictionary() const;
 
-		// - global name of entry, separated with dots
+		/// global name of entry, separated with dots
 		virtual word globalName()const;
 
-		// - const ref to parrent dictionary 
+		/// const ref to parrent dictionary 
 		virtual const dictionary& parrentDict() const;
 
-		// - ref to this dictionary, if it is a dictionary
+		/// ref to this dictionary, if it is a dictionary
 		virtual dictionary& dict();
 
-		// - const ref to this dictionary, if it is a dictionary
+		/// const ref to this dictionary, if it is a dictionary
 		virtual const dictionary& dict() const;
 
-		// - if dictionary is file dictionary, return false
+		/// if dictionary is file dictionary, return false
 		virtual bool isFileDict()const;
 
-		// - add a pointer entry (dictionary/dataEntry)
+		/// add a pointer entry (dictionary/dataEntry)
 		//   replaces this entry with existing one
 		bool addPtr(const word& keyword, uniquePtr<iEntry>& etry );
 
-		// - add a float dataEntry 
+		/// add a float dataEntry 
 		bool add(const word& keyword, const float& v);
 
-		// - add a double dataEntry
+		/// add a double dataEntry
 		bool add(const word& keyword, const double& v);
 
-		// - add a word dataEntry
+		/// add a word dataEntry
 		bool add(const word& keyword, const word& v);
 
-		// - add a int64 dataEntry
+		/// add a int64 dataEntry
 		bool add(const word& keyword, const int64& v);
 
-		// - add a int32 dataEntry
+		/// add a int32 dataEntry
 		bool add(const word& keyword, const int32& v);
 
-		// - add a int16 dataEntry
-		bool add(const word& keyword, const int16& v);
-
-		// - add a int8 dataEntry
+		/// add a int8 dataEntry
 		bool add(const word& keyword, const int8& v);
 
-		// - add a label dataEntry
-		bool add(const word& keyword, const label& v);
+		/// add a uint64 dataEntry
+		bool add(const word& keyword, const uint64& v);
 
-		// - add a uint32 dataEntry
+		/// add a uint32 dataEntry
 		bool add(const word& keyword, const uint32& v);
 
+		/// add a uint8 dataEntry
+		bool add(const word& keyword, const uint8& v);
+
 		// add a dictionary with the specifiedd keyword
 		bool addDict(const word& keyword, const dictionary& dict);
 
-		// - add a dataEntry of type T
+		/// add a dataEntry of type T
 		template<typename T>
 		bool add(const word& keyword, const T& v );
 
 
 		void clear();
 
-		// - pointer to a subdictionary 
-		//   fatalExit if not found
+		/// pointer to a subdictionary 
+		///  fatalExit if not found
 		dictionary* subDictPtr(const word& keyword);
 
-		// - ref to a subdictioanry 
-		//   fatalExit if not found 
+		/// ref to a subdictioanry 
+		///  fatalExit if not found 
 		dictionary& subDict(const word& keyword);
 
-		// - const ref to a subdictioanry 
-		//   fatalExit if not found 
+		/// const ref to a subdictioanry 
+		///  fatalExit if not found 
 		const dictionary& subDict(const word& keyword) const;
 
-		// - pointer to a dataEntry 
-		//   fatalExit if not found/not a dataEntry
+		/// pointer to a dataEntry 
+		///  fatalExit if not found/not a dataEntry
 		dataEntry* dataEntryPtr(const word& keyword);
 
-		// - ref to a subdictioanry 
-		//   fatalExit if not found/not a dataEntry 
+		/// ref to a subdictioanry 
+		///  fatalExit if not found/not a dataEntry 
 		dataEntry& dataEntryRef(const word& keyword);
 
-		// - const ref to a subdictioanry 
-		//   fatalExit if not found/not a dataEntry 
+		/// const ref to a subdictioanry 
+		///  fatalExit if not found/not a dataEntry 
 		const dataEntry& dataEntryRef(const word& keyword)const;
 
-		// - search for a sub-dict with keyword
-		//   create a new sub-dict if not found and return a ref to it
-		//   fatalExit if fails
+		/// search for a sub-dict with keyword
+		/// create a new sub-dict if not found and return a ref to it
+		/// fatalExit if fails
 		dictionary& subDictOrCreate(const word& keyword);
 		
-		// - get the value of data entry 
+		/// get the value of data entry 
 		template<typename T>
 		T getVal(const word& keyword) const;
 
-		// - get the value of data entry or 
-		//   if not found, set the value to setVal
+		/// get the value of data entry or 
+		/// if not found, set the value to setVal
 		template<typename T>
 		T getValOrSet(const word& keyword, const T& setVal)const;
 
-		// return number of entris in this dictionary
+		/// return number of entris in this dictionary
 		size_t numEntries()const;
 		
-		// return number of non-nullptr dataEntries
+		/// return number of non-nullptr dataEntries
 		size_t numDataEntries()const;
 
-		// return number of non-nullptr dictionaries
+		/// return number of non-nullptr dictionaries
 		size_t numDictionaries()const;
 
-		// return all keywords (non-nullptr) in this dictionary
+		/// return all keywords (non-nullptr) in this dictionary
 		wordList allKeywords()const;
 
-		// return a list of all dataEntries (non-nullptr) keywords
+		/// return a list of all dataEntries (non-nullptr) keywords
 		wordList dataEntryKeywords()const;
 
-		// return a list of all dictionary (non-null) keywords
+		/// return a list of all dictionary (non-null) keywords
 		wordList dictionaryKeywords()const;
 
-		// check if a sub-dictionary exists
+		/// check if a sub-dictionary exists
 		bool containsDictionay(const word& name)const;
 		
-		// check if a data entry exist
+		/// check if a data entry exist
 		bool containsDataEntry(const word& name)const;
 
-		// clone polymorphic object (here dictionary)
+		/// clone polymorphic object (here dictionary)
 		virtual uniquePtr<iEntry> clone() const;
 
 		virtual iEntry* clonePtr() const;
 
-		// - clone the polymorhpic object with parDict as the new parrent dictionary
+		/// clone the polymorhpic object with parDict as the new parrent dictionary
 		virtual uniquePtr<iEntry> clone(const dictionary& parDict)const;
 
 		virtual iEntry* clonePtr(const dictionary& parDict) const;
 
 
-	//// IO operations 
+	//// - IO operations 
 
-		// - read from stream
+		/// read from stream
 		virtual bool read(iIstream& is);
 
-		// - write to stream
+		/// write to stream
 		virtual bool write(iOstream& os) const;
 
 };
@@ -338,7 +367,8 @@ T dictionary::getValOrSet
 	}
 }
 
-}
+
+} // pFlow
 
 
 #endif // __dictionary_hpp__
diff --git a/src/phasicFlow/dictionary/entry/dataEntry.hpp b/src/phasicFlow/dictionary/entry/dataEntry.hpp
index 76a6d793..d7c29447 100644
--- a/src/phasicFlow/dictionary/entry/dataEntry.hpp
+++ b/src/phasicFlow/dictionary/entry/dataEntry.hpp
@@ -36,7 +36,15 @@ namespace pFlow
 
 class dictionary;
 
-
+/**
+ * Data entry to be used in dictionries. Its format is:
+ * 
+ * ```
+ * entryName   value;
+ * 
+ * entryName2  (list of values);
+ * ```
+ */
 class dataEntry
 :
 	public iEntry
@@ -46,19 +54,19 @@ protected:
 
 	//// - data memebers
 
-		// - ref to parrent dictionary
+		/// ref to parrent dictionary
 		const dictionary& parDict_;
 
-		// - list the tokens as input token stream
+		/// list the tokens as input token stream
 		iTstream tokenStream_;
 
 
 	//// - protected member functions
 
-		// - read dataEntry from stream
+		/// read dataEntry from stream
 		bool readDataEntry(iIstream& is);
 
-		// - write dataEntry to stream
+		/// write dataEntry to stream
 		bool writeDataEntry(iOstream& os) const;
 
 public:
@@ -67,57 +75,57 @@ public:
 
 	//// - constructors
 
-		// - construct null dataEntry
+		/// construct null dataEntry
 		dataEntry();
 
-		// - construct from keyword and parDict, empty dataEntry
+		/// construct from keyword and parDict, empty dataEntry
 		dataEntry(const word& keyword, const dictionary& parDict);
 
-		// - construct from keyword, parDict and input token stream
+		/// construct from keyword, parDict and input token stream
 		dataEntry(const word& keyWord, const dictionary& parDict, const iTstream& is);
 
 		//- construct from keyword, parDict and input stream
 		dataEntry(const word& keyWord, const dictionary& parDict, iIstream& is);
 		
-		// - construct from keyword, parDict and a single token
+		/// construct from keyword, parDict and a single token
 		dataEntry(const word& keyword, const dictionary& parDict, const token& tok);
 
-		// - construct from keyword, parDict, and data of type T
+		/// construct from keyword, parDict, and data of type T
 		template<typename T>
 		dataEntry(const word& keyword, const dictionary& parDict, const T& v);
 
-		// - copy construct with new keyword and parDict
+		/// copy construct with new keyword and parDict
 		dataEntry(const word& keyword, const dictionary& parDict, const dataEntry& entry );
 		
-		// - copy construct
+		/// copy construct
 		dataEntry(const dataEntry& src )= default;
 
 
 	//// - Methods
 	
-		// - global name of entry, separated with dots
+		/// global name of entry, separated with dots
 		virtual word globalName()const;
 
 		
-		// - access to token stream
+		/// access to token stream
 		virtual iTstream& stream();
 
-		// - not permited to be called
+		/// not permited to be called
 		virtual dictionary* dictPtr();
 		
-		// - not permited to be called
+		/// not permited to be called
 		virtual const dictionary* dictPtr() const;
 		
-		// - should returen false;
+		/// should returen false;
 		virtual bool isDictionary()const;
 		
-		// - const ref to parrent dictionary 
+		/// const ref to parrent dictionary 
 		virtual const dictionary& parrentDict() const;
 
-		// - not permited to be called
+		/// not permited to be called
 		virtual dictionary& dict();
 
-		// - not permited to be called
+		/// not permited to be called
 		virtual const dictionary& dict() const;
 
 		// clone the object
@@ -132,10 +140,10 @@ public:
 
 	//// - IO operations 
 
-		// - read from stream
+		/// read from stream
 		virtual bool read(iIstream& is);
 
-		// - write to stream
+		/// write to stream
 		virtual bool write(iOstream& os) const;
 
 };
diff --git a/src/phasicFlow/dictionary/entry/iEntry.hpp b/src/phasicFlow/dictionary/entry/iEntry.hpp
index c2e3bfa4..359131d4 100644
--- a/src/phasicFlow/dictionary/entry/iEntry.hpp
+++ b/src/phasicFlow/dictionary/entry/iEntry.hpp
@@ -35,6 +35,10 @@ namespace pFlow
 
 class dictionary;
 
+/**
+ *  Interface calss for data entry and dictionary  
+ * 
+ */
 class iEntry
 {
 
@@ -42,10 +46,10 @@ public:
 	
 	//// - public static methods
 
-		// - read a keyword from stream 
+		/// read a keyword from stream 
 		static bool readKeyword(iIstream &is, word& keyword, token& tok );
 
-		// - create an entry (dataEntry or dictionary) from stream 
+		/// create an entry (dataEntry or dictionary) from stream 
 		static bool createEntry(dictionary& parDict, iIstream& is, bool hasBlockToken = false);
 
 protected:
@@ -57,41 +61,42 @@ protected:
 
 public:
 	
-
+	/// Type info
 	TypeInfo("iEntry");
 
 	//// - Constructors
 
-		// - empty constructor
+		/// empty constructor
 		iEntry()
 		{}
 
-		// - construct with a keyword
+		/// construct with a keyword
 		iEntry(const word& key)
 		{
 			// this moved here due to a very strange core dumped error!
 			keyword_ = key;
 		}
 
-		// - destructor
+		/// destructor
 		virtual ~iEntry()
 		{}
 
 
 	//// - Methods
 
-		// - return keyword
+		/// return keyword
 		virtual const word& keyword() const
 		{
 			return keyword_;
 		}
 
-		// - return keyword
+		/// return keyword
 		virtual word& keyword()
 		{
 			return keyword_;
 		}
 
+		/// name/keyword of entry 
 		virtual word name()const
 		{
 			return keyword();
@@ -100,49 +105,50 @@ public:
 		// global name of entry, separated with dots
 		virtual word globalName()const = 0;
 
-		// - pointer to this dictionary
+		/// pointer to this dictionary
 		virtual dictionary* dictPtr()
 		{
 			return nullptr;
 		}
 
-		// - const pointer to this dictionary
+		/// const pointer to this dictionary
 		virtual const dictionary* dictPtr() const
 		{
 			return nullptr;
 		}
 
-		// - if this is a dictionary
+		/// if this is a dictionary
 		virtual bool isDictionary() const
 		{
 			return false;
 		}
 
-		// - const ref to parrent dictionary 
+		/// const ref to parrent dictionary 
 		virtual const dictionary& parrentDict() const = 0;
 		
-		// - ref to this dictionary, if it is a dictionary
+		/// ref to this dictionary, if it is a dictionary
 		virtual dictionary& dict() = 0;
 
-		// - const ref to this dictionary, if it is a dicrionary
+		/// const ref to this dictionary, if it is a dicrionary
 		virtual const dictionary& dict() const = 0;
 
-		// clone the object
+		/// clone the object
 		virtual iEntry* clonePtr() const = 0;
 
 		virtual uniquePtr<iEntry> clone() const = 0;
 
-		// clone the object and change its ownership to parDict 
+		/// clone the object and change its ownership to parDict 
 		virtual iEntry* clonePtr(const dictionary& parDict) const = 0;
 
+		/// clone the object and change its ownership to parDict 
 		virtual uniquePtr<iEntry> clone(const dictionary& parDict)const = 0;
 
 	//// - IO operatoins
 
-		// read from stream
+		/// read from stream
 		virtual bool read(iIstream& is) = 0;
 
-		// write to stream
+		/// write to stream
 		virtual bool write(iOstream& os) const =0;
 
 };
@@ -150,11 +156,10 @@ public:
 
 iOstream& operator << (iOstream& os, const iEntry& e);
 
-
 iIstream& operator >> (iIstream& is, iEntry& e);
 
 
-}
+} // pFlow
 
 
 #endif //__iEntry_hpp__

From 6248903236a4eaa407ba8e148c62d6760f71488b Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 1 Oct 2023 20:10:48 +0330
Subject: [PATCH 08/60] gitignor updated

---
 .gitignore | 1 +
 1 file changed, 1 insertion(+)

diff --git a/.gitignore b/.gitignore
index d18b66f0..14a0ebe3 100644
--- a/.gitignore
+++ b/.gitignore
@@ -38,6 +38,7 @@ bin/**
 lib/**
 test*/**
 **/**notnow
+MPIParallel*/**
 doc/code-documentation/
 doc/DTAGS
 # all possible time folders

From a14ce9f2bfbb95756cef48b6cf66b3f2b88f190e Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 1 Oct 2023 20:18:10 +0330
Subject: [PATCH 09/60] corrections

---
 src/MPIParallelization/CMakeLists.txt   |  33 -------
 src/MPIParallelization/partitioning.cpp |  92 --------------------
 src/MPIParallelization/partitioning.hpp | 110 ------------------------
 3 files changed, 235 deletions(-)
 delete mode 100644 src/MPIParallelization/CMakeLists.txt
 delete mode 100644 src/MPIParallelization/partitioning.cpp
 delete mode 100644 src/MPIParallelization/partitioning.hpp

diff --git a/src/MPIParallelization/CMakeLists.txt b/src/MPIParallelization/CMakeLists.txt
deleted file mode 100644
index 3bac9dbb..00000000
--- a/src/MPIParallelization/CMakeLists.txt
+++ /dev/null
@@ -1,33 +0,0 @@
-#add Zoltan
-set(Zoltan_Install_DIR)
-if(DEFINED ENV{Zoltan_DIR})
-   set(Zoltan_Install_DIR $ENV{Zoltan_DIR}/build)
-else()
-  set(Zoltan_Install_DIR $ENV{HOME}/PhasicFlow/Zoltan/build)
-endif()
-message(STATUS "Zoltan install directory is ${Zoltan_Install_DIR}")
-
-set(ZOLTAN_PREFIX "${Zoltan_Install_DIR}" CACHE STRING "Zoltan install directory")
-
-find_path(ZOLTAN_INCLUDE_DIR zoltan.h PATHS "${ZOLTAN_PREFIX}/include")
-
-message(STATUS "Zoltan include path: ${ZOLTAN_INCLUDE_DIR}")
-
-find_library(ZOLTAN_LIBRARY zoltan PATHS "${ZOLTAN_PREFIX}/lib")
-message(STATUS "Zoltan lib path: ${ZOLTAN_LIBRARY}")
-
-
-set(SourceFiles partitioning)
-
-set(link_libs Kokkos::kokkos phasicFlow PRIVATE MPI::MPI_CXX ${ZOLTAN_LIBRARY} -lm )
-
-pFlow_add_library_install(MPIParallelization SourceFiles link_libs)
-target_include_directories(MPIParallelization PRIVATE ${ZOLTAN_INCLUDE_DIR})
-
-
-
-
-
-
-
-
diff --git a/src/MPIParallelization/partitioning.cpp b/src/MPIParallelization/partitioning.cpp
deleted file mode 100644
index a786a89c..00000000
--- a/src/MPIParallelization/partitioning.cpp
+++ /dev/null
@@ -1,92 +0,0 @@
-
-#include "zoltan_cpp.h"
-
-#include "partitioning.hpp"
-#include "error.hpp"
-#include "streams.hpp"
-
-void pFlow::partitioning::freeZoltan()
-{
-	if(validPointers_)
-	{
-		Zoltan::LB_Free_Part(&importGlobalGids_, &importLocalGids_, 
-                      	 	 &importProcs_, &importToPart_);
-
-		Zoltan::LB_Free_Part(&exportGlobalGids_, &exportLocalGids_, 
-                      		 &exportProcs_, &exportToPart_);
-        validPointers_ = false;
-	}
-	
-	zoltan_.release();
-}
-
-
-pFlow::partitioning::partitioning(int argc, char *argv[], const box& globalBox)
-:
-	globalBox_(globalBox)
-{
-	if(!zoltanInitialized__)
-	{
-		auto rc = Zoltan_Initialize(argc, argv, &version_);
-		if (rc != ZOLTAN_OK)
-		{
-			fatalErrorInFunction<<"Cannot initialize zoltan"<<endl;
-			fatalExit;
-		}
-		zoltanInitialized__ = true;
-	}
-
-	// Creates Zoltan object 
-	zoltan_ = std::make_unique<Zoltan>(MPI::COMM_WORLD);
-
-	zoltan_->Set_Param("DEBUG_LEVEL", "0");
-  	zoltan_->Set_Param("LB_METHOD", "RCB");
-  	zoltan_->Set_Param("NUM_GID_ENTRIES", "1"); 
-  	zoltan_->Set_Param("NUM_LID_ENTRIES", "1");
-  	zoltan_->Set_Param("OBJ_WEIGHT_DIM", "0");
-    zoltan_->Set_Param("RETURN_LISTS", "ALL");
-	
-}
-
-pFlow::partitioning::~partitioning()
-{
-	freeZoltan();
-}
-
-void pFlow::partitioning::printBox()const
-{
-	pOutput<< "localBox:" << localBox_<<endl;
-}
-
-
- 
-/*int partitioning::getNumberOfPoints(void *data, int *ierr)
-{
-	auto* obj = static_cast<pointCollection *>(data);
-
-	*ierr = ZOLTAN_OK;
-
-	return obj->numberOfPOints();
-}
-
-
-void partitioning::getPointList(
-	void *data, 
-	int sizeGID, 
-	int sizeLID,
-    ZOLTAN_ID_PTR globalID, 
-    ZOLTAN_ID_PTR localID,
-    int wgt_dim, 
-    float *obj_wgts, 
-    int *ierr)
-{
-		
-	auto* obj = static_cast<pointCollection *>(data);
-	*ierr = ZOLTAN_OK;
-
-	for (int i=0; i< obj->numberOfPOints(); i++)
-	{
-		globalID[i] = obj->globalIDList()[i];
-		localID[i] = i;
-	}
-}*/
\ No newline at end of file
diff --git a/src/MPIParallelization/partitioning.hpp b/src/MPIParallelization/partitioning.hpp
deleted file mode 100644
index 5d6da480..00000000
--- a/src/MPIParallelization/partitioning.hpp
+++ /dev/null
@@ -1,110 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#ifndef __rcbPartitioning_hpp__
-#define __rcbPartitioning_hpp__
-
-#include "box.hpp"
-#include "processors.hpp"
-
-
-
-namespace pFlow
-{
-
-class Zoltan;
-
-
-class partitioning
-{
-
-protected:
-
-	float 					version_ 	= 0.0;
-
-	std::unique_ptr<Zoltan> zoltan_ 	= nullptr;
-
-	bool					validPointers_ = false;
-
-	const box& 				globalBox_;
-
-	box 					localBox_; 	
-
-	int32 	changes_, numImport_, numExport_;
-  	
-  	id_t* importGlobalGids_, importLocalGids_, exportGlobalGids_, exportLocalGids_; 
-  	
-  	int32*importProcs_, *importToPart_, *exportProcs_, *exportToPart_;
-
-	static inline bool 		zoltanInitialized__ = false;
-
-	void freeZoltan();
-
-public:
-
-	partitioning(int argc, char *argv[], const box& globalBox);
-
-	virtual 
-	~partitioning();
-
-		
-	virtual 
-	bool partition() = 0;
-
-	inline
-	auto localBox()const
-	{
-		return localBox_;
-	}
-
-	inline
-	const auto& globalBox()const
-	{
-		return globalBox_;
-	}
-
-	inline 
-	bool partitionsChanged()const
-	{
-		return changes_ == 1;
-	}
-
-	void printBox()const;
-
-	/*static 
-	int getNumberOfPoints(void *data, int32 *ierr);
-
-	static 
-	void getPointList(
-		void *data, 
-		int32 sizeGID, 
-		int32 sizeLID,
-        id_t* globalID, 
-        id_t* localID,
-        int32 wgt_dim, 
-        float *obj_wgts, 
-        int32 *ierr);*/
-};
-
-
-}
-
-
-#endif //__rcbPartitioning_hpp__
\ No newline at end of file

From 34e3f5587bd620c3ebc3e929484e98b3cdb50b44 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 1 Oct 2023 20:20:18 +0330
Subject: [PATCH 10/60] correction gitignore

---
 .gitignore | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/.gitignore b/.gitignore
index 14a0ebe3..54081c4f 100644
--- a/.gitignore
+++ b/.gitignore
@@ -38,7 +38,7 @@ bin/**
 lib/**
 test*/**
 **/**notnow
-MPIParallel*/**
+**/MPIParallel*/**
 doc/code-documentation/
 doc/DTAGS
 # all possible time folders

From 6e5fe608c684886c4910b521d947d26632c416d2 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Tue, 3 Oct 2023 11:15:09 +0330
Subject: [PATCH 11/60] Kokkos folder updated

---
 src/phasicFlow/Kokkos/KokkosTypes.hpp         | 102 +++---
 src/phasicFlow/Kokkos/KokkosUtilities.hpp     |  98 ++++--
 src/phasicFlow/Kokkos/Range.hpp               | 149 +++++++++
 src/phasicFlow/Kokkos/ViewAlgorithms.hpp      | 312 ++++++------------
 ...gorithmsFwd.hpp => baseAlgorithmsFwd_.hpp} |   0
 ...baseAlgorithms.hpp => baseAlgorithms_.hpp} |  11 -
 src/phasicFlow/Kokkos/phsicFlowKokkos.hpp     |  30 ++
 .../algorithms/algorithmFunctions.hpp         |  31 --
 src/phasicFlow/processors/processors.cpp      |   9 +-
 9 files changed, 417 insertions(+), 325 deletions(-)
 create mode 100644 src/phasicFlow/Kokkos/Range.hpp
 rename src/phasicFlow/Kokkos/{baseAlgorithmsFwd.hpp => baseAlgorithmsFwd_.hpp} (100%)
 rename src/phasicFlow/Kokkos/{baseAlgorithms.hpp => baseAlgorithms_.hpp} (96%)
 create mode 100644 src/phasicFlow/Kokkos/phsicFlowKokkos.hpp

diff --git a/src/phasicFlow/Kokkos/KokkosTypes.hpp b/src/phasicFlow/Kokkos/KokkosTypes.hpp
index 4f59872f..3d8cac38 100644
--- a/src/phasicFlow/Kokkos/KokkosTypes.hpp
+++ b/src/phasicFlow/Kokkos/KokkosTypes.hpp
@@ -17,133 +17,139 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
 #ifndef __KokkosTypes_hpp__
 #define __KokkosTypes_hpp__
 
+/**
+ *  \file KokkosType.hpp
+ * 
+ * 	\brief name aliases and typedesf for Kokkos entities that are 
+ * frequently used in PhasicFlow.
+ * 
+ */
+
 
 #include <Kokkos_Core.hpp>
 #include <Kokkos_DualView.hpp>
 #include <Kokkos_UnorderedMap.hpp>
 
-#include "iOstream.hpp"
+#include "builtinTypes.hpp"
 
 
 namespace pFlow
 {
 
+///********DEP
 class DeviceSide{};
 class HostSide{};
 
 template<typename side>
 struct selectSide{};
+/*********///
 
-using HostSpace 					= Kokkos::HostSpace;
-using Serial 						= Kokkos::Serial;
+/// Host memory space 
+using HostSpace 	= Kokkos::HostSpace;
+
+/// Serial execution space 
+using Serial 		= Kokkos::Serial;
 
 #ifdef _OPENMP
-using OpenMP 						= Kokkos::OpenMP;
+/// OpenMp execution space 
+using OpenMP 		= Kokkos::OpenMP;
 #endif
 
+#ifdef __CUDACC__
+/// Cuda execution space 
+using Cuda 			= Kokkos::Cuda;
+#endif
+
+/// Default Host execution space, on top of all host execution spaces 
 using DefaultHostExecutionSpace 	= Kokkos::DefaultHostExecutionSpace;
+
+/// Default execution space, it can be device exe. space, if a device space is 
+/// activated. 
 using DefaultExecutionSpace 		= Kokkos::DefaultExecutionSpace;
 
 
-
+/// Pair of two variables
 template<typename T1, typename T2>
-	using kPair = Kokkos::pair<T1,T2>;
-
-template<typename T>
-	using kRange = kPair<T,T>;
-
-using range = kRange<int>;
-
-using range64 = kRange<int long>;
+using Pair 	= Kokkos::pair<T1,T2>;
 
+/// View for a scalar
 template<typename T, typename... properties>
 	using ViewTypeScalar = Kokkos::View<T,properties...>;
 
+/// 1D veiw as a vector 
 template<typename T, typename... properties>
 	using ViewType1D = Kokkos::View<T*,properties...>;
 
+/// 2D view as an array
 template<typename T, typename... properties>
-	using DualViewType1D = Kokkos::DualView<T*,properties...>;
+	using ViewType2D = Kokkos::View<T**,properties...>;
 
+/// 3D view as an array
 template<typename T, typename... properties>
 	using ViewType3D = Kokkos::View<T***,properties...>;
 
+/// 1D dual view as a vector 
+template<typename T, typename... properties>
+	using DualViewType1D = Kokkos::DualView<T*,properties...>;
+
+/// unordered map
 template<typename Key, typename Value, typename... properties>
 	using unorderedMap = Kokkos::UnorderedMap<Key, Value, properties...>;
 
+/// unordered set 
 template<typename Key, typename... properties>
 	using unorderedSet = Kokkos::UnorderedMap<Key, void, properties...>;
 
-template<typename Key, typename Value>
-	using deviceHashMap= Kokkos::UnorderedMap<Key, Value>;
-
-template<typename Key, typename Value>
-	using hostHashMap= Kokkos::UnorderedMap<Key, Value, Kokkos::HostSpace>;
-
-template<typename Key>
-	using deviceHashSet= Kokkos::UnorderedMap<Key, void>;
-
-template<typename Key>
-	using hostHashSet  = Kokkos::UnorderedMap<Key,void, Kokkos::HostSpace>;
-
-// a 1D array (vector) with default device (memory space and execution space)
+/// Scalar on device 
 template<typename T>
 	using deviceViewTypeScalar = Kokkos::View<T>;
 
+/// 1D array (vector) with default device (memory space and execution space)
 template<typename T>
 	using deviceViewType1D = Kokkos::View<T*>;
 
+/// 2D view on device as an array on device 
 template<typename T, typename Layout=void>
 	using deviceViewType2D = Kokkos::View<T**,Layout, void>;
 
+/// 3D view on device as an array on device 
+template<typename T, typename Layout=void>
+	using deviceViewType3D = Kokkos::View<T***,Layout, void>;
+
+
 
-// a 1D array (vector with host memeory space)
 template<typename T>
 	using hostViewTypeScalar = Kokkos::View<T, Kokkos::HostSpace>;
 
+/// 1D array (vector with host memeory space)
 template<typename T>
 	using hostViewType1D = Kokkos::View<T*, Kokkos::HostSpace>;
 
+/// 2D array on host 
 template<typename T, typename Layout=void>
 	using hostViewType2D = Kokkos::View<T**,Layout, Kokkos::HostSpace>;
 
-
-#ifdef __CUDACC__
-using Cuda 							= Kokkos::Cuda;
-template<typename T>
-	using cudaViewTypeScalar = Kokkos::View<T, Kokkos::CudaSpace>;
-
-template<typename T>
-	using cudaViewType1D = Kokkos::View<T*, Kokkos::CudaSpace>;
-
+/// 3D array on host
 template<typename T, typename Layout=void>
-	using cudaViewType2D = Kokkos::View<T*,Layout, Kokkos::CudaSpace>;
-#endif
-
+	using hostViewType3D = Kokkos::View<T***,Layout, Kokkos::HostSpace>;
 
+/// 1D vector on device with atomic capabilities
 template<typename T>
 using deviceAtomicViewType1D = 
     Kokkos::View<
 		T*,
 		Kokkos::MemoryTraits<std::is_same<DefaultExecutionSpace,Serial>::value?0:Kokkos::Atomic>>;
 
+/// 3D array on device with atomic capabilities
 template<typename T>
 using deviceAtomicViewType3D =
 	Kokkos::View<
 	T***,
 	Kokkos::MemoryTraits<std::is_same<DefaultExecutionSpace,Serial>::value?0:Kokkos::Atomic>>;
 
-template<typename T>
-iOstream& operator <<(iOstream& os, const kRange<T>& rng)
-{
-	os<<"["<<rng.first<<" "<<rng.second<<")";
-	return os;
-}
-
 
 } // pFlow
 
diff --git a/src/phasicFlow/Kokkos/KokkosUtilities.hpp b/src/phasicFlow/Kokkos/KokkosUtilities.hpp
index 34e6aa2f..1b42bba7 100644
--- a/src/phasicFlow/Kokkos/KokkosUtilities.hpp
+++ b/src/phasicFlow/Kokkos/KokkosUtilities.hpp
@@ -25,7 +25,7 @@ Licence:
 #include "KokkosTypes.hpp"
 #include "pFlowMacros.hpp"
 #include "types.hpp"
-
+#include "iOstream.hpp"
 
 namespace pFlow
 {
@@ -37,6 +37,14 @@ bool constexpr isHostAccessible()
 	return Kokkos::SpaceAccessibility<ExecutionSpace,HostSpace>::accessible;
 }
 
+template<typename ExecutionSpace>
+INLINE_FUNCTION_H
+bool constexpr isDeviceAccessible()
+{
+	return Kokkos::SpaceAccessibility<ExecutionSpace,DefaultExecutionSpace>::accessible;
+}
+
+/// Is MemoerySpace accessible from ExecutionSpace
 template<typename ExecutionSpace, typename MemoerySpace>
 INLINE_FUNCTION_H
 bool constexpr areAccessible()
@@ -48,9 +56,9 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void realloc( ViewType1D<Type,Properties...>& view, int32 len)
+void reallocInit( ViewType1D<Type,Properties...>& view, int32 len)
 {
-	Kokkos::realloc(view, len);
+	Kokkos::realloc(Kokkos::WithoutInitializing, view, len);	
 }
 
 template <
@@ -59,14 +67,7 @@ template <
 INLINE_FUNCTION_H
 void reallocNoInit(ViewType1D<Type,Properties...>& view, int32 len)
 {
-	using ViewType = ViewType1D<Type,Properties...>;
-	word vl = view.label();
-	view = ViewType();  // Deallocate first
-  	view = ViewType( 
-  		Kokkos::view_alloc(
-  			Kokkos::WithoutInitializing,
-  			vl), 
-  		len);
+	Kokkos::realloc(Kokkos::WithoutInitializing, view, len);
 }
 
 template <
@@ -79,12 +80,39 @@ void reallocFill( ViewType1D<Type,Properties...>& view, int32 len, Type val)
 	Kokkos::deep_copy(view, val);
 }
 
+template <
+	typename Type,
+	typename... Properties>
+INLINE_FUNCTION_H
+void reallocInit( ViewType2D<Type,Properties...>& view, int32 len1, int32 len2)
+{
+	Kokkos::realloc(view, len1, len2);
+}
 
 template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void realloc( ViewType3D<Type,Properties...>& view, int32 len1, int32 len2, int32 len3)
+void reallocNoInit(ViewType2D<Type,Properties...>& view, int32 len1, int32 len2)
+{	
+  	Kokkos::realloc(Kokkos::WithoutInitializing, view, len1, len2);
+}
+
+template <
+	typename Type,
+	typename... Properties>
+INLINE_FUNCTION_H
+void reallocFill( ViewType2D<Type,Properties...>& view, int32 len1, int32 len2, Type val)
+{
+	reallocNoInit(view, len1, len2);
+	Kokkos::deep_copy(view, val);
+}
+
+template <
+	typename Type,
+	typename... Properties>
+INLINE_FUNCTION_H
+void reallocInit( ViewType3D<Type,Properties...>& view, int32 len1, int32 len2, int32 len3)
 {
 	Kokkos::realloc(view, len1, len2, len3);
 }
@@ -95,14 +123,8 @@ template <
 INLINE_FUNCTION_H
 void reallocNoInit(ViewType3D<Type,Properties...>& view, int32 len1, int32 len2, int32 len3)
 {
-	using ViewType = ViewType3D<Type,Properties...>;
-	word vl = view.label();
-	view = ViewType();  // Deallocate first
-  	view = ViewType( 
-  		Kokkos::view_alloc(
-  			Kokkos::WithoutInitializing,
-  			vl), 
-  		len1, len2, len3);
+	
+  	Kokkos::realloc(Kokkos::WithoutInitializing, view, len1, len2, len3);
 }
 
 template <
@@ -115,14 +137,44 @@ void reallocFill( ViewType3D<Type,Properties...>& view, int32 len1, int32 len2,
 	Kokkos::deep_copy(view, val);
 }
 
+template <
+	typename Type,
+	typename... Properties>
+INLINE_FUNCTION_H
+void resizeInit(ViewType1D<Type,Properties...>& view, int32 newLen)
+{
+	Kokkos::resize(view, newLen);
+}
+
+template <
+	typename Type,
+	typename... Properties>
+INLINE_FUNCTION_H
+void resizeNoInit(ViewType1D<Type,Properties...>& view, int32 newLen)
+{
+	Kokkos::resize(Kokkos::WithoutInitializing, view, newLen);
+}
 
 template<typename ViewType>
 INLINE_FUNCTION_H
 void swapViews(ViewType& v1, ViewType &v2)
 {
-	auto tmp = v1;
-	v1 = v2;
-	v2 = tmp;
+	static_assert(
+      std::is_move_assignable<ViewType>::value && std::is_move_constructible<ViewType>::value,
+      "swapViews arguments must be move assignable and move constructible");
+
+	ViewType tmp = std::move(v1);
+  	v1     = std::move(v2);
+  	v2     = std::move(tmp);
+}
+
+
+template<typename T1, typename T2>
+INLINE_FUNCTION_H
+iOstream& operator <<(iOstream& os, const Pair<T1,T2>& p)
+{
+	os<<'('<<p.first<<" "<<p.second<<')';
+	return os;
 }
 
 } // pFlow
diff --git a/src/phasicFlow/Kokkos/Range.hpp b/src/phasicFlow/Kokkos/Range.hpp
new file mode 100644
index 00000000..35b1babe
--- /dev/null
+++ b/src/phasicFlow/Kokkos/Range.hpp
@@ -0,0 +1,149 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __Range_hpp__
+#define __Range_hpp__
+
+
+
+
+#include <Kokkos_Core.hpp>
+
+#include "pFlowMacros.hpp"
+#include "typeInfo.hpp"
+#include "builtinTypes.hpp"
+#include "iOstream.hpp"
+
+
+namespace pFlow
+{
+
+
+/**
+ * Range for elements in an vector [start,end)
+ *  
+ */
+template<typename T>
+struct Range
+:
+public Kokkos::pair<T,T>
+{
+	using Pair = Kokkos::pair<T,T>;
+
+	TypeInfoTemplateNV("Range", T)
+
+	//// - Constructors
+
+		/// Default
+		INLINE_FUNCTION_HD
+		Range(){}
+
+		/// From end, set start to 0
+		INLINE_FUNCTION_HD
+		Range(const T& e)
+		:
+			Range(0,e)
+		{}
+		
+		/// From componeents
+		INLINE_FUNCTION_HD
+		Range(const T& s, const T& e)
+		:
+			Range::Pair(s,e)
+		{}
+
+		/// From pair
+		INLINE_FUNCTION_HD
+		Range(const Range::Pair &src )
+		:
+			Range::Pair(src)
+		{}
+
+		/// Copy
+		INLINE_FUNCTION_HD
+		Range(const Range&) = default;
+
+		/// Move
+		INLINE_FUNCTION_HD
+		Range(Range&&) = default;
+
+		/// Copy assignment
+		INLINE_FUNCTION_HD
+		Range& operator=(const Range&) = default;
+
+		/// Move assignment
+		INLINE_FUNCTION_HD
+		Range& operator=(Range&&) = default;
+
+		/// Destructor
+		INLINE_FUNCTION_HD
+		~Range()=default;
+
+	//// - Methods
+
+		/// Start
+		INLINE_FUNCTION_HD
+		T& start()
+		{
+			return this->first;
+		}
+
+		/// End
+		INLINE_FUNCTION_HD
+		T& end()
+		{
+			return this->second;
+		}
+
+		INLINE_FUNCTION_HD
+		const T& start()const
+		{
+			return this->first;
+		}
+
+		INLINE_FUNCTION_HD
+		const T& end()const
+		{
+			return this->second;
+		}
+
+		INLINE_FUNCTION_HD
+		T numElements()
+		{
+			return end()-start();
+		}
+
+};
+
+template<typename T>
+INLINE_FUNCTION_H
+iOstream& operator <<(iOstream& os, const Range<T>& rng)
+{
+	os<<"["<<rng.start()<<" "<<rng.end()<<")";
+	return os;
+}
+
+using range32 	= Range<int32>;
+
+using range64 	= Range<int64>;
+
+
+} // pFlow
+
+#endif  //__KokkosTypes_hpp__
diff --git a/src/phasicFlow/Kokkos/ViewAlgorithms.hpp b/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
index 2e94cc3c..112569c6 100644
--- a/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
+++ b/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
@@ -23,7 +23,9 @@ Licence:
 
 
 #include "numericConstants.hpp"
+#include "Range.hpp"
 #include "KokkosUtilities.hpp"
+
 #include "kokkosAlgorithms.hpp"
 #include "stdAlgorithms.hpp"
 #include "cudaAlgorithms.hpp"
@@ -31,9 +33,6 @@ Licence:
 
 namespace pFlow
 { 	
-
-inline const size_t maxSizeToSerial__ = 64;
-
 template<typename T, typename... properties>
 INLINE_FUNCTION_H
 int32 count(
@@ -42,25 +41,17 @@ int32 count(
 	int32 end,
 	const T& val)
 {
+	
 	using ExecutionSpace = typename ViewType1D<T, properties...>::execution_space;
 	
 	int32 numElems = end-start;
 
-	if constexpr( isHostAccessible<ExecutionSpace>())
-	{
-		if(numElems<maxSizeToSerial__)
-		{
-			return pFlow::algorithms::STD::count<T,false>(
-				view.data()+start,
-				numElems,
-				val);
-		}
-	}
-
-	return  pFlow::algorithms::KOKKOS::count<T, ExecutionSpace>(
-			view.data()+start,
-			numElems,
-			val);
+	return  pFlow::algorithms::KOKKOS::count<T, ExecutionSpace>
+	(
+		view.data()+start,
+		numElems,
+		val
+	);
 }	
 
 template<typename T, typename... properties>
@@ -68,26 +59,10 @@ INLINE_FUNCTION_H
 void fill
 (
 	ViewType1D<T, properties...>& view,
-	range span,
+	range32 span,
 	T val
 )
 {
-	using ExecutionSpace = typename ViewType1D<T, properties...>::execution_space;
-
-
-	if constexpr( isHostAccessible<ExecutionSpace>())
-	{
-		int32 numElems = span.second-span.first;
-		if( numElems<maxSizeToSerial__)
-		{
-			pFlow::algorithms::STD::fill<T,false>(
-				view.data()+span.first,
-				numElems,
-				val);
-			return;
-		}
-	}
-
 	auto subV = Kokkos::subview(view, span);
 	Kokkos::deep_copy(subV, val);
 }
@@ -101,7 +76,7 @@ void fill
 	T val
 )
 {
-	fill(view, range(start,end),val);
+	fill(view, range32(start,end),val);
 }
 
 template<
@@ -118,18 +93,6 @@ void fillSequence(
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
 	int32 numElems = end-start;
 
-	if constexpr( isHostAccessible<ExecutionSpace>())
-	{
-		if(numElems<maxSizeToSerial__)
-		{ 
-			pFlow::algorithms::STD::fillSequence<Type,false>(
-				view.data()+start,
-				numElems,
-				startVal);
-			return ;
-		}
-	}
-
 	pFlow::algorithms::KOKKOS::fillSequence<Type, ExecutionSpace>(
 			view.data()+start,
 			numElems,
@@ -144,33 +107,22 @@ template<
 	typename... properties,
 	typename indexType,
 	typename... indexProperties>
-bool fillSelected(
+bool fillSelected
+(
 	ViewType1D<Type, properties...> view,
 	const ViewType1D<indexType, indexProperties...> indices,
 	const int32 numElems,
-	const Type val,
-	typename std::enable_if_t<
-		areAccessible<
+	const Type val
+)
+{
+	static_assert(
+      areAccessible<
 			typename ViewType1D<Type, properties...>::execution_space,
 			typename ViewType1D<indexType, indexProperties...>::memory_space>(),
-		bool> = true )
-{
+      "In fillSelected arguments view and indices must have similar spaces");
 
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
 	
-	if constexpr( isHostAccessible<ExecutionSpace>())
-	{
-		if(numElems<maxSizeToSerial__)
-		{ 
-			pFlow::algorithms::STD::fillSelected<Type,indexType,false>(
-				view.data(),
-				indices.data(),
-				numElems,
-				val);
-			return true;
-		}
-	}
-
 	pFlow::algorithms::KOKKOS::fillSelected<Type, indexType, ExecutionSpace>(
 			view.data(),
 			indices.data(),
@@ -185,39 +137,21 @@ template<
 	typename... properties,
 	typename indexType,
 	typename... indexProperties>
-	//typename valType> //,
-	//typename... valProperties>
 bool fillSelected(
 	ViewType1D<Type, properties...> view,
 	const ViewType1D<indexType, indexProperties...> indices,
-	const ViewType1D<Type, indexProperties...> vals,
-	const int32 numElems ,
-	typename std::enable_if_t<
-		areAccessible<
+	const ViewType1D<Type, properties...> vals,
+	const int32 numElems )
+{
+
+	static_assert(
+      areAccessible<
 			typename ViewType1D<Type, properties...>::execution_space,
 			typename ViewType1D<indexType, indexProperties...>::memory_space>(),
-		bool> = true )
-{
+      "In fillSelected arguments view and indices must have similar spaces");
 
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
 	
-
-
-	if constexpr( isHostAccessible<ExecutionSpace>())
-	{
-		if(numElems<maxSizeToSerial__)
-		{ 
-			pFlow::algorithms::STD::fillSelected<Type,indexType,false>(
-				view.data(),
-				indices.data(),
-				vals.data(),
-				numElems
-				);
-			return true;
-		}
-	}
-
-
 	pFlow::algorithms::KOKKOS::fillSelected<Type, indexType, ExecutionSpace>(
 			view.data(),
 			indices.data(),
@@ -240,19 +174,7 @@ T min(
 	using ExecutionSpace = typename ViewType1D<T, properties...>::execution_space;
 	
 	int32 numElems = end-start;
-
-	if constexpr( isHostAccessible<ExecutionSpace>())
-	{
-		if(numElems<maxSizeToSerial__)
-		{
-			return 
-			pFlow::algorithms::STD::min<T,false>(
-				view.data()+start,
-				numElems);
-		}
-	}
-
-	return  
+ 
 	pFlow::algorithms::KOKKOS::min<T, ExecutionSpace>(
 		view.data()+start,
 		numElems);
@@ -270,17 +192,6 @@ T max(
 	
 	int32 numElems = end-start;
 
-	if constexpr( isHostAccessible<ExecutionSpace>())
-	{
-		if(numElems<maxSizeToSerial__)
-		{
-			return 
-			pFlow::algorithms::STD::max<T,false>(
-				view.data()+start,
-				numElems);
-		}
-	}
-
 	return  
 	pFlow::algorithms::KOKKOS::max<T, ExecutionSpace>(
 		view.data()+start,
@@ -316,8 +227,8 @@ void copy(
 	)
 {
 
-	range sSpan(sStart,sEnd);
-	range dSpan(dStart,dStart+(sEnd-sStart));
+	range32 sSpan(sStart,sEnd);
+	range32 dSpan(dStart,dStart+(sEnd-sStart));
 	
 	auto srcSub = Kokkos::subview(src, sSpan);
 	auto dstSub = Kokkos::subview(dst, dSpan);
@@ -336,7 +247,7 @@ void getNth(
 	const int32 n
 	)
 {
-	range span(n,n+1);
+	range32 span(n,n+1);
 	auto subV = Kokkos::subview(src, span);
 	hostViewType1D<dType> dstView("getNth",1);
 	Kokkos::deep_copy(dstView,subV);
@@ -351,27 +262,16 @@ void sort(
 	int32 start,
 	int32 end)
 {
-
 	using ExecutionSpace = typename ViewType1D<T, properties...>::execution_space;
 	
 	int32 numElems = end-start;
 
 	if constexpr( isHostAccessible<ExecutionSpace>())
-	{
-		if(numElems<maxSizeToSerial__)
-		{
-			pFlow::algorithms::STD::sort<T,false>(
-				view.data()+start,
-				numElems);
-			return;
-		}
-		else
-		{
-			pFlow::algorithms::STD::sort<T,true>(
-				view.data()+start,
-				numElems);
-			return;
-		}
+	{		
+		pFlow::algorithms::STD::sort<T,true>(
+			view.data()+start,
+			numElems);
+		return;
 	}
 
 #ifdef __CUDACC__
@@ -402,22 +302,11 @@ void sort(
 
 	if constexpr( isHostAccessible<ExecutionSpace>())
 	{
-		if(numElems<maxSizeToSerial__)
-		{
-			pFlow::algorithms::STD::sort<T,CompareFunc,false>(
-				view.data()+start,
-				numElems,
-				compare);
-			return;
-		}
-		else
-		{
-			pFlow::algorithms::STD::sort<T,CompareFunc,true>(
-				view.data()+start,
-				numElems,
-				compare);
-			return;
-		}
+		pFlow::algorithms::STD::sort<T,CompareFunc,true>(
+			view.data()+start,
+			numElems,
+			compare);
+		return;	
 	}
 
 #ifdef __CUDACC__
@@ -444,37 +333,25 @@ void permuteSort(
 	int32 start,
 	int32 end,
 	ViewType1D<permType, permProperties...>& permuteView,
-	int32 permStart,
-	typename std::enable_if_t<
+	int32 permStart )
+{
+	static_assert(
 		areAccessible<
 			typename ViewType1D<Type, properties...>::execution_space,
 			typename ViewType1D<permType, permProperties...>::memory_space>(),
-		bool> = true )
-{
+		"In permuteSort, view and permuteView should have the same space");
+
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
 	
 	int32 numElems = end-start;
+		
+	pFlow::algorithms::STD::permuteSort<Type,permType,true>(
+		view.data()+start,
+		permuteView.data()+permStart,
+		numElems);
+	return;
 
-	if constexpr( isHostAccessible<ExecutionSpace>())
-	{
-		if(numElems<maxSizeToSerial__)
-		{
-			pFlow::algorithms::STD::permuteSort<Type,permType,false>(
-				view.data()+start,
-				permuteView.data()+permStart,
-				numElems	);
-			return;
-		}
-		else
-		{
-			pFlow::algorithms::STD::permuteSort<Type,permType,true>(
-				view.data()+start,
-				permuteView.data()+permStart,
-				numElems);
-			return;
-		}
-	}
-
+	
 #ifdef __CUDACC__
 	
 	pFlow::algorithms::CUDA::permuteSort(
@@ -488,6 +365,36 @@ void permuteSort(
 
 }
 
+template<typename T>
+INLINE_FUNCTION_HD
+int binarySearch_(const T* array, int length, const T& val)
+{
+    
+    int low = 0;            
+    int high = length - 1;  
+
+    while (low <= high) 
+    {
+        int mid = low + (high - low)/2;
+        
+        if ( array[mid] > val)
+        { 
+            high = mid - 1;  
+        }
+        else if ( array[mid] < val)
+        { 
+            low = mid + 1;        
+        }
+        else 
+        {           
+            return mid; 
+        }
+    }
+
+    return -1; // val not found in array[0, length)
+}
+
+/// On DEVICE and HOST calls 
 template<
 	typename Type,
 	typename... properties>
@@ -502,7 +409,7 @@ int32 binarySearch(
 	if(end<=start)return -1;
 
 	if(auto res = 
-		pFlow::algorithms::binarySearch(view.data()+start,end-start,val); res>=0) {
+		binarySearch_(view.data()+start,end-start,val); res>=0) {
 		return res+start;
 	}
 	else{
@@ -520,28 +427,22 @@ void exclusiveScan(
 	int32 start,
 	int32 end,
 	ViewType1D<dType, dProperties...>& dView,
-	int32 dStart,
-	typename std::enable_if_t<
+	int32 dStart )
+{
+
+	static_assert
+	(
 		areAccessible<
 			typename ViewType1D<Type, properties...>::execution_space,
 			typename ViewType1D<dType, dProperties...>::memory_space>(),
-		bool> = true )
-{
+		"In exclusiveScan, view and dView should have the same space"
+
+	);
+
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
 	
 	int32 numElems = end-start;
-	if constexpr( isHostAccessible<ExecutionSpace>())
-	{
-		if(numElems<maxSizeToSerial__)
-		{
-			pFlow::algorithms::STD::exclusiveScan<Type,dType,false>(
-				view.data()+start,
-				dView.data()+dStart,
-				numElems);
-			return;
-		}
-	}
-
+	
 	pFlow::algorithms::KOKKOS::exclusiveScan<Type,dType,ExecutionSpace>(
 		view.data()+start,
 		dView.data()+dStart,
@@ -559,27 +460,20 @@ void inclusiveScan(
 	int32 start,
 	int32 end,
 	ViewType1D<dType, dProperties...>& dView,
-	int32 dStart,
-	typename std::enable_if_t<
-		areAccessible<
-			typename ViewType1D<Type, properties...>::execution_space,
-			typename ViewType1D<dType, dProperties...>::memory_space>(),
-		bool> = true )
+	int32 dStart)
 {
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
 	
+	static_assert
+	(
+		areAccessible<
+			typename ViewType1D<Type, properties...>::execution_space,
+			typename ViewType1D<dType, dProperties...>::memory_space>(),
+		"In exclusiveScan, view and dView should have the same space"
+	);
+
+
 	int32 numElems = end-start;
-	if constexpr( isHostAccessible<ExecutionSpace>())
-	{
-		if(numElems<maxSizeToSerial__)
-		{
-			pFlow::algorithms::STD::inclusiveScan<Type,dType,false>(
-				view.data()+start,
-				dView.data()+dStart,
-				numElems);
-			return;
-		}
-	}
 
 	pFlow::algorithms::KOKKOS::inclusiveScan<Type,dType,ExecutionSpace>(
 		view.data()+start,
diff --git a/src/phasicFlow/Kokkos/baseAlgorithmsFwd.hpp b/src/phasicFlow/Kokkos/baseAlgorithmsFwd_.hpp
similarity index 100%
rename from src/phasicFlow/Kokkos/baseAlgorithmsFwd.hpp
rename to src/phasicFlow/Kokkos/baseAlgorithmsFwd_.hpp
diff --git a/src/phasicFlow/Kokkos/baseAlgorithms.hpp b/src/phasicFlow/Kokkos/baseAlgorithms_.hpp
similarity index 96%
rename from src/phasicFlow/Kokkos/baseAlgorithms.hpp
rename to src/phasicFlow/Kokkos/baseAlgorithms_.hpp
index 70f1f76f..0c887ae4 100644
--- a/src/phasicFlow/Kokkos/baseAlgorithms.hpp
+++ b/src/phasicFlow/Kokkos/baseAlgorithms_.hpp
@@ -213,17 +213,6 @@ void insertSetElementD
 
 }
 
-/*template<typename T, typename... properties>
-void fill
-(
-	ViewType1D<T, properties...>& view,
-	range range,
-	T val
-)
-{
-	auto subV = Kokkos::subview(view, range);
-	Kokkos::deep_copy(subV, val);
-}*/
 
 
 template<typename T, typename... properties>
diff --git a/src/phasicFlow/Kokkos/phsicFlowKokkos.hpp b/src/phasicFlow/Kokkos/phsicFlowKokkos.hpp
new file mode 100644
index 00000000..22666e49
--- /dev/null
+++ b/src/phasicFlow/Kokkos/phsicFlowKokkos.hpp
@@ -0,0 +1,30 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __phsicFlowKokkos_hpp__
+#define __phsicFlowKokkos_hpp__
+
+#include "kokkosTypes.hpp"
+#include "KokkosUtilities.hpp"
+#include "ViewAlgorithms.hpp"
+#include "Range.hpp"
+
+
+#endif //  __phsicFlowKokkos_hpp__
diff --git a/src/phasicFlow/algorithms/algorithmFunctions.hpp b/src/phasicFlow/algorithms/algorithmFunctions.hpp
index 44778caf..0ce97355 100644
--- a/src/phasicFlow/algorithms/algorithmFunctions.hpp
+++ b/src/phasicFlow/algorithms/algorithmFunctions.hpp
@@ -60,37 +60,6 @@ struct minimum
       return lhs < rhs ? lhs : rhs; }
 };
 
-
-template<typename T>
-INLINE_FUNCTION_HD
-int binarySearch(const T* array, int length, const T& val)
-{
-    
-    int low = 0;            
-    int high = length - 1;  
-
-    while (low <= high) 
-    {
-        int mid = low + (high - low)/2;
-        
-        if ( array[mid] > val)
-        { 
-            high = mid - 1;  
-        }
-        else if ( array[mid] < val)
-        { 
-            low = mid + 1;        
-        }
-        else 
-        {           
-            return mid; 
-        }
-    }
-
-    return -1; // val not found in array[0, length)
-}
-
-
 } 
 
 #endif // __algorithmFunctions_hpp__
\ No newline at end of file
diff --git a/src/phasicFlow/processors/processors.cpp b/src/phasicFlow/processors/processors.cpp
index 735e75db..c9d0d380 100644
--- a/src/phasicFlow/processors/processors.cpp
+++ b/src/phasicFlow/processors/processors.cpp
@@ -43,9 +43,12 @@ void pFlow::processors::initProcessors(int argc, char *argv[])
 		processors::globalSize_ = MPI::COMM_WORLD.Get_size();
 		processors::globalRank_ = MPI::COMM_WORLD.Get_rank();
 		
-		pFlow::pOutput.activatePrefix();
-		pFlow::pOutput.setPrefixNum(processors::globalRank_);
-
+		if(processors::isParallel())
+		{
+			pFlow::pOutput.activatePrefix();
+			pFlow::pOutput.setPrefixNum(processors::globalRank_);	
+		}
+		
 		pFlow::mOutput.setMasterSlave(processors::isMaster());
 		pFlow::errReport.setMasterSlave(processors::isMaster());
 	}

From d2cd132b62c7058f6d0bcafd137561f69d2f3494 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Tue, 17 Oct 2023 20:30:20 +0330
Subject: [PATCH 12/60] parallel read and write is added-we still need to
 consider integrating it with fields

---
 cmake/globals.cmake                           |   4 +-
 src/phasicFlow/CMakeLists.txt                 |   9 +-
 src/phasicFlow/Kokkos/KokkosUtilities.hpp     |  41 +-
 src/phasicFlow/Kokkos/Range.hpp               |  10 +
 src/phasicFlow/Kokkos/ViewAlgorithms.hpp      | 117 +--
 ...sicFlowKokkos.hpp => phasicFlowKokkos.hpp} |   2 +-
 .../containers/List/ListPtr/ListPtr.hpp       |  22 +-
 .../containers/List/ListPtr/ListPtrI.hpp      |  22 +-
 src/phasicFlow/containers/Map/Map/Map.hpp     |   4 +-
 src/phasicFlow/containers/Map/Map/MapI.hpp    |   2 +-
 .../containers/Map/hashMap/hashMap.hpp        |   4 +-
 .../containers/Map/hashMap/hashMapI.hpp       |   2 +-
 src/phasicFlow/containers/Vector/Vector.cpp   |  25 +-
 src/phasicFlow/containers/Vector/Vector.hpp   | 240 +++---
 src/phasicFlow/containers/Vector/VectorI.hpp  |   8 +-
 .../containers/Vector/VectorMath.hpp          |  41 +-
 src/phasicFlow/containers/Vector/Vectors.cpp  |   9 +-
 src/phasicFlow/containers/Vector/Vectors.hpp  |  52 +-
 .../containers/VectorHD/VectorSingle.hpp      | 790 ++++++------------
 .../containers/VectorHD/VectorSingleI.hpp     | 197 +++++
 .../containers/VectorHD/VectorSingles.hpp     |  24 +-
 .../indexContainer/indexContainer.hpp         | 345 ++++----
 src/phasicFlow/containers/span/span.hpp       |  65 +-
 .../repository/IOobject/IOfileHeader.cpp      |  48 +-
 .../repository/IOobject/IOfileHeader.hpp      |  39 +-
 .../repository/IOobject/IOobject.hpp          |  68 +-
 .../repository/IOobject/IOobjectTemplates.cpp |   7 +-
 .../repository/IOobject/objectFile.cpp        |  11 +-
 .../repository/IOobject/objectFile.hpp        |  44 +-
 src/phasicFlow/streams/Stream/Istream.cpp     |  30 +
 src/phasicFlow/streams/Stream/Istream.hpp     |   2 +
 src/phasicFlow/streams/Stream/Ostream.cpp     |  19 +-
 src/phasicFlow/streams/Stream/Ostream.hpp     |   5 +
 src/phasicFlow/streams/TStream/oTstream.cpp   |   8 +
 src/phasicFlow/streams/TStream/oTstream.hpp   |   3 +
 src/phasicFlow/streams/dataIO/dataIO.cpp      | 612 ++++++++++++++
 src/phasicFlow/streams/dataIO/dataIO.hpp      | 103 +++
 .../streams/dataIO/dataIOTemplate.cpp         | 112 +++
 src/phasicFlow/streams/iStream/iIstream.cpp   |   6 +
 src/phasicFlow/streams/iStream/iIstream.hpp   |   7 +-
 src/phasicFlow/streams/iStream/iOstream.cpp   |   7 +
 src/phasicFlow/streams/iStream/iOstream.hpp   |  11 +
 .../streams/masterOstream/masterOstream.cpp   |   9 +
 .../streams/masterOstream/masterOstream.hpp   |  12 +
 .../processorOstream/processorOstream.cpp     |   5 +
 .../processorOstream/processorOstream.hpp     |  11 +
 .../types/basicTypes/builtinTypes.hpp         |   2 +
 src/phasicFlow/types/basicTypes/math.hpp      |   6 +-
 48 files changed, 2151 insertions(+), 1071 deletions(-)
 rename src/phasicFlow/Kokkos/{phsicFlowKokkos.hpp => phasicFlowKokkos.hpp} (97%)
 create mode 100644 src/phasicFlow/containers/VectorHD/VectorSingleI.hpp
 create mode 100644 src/phasicFlow/streams/dataIO/dataIO.cpp
 create mode 100644 src/phasicFlow/streams/dataIO/dataIO.hpp
 create mode 100644 src/phasicFlow/streams/dataIO/dataIOTemplate.cpp

diff --git a/cmake/globals.cmake b/cmake/globals.cmake
index b2c084a3..34c075b4 100644
--- a/cmake/globals.cmake
+++ b/cmake/globals.cmake
@@ -4,9 +4,9 @@ list(APPEND validFiles *.C *.cpp *.cxx *.c *.cu *.H *.hpp *.hxx *.h *.cuh)
 
 macro(Kokkos_cmake_settings)
 
-mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA_LAMBDA)
+#mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA_LAMBDA)
 mark_as_advanced(FORCE var Kokkos_CXX_STANDARD)
-mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA_CONSTEXPR)
+#mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA_CONSTEXPR)
 mark_as_advanced(FORCE var Kokkos_ENABLE_OPENMP)
 mark_as_advanced(FORCE var Kokkos_ENABLE_SERIAL)
 mark_as_advanced(FORCE var Kokkos_ENABLE_CUDA)
diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 5114f190..d9d701eb 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -21,7 +21,8 @@ streams/TStream/iTstream.cpp
 streams/TStream/oTstream.cpp
 streams/Fstream/iFstream.cpp
 streams/Fstream/oFstream.cpp
-streams/Fstream/fileStream.cpp 
+streams/Fstream/fileStream.cpp
+streams/dataIO/dataIO.cpp 
 streams/streams.cpp 
 
 fileSystem/fileSystem.cpp
@@ -33,6 +34,12 @@ dictionary/entry/iEntry.cpp
 dictionary/entry/dataEntry.cpp 
 dictionary/twoPartEntry/twoPartEntry.cpp
 
+containers/Vector/Vectors.cpp
+
+repository/IOobject/objectFile.cpp
+repository/IOobject/IOfileHeader.cpp
+repository/IOobject/IOobject.cpp
+
 )
 
 set(link_libs)
diff --git a/src/phasicFlow/Kokkos/KokkosUtilities.hpp b/src/phasicFlow/Kokkos/KokkosUtilities.hpp
index 1b42bba7..451920ab 100644
--- a/src/phasicFlow/Kokkos/KokkosUtilities.hpp
+++ b/src/phasicFlow/Kokkos/KokkosUtilities.hpp
@@ -25,6 +25,7 @@ Licence:
 #include "KokkosTypes.hpp"
 #include "pFlowMacros.hpp"
 #include "types.hpp"
+#include "span.hpp"
 #include "iOstream.hpp"
 
 namespace pFlow
@@ -41,7 +42,7 @@ template<typename ExecutionSpace>
 INLINE_FUNCTION_H
 bool constexpr isDeviceAccessible()
 {
-	return Kokkos::SpaceAccessibility<ExecutionSpace,DefaultExecutionSpace>::accessible;
+	return Kokkos::SpaceAccessibility<ExecutionSpace,DefaultExecutionSpace::memory_space>::accessible;
 }
 
 /// Is MemoerySpace accessible from ExecutionSpace
@@ -56,7 +57,7 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void reallocInit( ViewType1D<Type,Properties...>& view, int32 len)
+void reallocInit( ViewType1D<Type,Properties...>& view, uint32 len)
 {
 	Kokkos::realloc(Kokkos::WithoutInitializing, view, len);	
 }
@@ -65,7 +66,7 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void reallocNoInit(ViewType1D<Type,Properties...>& view, int32 len)
+void reallocNoInit(ViewType1D<Type,Properties...>& view, uint32 len)
 {
 	Kokkos::realloc(Kokkos::WithoutInitializing, view, len);
 }
@@ -74,7 +75,7 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void reallocFill( ViewType1D<Type,Properties...>& view, int32 len, Type val)
+void reallocFill( ViewType1D<Type,Properties...>& view, uint32 len, Type val)
 {
 	reallocNoInit(view, len);
 	Kokkos::deep_copy(view, val);
@@ -84,7 +85,7 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void reallocInit( ViewType2D<Type,Properties...>& view, int32 len1, int32 len2)
+void reallocInit( ViewType2D<Type,Properties...>& view, uint32 len1, uint32 len2)
 {
 	Kokkos::realloc(view, len1, len2);
 }
@@ -93,7 +94,7 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void reallocNoInit(ViewType2D<Type,Properties...>& view, int32 len1, int32 len2)
+void reallocNoInit(ViewType2D<Type,Properties...>& view, uint32 len1, uint32 len2)
 {	
   	Kokkos::realloc(Kokkos::WithoutInitializing, view, len1, len2);
 }
@@ -102,7 +103,7 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void reallocFill( ViewType2D<Type,Properties...>& view, int32 len1, int32 len2, Type val)
+void reallocFill( ViewType2D<Type,Properties...>& view, uint32 len1, uint32 len2, Type val)
 {
 	reallocNoInit(view, len1, len2);
 	Kokkos::deep_copy(view, val);
@@ -112,7 +113,7 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void reallocInit( ViewType3D<Type,Properties...>& view, int32 len1, int32 len2, int32 len3)
+void reallocInit( ViewType3D<Type,Properties...>& view, uint32 len1, uint32 len2, uint32 len3)
 {
 	Kokkos::realloc(view, len1, len2, len3);
 }
@@ -121,7 +122,7 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void reallocNoInit(ViewType3D<Type,Properties...>& view, int32 len1, int32 len2, int32 len3)
+void reallocNoInit(ViewType3D<Type,Properties...>& view, uint32 len1, uint32 len2, uint32 len3)
 {
 	
   	Kokkos::realloc(Kokkos::WithoutInitializing, view, len1, len2, len3);
@@ -131,7 +132,7 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void reallocFill( ViewType3D<Type,Properties...>& view, int32 len1, int32 len2, int32 len3, Type val)
+void reallocFill( ViewType3D<Type,Properties...>& view, uint32 len1, uint32 len2, uint32 len3, Type val)
 {
 	reallocNoInit(view, len1, len2, len3);
 	Kokkos::deep_copy(view, val);
@@ -141,7 +142,7 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void resizeInit(ViewType1D<Type,Properties...>& view, int32 newLen)
+void resizeInit(ViewType1D<Type,Properties...>& view, uint32 newLen)
 {
 	Kokkos::resize(view, newLen);
 }
@@ -150,7 +151,7 @@ template <
 	typename Type,
 	typename... Properties>
 INLINE_FUNCTION_H
-void resizeNoInit(ViewType1D<Type,Properties...>& view, int32 newLen)
+void resizeNoInit(ViewType1D<Type,Properties...>& view, uint32 newLen)
 {
 	Kokkos::resize(Kokkos::WithoutInitializing, view, newLen);
 }
@@ -177,6 +178,22 @@ iOstream& operator <<(iOstream& os, const Pair<T1,T2>& p)
 	return os;
 }
 
+template<typename T, typename... properties>
+INLINE_FUNCTION_H
+iOstream& operator <<(iOstream& os, const ViewType1D<T, properties...> & v)
+{
+	
+	using ExSpace = typename ViewType1D<T, properties...>::execution_space;
+
+	static_assert(isHostAccessible<ExSpace>(), "View memory is not accessible from Host");
+
+	span<T> spn(v.data(), v.size());
+	os<<spn;
+	
+	return os;
+}
+
+
 } // pFlow
 
 #endif  //__KokkosUtilities_hpp__
diff --git a/src/phasicFlow/Kokkos/Range.hpp b/src/phasicFlow/Kokkos/Range.hpp
index 35b1babe..72ecd20b 100644
--- a/src/phasicFlow/Kokkos/Range.hpp
+++ b/src/phasicFlow/Kokkos/Range.hpp
@@ -129,6 +129,12 @@ public Kokkos::pair<T,T>
 			return end()-start();
 		}
 
+		INLINE_FUNCTION_HD
+		auto getPair()const
+		{
+			return Pair(this->first, this->second);
+		}
+
 };
 
 template<typename T>
@@ -143,6 +149,10 @@ using range32 	= Range<int32>;
 
 using range64 	= Range<int64>;
 
+using rangeU32 	= Range<uint32>;
+
+using rangeU64 	= Range<uint64>;
+
 
 } // pFlow
 
diff --git a/src/phasicFlow/Kokkos/ViewAlgorithms.hpp b/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
index 112569c6..7e8134a9 100644
--- a/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
+++ b/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
@@ -35,16 +35,16 @@ namespace pFlow
 { 	
 template<typename T, typename... properties>
 INLINE_FUNCTION_H
-int32 count(
+uint32 count(
 	const ViewType1D<T, properties...>& view,
-	int32 start,
-	int32 end,
+	uint32 start,
+	uint32 end,
 	const T& val)
 {
 	
 	using ExecutionSpace = typename ViewType1D<T, properties...>::execution_space;
 	
-	int32 numElems = end-start;
+	uint32 numElems = end-start;
 
 	return  pFlow::algorithms::KOKKOS::count<T, ExecutionSpace>
 	(
@@ -59,11 +59,11 @@ INLINE_FUNCTION_H
 void fill
 (
 	ViewType1D<T, properties...>& view,
-	range32 span,
+	rangeU32 span,
 	T val
 )
 {
-	auto subV = Kokkos::subview(view, span);
+	auto subV = Kokkos::subview(view, span.getPair() );
 	Kokkos::deep_copy(subV, val);
 }
 
@@ -71,12 +71,12 @@ template<typename T, typename... properties>
 void fill
 (
 	ViewType1D<T, properties...>& view,
-	int32 start,
-	int32 end,
+	uint32 start,
+	uint32 end,
 	T val
 )
 {
-	fill(view, range32(start,end),val);
+	fill(view, rangeU32(start, end),val);
 }
 
 template<
@@ -84,14 +84,14 @@ template<
 	typename... properties>
 void fillSequence(
 	ViewType1D<Type, properties...>& view,
-	int32 start,
-	int32 end,
+	uint32 start,
+	uint32 end,
 	const Type startVal
 	)
 {
 
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
-	int32 numElems = end-start;
+	uint32 numElems = end-start;
 
 	pFlow::algorithms::KOKKOS::fillSequence<Type, ExecutionSpace>(
 			view.data()+start,
@@ -110,24 +110,27 @@ template<
 bool fillSelected
 (
 	ViewType1D<Type, properties...> view,
-	const ViewType1D<indexType, indexProperties...> indices,
-	const int32 numElems,
-	const Type val
+	ViewType1D<indexType, indexProperties...> indices,
+	uint32 numElems,
+	Type val
 )
 {
 	static_assert(
       areAccessible<
 			typename ViewType1D<Type, properties...>::execution_space,
 			typename ViewType1D<indexType, indexProperties...>::memory_space>(),
-      "In fillSelected arguments view and indices must have similar spaces");
+      "In fillSelected, arguments view and indices must have similar spaces");
 
-	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
-	
-	pFlow::algorithms::KOKKOS::fillSelected<Type, indexType, ExecutionSpace>(
-			view.data(),
-			indices.data(),
-			numElems,
-			val);
+	using ExSpace = typename ViewType1D<Type, properties...>::execution_space;
+	using policy = Kokkos::RangePolicy<ExSpace,Kokkos::IndexType<uint32> >;
+
+	Kokkos::parallel_for(
+		"ViewAlgorithms::fillSelected",
+		policy(0,numElems),
+		LAMBDA_HD(uint32 i){
+			//view[indices[i]]= val;
+		});
+	Kokkos::fence();
 
 	return true;
 }
@@ -141,7 +144,7 @@ bool fillSelected(
 	ViewType1D<Type, properties...> view,
 	const ViewType1D<indexType, indexProperties...> indices,
 	const ViewType1D<Type, properties...> vals,
-	const int32 numElems )
+	const uint32 numElems )
 {
 
 	static_assert(
@@ -167,14 +170,15 @@ template<typename T, typename... properties>
 INLINE_FUNCTION_H
 T min( 
 	const ViewType1D<T, properties...>& view,
-	int32 start,
-	int32 end)
+	uint32 start,
+	uint32 end)
 {
 
 	using ExecutionSpace = typename ViewType1D<T, properties...>::execution_space;
 	
-	int32 numElems = end-start;
- 
+	uint32 numElems = end-start;
+ 	
+ 	return 
 	pFlow::algorithms::KOKKOS::min<T, ExecutionSpace>(
 		view.data()+start,
 		numElems);
@@ -184,13 +188,13 @@ template<typename T, typename... properties>
 INLINE_FUNCTION_H
 T max( 
 	const ViewType1D<T, properties...>& view,
-	int32 start,
-	int32 end)
+	uint32 start,
+	uint32 end)
 {
 
 	using ExecutionSpace = typename ViewType1D<T, properties...>::execution_space;
 	
-	int32 numElems = end-start;
+	uint32 numElems = end-start;
 
 	return  
 	pFlow::algorithms::KOKKOS::max<T, ExecutionSpace>(
@@ -220,10 +224,10 @@ template <
 INLINE_FUNCTION_H
 void copy(
 	const ViewType1D<dType, dProperties...>& dst,
-	int32 dStart,
+	uint32 dStart,
 	const ViewType1D<sType, sProperties...>& src,
-	int32 sStart,
-	int32 sEnd
+	uint32 sStart,
+	uint32 sEnd
 	)
 {
 
@@ -244,7 +248,7 @@ INLINE_FUNCTION_H
 void getNth(
 	dType& dst,
 	const ViewType1D<sType, sProperties...>& src,
-	const int32 n
+	const uint32 n
 	)
 {
 	range32 span(n,n+1);
@@ -259,12 +263,12 @@ template<typename T, typename... properties>
 INLINE_FUNCTION_H
 void sort( 
 	ViewType1D<T, properties...>& view,
-	int32 start,
-	int32 end)
+	uint32 start,
+	uint32 end)
 {
 	using ExecutionSpace = typename ViewType1D<T, properties...>::execution_space;
 	
-	int32 numElems = end-start;
+	uint32 numElems = end-start;
 
 	if constexpr( isHostAccessible<ExecutionSpace>())
 	{		
@@ -291,14 +295,14 @@ template<typename T, typename... properties, typename CompareFunc>
 INLINE_FUNCTION_H
 void sort( 
 	ViewType1D<T, properties...>& view,
-	int32 start,
-	int32 end,
+	uint32 start,
+	uint32 end,
 	CompareFunc compare)
 {
 
 	using ExecutionSpace = typename ViewType1D<T, properties...>::execution_space;
 	
-	int32 numElems = end-start;
+	uint32 numElems = end-start;
 
 	if constexpr( isHostAccessible<ExecutionSpace>())
 	{
@@ -330,10 +334,10 @@ template<
 	typename... permProperties>
 void permuteSort(
 	const ViewType1D<Type, properties...>& view,
-	int32 start,
-	int32 end,
+	uint32 start,
+	uint32 end,
 	ViewType1D<permType, permProperties...>& permuteView,
-	int32 permStart )
+	uint32 permStart )
 {
 	static_assert(
 		areAccessible<
@@ -343,7 +347,7 @@ void permuteSort(
 
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
 	
-	int32 numElems = end-start;
+	uint32 numElems = end-start;
 		
 	pFlow::algorithms::STD::permuteSort<Type,permType,true>(
 		view.data()+start,
@@ -367,8 +371,9 @@ void permuteSort(
 
 template<typename T>
 INLINE_FUNCTION_HD
-int binarySearch_(const T* array, int length, const T& val)
+int32 binarySearch_(const T* array, int32 length, const T& val)
 {
+    if(length <= 0) return -1;
     
     int low = 0;            
     int high = length - 1;  
@@ -401,8 +406,8 @@ template<
 INLINE_FUNCTION_HD
 int32 binarySearch(
 	const ViewType1D<Type, properties...>& view,
-	int32 start,
-	int32 end,
+	uint32 start,
+	uint32 end,
 	const Type& val)
 {
 	
@@ -424,10 +429,10 @@ template<
 	typename... dProperties>
 void exclusiveScan(
 	const ViewType1D<Type, properties...>& view,
-	int32 start,
-	int32 end,
+	uint32 start,
+	uint32 end,
 	ViewType1D<dType, dProperties...>& dView,
-	int32 dStart )
+	uint32 dStart )
 {
 
 	static_assert
@@ -441,7 +446,7 @@ void exclusiveScan(
 
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
 	
-	int32 numElems = end-start;
+	uint32 numElems = end-start;
 	
 	pFlow::algorithms::KOKKOS::exclusiveScan<Type,dType,ExecutionSpace>(
 		view.data()+start,
@@ -457,10 +462,10 @@ template<
 	typename... dProperties>
 void inclusiveScan(
 	const ViewType1D<Type, properties...>& view,
-	int32 start,
-	int32 end,
+	uint32 start,
+	uint32 end,
 	ViewType1D<dType, dProperties...>& dView,
-	int32 dStart)
+	uint32 dStart)
 {
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
 	
@@ -473,7 +478,7 @@ void inclusiveScan(
 	);
 
 
-	int32 numElems = end-start;
+	uint32 numElems = end-start;
 
 	pFlow::algorithms::KOKKOS::inclusiveScan<Type,dType,ExecutionSpace>(
 		view.data()+start,
diff --git a/src/phasicFlow/Kokkos/phsicFlowKokkos.hpp b/src/phasicFlow/Kokkos/phasicFlowKokkos.hpp
similarity index 97%
rename from src/phasicFlow/Kokkos/phsicFlowKokkos.hpp
rename to src/phasicFlow/Kokkos/phasicFlowKokkos.hpp
index 22666e49..3372ba8a 100644
--- a/src/phasicFlow/Kokkos/phsicFlowKokkos.hpp
+++ b/src/phasicFlow/Kokkos/phasicFlowKokkos.hpp
@@ -21,7 +21,7 @@ Licence:
 #ifndef __phsicFlowKokkos_hpp__
 #define __phsicFlowKokkos_hpp__
 
-#include "kokkosTypes.hpp"
+#include "KokkosTypes.hpp"
 #include "KokkosUtilities.hpp"
 #include "ViewAlgorithms.hpp"
 #include "Range.hpp"
diff --git a/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp b/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
index 8d12d1a6..ed150eed 100644
--- a/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
+++ b/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
@@ -64,16 +64,16 @@ protected:
 		bool copy(const ListPtrType& src);
 
 		// - return ith pointer
-		T* ptr(label i);
+		T* ptr(size_t i);
 
 		// - return ith const poiter
-		const T* ptr(label i)const;
+		const T* ptr(size_t i)const;
 
 		// - iterator position of ith element
-		auto pos(label i);
+		auto pos(size_t i);
 		
 		// - const iterator position of ith element
-		auto pos(label i) const;
+		auto pos(size_t i) const;
 
 public:
 
@@ -141,15 +141,15 @@ public:
 	//// - Methods 
 
 		// - set the ith element 
-		T* set(label i, T* ptr);
+		T* set(size_t i, T* ptr);
 		
 		// - set the ith element and take the ownership from uniquePtr
-		uniquePtr<T> set(label i, uniquePtr<T>& ptr );
+		uniquePtr<T> set(size_t i, uniquePtr<T>& ptr );
 		
 		// - create the object in-place and set the pointer in ith position
 		//   if oject creation fails, uniquePtr deletes the memeory
 		template<typename... Args>
-	    uniquePtr<T> setSafe(label i, Args&&... args);
+	    uniquePtr<T> setSafe(size_t i, Args&&... args);
 	    
 	    // - put the pointer at the end
 	    void push_back(T* ptr);
@@ -163,11 +163,11 @@ public:
 	    
 		// - access to ith element
 		//   fatalexit if out of range or nullptr    
-		T& operator[](label i);
+		T& operator[](size_t i);
 		
 		// - const access to ith element
 		//   fatalexit if out of range or nullptr    
-		const T& operator[](label i) const;
+		const T& operator[](size_t i) const;
 
 		// size of container
 	    size_t size()const;
@@ -176,13 +176,13 @@ public:
 		auto empty() const;
 
 		// release the ownership of ith pointer 
-		uniquePtr<T> release(label i);
+		uniquePtr<T> release(size_t i);
 		
 		// - clear the content of list and delete objects
 		void clear();
 		
 		// - clear the ith element
-		void clear(label i);	
+		void clear(size_t i);	
 		
 		// - clone the object 
 		
diff --git a/src/phasicFlow/containers/List/ListPtr/ListPtrI.hpp b/src/phasicFlow/containers/List/ListPtr/ListPtrI.hpp
index 2d476154..57f42c2b 100644
--- a/src/phasicFlow/containers/List/ListPtr/ListPtrI.hpp
+++ b/src/phasicFlow/containers/List/ListPtr/ListPtrI.hpp
@@ -39,7 +39,7 @@ inline bool pFlow::ListPtr<T>::copy(const ListPtrType& src)
 }
 
 template<typename T>
-T* pFlow::ListPtr<T>::ptr(label i) 
+T* pFlow::ListPtr<T>::ptr(size_t i) 
 {
 
 	if(i >= size() ) return nullptr;	
@@ -53,7 +53,7 @@ T* pFlow::ListPtr<T>::ptr(label i)
 template<typename T>
 const T* pFlow::ListPtr<T>::ptr
 (
-	label i
+	size_t i
 ) const
 {
 
@@ -68,7 +68,7 @@ const T* pFlow::ListPtr<T>::ptr
 template<typename T>
 auto pFlow::ListPtr<T>::pos
 (
-	label i
+	size_t i
 )
 {
 	if(i >= size() ) 
@@ -86,7 +86,7 @@ auto pFlow::ListPtr<T>::pos
 template<typename T>
 auto pFlow::ListPtr<T>::pos
 (
-	label i
+	size_t i
 )const 
 {
 	if(i >= size() ) 
@@ -146,7 +146,7 @@ pFlow::ListPtr<T>& pFlow::ListPtr<T>::operator=
 template<typename T>
 T* pFlow::ListPtr<T>::set
 (
-	label i, T* ptr
+	size_t i, T* ptr
 )
 {
 	uniquePtr<T> uptr(ptr);
@@ -157,7 +157,7 @@ T* pFlow::ListPtr<T>::set
 template<typename T>
 pFlow::uniquePtr<T> pFlow::ListPtr<T>::set
 (
-	label i,
+	size_t i,
 	uniquePtr<T>& ptr
 )
 {
@@ -182,7 +182,7 @@ template<typename T>
 template<typename... Args>
 pFlow::uniquePtr<T> pFlow::ListPtr<T>::setSafe
 (
-	label i,
+	size_t i,
 	Args&&... args
 )
 {
@@ -216,7 +216,7 @@ void pFlow::ListPtr<T>::push_backSafe(Args&&... args)
 template<typename T>
 T& pFlow::ListPtr<T>::operator[]
 (
-	label i
+	size_t i
 )
 {
 	T* p = ptr(i);
@@ -234,7 +234,7 @@ T& pFlow::ListPtr<T>::operator[]
 template<typename T>
 const T& pFlow::ListPtr<T>::operator[]
 (
-	label i
+	size_t i
 ) const
 {
 	const T* p = ptr(i);
@@ -263,7 +263,7 @@ auto pFlow::ListPtr<T>::empty() const
 template<typename T>
 pFlow::uniquePtr<T> pFlow::ListPtr<T>::release
 (
-	label i
+	size_t i
 )
 {
 	auto p = ptr(i);
@@ -288,7 +288,7 @@ void pFlow::ListPtr<T>::clear()
 template<typename T>
 void pFlow::ListPtr<T>::clear
 (
-	label i
+	size_t i
 )
 {
 	T* p = ptr(i);
diff --git a/src/phasicFlow/containers/Map/Map/Map.hpp b/src/phasicFlow/containers/Map/Map/Map.hpp
index 16c0b9d3..ffeef6b0 100644
--- a/src/phasicFlow/containers/Map/Map/Map.hpp
+++ b/src/phasicFlow/containers/Map/Map/Map.hpp
@@ -138,7 +138,7 @@ template<typename T>
 using wordMap = Map<word,T>;
 
 template<typename T>
-using labelMap = Map<label,T>;
+using uint64Map = Map<uint64,T>;
 
 template<typename T>
 using uint32Map = Map<uint32,T>;
@@ -155,7 +155,7 @@ template<typename T>
 inline iOstream& printKeys(iOstream& os, const wordMap<T> & m);
 
 template<typename T>
-inline iOstream& printKeys(iOstream& os, const labelMap<T> & m);
+inline iOstream& printKeys(iOstream& os, const uint64Map<T> & m);
 
 template<typename T>
 inline iOstream& printKeys(iOstream& os, const uint32Map<T> & m);
diff --git a/src/phasicFlow/containers/Map/Map/MapI.hpp b/src/phasicFlow/containers/Map/Map/MapI.hpp
index 7d52ea7e..7b28efcd 100644
--- a/src/phasicFlow/containers/Map/Map/MapI.hpp
+++ b/src/phasicFlow/containers/Map/Map/MapI.hpp
@@ -92,7 +92,7 @@ inline iOstream& printKeys(iOstream& os, const uint32Map<T> & m)
 }
 
 template<typename T>
-inline iOstream& printKeys(iOstream& os, const labelMap<T> & m)
+inline iOstream& printKeys(iOstream& os, const uint64Map<T> & m)
 {
 	if (m.empty())
 		return os<<"labelMap is empty"<<endl;
diff --git a/src/phasicFlow/containers/Map/hashMap/hashMap.hpp b/src/phasicFlow/containers/Map/hashMap/hashMap.hpp
index b6eabc69..676c7022 100644
--- a/src/phasicFlow/containers/Map/hashMap/hashMap.hpp
+++ b/src/phasicFlow/containers/Map/hashMap/hashMap.hpp
@@ -140,7 +140,7 @@ template<typename T>
 using wordHashMap = hashMap<word,T>;
 
 template<typename T>
-using labelHashMap = hashMap<label,T>;
+using uint64HashMap = hashMap<uint64,T>;
 
 template<typename T>
 using uint32HashMap = hashMap<uint32,T>;
@@ -155,7 +155,7 @@ template<typename T>
 inline iOstream& printKeys(iOstream& os, const wordHashMap<T> & m);
 
 template<typename T>
-inline iOstream& printKeys(iOstream& os, const labelHashMap<T> & m);
+inline iOstream& printKeys(iOstream& os, const uint64HashMap<T> & m);
 
 template<typename T>
 inline iOstream& printKeys(iOstream& os, const uint32HashMap<T> & m);
diff --git a/src/phasicFlow/containers/Map/hashMap/hashMapI.hpp b/src/phasicFlow/containers/Map/hashMap/hashMapI.hpp
index 74e85e6d..4c45687a 100644
--- a/src/phasicFlow/containers/Map/hashMap/hashMapI.hpp
+++ b/src/phasicFlow/containers/Map/hashMap/hashMapI.hpp
@@ -80,7 +80,7 @@ inline iOstream& printKeys(iOstream& os, const wordHashMap<T> & m)
 
 
 template<typename T>
-inline iOstream& printKeys(iOstream& os, const labelHashMap<T> & m)
+inline iOstream& printKeys(iOstream& os, const uint64HashMap<T> & m)
 {
 	if (m.empty())
 		return os<<"labelHashMap is empty"<<endl;
diff --git a/src/phasicFlow/containers/Vector/Vector.cpp b/src/phasicFlow/containers/Vector/Vector.cpp
index 7c0c9db3..71dc312a 100644
--- a/src/phasicFlow/containers/Vector/Vector.cpp
+++ b/src/phasicFlow/containers/Vector/Vector.cpp
@@ -19,12 +19,6 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 
-template<typename T, typename Allocator>
-pFlow::Vector<T, Allocator>::Vector(iIstream& is)
-{
-	readVector(is);
-}
-
 template<typename T, typename Allocator>
 bool pFlow::Vector<T, Allocator>::readVector
 (
@@ -33,7 +27,6 @@ bool pFlow::Vector<T, Allocator>::readVector
 )
 {
 	
-
 	if(is.isBinary() && !std::is_same_v<T,word>)
 	{
 		this->resize(len);
@@ -90,8 +83,6 @@ bool pFlow::Vector<T, Allocator>::readVector
 		}
 	}
 
-	
-
 	return true;
 }
 
@@ -102,8 +93,12 @@ bool pFlow::Vector<T, Allocator>::writeVector
 	iOstream& os
 ) const
 {
+	
+	span<T> s( const_cast<T*>(this->data()), this->size());
+	os<<s;
+
 	// start of 
-	if( os.isBinary() && !std::is_same_v<T,word>)
+	/*if( os.isBinary() && !std::is_same_v<T,word>)
 	{
 		os.write(reinterpret_cast<const char*>(this->data()), this->size()*sizeof(T));
 	}
@@ -113,12 +108,12 @@ bool pFlow::Vector<T, Allocator>::writeVector
 		auto len = size();
 		auto stride  = getVectorStride(len);
 		os << token::BEGIN_LIST;
-		label i = 0;
+		size_t i = 0;
 		while( i<len )
 		{
 
 			os << this->operator[](i++);
-			for(label j=0; j<stride-1 && i<len; j++ )
+			for(size_t j=0; j<stride-1 && i<len; j++ )
 			{
 				os << token::SPACE << this->operator[](i++);	
 			}
@@ -130,12 +125,12 @@ bool pFlow::Vector<T, Allocator>::writeVector
 	    os << token::END_LIST;
 
 	    os.check(FUNCTION_NAME);
-	}
+	}*/
 
     return true;
 }
 
-template<typename T, typename Allocator>
+/*template<typename T, typename Allocator>
 bool pFlow::Vector<T, Allocator>::deleteElement_sorted
 (
 	const Vector<label>& indices
@@ -384,4 +379,4 @@ inline bool pFlow::Vector<T, Allocator>::insertSetElement
 	}
 	
 	return true;
-}
\ No newline at end of file
+}*/
\ No newline at end of file
diff --git a/src/phasicFlow/containers/Vector/Vector.hpp b/src/phasicFlow/containers/Vector/Vector.hpp
index c8d354ee..44e3beb3 100644
--- a/src/phasicFlow/containers/Vector/Vector.hpp
+++ b/src/phasicFlow/containers/Vector/Vector.hpp
@@ -29,7 +29,7 @@ Licence:
 #include "error.hpp"
 #include "uniquePtr.hpp"
 #include "stdAlgorithms.hpp"
-#include "indexContainer.hpp"
+#include "span.hpp"
 #include "iOstream.hpp"
 #include "iIstream.hpp"
 
@@ -93,16 +93,6 @@ protected:
 	// - name of the vector  
 	word name_;
 
-	static inline size_t getVectorStride(const size_t& len)
-	{
-		size_t stride = 1;
-		if( len < 6 ) 		stride = len;
-		else if( len <16 )  stride = 3;
-		else if( len < 31)  stride = 2;
-		else				stride = 1;
-
-		return stride;
-	}
 
 	static constexpr bool  isHostAccessible_ = true;
 
@@ -119,37 +109,28 @@ public:
 
 	//// - Constructors
 
-		// - empty Vector
+		/// Empty Vector
 		inline Vector()
 		:
 			Vector("Vector")
 		{}
 
+
+		/// Empty Vector with a name 
 		inline Vector(const word& name)
 		:
 			name_(name)
 		{}
-		// - with sepcified length
-		inline Vector(const size_t len)
-		:
-			Vector("Vector",len)
-		{}
 
-		// - with specified length and name
+		
+		/// Vector with specified length and name
 		inline Vector(const word& name, size_t len)
 		:
 			vectorType(len),
 			name_(name)
-		{
-			
-		}
-
-		// - with length and value
-		inline Vector(size_t len, const T& val)
-		:
-			Vector("Vector", len, val)
 		{}
 
+		/// Vector with name, length and value
 		inline Vector(const word& name, size_t len, const T& val)
 		:
 			Vector(name, len)
@@ -157,20 +138,7 @@ public:
 			this->assign(len, val);
 		}
 
-		// - zero length with specified capacity, use Logical
-		//   to make it different from previous constructor.
-		inline Vector(const size_t cap, RESERVE ):
-			Vector("Vector", cap, 0, RESERVE())
-		{
-		}
-
-		inline Vector(const size_t cap, const size_t len, RESERVE )
-		:
-			Vector("Vector", cap, len, RESERVE())
-		{
-			
-		}
-
+		/// Vector with name, size and reserved capacity 
 		Vector(const word& name, size_t cap, size_t len, RESERVE ):
 			name_(name)
 		{
@@ -178,142 +146,157 @@ public:
 			this->resize(len);
 		}
 
-		inline Vector(const size_t cap, const size_t len, const T& val, RESERVE )
-		{
-			name_ = "Vector";
-			reserve(cap);
-			this->assign(len, val);
-		}
 
-
-		// from initializer list 
-		inline Vector(const initList &l)
+		/// Vector from name and initializer list 
+		inline Vector(const word& name, const initList &l)
 		:
-			vectorType(l)
+			vectorType(l),
+			name_(name)
 		{}
 
-		// - from src and a new name
+		/// Construct with a name and form std::vector (host memory)
+		inline Vector(const word& name, const vectorType& src)
+		:
+			vectorType(src),
+			name_(name)
+		{}
+
+		/// Construct with a name and form std::vector (host memory)
+		/// and with a desired capacity. 
+		inline Vector(const word& name, const vectorType& src, size_t cap)
+		:
+			Vector(name, cap, src.size(), RESERVE())
+		{
+			this->assign(src.begin(), src.end());
+		}
+
+		/// Copy construct 
+		inline Vector(const VectorType& src) = default;
+
+		/// Copy from src with a new name 
 		inline Vector(const word name, const Vector<T>& src):
 			vectorType(src),
 			name_(name)
 		{}
 
-		// copy construct 
-		inline Vector(const VectorType& src) = default;
-		
-		// move construct 
-		inline Vector( VectorType && mv) = default;
-
-		inline Vector(const vectorType& src)
-		:
-			vectorType(src),
-			name_("Vector")
-		{
-			
-		}
-		
-		// copy assignment
+		/// Copy assignment
 		inline VectorType& operator=( const VectorType& rhs ) = default;
 
+		/// Copy assignment from std::vector 
 		inline VectorType& operator=(const vectorType& rhs)
 		{
 			Vector::assign(rhs.begin(), rhs.end());
 			return *this;
 		}
-		
-		// move assignment 
+
+		/// Move construct 
+		inline Vector( VectorType && mv) = default;
+	
+		/// Move assignment 
 		inline VectorType& operator=( VectorType && mv) = default;
 	
-		// scalar assignment 
+		/// Scalar assignment 
 		inline void operator=(const T& val)
 		{
 			fill(val);
 		}
 
+		/// Destructor 
 		inline ~Vector()
 		{
 			vectorType::clear();
 		}
 
+		/// Clone as a uniquePtr
 		inline uniquePtr<VectorType> clone() const
 		{
 			return makeUnique<VectorType>(*this);
 		}
 
+		/// Clone as a pointer 
 		inline VectorType* clonePtr()const
 		{
 			return new VectorType(*this);
 		}
 
-	inline auto clear()
-	{
-		return vectorType::clear();
-	}
+	
+	//// - Methods 
 
-	// access to this, mostly used by derived classes 
-	const VectorType& VectorField() const
-	{
-		return *this;
-	}
- 
-	VectorType& VectorField()
-	{
-		return *this;
-	}
+		/// Access to this, mostly used by derived classes 
+		const VectorType& VectorField() const
+		{
+			return *this;
+		}
+	 
+		VectorType& VectorField()
+		{
+			return *this;
+		}
 
-	const vectorType& vectorField()const
-	{
-		return *this;
-	}
+		const vectorType& vectorField()const
+		{
+			return *this;
+		}
 
-	vectorType& vectorField()
-	{
-		return *this;
-	}
+		vectorType& vectorField()
+		{
+			return *this;
+		}
 
-	auto& deviceVectorAll()
-	{
-		return *this;
-	}
+		auto& deviceVectorAll()
+		{
+			return *this;
+		}
 
-	const auto& deviceVectorAll()const
-	{
-		return *this;
-	}
+		const auto& deviceVectorAll()const
+		{
+			return *this;
+		}
 
-	auto& deviceVector()
-	{
-		return *this;
-	}
+		auto& deviceVector()
+		{
+			return *this;
+		}
 
-	const auto& deviceVector()const
-	{
-		return *this;
-	}
+		const auto& deviceVector()const
+		{
+			return *this;
+		}
 
 
+		/// Name of the vector 
+		const word& name()const
+		{
+			return name_;
+		}
 
-	const word& name()const
-	{
-		return name_;
-	}
+		/// Size of the vector 
+		inline auto size()const
+		{
+			return vectorType::size();
+		}
 
-	inline auto size()const
-	{
-		return vectorType::size();
-	}
+		/// Capacity of the vector 
+		inline auto capacity()const
+		{
+			return vectorType::capacity();
+		}
 
-	inline auto capacity()const
-	{
-		return vectorType::capacity();
-	}
+		/// If vector is empty 
+		inline bool empty()const
+		{
+			return vectorType::empty();
+		}
 
-	inline auto reserve(label len)
-	{
-		return vectorType::reserve(len);
-	}
+		/// Reserve capacity for vector 
+		/// Preserve the content.
+		inline void reserve(size_t cap)
+		{
+			vectorType::reserve(cap);
+		}
 
-	// - delete elemens of vector based on sorted indices 
+
+	/*// - delete elemens of vector based on sorted indices 
 	//   return false if out of range
 	bool deleteElement_sorted(const Vector<label>& indices );
 
@@ -346,7 +329,7 @@ public:
 
 	// - set or insert a new element into the vecor 
 	//   return false if it fails 
-	inline bool insertSetElement(int32 idx, const T& val);
+	inline bool insertSetElement(int32 idx, const T& val);*/
 
 	// - fill the whole content of vector, [begin, end), with val 
 	inline void fill( const T& val);
@@ -368,12 +351,7 @@ public:
 
 	inline VectorType operator -()const;
 
-	// from iIstream and specified size 
-	//Vector(iIstream & is, size_t len);
-
-	// from iIstream and free size
-	Vector(iIstream& is);
-
+	
 	bool readVector(iIstream& is, size_t len=0);
 
 	bool writeVector(iOstream& os) const;
diff --git a/src/phasicFlow/containers/Vector/VectorI.hpp b/src/phasicFlow/containers/Vector/VectorI.hpp
index 6bacd5dd..c4426169 100644
--- a/src/phasicFlow/containers/Vector/VectorI.hpp
+++ b/src/phasicFlow/containers/Vector/VectorI.hpp
@@ -77,7 +77,7 @@ inline void pFlow::Vector<T, Allocator>::operator +=( const Vector<T, Allocator>
 		fatalExit;
 	}
 
-	for(label i=0; i<v.size(); i++)
+	for(size_t i=0; i<v.size(); i++)
 	{
 		this->operator[](i) += v[i];
 	}
@@ -96,7 +96,7 @@ inline void pFlow::Vector<T, Allocator>::operator -=( const Vector<T, Allocator>
 		fatalExit;
 	}
 
-	for(label i=0; i<v.size(); i++)
+	for(size_t i=0; i<v.size(); i++)
 	{
 		this->operator[](i) -= v[i];
 	}
@@ -115,7 +115,7 @@ inline void pFlow::Vector<T, Allocator>::operator *=( const Vector<T, Allocator>
 		fatalExit;
 	}
 
-	for(label i=0; i<v.size(); i++)
+	for(size_t i=0; i<v.size(); i++)
 	{
 		this->operator[](i) *= v[i];
 	}
@@ -134,7 +134,7 @@ inline void pFlow::Vector<T, Allocator>::operator /=( const Vector<T, Allocator>
 		fatalExit;
 	}
 
-	for(label i=0; i<v.size(); i++)
+	for(size_t i=0; i<v.size(); i++)
 	{
 		this->operator[](i) /= v[i];
 	}
diff --git a/src/phasicFlow/containers/Vector/VectorMath.hpp b/src/phasicFlow/containers/Vector/VectorMath.hpp
index 22c7087d..153fdfff 100644
--- a/src/phasicFlow/containers/Vector/VectorMath.hpp
+++ b/src/phasicFlow/containers/Vector/VectorMath.hpp
@@ -18,12 +18,14 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
+namespace pFlow
+{
 
 #define VecFunc(fnName) 									\
 template<typename T, typename Allocator>										\
-inline pFlow::Vector<T, Allocator> pFlow::fnName(const Vector<T,Allocator>& v)	\
+inline Vector<T, Allocator> fnName(const Vector<T,Allocator>& v)	\
 {															\
-	Vector<T, Allocator> res(v.capacity(), Logical());		\
+	Vector<T, Allocator> res(v.name(), v.capacity(), 0 ,RESERVE());		\
 	for(auto& e:v)											\
 	{														\
 		res.push_back( fnName(e) );							\
@@ -31,10 +33,10 @@ inline pFlow::Vector<T, Allocator> pFlow::fnName(const Vector<T,Allocator>& v)	\
 	return std::move(res);									\
 }															\
 template<typename T, typename Allocator, typename indexFunc>					\
-inline pFlow::Vector<T, Allocator> pFlow::fnName(const Vector<T, Allocator>& v, indexFunc iFn) 	\
+inline Vector<T, Allocator> fnName(const Vector<T, Allocator>& v, indexFunc iFn) 	\
 {																		\
-	Vector<T, Allocator> res(v.capacity(), Logical());								\
-	for(label i=0; i<v.size(); i++)										\
+	Vector<T, Allocator> res(v.name(), v.capacity(), 0, RESERVE());								\
+	for(size_t i=0; i<v.size(); i++)										\
 	{																	\
 		if( iFn(i) )													\
 			res.push_back(fnName(v[i]));								\
@@ -46,20 +48,20 @@ inline pFlow::Vector<T, Allocator> pFlow::fnName(const Vector<T, Allocator>& v,
 
 #define VecFunc2(fnName) 									\
 template<typename T, typename Allocator>										\
-inline pFlow::Vector<T, Allocator> pFlow::fnName(const Vector<T, Allocator>& v1, const Vector<T, Allocator>& v2)	\
+inline Vector<T, Allocator> fnName(const Vector<T, Allocator>& v1, const Vector<T, Allocator>& v2)	\
 {															\
-	Vector<T, Allocator> res(v1.capacity(), Logical());					\
-	for(label i=0; i<v1.size(); i++)							\
+	Vector<T, Allocator> res(v1.name(), v1.capacity(), 0 ,RESERVE());					\
+	for(size_t i=0; i<v1.size(); i++)							\
 	{														\
 		res.push_back( fnName(v1[i], v2[i]));				\
 	}														\
 	return std::move(res);									\
 }															\
 template<typename T, typename Allocator, typename indexFunc>					\
-inline pFlow::Vector<T, Allocator> pFlow::fnName(const Vector<T, Allocator>& v1, const Vector<T, Allocator>& v2, indexFunc iFn) 	\
+inline Vector<T, Allocator> fnName(const Vector<T, Allocator>& v1, const Vector<T, Allocator>& v2, indexFunc iFn) 	\
 {																		\
-	Vector<T, Allocator> res(v1.capacity(), Logical());							\
-	for(label i=0; i<v1.size(); i++)									\
+	Vector<T, Allocator> res(v1.name(), v1.capacity(), 0 ,RESERVE());							\
+	for(size_t i=0; i<v1.size(); i++)									\
 	{																	\
 		if( iFn(i) )													\
 			res.push_back(fnName(v1[i], v2[i]));						\
@@ -77,6 +79,8 @@ inline pFlow::Vector<T, Allocator> pFlow::fnName(const Vector<T, Allocator>& v1,
 // min, max
 //* * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
+
+
 VecFunc(abs);
 VecFunc2(mod);
 VecFunc(exp);
@@ -100,6 +104,9 @@ VecFunc(acosh);
 VecFunc(atanh);
 
 #undef VecFunc
+}
+
+
 
 //// special implementation of math functions 
 namespace pFlow
@@ -108,7 +115,7 @@ namespace pFlow
 template<typename T, typename Allocator>
 inline Vector<T, Allocator> pow(const Vector<T, Allocator>& v, T e)
 {
-	Vector<T, Allocator> res(v.capacity(), Logical());
+	Vector<T, Allocator> res(v.name(), v.capacity(), 0 ,RESERVE());
 	for(auto& elm:v)
 	{
 		res.push_back(pow(elm,e));
@@ -119,8 +126,8 @@ inline Vector<T, Allocator> pow(const Vector<T, Allocator>& v, T e)
 template<typename T, typename Allocator, typename indexFunc>
 inline Vector<T,Allocator> pow(const Vector<T,Allocator>& v, T e, indexFunc iFn)
 {
-	Vector<T, Allocator> res(v.capacity(), Logical());
-	for(label i=0; i<v.size(); i++)
+	Vector<T, Allocator> res(v.name(), v.capacity(), 0 ,RESERVE());
+	for(size_t i=0; i<v.size(); i++)
 	{
 		if(iFn(i))
 		{
@@ -149,7 +156,7 @@ template<typename T, typename Allocator, typename indexFunc>
 inline T min(const Vector<T, Allocator>& v, indexFunc iFn)
 {
 	T minVal(largestPositive<T>());
-	for(label i=0; i<v.size(); i++)
+	for(size_t i=0; i<v.size(); i++)
 	{
 		if(iFn(i))
 		{
@@ -175,7 +182,7 @@ template<typename T, typename Allocator ,typename indexFunc>
 inline T max(const Vector<T, Allocator>& v, indexFunc iFn)
 {
 	T maxVal(largestNegative<T>());
-	for(label i=0; i<v.size(); i++)
+	for(size_t i=0; i<v.size(); i++)
 	{
 		if(iFn(i))
 		{
@@ -201,7 +208,7 @@ template<typename T, typename Allocator, typename indexFunc>
 inline T sum(const Vector<T, Allocator>& v, indexFunc iFn)
 {
 	T s = static_cast<T>(0);
-	for(label i=0; i<v.size(); ++i)
+	for(size_t i=0; i<v.size(); ++i)
 	{
 		if(iFn(i))
 			s += v[i];
diff --git a/src/phasicFlow/containers/Vector/Vectors.cpp b/src/phasicFlow/containers/Vector/Vectors.cpp
index dd958b08..43d2952f 100644
--- a/src/phasicFlow/containers/Vector/Vectors.cpp
+++ b/src/phasicFlow/containers/Vector/Vectors.cpp
@@ -21,25 +21,20 @@ Licence:
 #include "Vectors.hpp"
 
 // instantiation just for numeral types 
-template class pFlow::Vector<pFlow::int8>;
 
-template class pFlow::Vector<pFlow::int16>;
+template class pFlow::Vector<pFlow::int8>;
 
 template class pFlow::Vector<pFlow::int32>;
 
-template class pFlow::Vector<pFlow::int64>;
-
 template class pFlow::Vector<pFlow::uint32>;
 
-template class pFlow::Vector<pFlow::label>;
-
 template class pFlow::Vector<pFlow::real>;
 
 template class pFlow::Vector<pFlow::realx3>;
 
 template class pFlow::Vector<pFlow::realx3x3>;
 
-//template class pFlow::Vector<pFlow::word>;
+
 
  
 
diff --git a/src/phasicFlow/containers/Vector/Vectors.hpp b/src/phasicFlow/containers/Vector/Vectors.hpp
index 8eba5863..523444e4 100644
--- a/src/phasicFlow/containers/Vector/Vectors.hpp
+++ b/src/phasicFlow/containers/Vector/Vectors.hpp
@@ -31,69 +31,25 @@ namespace pFlow
 
 using int8Vector 	= Vector<int8>;
 
-using int16Vector 	= Vector<int16>;
-
 using int32Vector 	= Vector<int32>;
 
 using int64Vector 	= Vector<int64>;
 
-using uint32Vector 	= Vector<uint32>;
+using uint8Vector  = Vector<uint8>;
 
-using labelVector 	= Vector<label>;
+using uint32Vector   = Vector<uint32>;
+
+using uint64Vector   = Vector<uint64>;
 
 using realVector 	= Vector<real> 	;
 
 using realx3Vector 	= Vector<realx3>;
 
-using uint16x3Vector= Vector<uint16x3>;
-
-using uint32x3Vector= Vector<uint32x3>;
-
-using int32x3Vector = Vector<int32x3>;
-
-using int64x3Vector = Vector<int64x3>;
-
-using uint16x3x3Vector 	= Vector<uint16x3x3>;
-
-using uint32x3x3Vector 	= Vector<uint32x3x3>;
-
-using int32x3x3Vector 	= Vector<int32x3x3>;
-
 using realx3x3Vector 	= Vector<realx3x3>;
 
 using wordVector 		= Vector<word>;
 
-/*template<>
-inline word Vector<label>::TYPENAME() { return "labelVector"; }
-typedef Vector<label> 	labelVector;
 
-template<>
-inline word Vector<real>::TYPENAME() { return "realVector"; }
-typedef Vector<real> 	realVector;
-
-template<>
-inline word Vector<unit3>::TYPENAME() { return "unit3Vector"; }
-typedef Vector<unit3> 	unit3Vector;
-
-template<>
-inline word Vector<real3>::TYPENAME() { return "real3Vector"; }
-typedef Vector<real3>	real3Vector;
-
-template<>
-inline word Vector<real33>::TYPENAME() { return "real33Vector"; }
-typedef Vector<real33>	real33Vector;
-
-template<>
-inline word Vector<bool>::TYPENAME() { return "boolVector"; }
-typedef Vector<bool> 	boolVector;
-
-template<>
-inline word Vector<word>::TYPENAME() { return "wordVector"; }
-typedef Vector<word> 	wordVector;
-
-template<>
-inline word Vector<sint>::TYPENAME() { return "sintVector"; }
-typedef Vector<sint> 	sintVector;*/
 
 }
 
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 8dafeeb7..cf1069fd 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -22,16 +22,20 @@ Licence:
 #ifndef __VectorSingle_hpp__
 #define __VectorSingle_hpp__
 
+#include <vector>
+
+
 #include "globalSettings.hpp"
-#include "types.hpp"
 #include "typeInfo.hpp"
-#include "Vector.hpp"
+#include "types.hpp"
+#include "error.hpp"
 #include "indexContainer.hpp"
+#include "iOstream.hpp"
+#include "iIstream.hpp"
+#include "span.hpp"
+#include "Vector.hpp"
+#include "phasicFlowKokkos.hpp"
 
-#include "streams.hpp"
-
-#include "KokkosTypes.hpp"
-#include "ViewAlgorithms.hpp"
 
 
 #ifndef __RESERVE__
@@ -42,103 +46,131 @@ Licence:
 namespace pFlow
 {
 
-
+//- Forward 
 template<typename T, typename MemorySpace>
 class VectorSingle;
 
 
+
 template<typename T, typename MemorySpace=void>
 class VectorSingle
 {
 public:
 	
-	// viewType (view of data host and device)
-  	using VectorType		= VectorSingle<T, MemorySpace>;
+	//- typedefs for accessing data
 
-  	using iterator        = T*;
+		using VectorType		= VectorSingle<T, MemorySpace>;
 
-  	using constIterator   = const T*;
+		using iterator        = T*;
+
+		using constIterator   = const T*;
+	  	
+		using reference       = T&;
+	  	
+	 	using constReference  = const T&;
+
+		using valueType       = T;
+	  	
+		using pointer         = T*;
+	  	
+		using constPointer    = const T*;
   	
-	using reference       = T&;
-  	
-  	using constReference  = const T&;
+	//- typedefs related to memory management 
 
-	using valueType       = T;
-  	
-  	using pointer         = T*;
-  	
-  	using constPointer    = const T*;
-  	
-  	// type defs related to Kokkos 
-  	using viewType 			= ViewType1D<T, MemorySpace>;
+		using viewType 			= ViewType1D<T, MemorySpace>;
 
-  	using deviceType 		= typename viewType::device_type;
+		using deviceType 		= typename viewType::device_type;
 
-  	using memory_space 		= typename viewType::memory_space;
+		using memorySpace 		= typename viewType::memory_space;
 
-  	using execution_space 	= typename viewType::execution_space;
+		using executionSpace 	= typename viewType::execution_space;
 
 protected:
 	
-	size_t 			size_ = 0;
+	// - Data members
 
-	size_t 			capacity_ = 0;
+		/// Size of the vector 
+		uint32 			size_ = 0;
 
-	viewType   		view_;
+		/// view of the vector 
+		viewType   		view_;
 
-	mutable viewType	subView_;
+	// - protected members and methods 
 
-	mutable bool		subViewUpdated_ = false;
+		/// growth factor for vector 
+		static const inline 
+		real 	growthFactor_ = vectorGrowthFactor__;
 
-	static const inline real 	growthFactor_ = vectorGrowthFactor__;
+		/// Is the memory of this vector accessible from Host
+		static constexpr 
+		bool  isHostAccessible_ = isHostAccessible<executionSpace>();
+			//Kokkos::SpaceAccessibility<executionSpace,HostSpace>::accessible;
 
-	static constexpr bool  isHostAccessible_ =
-  	Kokkos::SpaceAccessibility<execution_space,Kokkos::HostSpace>::accessible;
+		/// Is the memory of this vector accessiple from Divce
+		static constexpr
+		bool isDeviceAccessible_ = isDeviceAccessible<executionSpace>();
 
-  	constexpr static inline const char* memoerySpaceName()
-  	{
-  		return memory_space::name();
-  	}
 
-	static INLINE_FUNCTION_H size_t evalCapacity(size_t n)
+		/// Name of the memory space
+	  	constexpr static inline 
+	  	const char* memoerySpaceName()
+	  	{
+	  		return memorySpace::name();
+	  	}
+
+	  	/// Evaluate capacity based on the input size 
+		static INLINE_FUNCTION_H uint32 evalCapacity(uint32 n)
+		{
+			return static_cast<uint32>(n*growthFactor_+1);
+		}
+
+	/// Change size to n and preserve the conetent if realloc 
+	/// occurs 
+	INLINE_FUNCTION_H 
+	uint32 changeSize(uint32 n, bool withInit= false)
 	{
-		return static_cast<size_t>(n*growthFactor_+1);
+		if(n > this->capacity() )
+		{
+			uint32 newCap = evalCapacity(n);
+			changeCapacity(newCap, withInit);
+		}
+		return setSize(n);
 	}
 
-	// use actualCap = true only for reserve
-	INLINE_FUNCTION_H void changeSize(size_t n, bool actualCap=false)
+	INLINE_FUNCTION_H
+	uint32 changeCapacitySize(uint32 actualCap, uint32 n, bool withInit= false)
 	{
-		if(n > capacity_ )
-		{
-			if(actualCap)
-				capacity_ = n;
-			else
-				capacity_ = evalCapacity(n);
+		changeCapacity(actualCap, withInit);
+		return setSize(n);
+	}
 
-			Kokkos::resize(view_, capacity_);
-			subViewUpdated_ = false;
-		}
-		if(!actualCap) 
+	INLINE_FUNCTION_H
+	void changeCapacity(uint32 actualCap, bool withInit= false)
+	{
+		if(withInit)
 		{
-			setSize(n);
+			resizeInit(view_, actualCap);
+		}
+		else
+		{
+			resizeNoInit(view_, actualCap);
 		}
 	}
 
-	INLINE_FUNCTION_H void setSize(size_t n)
+	INLINE_FUNCTION_H
+	uint32 reallocateCapacitySize(uint32 cap, uint32 s)
 	{
+		reallocNoInit(view_, cap);
+		return setSize(s);
+	}
+
+	INLINE_FUNCTION_H 
+	uint32 setSize(uint32 n)
+	{
+		auto os = size_;
 		size_ = n;
-		subViewUpdated_ = false;
+		return os;
 	}
-
-	// - update subview 
-	INLINE_FUNCTION_H void updateSubView()const
-	{
-		if(subViewUpdated_) return;
-
-		subView_ 	= Kokkos::subview(view_, Kokkos::make_pair(0,int(size_)));
-		subViewUpdated_ = true;
-	}
-	
 	
 public:
 
@@ -147,567 +179,301 @@ public:
 
 	//// - Constructors
 
-		// - empty constructor
+		/// Empty vector
 		VectorSingle()
 		:
 			VectorSingle("VectorSingle")
 		{}
 
-		// empty vector with a name 
+		/// Empty vector with a name 
 		VectorSingle(const word& name)
 		:
 			size_(0),
-			capacity_(2),
-			view_(name,capacity_)
-		{
-			changeSize(size_);
-		}
-
-		// - a vector with size n
-		VectorSingle(size_t n)
-		:
-			VectorSingle("VectorSingle",n)
+			view_(name,2)
 		{}
 
-		// - a vector with name and size n
-		VectorSingle(const word& name, size_t n)
+		
+		/// Vector with name and size n
+		VectorSingle(const word& name, uint32 n)
 		:
 			size_(n),
-			capacity_(evalCapacity(n)),
-			view_(name, capacity_)
-		{
-			changeSize(size_);
-		}
-
-		// a vector with size and value 
-		VectorSingle(size_t n, const T& val)
-		:
-			VectorSingle("VectorSingle", n , val)
+			view_(name, evalCapacity(n))
 		{}
 
-		// a vector with name, size and value
-		VectorSingle(const word& name, size_t n, const T& val)
+		
+
+		/// Vector with name, size and value
+		VectorSingle(const word& name, uint32 n, const T& val)
 		:
 			VectorSingle(name, n)
 		{
-			assign(n, val);
+			assign(n, val); 
 		}
 
-		// a vector with name and reserved capacity 
-		VectorSingle(size_t cap, size_t n, RESERVE )
+
+		/// Vector with name, size (n) and reserved capacity 
+		VectorSingle(const word& name, uint32 cap, uint32 n, RESERVE )
 		:
-			VectorSingle("VectorSingle", cap, n, RESERVE())
+			size_(n),
+			view_(name, cap)
 		{}
 
-
-		// a vector with name and reserved capacity 
-		VectorSingle(const word& name, size_t cap, size_t n, RESERVE )
-		:
-			VectorSingle(name)
-		{
-			reallocate(cap);
-			size_ = n;
-		}
-
-		// - construct from pFlow::Vector (host memory)
-		VectorSingle(const Vector<T> & src)
-		:
-			VectorSingle("VectorSingle", src)
-		{}
-
-		// - construct from pFlow::Vector and name 
-		VectorSingle(const word& name, const Vector<T> & src)
+		/// Construct with a name and form std::vector (host memory)
+		VectorSingle(const word& name, const std::vector<T> & src) 
 		:
 			VectorSingle(name)
 		{
 			assign(src);
 		}
 
-		// - copy construct (perform deep copy)
-		VectorSingle(const VectorSingle& src)
+		/// Construct with a name and form std::vector (host memory)
+		/// and with a desired capacity. 
+		VectorSingle(const word& name, const std::vector<T> & src, uint32 cap) 
 		:
-			VectorSingle(src.name(), src.capacity(), src.size(), RESERVE())
-		{	
-			copy(deviceVectorAll(), src.deviceVectorAll());
-			////Kokkos::deep_copy(deviceVectorAll(), src.deviceVectorAll());
+			VectorSingle(name)
+		{
+			assign(src, cap);
 		}
 
-		// - copy construct with a new name 
+		/// Copy construct (performs deep copy)
+		VectorSingle(const VectorSingle& src)
+		:
+			VectorSingle(src.name(), src)
+		{	
+			copy(deviceVector(), src.deviceVector());
+		}
+
+		/// Copy construct with a new name (perform deep copy)
 		VectorSingle(const word& name, const VectorSingle& src)
 		:
 			VectorSingle(name, src.capacity(), src.size(), RESERVE())
 		{
-			copy(deviceVectorAll(), src.deviceVectorAll());	
-			////Kokkos::deep_copy(deviceVectorAll(), src.deviceVectorAll());
+			copy(deviceVector(), src.deviceVector());	
 		}
 
-		// - copy assignment 
-		VectorSingle& operator = (const VectorSingle& rhs)
+		/// Copy assignment (perform deep copy from rhs to *this)
+		VectorSingle& operator = (const VectorSingle& rhs) 
 		{
 			if(&rhs == this) return *this;
 			VectorSingle temp(rhs);
-			capacity_   = temp.capacity();
-			size_ 		= temp.size();	
+
+			size_ 	= temp.size();	
 			view_   = temp.view_;
-			subViewUpdated_ = false;
 
 			return *this;
 		}
 
-		// no move construct
-		VectorSingle(VectorSingle&&) = delete;
+		/// Move construct
+		VectorSingle(VectorSingle&&) = default;   
 
-		// no move assignment
-		VectorSingle& operator= (VectorSingle&&) = delete;
+		/// Move assignment
+		VectorSingle& operator= (VectorSingle&&) = default; 
 
-
-		// - clone as a uniquePtr
-		INLINE_FUNCTION_H 
-		uniquePtr<VectorSingle> clone() const
+		/// This may not destroy the underlying memory, sice view is 
+		/// shared_ptr and maybe referenced by another object too 
+		~VectorSingle()
 		{
-			return makeUnique<VectorSingle>(*this);
+			view_ = viewType();
+			size_ = 0;
 		}
 
-		// - clone as a pointer
-		INLINE_FUNCTION_H
-		VectorSingle* clonePtr()const
+		/// Clone as a uniquePtr (perform deep copy)
+		INLINE_FUNCTION_H 
+		uniquePtr<VectorSingle> clone() const  
 		{
-			return new VectorSingle(*this);
+			return makeUnique<VectorSingle>( this->name(), *this);
+		}
+
+		/// Clone as a pointer (perform deep copy)
+		INLINE_FUNCTION_H
+		VectorSingle* clonePtr()const   
+		{
+			return new VectorSingle(this->name(), *this);
 		}
 
 	//// - Methods
 
-		// - return *this
+		/// Return *this
 		INLINE_FUNCTION_H
 		VectorType& VectorField()
 		{
 			return *this;
 		}
 
-		// - return *this
+		/// Return *this
 		INLINE_FUNCTION_H
 		const VectorType& VectorField()const
 		{
 			return *this;
 		}
 
-
-		// - Device vector range [0,capcity)
+		/// Device vector range [0,capcity)
 		INLINE_FUNCTION_H 
-		viewType& deviceVectorAll(){
+		viewType deviceVectorAll() const{
 			return view_;
 		}
 
-		// - Device vector range [0,capacity)
+		///  Device vector range [0, size)
 		INLINE_FUNCTION_H 
-		const viewType& deviceVectorAll() const {
-			return view_;
+		viewType deviceVector()const
+		{
+			return Kokkos::subview(view_, Kokkos::make_pair(0,int(size_)));
 		}
 
-		//  - Device vector range [0, size)
+		/// Return a vector accessible on Host in range [0,capacity)
 		INLINE_FUNCTION_H 
-		viewType& deviceVector(){
-			updateSubView();
-			return subView_;
-		}
-
-		//  - Device vector range [0, size)
-		INLINE_FUNCTION_H 
-		const viewType& deviceVector()const{
-			updateSubView();
-			return subView_;
-		}
-
-		INLINE_FUNCTION_H 
-		const auto hostVectorAll()const
+		auto hostVectorAll()const
 		{
 			auto hView = Kokkos::create_mirror_view(view_);
 			copy(hView, view_);
 			return hView;
 		}
 
+		/// Return a vector accessible on Host in range [0,size)
 		INLINE_FUNCTION_H 
-		auto hostVectorAll()
-		{
-			auto hView = Kokkos::create_mirror_view(view_);
-			copy(hView, view_);
-			return hView;
-		}
-
-		INLINE_FUNCTION_H 
-		const auto hostVector()const
+		auto hostVector()const
 		{
 			auto hView = Kokkos::create_mirror_view(deviceVector());
 			copy(hView, deviceVector());
 			return hView;
 		}
 
-		INLINE_FUNCTION_H 
-		auto hostVector()
-		{
-			auto hView = Kokkos::create_mirror_view(deviceVector());
-			copy(hView, deviceVector());
-			return hView;
-		}
-
-		// - name of vector 
+		/// Name of the vector 
 		INLINE_FUNCTION_H 
 		const word name()const
 		{
 			return view_.label();
 		}
 		
-		// - size of vector 
+		/// Size of the vector 
 		INLINE_FUNCTION_H 
-		size_t size()const
+		uint32 size()const
 		{
 			return size_;
 		}
 
-		// - capcity of vector 
+		// Capcity of the vector 
 		INLINE_FUNCTION_H 
-		size_t capacity()const
+		uint32 capacity()const
 		{
-			return capacity_;
+			return view_.extent(0);
 		}
 
-		// - if vector is empty 
+		/// If vector is empty 
 		INLINE_FUNCTION_H 
 		bool empty()const
 		{
 			return size_==0;
 		}
 
-		// - reserve capacity for vector 
-		//   preserve the content
+		/// Reserve capacity for vector 
+		/// Preserve the content.
 		INLINE_FUNCTION_H 
-		void reserve(size_t cap)
+		void reserve(uint32 cap) 
 		{
-			changeSize(cap, true);
+			changeCapacity(cap);
 		}
 
-		// - reallocate memory
-		INLINE_FUNCTION_H void reallocate(size_t cap)
-		{
-			capacity_ = cap;
-			size_ = 0;
-			reallocNoInit(view_, capacity_);
-			subViewUpdated_ = false;
-		}
-
-		INLINE_FUNCTION_H void reallocate(size_t cap, size_t size)
-		{
-			capacity_ = cap;
-			size_ = size;
-			reallocNoInit(view_, capacity_);
-			subViewUpdated_ = false;
-		}
-
-		// resize the vector  
+		/// Reallocate memory to new cap and set size to 0. 
 		INLINE_FUNCTION_H 
-		void resize(size_t n){
+		void reallocate(uint32 cap) 
+		{
+			reallocateCapacitySize(cap, 0);			
+		}
+
+		/// Reallocate memory to new cap and set size to newSize. 
+		/// Do not preserve the content
+		INLINE_FUNCTION_H 
+		void reallocate(uint32 cap, uint32 newSize) 
+		{
+			reallocateCapacitySize(cap, newSize);			
+		}
+
+		/// Resize the vector and preserve the content
+		INLINE_FUNCTION_H   
+		void resize(uint32 n){
 			changeSize(n);
 		}
 
-		// resize the view and assign value to the most recent view (most updated)
-		INLINE_FUNCTION_H 
-		void resize(size_t n, const T& val) {
+		/// Resize the vector and assign the value to it. 
+		INLINE_FUNCTION_H  
+		void resize(uint32 n, const T& val) {
 			assign(n, val);
 		}
 
-		// - clear the vector 
+		/// Clear the vector, but keep the allocated memory unchanged 
 		INLINE_FUNCTION_H 
-		void clear() {
+		void clear() 
+		{
 			 size_ = 0;
-			 subViewUpdated_ = false;
-
 		}
 
-		// - fill the range [0,size) with val
+		/// Fill the range [0,size) with val
 		INLINE_FUNCTION_H 
 		void fill(const T& val)
 		{
 			if(empty())return;
-			pFlow::fill(deviceVectorAll(),0 ,size_ ,val);
+			pFlow::fill(view_, rangeU32(0 ,size_) ,val);
 		}
 		
-		// - host calls only
-		// - assign n first elements to val
-		//   resize view
-		//   assign value to either side (device/host)
+		/// Change size of the vector and assign val to vector and 
 		INLINE_FUNCTION_H
 		void assign(size_t n, const T& val)
 		{
-			if(capacity()<n)
+			if( n > capacity() )
 			{
-				this->reallocate(evalCapacity(n));
+				reallocateCapacitySize(evalCapacity(n), n);
+			}
+			else
+			{
+				setSize(n);	
 			}
-			size_ = n;
 			this->fill(val);
 		}
 
-		// - host calls only
-		// - assign source vector
-		//   resize views
-		//   assign to both sides (device&host)
-		INLINE_FUNCTION_H void assign(const Vector<T>& src)
+		
+		/// Assign source vector with specified capacity.
+		/// The size of *this becomes the size of src. 
+		INLINE_FUNCTION_H 
+		void assign(const std::vector<T>& src, uint32 cap) 
 		{
-			auto srcSize = src.size();
-			if( capacity() < srcSize ) 
+			uint32 srcSize = src.size();
+			
+			if(cap != capacity())
 			{
-				this->reallocate( src.capacity() );
+				reallocateCapacitySize(cap, srcSize);
+			}
+			else
+			{
+				setSize(srcSize);
 			}
-			size_ = srcSize;
 			
 			// - unmanaged view in the host
 			hostViewType1D<const T> temp(src.data(), srcSize );
 			copy(deviceVector(), temp);
 		}
 
-
-		//TODO: change it to parallel version 
-		// - delete elements from vector 
-		//   similar memory spaces 
-		/*template<class indT, class MSpace>
+		/// Assign source vector.
+		/// The size of *this becomes the size of src. 
+		/// The capacity of *this becomes the capacity of src.
 		INLINE_FUNCTION_H 
-			typename std::enable_if<
-				Kokkos::SpaceAccessibility<
-					execution_space, typename VectorSingle<indT,MSpace>::memory_space>::accessible,
-					bool>::type
-		deleteElement
-		(
-			const VectorSingle<indT,MSpace>& sortedIndices
-		)
+		void assign(const std::vector<T>& src) 
 		{
-			
-			auto& indices = sortedIndices.deviceVectorAll();
-			auto& dVec = deviceVectorAll();
-			indT  numInd = sortedIndices.size();
-			indT  oldSize = this->size();
-
-			if( numInd == 0 )return true;
-			
-			// an scalalr
-			
-			Kokkos::parallel_for(1, LAMBDA_HD(int nn)
-			 	{
-			 		(void)nn;	
-			 		indT n = 0;
-					indT nextInd = indices[0];
-					indT j = indices[0];
-					for(label i=indices[0]; i < oldSize; ++i)
-					{
-						if( n < numInd && i == nextInd )
-						{
-							++n;
-							nextInd = indices[n];
-						}
-						else
-						{
-							dVec[j] = dVec[i];
-							++j;	
-						}				
-					}
-
-			 	});
-			typename viewType::execution_space().fence();
-			size_ = oldSize - indices.size();
-			subViewUpdated_ = false;
-
-			return true;
+			assign(src, src.capacity());
 		}
 
-		// different memory spaces 
-		template<class indT, class MSpace>
-		INLINE_FUNCTION_H 
-		typename std::enable_if<
-				! Kokkos::SpaceAccessibility<
-					execution_space, typename VectorSingle<indT,MSpace>::memory_space>::accessible,
-					bool>::type
-		deleteElement
-		(
-			const VectorSingle<indT,MSpace>& sortedIndices
-		)
-		{
-			
-			notImplementedFunction;
-		}*/
 
 		INLINE_FUNCTION_H
-		bool insertSetElement(const int32IndexContainer& indices, const T& val)
-		{
-			if(indices.empty()) return true;
-			auto maxInd = indices.max();
-
-			if(this->empty() || maxInd > size()-1 )
-			{
-				resize(maxInd+1);
-			}
-
-			
-			using policy = Kokkos::RangePolicy<
-			execution_space,
-			Kokkos::IndexType<int32> >;
-			auto dVec = deviceVectorAll();
-			auto dIndex = indices.deviceView();
-			
-			Kokkos::parallel_for(
-				"insertSetElement",
-				policy(0,indices.size()), LAMBDA_HD(int32 i){	
-				dVec(dIndex(i))= val;
-				});
-			Kokkos::fence();
-
-			return true;
-		}
-
-		INLINE_FUNCTION_H
-		void sortItems(const int32IndexContainer& indices)
-		{
-			if(indices.size() == 0)
-			{
-				setSize(0);
-				return;
-			}
-			
-			size_t 		newSize = indices.size();
-			viewType 	sortedView("sortedView", newSize);
-
-			using policy = Kokkos::RangePolicy<
-			execution_space,
-			Kokkos::IndexType<int32> >;
-
-			auto d_indices = indices.deviceView();
-			auto d_view = view_;
-			Kokkos::parallel_for(
-				"sortItems",
-				newSize, 
-				LAMBDA_HD(int32 i){	
-					sortedView(i) = d_view(d_indices(i));
-				});
-
-			Kokkos::fence();
-
-			setSize(newSize);
-
-			copy(deviceVector(), sortedView);
-			
-			return;
-
-		}
-
-		INLINE_FUNCTION_H
-		bool insertSetElement(const int32IndexContainer& indices, const Vector<T>& vals)
-		{
-
-			if(indices.size() == 0)return true;
-			if(indices.size() != vals.size())return false;
-
-			auto maxInd = indices.max(); 
-			
-			if(this->empty() || maxInd > size()-1 )
-			{
-				resize(maxInd+1);
-			} 
-
-				
-			hostViewType1D<const T> hVecVals( vals.data(), vals.size());
-			deviceViewType1D<T> dVecVals("dVecVals", indices.size());
-
-			copy(dVecVals, hVecVals);
-
-			using policy = Kokkos::RangePolicy<
-			execution_space,
-			Kokkos::IndexType<int32> >;
-			auto dVec = deviceVectorAll();
-			auto dIndex = indices.deviceView();
+		bool insertSetElement(uint32IndexContainer indices, const T& val);
 		
-			Kokkos::parallel_for(
-				"insertSetElement",
-				policy(0,indices.size()), LAMBDA_HD(int32 i){	
-				dVec(dIndex(i))= dVecVals(i);
-				});
-			Kokkos::fence();
-
-			return true;
-			
-		}
-
 		INLINE_FUNCTION_H
-		bool insertSetElement(const Vector<int32>& indices, const T& val)
-		{
-			if(indices.empty()) return true;
-
-			auto maxInd = max(indices);
-			
-			if(this->empty() || maxInd > size()-1 )
-			{
-				resize(maxInd+1);
-			}
-
-			if constexpr (isHostAccessible_)
-			{
-				hostViewType1D<int32> hostView(const_cast<int32*>(indices.data()), indices.size());
-				fillSelected(deviceVectorAll(), hostView, indices.size(), val);
-				return true;
-			
-			}else
-			{
-
-				// TODO: remove the const_cast 
-				hostViewType1D<int32> hostView(const_cast<int32*>(indices.data()), indices.size());
-				deviceViewType1D<int32> dView("dView", indices.size());
-				copy(dView, hostView);
-				fillSelected(deviceVectorAll(), dView, indices.size(), val);
-				return true;
-			}
-
-			return false;
-		}
-
+		bool insertSetElement(uint32IndexContainer indices, const std::vector<T>& vals);
+		
 		INLINE_FUNCTION_H
-		bool insertSetElement(const Vector<int32>& indices, const Vector<T>& vals)
-		{
-			if(indices.size() == 0)return true;
-			if(indices.size() != vals.size())return false;
+		bool reorderItems(uint32IndexContainer indices);
 
-			auto maxInd = max(indices); 
-			
-			if(this->empty() || maxInd > size()-1 )
-			{
-				resize(maxInd+1);
-			} 
 
-			if constexpr (isHostAccessible_)
-			{
-				// TODO: remove const_cast
-				hostViewType1D<int32> hVecInd( const_cast<int32*>(indices.data()), indices.size());
-				hostViewType1D<T> hVecVals( const_cast<T*>(vals.data()), vals.size());
-
-				fillSelected(deviceVectorAll(), hVecInd, hVecVals, indices.size());
-				return true;
-			
-			}else
-			{
-				
-				// TODO: remove const_cast
-				hostViewType1D<int32> hVecInd( const_cast<int32*>(indices.data()), indices.size());
-				deviceViewType1D<int32> dVecInd("dVecInd", indices.size());
-
-				hostViewType1D<T> hVecVals( const_cast<T*>(vals.data()), vals.size());
-				deviceViewType1D<T> dVecVals("dVecVals", indices.size());
-				
-				copy(dVecVals, hVecVals);
-				copy(dVecInd, hVecInd);
-
-				fillSelected(deviceVectorAll(), dVecInd, dVecVals, indices.size());
-				return true;
-			}
-
-			return false;
-		}
-
-		INLINE_FUNCTION_H
+		/*INLINE_FUNCTION_H
 		bool append(const deviceViewType1D<T>& dVec, size_t numElems)
 		{
 
@@ -734,106 +500,87 @@ public:
 		bool append(const VectorSingle& Vec)
 		{
 			return append(Vec.deviceVector(), Vec.size());
-		}
+		}*/
 
 		// - host calls only
 		//   push a new element at the end
 		//   resize if necessary
 		//   works on host accessible vector 
 		template<bool Enable = true>
-		typename std::enable_if<
-			isHostAccessible_ && Enable,
-			void>::type
+		INLINE_FUNCTION_H
+		typename std::enable_if<isHostAccessible_ && Enable, void>::type
 		push_back(const T& val)
 		{
-			if(size_ == capacity_) 
-			{
-				changeSize(evalCapacity(capacity_), true);
-			}
-			data()[size_++] = val;
-			subViewUpdated_ = false;
+			auto n = changeSize(size_+1);
+			data()[n] = val;	
 		}
 
-		INLINE_FUNCTION_H pointer data(){
+		INLINE_FUNCTION_H 
+		pointer data(){
 			return view_.data();
 		}
 
-		INLINE_FUNCTION_H constPointer data()const{
+		INLINE_FUNCTION_H 
+		constPointer data()const{
 			return view_.data();
 		}
 
-		// - host calls only
-		//   works on host accessible vector 
-		// 	 returns begin iterator 
+		/// Return begin iterator. it works when host is accessible.
 		template<bool Enable = true>
 		INLINE_FUNCTION_H 
-		typename std::enable_if_t<
-			isHostAccessible_ && Enable,
-			iterator>
+		typename std::enable_if_t<isHostAccessible_ && Enable,iterator>
 		begin(){
 			return data();
 		}
 
-		// - host calls only
-		//   works on host accessible vector 
-		//   returns begin iterator 
+		/// Return begin iterator. it works when host is accessible.
 		template<bool Enable = true>
 		INLINE_FUNCTION_H 
-		typename std::enable_if<
-			isHostAccessible_ && Enable,
-			constIterator>::type
+		typename std::enable_if_t<isHostAccessible_ && Enable,constIterator>
 		begin()const {
 			return data();
 		}
 
-		// - host calls only
-		//   works on host accessible vector 
-		//   returns end iterator
+		
+		/// Return end iterator. it works when host is accessible.
 		template<bool Enable = true> 
 		INLINE_FUNCTION_H
-		typename std::enable_if<
-			isHostAccessible_ && Enable,
-			iterator>::type
+		typename std::enable_if_t<isHostAccessible_ && Enable,iterator>
 		end(){
 			return size_ > 0 ? data() + size_: data();
 		}
 
-		// host call
-		// returns end iterator 
+		
+		/// Return end iterator. it works when host is accessible.
 		template<bool Enable = true>
 		INLINE_FUNCTION_H
-		typename std::enable_if<
-			isHostAccessible_ && Enable,
-			constIterator>::type
+		typename std::enable_if_t<isHostAccessible_ && Enable,constIterator>
 		end()const{
 			return size_ > 0 ? data() + size_: data();
 		}
 				
-		// operator to be used on host side vectors
+		/// Return reference to element i. it works when host is accessible.
 		template<bool Enable = true>
 		INLINE_FUNCTION_H 
-		typename std::enable_if<
-			isHostAccessible_ && Enable,
-			reference>::type
-		operator[](label i){
+		typename std::enable_if_t<isHostAccessible_ && Enable,reference>
+		operator[](size_t i){
 			return view_[i];
 		}
 
+		/// Return reference to element i. it works when host is accessible.
 		template<bool Enable = true>
 		INLINE_FUNCTION_H 
-		typename std::enable_if<
-			isHostAccessible_ && Enable,
-			constReference>::type
-		 operator[](label i)const{
+		typename std::enable_if_t<isHostAccessible_ && Enable,constReference>
+		 operator[](size_t i)const{
 			return view_[i];
 		}
 
 	//// - IO operations
 
+		/// Read vector from is stream (ASCII or Binary)
+		/// For binary read, len should be provided 
 		FUNCTION_H
-		bool readVector(
-			iIstream& is,
-			size_t len=0)
+		bool readVector(iIstream& is,	size_t len=0)
 		{
 			Vector<T> vecFromFile;
 			if( !vecFromFile.readVector(is,len) ) return false;
@@ -843,23 +590,21 @@ public:
 			return true;
 		}
 
+		/// Read vector from stream (ASCII)
 		FUNCTION_H
 		bool read(iIstream& is)
 		{
 			return readVector(is);
 		}
 
+		/// Write the vector to os (ASCII or Binary)
 		FUNCTION_H
 		bool write(iOstream& os)const
 		{
-			
-			Vector<T, noConstructAllocator<T>> vecToFile(this->size());
-			
-			const auto dVec = Kokkos::subview(view_, Kokkos::make_pair(0,int(size_)));
-			hostViewType1D<T> mirror(vecToFile.data(), vecToFile.size());
-			copy(mirror,dVec);
-
-			return vecToFile.write(os);
+			auto hVec = hostVector();
+			auto sp = span<T>( const_cast<T*>(hVec.data()), hVec.size());
+			os<<sp;
+			return true;
 		}
 
 }; // class VectorSingle
@@ -894,6 +639,7 @@ inline iOstream& operator << (iOstream& os, const VectorSingle<T, MemorySpace>&
 } // - pFlow
 
 #include "VectorSingleAlgorithms.hpp"
+#include "VectorSingleI.hpp"
 
 
 #endif //__VectorSingle_hpp__
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingleI.hpp b/src/phasicFlow/containers/VectorHD/VectorSingleI.hpp
new file mode 100644
index 00000000..61217a96
--- /dev/null
+++ b/src/phasicFlow/containers/VectorHD/VectorSingleI.hpp
@@ -0,0 +1,197 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement(uint32IndexContainer indices, const T& val)
+{
+	if(indices.empty()) return true;
+	
+	auto maxInd = indices.max();
+
+	if(this->empty() || maxInd > size()-1 )
+	{
+		resize(maxInd+1);
+	}
+
+	using policy = Kokkos::RangePolicy<executionSpace,Kokkos::IndexType<uint32>>;
+
+	if constexpr( isDeviceAccessible_ )
+	{
+		auto v = view_;
+		auto ind = indices.deviceView();
+
+		Kokkos::parallel_for(
+			"VectorSingle::insertSetElement",
+			policy(0,indices.size()),
+			LAMBDA_HD(uint32 i){
+				v[ind[i]]= val;
+			});
+
+		Kokkos::fence();
+	}
+	else
+	{
+
+		auto v = view_;
+		auto ind = indices.hostView();
+		
+		Kokkos::parallel_for(
+			"VectorSingle::insertSetElement",
+			policy(0,indices.size()),
+			LAMBDA_HD(uint32 i){
+				v[ind[i]]= val;
+			});
+
+		Kokkos::fence();
+
+	}
+
+	return true;
+}
+
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
+(
+	const uint32IndexContainer indices, 
+	const std::vector<T>& vals
+)
+{
+
+	if(indices.size() == 0)return true;
+	if(indices.size() != vals.size())return false;
+
+	auto maxInd = indices.max(); 
+	
+	if(this->empty() || maxInd > size()-1 )
+	{
+		resize(maxInd+1);
+	} 
+	
+	using policy = Kokkos::RangePolicy<executionSpace,Kokkos::IndexType<uint32>>;
+
+	hostViewType1D<const T> hVals( vals.data(), vals.size());
+
+	if constexpr( isDeviceAccessible_ )
+	{
+		deviceViewType1D<T> dVals("dVals", indices.size());
+		copy(dVals, hVals);
+		auto dVec = view_;
+		auto ind = indices.deviceView();
+
+		Kokkos::parallel_for(
+			"VectorSingle::insertSetElement",
+			policy(0,indices.size()), LAMBDA_HD(int32 i){	
+				dVec(ind(i))= dVals(i);}
+			);
+
+		Kokkos::fence();
+
+	}
+	else
+	{
+		auto dVec = view_;
+		auto ind = indices.hostView();
+
+		Kokkos::parallel_for(
+			"VectorSingle::insertSetElement",
+			policy(0,indices.size()), LAMBDA_HD(int32 i){	
+				dVec(ind(i))= hVals(i);}
+			);
+
+		Kokkos::fence();
+
+	}
+		
+	return true;
+}
+
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+bool pFlow::VectorSingle<T,MemorySpace>::reorderItems(uint32IndexContainer indices)
+{
+	if(indices.size() == 0)
+	{
+		setSize(0);
+		return true;
+	}
+	
+	auto maxInd = indices.max();
+
+	if(maxInd >= this->size())
+	{
+		fatalErrorInFunction<<"In reordering the VectorSingle ("
+		<< this->name()<< ") maximum index ("<< maxInd << 
+		") exceeds the size of the vector ("	<< this->size()<<")"<<endl;
+		return false;
+	}
+
+	uint32 		newSize = indices.size();
+	
+	setSize(newSize);
+
+	viewType 	sortedView(this->name(), newSize);
+
+	using policy = Kokkos::RangePolicy< executionSpace,Kokkos::IndexType<uint32>>;
+
+	if constexpr( isDeviceAccessible_)
+	{
+		auto d_indices = indices.deviceView();
+		auto d_view = view_;
+		
+		Kokkos::parallel_for
+		(
+			"VectorSingle::sortItems",
+			policy(0,newSize), 
+			LAMBDA_HD(uint32 i)
+			{	
+				sortedView(i) = d_view(d_indices(i));
+			}
+		);
+
+		Kokkos::fence();
+
+	}
+	else
+	{
+		auto h_indices = indices.hostView();
+		auto d_view = view_;
+		
+		Kokkos::parallel_for
+		(
+			"VectorSingle::sortItems",
+			policy(0,newSize), 
+			LAMBDA_HD(uint32 i)
+			{	
+				sortedView(i) = d_view(h_indices(i));
+			}
+		);
+		
+		Kokkos::fence();
+	}
+
+	copy(deviceVector(), sortedView);
+	
+	return true;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingles.hpp b/src/phasicFlow/containers/VectorHD/VectorSingles.hpp
index ecae1398..d0c3acdf 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingles.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingles.hpp
@@ -33,10 +33,6 @@ typedef VectorSingle<int8> 				int8Vector_D;
 
 typedef VectorSingle<int8, HostSpace> 	int8Vector_H;
 
-typedef VectorSingle<int16> 			int16Vector_D;
-
-typedef VectorSingle<int16, HostSpace> 	int16Vector_H;
-
 typedef VectorSingle<int32> 			int32Vector_D;
 
 typedef VectorSingle<int32, HostSpace> 	int32Vector_H;
@@ -45,13 +41,17 @@ typedef VectorSingle<int64> 			int64Vector_D;
 
 typedef VectorSingle<int64, HostSpace> 	int64Vector_H;
 
+typedef VectorSingle<uint8> 			uint8Vector_D;
+
+typedef VectorSingle<uint8, HostSpace> 	uint8Vector_H;
+
 typedef VectorSingle<uint32> 			uint32Vector_D;
 
 typedef VectorSingle<uint32, HostSpace> uint32Vector_H;
 
-typedef VectorSingle<label> 			labelVector_D;
+typedef VectorSingle<uint64> 			uint64Vector_D;
 
-typedef VectorSingle<label, HostSpace> 	labelVector_H;
+typedef VectorSingle<uint64, HostSpace> uint64Vector_H;
 
 typedef VectorSingle<real> 				realVector_D;
 
@@ -61,14 +61,6 @@ typedef VectorSingle<realx3> 				realx3Vector_D;
 
 typedef VectorSingle<realx3, HostSpace> 	realx3Vector_H;
 
-typedef VectorSingle<uint16x3> 				uint16x3Vector_D;
-
-typedef VectorSingle<uint16x3, HostSpace> 	uint16x3Vector_H;
-
-typedef VectorSingle<uint32x3> 				uint32x3Vector_D;
-
-typedef VectorSingle<uint32x3, HostSpace> 	uint32x3Vector_H;
-
 typedef VectorSingle<int32x3> 				int32x3Vector_D;
 
 typedef VectorSingle<int32x3, HostSpace> 	int32x3Vector_H;
@@ -77,6 +69,10 @@ typedef VectorSingle<int64x3> 				int64x3Vector_D;
 
 typedef VectorSingle<int64x3, HostSpace> 	int64x3Vector_H;
 
+typedef VectorSingle<uint32x3> 				uint32x3Vector_D;
+
+typedef VectorSingle<uint32x3, HostSpace> 	uint32x3Vector_H;
+
 typedef VectorSingle<realx3x3> 				realx3x3Vector_D;
 
 typedef VectorSingle<realx3x3, HostSpace> 	realx3x3Vector_H;
diff --git a/src/phasicFlow/containers/indexContainer/indexContainer.hpp b/src/phasicFlow/containers/indexContainer/indexContainer.hpp
index 7b517a5a..10fce100 100644
--- a/src/phasicFlow/containers/indexContainer/indexContainer.hpp
+++ b/src/phasicFlow/containers/indexContainer/indexContainer.hpp
@@ -21,32 +21,41 @@ Licence:
 #ifndef __indexContainer_hpp__ 
 #define __indexContainer_hpp__
 
-#include "span.hpp"
-#include "KokkosTypes.hpp"
-#include "KokkosUtilities.hpp"
-#include "ViewAlgorithms.hpp"
+#include <vector>
+
+#include "phasicFlowKokkos.hpp"
 
 
 namespace pFlow
 {
 
+/**
+ * It holds two vectors of indecis on Host and Device.
+ * Host vector should be used for threads running on
+ * Host and Device vector should be used for threads
+ * running on Device.
+ */
 template<typename IndexType>
 class indexContainer
 {
 public:
 	
-	using DualViewType 		= Kokkos::DualView<IndexType*>;
+	using DVType 					= DualViewType1D<IndexType>;
+	///  Device type on device 
+	using DeviceViewType 	= typename DVType::t_dev;
 
-	// - viewType of data on device 
-  	using DeviceViewType 	= typename DualViewType::t_dev;
+	/// Host type on device 
+	using HostViewType 		= typename DVType::t_host;
 
-  	// - viewType of data on host
-  	using HostViewType 		= typename DualViewType::t_host;
+	/// Host memory type
+	using HostType 			= typename HostViewType::device_type;
 
-  	using HostType 			= typename HostViewType::device_type;
-
-  	using DeviceType 		= typename DeviceViewType::device_type;
+	/// Device memory ype
+	using DeviceType 		= typename DeviceViewType::device_type;
 
+	/**
+	 * Helper class for accessing index on host or device 
+	 */
   	template<typename ViewType>
   	class IndexAccessor
   	{
@@ -58,169 +67,207 @@ public:
   		view_(v){}
 
   		INLINE_FUNCTION_HD
-  		IndexType operator()(int32 i)const
+  		IndexType operator()(uint32 i)const
   		{
   			return view_[i];
   		}
+
+  		uint32 size()const
+  		{
+  			return view_.extent(0);
+  		}
   	};
 
 protected:
 
-	int32 		min_  	= 0;
-	int32 		max_ 	= 0;
-	size_t 		size_	= 0; 	
+	/// min value in indices
+	IndexType 		min_  	= 0;
 
-	DualViewType 	views_;
+	/// max value in the indices
+	IndexType 		max_ 	= 0;
+
+	/// number/size of index vector 
+	uint32 			size_	= 0; 	
+
+	/// views to hold indices on Host and Device
+	DVType 			views_;
 
 public:
 
-	indexContainer(){}
+	//// - Constructors 
 
-	// half open [begin,end)
-	indexContainer(IndexType begin, IndexType end)
-	:
-		min_(begin),
-		max_(end-1),
-		size_(end-begin),
-		views_("indexContainer", size_)
-	{
-		pFlow::fillSequence(views_.h_view, 0, size_, min_);
-		copy(views_.d_view, views_.h_view);
-	}
+		/// Default
+		indexContainer(){}
 
+		/// Construct from a Range (half open)
+		template<typename T>
+		indexContainer(const Range<T>& rng)
+		:
+			indexContainer
+			(
+				static_cast<IndexType>(rng.begin()), 
+				static_cast<IndexType>(rng.end())
+			)
+		{}
 
-	indexContainer(IndexType* data, int32 numElems)
-	:
-		size_(numElems),
-		views_("indexContainer", numElems)
-	{
-		HostViewType hData(data, numElems);
-		copy(views_.h_view, hData);
-		copy(views_.d_view, views_.h_view);
-		min_ 	= pFlow::min(views_.d_view, 0, numElems);
-		max_ 	= pFlow::max(views_.d_view, 0, numElems);
-	}
-
-	indexContainer(const indexContainer&) = default;
-
-	indexContainer& operator = (const indexContainer&) = default;
-
-	indexContainer(indexContainer&&) = default;
-
-	indexContainer& operator = (indexContainer&&) = default;	
-
-	~indexContainer() = default;
-
-	INLINE_FUNCTION_HD
-	size_t size()const
-	{
-		return size_;
-	}
-
-	INLINE_FUNCTION_HD
-	size_t empty()const
-	{
-		return size_==0;
-	}
-	
-	INLINE_FUNCTION_HD
-	IndexType min()const
-	{
-		return min_;
-	}
-
-	INLINE_FUNCTION_HD
-	IndexType max()const
-	{
-		return max_;
-	}
-
-	template<typename executionSpace>
-	INLINE_FUNCTION_HD
-	IndexType operator()(selectSide<executionSpace>,int32 i)const
-	{	
-		if constexpr (isHostAccessible<executionSpace>())
+		/// Construct half open [begin,end)
+		indexContainer(IndexType begin, IndexType end)
+		:
+			min_(begin),
+			max_(end-1),
+			size_(end-begin),
+			views_("indexContainer", size_)
 		{
-			return views_.h_view(i);
-		}else
-		{
-			return views_.d_view(i);
-		}
-	}
-
-	const HostViewType& hostView()const
-	{
-		return views_.h_view;
-	}
-
-	const DeviceViewType& deviceView()const
-	{
-		return views_.d_view;
-	}
-
-	HostViewType& hostView()
-	{
-		return views_.h_view;
-	}
-
-	DeviceViewType& deviceView()
-	{
-		return views_.d_view;
-	}
-
-	auto indicesHost()const
-	{
-		return IndexAccessor<HostViewType>(views_.h_view);
-	}
-
-	auto indicesDevice()const
-	{
-		return IndexAccessor<DeviceViewType>(views_.d_view);
-	}
-
-	void modifyOnHost()
-	{
-		views_.modify_host();
-	}
-
-	void modifyOnDevice()
-	{
-		views_.modify_device();
-	}
-
-	void syncViews()
-	{
-		bool findMinMax = false;
-		if(views_.template need_sync<HostType>())
-		{
-			Kokkos::deep_copy(views_.d_view, views_.h_view);
-			findMinMax = true;
-		}
-		else if(views_.template need_sync<DeviceType>())
-		{
-			Kokkos::deep_copy(views_.h_view, views_.d_view);
-			findMinMax = true;
+			pFlow::fillSequence(views_.h_view, 0, size_, min_);
+			copy(views_.d_view, views_.h_view);
 		}
 
-		if(findMinMax)
+		/// From data and number of elements in data. 
+		/// data is a pointer in the Host memory 
+		indexContainer(IndexType* data, int32 numElems)
+		:
+			size_(numElems),
+			views_("indexContainer", numElems)
 		{
-			min_ 	= pFlow::min(views_.d_view, 0, size_);
-			max_ 	= pFlow::max(views_.d_view, 0, size_);
+			HostViewType hData(data, numElems);
+			copy(views_.h_view, hData);
+			copy(views_.d_view, views_.h_view);
+			min_ 	= pFlow::min(views_.d_view, 0, numElems);
+			max_ 	= pFlow::max(views_.d_view, 0, numElems);
+		}
+
+		indexContainer(std::vector<IndexType> &ind)
+		:
+			indexContainer(ind.data(), ind.size())
+		{}
+
+		/// Copy
+		indexContainer(const indexContainer&) = default;
+
+		/// Copy assignment
+		indexContainer& operator = (const indexContainer&) = default;
+
+		/// Move
+		indexContainer(indexContainer&&) = default;
+
+		/// Mover assignement 
+		indexContainer& operator = (indexContainer&&) = default;	
+
+		/// Destructor
+		~indexContainer() = default;
+
+	//// - Methods 
+
+		/// Size 
+		INLINE_FUNCTION_HD
+		auto size()const
+		{
+			return size_;
+		}
+
+		/// If the container empty
+		INLINE_FUNCTION_HD
+		bool empty()const
+		{
+			return size_==0;
+		}
+		
+		/// Min value of indices 
+		INLINE_FUNCTION_HD
+		IndexType min()const
+		{
+			return min_;
+		}
+
+		/// Max value of indices 
+		INLINE_FUNCTION_HD
+		IndexType max()const
+		{
+			return max_;
+		}
+
+		/// Return Host veiw
+		const HostViewType& hostView()const
+		{
+			return views_.h_view;
+		}
+
+		/// Return Device view
+		const DeviceViewType& deviceView()const
+		{
+			return views_.d_view;
+		}
+
+		/// Return Host veiw
+		HostViewType& hostView()
+		{
+			return views_.h_view;
+		}
+
+		/// Return Device veiw
+		DeviceViewType& deviceView()
+		{
+			return views_.d_view;
+		}
+
+		/// Return index accessor that works on Host
+		auto indicesHost()const
+		{
+			return IndexAccessor<HostViewType>(views_.h_view);
+		}
+
+		/// Return index accessor that works on Device 
+		auto indicesDevice()const
+		{
+			return IndexAccessor<DeviceViewType>(views_.d_view);
+		}
+
+		/// Mark host is modified 
+		void modifyOnHost()
+		{
+			views_.modify_host();
+		}
+
+		/// Mark device is modified
+		void modifyOnDevice()
+		{
+			views_.modify_device();
+		}
+
+		/// synchronize views 
+		void syncViews()
+		{
+			bool findMinMax = false;
+			if(views_.template need_sync<HostType>())
+			{
+				Kokkos::deep_copy(views_.d_view, views_.h_view);
+				views_.clear_sync_state();
+				findMinMax = true;
+			}
+			else if(views_.template need_sync<DeviceType>())
+			{
+				Kokkos::deep_copy(views_.h_view, views_.d_view);
+				views_.clear_sync_state();
+				findMinMax = true;
+			}
+
+			if(findMinMax)
+			{
+				min_ 	= pFlow::min(views_.d_view, 0, size_);
+				max_ 	= pFlow::max(views_.d_view, 0, size_);
+			}
 		}
-	}
 
-	size_t setSize(size_t ns)
-	{
-		auto tmp = size_;
-		size_ = ns;
-		return tmp;
-	}
 };
 
 
+
 using int32IndexContainer = indexContainer<int32>;
 using int64IndexContainer = indexContainer<int64>;
 
+using uint32IndexContainer = indexContainer<uint32>;
+using uint64IndexContainer = indexContainer<uint64>;
+
 
 }
 
diff --git a/src/phasicFlow/containers/span/span.hpp b/src/phasicFlow/containers/span/span.hpp
index 63c89190..0ee41e71 100644
--- a/src/phasicFlow/containers/span/span.hpp
+++ b/src/phasicFlow/containers/span/span.hpp
@@ -51,7 +51,7 @@ protected:
 
     T* data_ 		= nullptr;
 
-    label 	size_ 	= 0;
+    uint32 	size_ 	= 0;
 
 public:
     
@@ -63,7 +63,7 @@ public:
 
 
     INLINE_FUNCTION_HD
-    span(T* data, label size)
+    span(T* data, uint32 size)
         : data_(data), size_(size)
     {}
 
@@ -98,7 +98,7 @@ public:
 
     /// Returns the number of elements in the span
     INLINE_FUNCTION_HD
-    label size() const
+    uint32 size() const
     {
         return size_;
     }
@@ -131,6 +131,18 @@ public:
         return data_ + size_;
     }
 
+    INLINE_FUNCTION_HD
+    T& operator[](uint32 i)
+    {
+    	return data_[i];
+    }
+
+    INLINE_FUNCTION_HD
+    const T& operator[](uint32 i)const
+    {
+    	return data_[i];
+    }
+
     INLINE_FUNCTION_HD
     T& operator[](int32 i)
     {
@@ -143,16 +155,35 @@ public:
     	return data_[i];
     }
 
-    INLINE_FUNCTION_HD
-    T& operator[](label i)
+    /// Write in ASCII format, can be sued for all variable types
+    INLINE_FUNCTION_H
+    bool writeASCII(iOstream& os) const
     {
-    	return data_[i];
+        os << token::BEGIN_LIST;
+        if(size()>0)
+        {
+            for(uint32 i=0; i<size()-1; i++)
+            {
+                os << data_[i]<<token::NL;
+            }
+            os << data_[size()-1] << token::END_LIST;
+        }
+        else
+        {
+            os<< token::END_LIST;
+        }
+        
+        os.check(FUNCTION_NAME);
+        return true;
     }
 
-    INLINE_FUNCTION_HD
-    const T& operator[](label i)const
+    /// Write in Binray format, can be used for numeral types (Not word or similar ones)
+    INLINE_FUNCTION_H
+    bool writeBinary(iOstream& os) const
     {
-    	return data_[i];
+        os.write(reinterpret_cast<const char*>(data_), this->size()*sizeof(T));
+        os.check(FUNCTION_NAME);
+        return true;
     }
 
 };
@@ -161,15 +192,15 @@ template<typename T>
 inline 
 iOstream& operator<<(iOstream& os, const span<T>& s)
 {
-    os << token::BEGIN_LIST;
-    for(size_t i=0; i<s.size(); i++)
-    {
-        os << s[i]<<token::NL;
-    }
-    
-    os << token::END_LIST;
 
-    os.check(FUNCTION_NAME);
+    if( os.isBinary() && !std::is_same_v<T,word>)
+    {
+        s.writeBinary(os);
+    }
+    else
+    {
+        s.writeASCII(os);
+    }
 
     return os;
 }
diff --git a/src/phasicFlow/repository/IOobject/IOfileHeader.cpp b/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
index 2aae5642..8c92c944 100644
--- a/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
+++ b/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
@@ -12,12 +12,12 @@ Licence:
   granular and multiphase flows. You can redistribute it and/or modify it under
   the terms of GNU General Public License v3 or any other later versions. 
  
-  phasicFlow is distributed to help others in their research in the field of 
+  phasicFlow is distribute+d to help others in their research in the field of 
   granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
+#include "processors.hpp"
 #include "IOfileHeader.hpp"
 #include "repository.hpp"
 
@@ -133,9 +133,24 @@ bool pFlow::IOfileHeader::readIfPresent()const
 	return fileExist() && isReadIfPresent();
 }
 
-
-bool pFlow::IOfileHeader::writeHeader(iOstream& os, const word& typeName) const
+bool pFlow::IOfileHeader::writeHeader()const
 {
+	if( !this->readWriteHeader() ) return false;
+	if( !processors::isMaster() ) return false;
+	if( !implyWrite() ) return false;
+
+	return true;
+}
+
+bool pFlow::IOfileHeader::writeHeader
+(
+	iOstream& os, 
+	const word& typeName, 
+	bool forceWrite
+) const
+{
+
+	if(!forceWrite && !writeHeader()) return true;
 
 	writeBanner(os);
 
@@ -158,14 +173,22 @@ bool pFlow::IOfileHeader::writeHeader(iOstream& os, const word& typeName) const
 	return true;
 }
 
-bool pFlow::IOfileHeader::writeHeader(iOstream& os) const
+bool pFlow::IOfileHeader::writeHeader(iOstream& os, bool forceWrite) const
 {
-	return writeHeader(os, objectType_);
+	return writeHeader(os, objectType_, forceWrite);
+}
+
+bool pFlow::IOfileHeader::readHeader()const
+{
+	if( !this->readWriteHeader() ) return false;
+	return true;
 }
 
 bool pFlow::IOfileHeader::readHeader(iIstream& is, bool silent)
 {
 	
+	if(!readHeader()) return true;
+
 	if( !is.findTokenAndNextSilent("objectName", objectName_) )
 	{
 		if(!silent)
@@ -200,6 +223,19 @@ bool pFlow::IOfileHeader::readHeader(iIstream& is, bool silent)
 		return false;
 	}
 
+	return true;
+} 
+
+bool pFlow::IOfileHeader::writeData()const
+{
+	if( processors::isMaster() || this->differentDataOnProcessors())
+		return true;
+	else
+		return false;
+}
+
+bool pFlow::IOfileHeader::readData()const
+{
 	return true;
 }
 
diff --git a/src/phasicFlow/repository/IOobject/IOfileHeader.hpp b/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
index fea5cb66..e019a79e 100644
--- a/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
+++ b/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
@@ -95,26 +95,45 @@ public:
 	//   read the header of the file to check if it is ok
 	bool headerOk(bool silent = false);
 	
-	// - imply read 
+	/// Imply read 
 	bool implyRead() const;
 
-	// - imply write 
+	/// Imply write 
 	bool implyWrite() const;
 	
-	// - check if file exists
+	/// Check if file exists
 	bool fileExist() const;
 	
-	// - check read if present 
+	/// Check read if present 
 	bool readIfPresent()const;
 
-	// - write the header in the  file , typeName comes from caller
-	bool writeHeader(iOstream& os, const word& typeName) const;
+	/// Check if the header should be written to file
+	/// True: on master + implyWrite + readWriteHeader = true
+	/// False: slave or NOT implyWrite
+	bool writeHeader()const;
 
-	// - write the header in the  file, typeName comes from the one read from file 
-	bool writeHeader(iOstream& os) const;
-	
-	// - read the header in the file 
+	/// Write the header to the file , typeName comes from caller
+	bool writeHeader(iOstream& os, const word& typeName, bool forceWrite = false ) const;
+
+	/// Write the header to the file, typeName comes from the one read from file 
+	bool writeHeader(iOstream& os, bool forceWrite = false) const;
+
+	/// Check if the data should be written to file 
+	/// True: on master or differentDataOnProcessor is true
+	/// False: otherwise 
+	bool writeData()const;
+
+	/// Check if header should be read from file
+	/// True: All processors, read the file header 
+	/// False: readWriteHeader = false
+	bool readHeader()const;
+
+	/// Read the header in the file
 	bool readHeader(iIstream& is, bool silent=false);
+
+	/// Check if data should be read from file 
+	/// Always return true
+	bool readData()const;
 	
 	// - write the banner 
 	bool writeBanner(iOstream& os)const;
diff --git a/src/phasicFlow/repository/IOobject/IOobject.hpp b/src/phasicFlow/repository/IOobject/IOobject.hpp
index 7b2ab200..2b947946 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.hpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.hpp
@@ -61,23 +61,25 @@ private:
 	:
 		public iObject
 	{
-	public:
+	protected:
 		dataType 	data_;
 
 	public:
 
 		template<typename... Args,
-          		typename = std::enable_if_t<!std::is_constructible<object_t, Args&&...>::value>>
+          		typename = std::enable_if_t<std::is_constructible<dataType, Args&&...>::value>>
 		object_t(Args&&... args)
 		:
 			data_(std::forward<Args>(args)...)
-		{}
+		{
+			/*constexpr word msg(dataType::TYPENAME()+"input is not a member function.")
+			static_assert(std::is_member_function_pointer<decltype(&dataType::write)>::value,
+                  msg.c_str());*/
+		}
 
 		// cunstruct by copying data
-		object_t(const dataType& data): data_(data){}
-
-		// construct by moving data
-		//object_t(dataType&& data): data_(std::move(data)){}
+		object_t(const dataType& data): data_(data)
+		{}
 
 		
 		virtual uniquePtr<iObject> clone() const
@@ -100,6 +102,16 @@ private:
 			return data_.write(os);
 		}
 
+		auto& data()
+		{
+			return data_;
+		}
+
+		const auto& data()const
+		{
+			return data_;
+		}
+
 	};
 
 protected:
@@ -107,8 +119,9 @@ protected:
 	//// - data members
 
 		// underlaying data object 
-		uniquePtr<iObject> object_;
+		uniquePtr<iObject> object_ = nullptr;
 
+		
 
 public:
 
@@ -127,6 +140,42 @@ public:
 		// - construct from components, transfer the ownership of IOobject to the owner (no read happens)
 		IOobject(const objectFile& objf, const repository* owner, uniquePtr<IOobject>&& obj);
 		
+		
+		template<typename T, 
+			typename = std::enable_if_t<
+				!std::is_same<T, uniquePtr<IOobject::iObject>>::value && 
+				!std::is_same<T, uniquePtr<IOobject>>::value>>
+		IOobject(const objectFile& objf, const repository* owner, const T& data)
+		:
+			IOfileHeader(objf, owner),
+			object_(makeUnique<object_t<T>>(data))
+		{
+			if(!read(this->readWriteHeader()))
+			{
+				fatalErrorInFunction<<
+				"error in reading " << name() << " from path " << path()<<endl;
+				fatalExit;
+			}
+		}
+
+		
+		template<typename T, 
+			typename = std::enable_if_t<
+				!std::is_same<T, uniquePtr<IOobject::iObject>>::value && 
+				!std::is_same<T, uniquePtr<IOobject>>::value>>
+		IOobject(const objectFile& objf, const repository* owner,  T&& data)
+		:
+			IOfileHeader(objf, owner),
+			object_(makeUnique<object_t<T>>(data))
+		{
+			if(!read(this->readWriteHeader()))
+			{
+				fatalErrorInFunction<<
+				"error in reading " << name() << " from path " << path()<<endl;
+				fatalExit;
+			}
+		}		
+
 		// - copy construct 
 		IOobject(const IOobject& src)=delete;	
 
@@ -142,7 +191,7 @@ public:
 		
 		// - construct object_t with the Args as the arguments of object constructor 
 		template<typename T, typename... Args>
-		static auto make_object_t(Args&&... args);
+		static uniquePtr<iObject> make_object_t(Args&&... args);
 		
 
 	//// - Access to data object 
@@ -158,7 +207,6 @@ public:
 		template<typename T>
 		const auto& getObject()const;
 	
-		
 
 	//// - IO operations 
 
diff --git a/src/phasicFlow/repository/IOobject/IOobjectTemplates.cpp b/src/phasicFlow/repository/IOobject/IOobjectTemplates.cpp
index 4c8f20e1..706f5ced 100644
--- a/src/phasicFlow/repository/IOobject/IOobjectTemplates.cpp
+++ b/src/phasicFlow/repository/IOobject/IOobjectTemplates.cpp
@@ -18,6 +18,7 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
+
 template<typename T, typename... Args>
 auto pFlow::IOobject::make
 (
@@ -32,7 +33,7 @@ auto pFlow::IOobject::make
 }
 
 template<typename T, typename... Args>
-auto pFlow::IOobject::make_object_t(Args&&... args)
+pFlow::uniquePtr<pFlow::IOobject::iObject> pFlow::IOobject::make_object_t(Args&&... args)
 {
 	auto ptr = makeUnique<object_t<T>>(std::forward<Args>(args)...);
 	return ptr;
@@ -47,7 +48,7 @@ auto& pFlow::IOobject::getObject()
 		"accessing an invalid objecct "<< name() <<endl;
 		fatalExit;
 	}
-	return  dynamic_cast<object_t<T>&>(*object_).data_;
+	return  static_cast<object_t<T>&>(*object_).data();
 }
 
 
@@ -60,5 +61,5 @@ const auto& pFlow::IOobject::getObject()const
 		"accessing an invalid objecct "<< name() <<endl;
 		fatalExit;
 	}
-	return  dynamic_cast<const object_t<T>&>(*object_).data_;	
+	return  static_cast<const object_t<T>&>(*object_).data();	
 }
\ No newline at end of file
diff --git a/src/phasicFlow/repository/IOobject/objectFile.cpp b/src/phasicFlow/repository/IOobject/objectFile.cpp
index 55776975..c9957daf 100644
--- a/src/phasicFlow/repository/IOobject/objectFile.cpp
+++ b/src/phasicFlow/repository/IOobject/objectFile.cpp
@@ -25,10 +25,7 @@ pFlow::objectFile::objectFile
 	const word& name
 )
 :
-	name_(name),
-	rFlag_(READ_NEVER),
-	wFlag_(WRITE_NEVER),
-	localPath_("")
+	name_(name)
 {}
 
 pFlow::objectFile::objectFile
@@ -37,13 +34,15 @@ pFlow::objectFile::objectFile
 	const fileSystem& 		localPath,
 	const readFlag&   		rf, 
 	const writeFlag&  		wf,
-	bool  rwHeader
+	bool  diffDataOnProcessors,
+	bool  rwHdr
 )
 :
 	name_(name),
 	rFlag_(rf),
 	wFlag_(wf),
 	localPath_(localPath),
-	readWriteHeader_(rwHeader)
+	differentDataOnProcessors_(diffDataOnProcessors),
+	readWriteHeader_(rwHdr)	
 {
 }
\ No newline at end of file
diff --git a/src/phasicFlow/repository/IOobject/objectFile.hpp b/src/phasicFlow/repository/IOobject/objectFile.hpp
index 7ab6f153..6dd70ca2 100644
--- a/src/phasicFlow/repository/IOobject/objectFile.hpp
+++ b/src/phasicFlow/repository/IOobject/objectFile.hpp
@@ -49,18 +49,30 @@ public:
 
 protected:
 
-	// name of the entity
+	/// Name of the entity
 	word 	name_;
 
-	// read flag
-	readFlag  rFlag_;
+	/// Read flag
+	readFlag  rFlag_ = READ_NEVER;
 
-	// write flag
-	writeFlag wFlag_;
+	/// Write flag
+	writeFlag wFlag_ = WRITE_NEVER;
 
-	// local path of entity
-	fileSystem localPath_;
+	/// Local path of entity
+	fileSystem localPath_ = "";
 
+	/// Number of bytes used for writing/reading real variable (mostly used for binray)
+	int 		numBytesForReal_ = numBytesForReal__;
+	
+	/// All processors have the different set of data or not?
+	/// True: Each processor should read its own part of data from file and should write 
+	/// its own part of data to the file.  
+	/// Flase: All processors read the same data from file and in writing, only master data
+	/// write the data to the file. 
+
+	bool differentDataOnProcessors_ = true;
+
+	/// Does the objectFile write the header or not
 	bool readWriteHeader_ = true;
 
 public:
@@ -80,7 +92,8 @@ public:
 		const fileSystem& localPath,
 		const readFlag&   rf = READ_NEVER,
 		const writeFlag&  wf = WRITE_NEVER,
-		bool  rwHeader = true
+		bool  diffDataOnProcessors = true,
+		bool  rwHdr = true
 	);
 
 	// copy construct 
@@ -92,6 +105,7 @@ public:
 
 	objectFile& operator = (objectFile && rhs) = default;
 
+
 	virtual ~objectFile()=default;
 
 	virtual word name() const
@@ -104,41 +118,55 @@ public:
 		return localPath_;
 	}
 
+	inline
 	readFlag rFlag()const
 	{
 		return rFlag_;
 	}
 
+	inline
 	writeFlag wFlag()const
 	{
 		return wFlag_;
 	}
 
+	inline
 	bool isReadAlways()const
 	{
 		return rFlag_ == READ_ALWAYS;
 	}
 
+	inline
 	bool isReadNever()const
 	{
 		return rFlag_ == READ_NEVER;
 	}
 
+	inline
 	bool isReadIfPresent()const
 	{
 		return rFlag_ == READ_IF_PRESENT;
 	}
 
+	inline
 	bool isWriteAlways()const
 	{
 		return wFlag_ == WRITE_ALWAYS;
 	}
 
+	inline
 	bool isWriteNever()const
 	{
 		return wFlag_ == WRITE_NEVER;
 	}
 
+	inline
+	bool differentDataOnProcessors()const
+	{
+		return differentDataOnProcessors_;
+	}
+
+	inline 
 	bool readWriteHeader()const
 	{
 		return readWriteHeader_;
diff --git a/src/phasicFlow/streams/Stream/Istream.cpp b/src/phasicFlow/streams/Stream/Istream.cpp
index cda6117e..be2ea9cb 100755
--- a/src/phasicFlow/streams/Stream/Istream.cpp
+++ b/src/phasicFlow/streams/Stream/Istream.cpp
@@ -858,6 +858,36 @@ pFlow::iIstream& pFlow::Istream::read
     return *this;
 }
 
+size_t pFlow::Istream::findBinaryBlockStart()
+{
+    size_t pos = 0;
+    char getChar = 'a';
+    unsigned char bFlag = 255;
+    int numFound = 0;
+
+    while( is_.good() && !is_.eof() )
+    {
+        getChar = is_.get();
+        pos++;
+
+        if( numFound <3 &&
+         static_cast<unsigned char>(getChar) == bFlag ) 
+        {
+            numFound++;
+        }
+        else if(numFound == 3 && static_cast<unsigned char>(getChar) == 0 )
+        {
+            return pos;
+        }
+        else
+        {
+            numFound = 0;
+        }
+    }
+
+    return static_cast<size_t>(-1);
+}
+
 void pFlow::Istream::rewind()
 {
     lineNumber_ = 1;      // Reset line number
diff --git a/src/phasicFlow/streams/Stream/Istream.hpp b/src/phasicFlow/streams/Stream/Istream.hpp
index 2b3b4879..2c324214 100755
--- a/src/phasicFlow/streams/Stream/Istream.hpp
+++ b/src/phasicFlow/streams/Stream/Istream.hpp
@@ -153,6 +153,8 @@ public:
         iIstream& read(char* buffer, std::streamsize count) override;
 
     
+    size_t findBinaryBlockStart()override;
+
     /// Rewind the stream so that it may be read again
     virtual void rewind();
 
diff --git a/src/phasicFlow/streams/Stream/Ostream.cpp b/src/phasicFlow/streams/Stream/Ostream.cpp
index aa89bd54..d3c74dbc 100755
--- a/src/phasicFlow/streams/Stream/Ostream.cpp
+++ b/src/phasicFlow/streams/Stream/Ostream.cpp
@@ -222,6 +222,13 @@ pFlow::iOstream& pFlow::Ostream::write(const double val)
     return *this;
 }
 
+pFlow::iOstream& pFlow::Ostream::write(const size_t val)
+{
+    os_ << val;
+    setState(os_.rdstate());
+    return *this;
+}
+
 pFlow::iOstream& pFlow::Ostream::write
 (
     const char* binaryData, 
@@ -239,11 +246,19 @@ pFlow::iOstream& pFlow::Ostream::write
     os_.write(binaryData, count);
     os_ << token::END_LIST;
 
-    setState(os_.rdstate());
-
     return *this;
 }
 
+pFlow::iOstream& pFlow::Ostream::writeBinaryBlockFlag()
+{
+    write( static_cast<char>(255));
+    write( static_cast<char>(255));
+    write( static_cast<char>(255));
+    write( static_cast<char>(0));
+    return *this;
+}
+
+
 void pFlow::Ostream::indent()
 {
     for (unsigned short i = 0; i < indentLevel_*indentSize_; ++i)
diff --git a/src/phasicFlow/streams/Stream/Ostream.hpp b/src/phasicFlow/streams/Stream/Ostream.hpp
index 25b2b09c..4d5f3205 100755
--- a/src/phasicFlow/streams/Stream/Ostream.hpp
+++ b/src/phasicFlow/streams/Stream/Ostream.hpp
@@ -124,9 +124,14 @@ public:
         /// Write double
         iOstream& write(const double val) override;
 
+        /// Write size_t
+        iOstream& write(const size_t val) override;
+
         /// Write a block of binray data 
         iOstream& write(const char* binaryData, std::streamsize count) override;
 
+        iOstream& writeBinaryBlockFlag() override;
+
         /// Add indentation characters
         void indent() override;
 
diff --git a/src/phasicFlow/streams/TStream/oTstream.cpp b/src/phasicFlow/streams/TStream/oTstream.cpp
index 2ef897ca..381dfaa1 100755
--- a/src/phasicFlow/streams/TStream/oTstream.cpp
+++ b/src/phasicFlow/streams/TStream/oTstream.cpp
@@ -155,6 +155,14 @@ pFlow::iOstream& pFlow::oTstream::write(const double val)
     return *this;
 }
 
+pFlow::iOstream& pFlow::oTstream::write(const size_t val)
+{
+    append(token(static_cast<int64>(val))); // tokenType::INT64
+
+    return *this;
+}
+
+
 pFlow::iOstream& pFlow::oTstream::write
 (
     const char* binaryData, 
diff --git a/src/phasicFlow/streams/TStream/oTstream.hpp b/src/phasicFlow/streams/TStream/oTstream.hpp
index c86b0090..23752a5d 100755
--- a/src/phasicFlow/streams/TStream/oTstream.hpp
+++ b/src/phasicFlow/streams/TStream/oTstream.hpp
@@ -129,6 +129,9 @@ public:
         /// Write double
         virtual iOstream& write(const double val) override;
 
+        /// Write double
+        virtual iOstream& write(const size_t val) override;
+
         /// Write a block of binray data
         iOstream& write(
             const char* binaryData, 
diff --git a/src/phasicFlow/streams/dataIO/dataIO.cpp b/src/phasicFlow/streams/dataIO/dataIO.cpp
new file mode 100644
index 00000000..9789c56e
--- /dev/null
+++ b/src/phasicFlow/streams/dataIO/dataIO.cpp
@@ -0,0 +1,612 @@
+
+#include "phasicFlowConfig.H"
+#ifdef pFlow_Build_MPI
+	#include <mpi.h>
+#endif
+
+#include <cstdio>
+#include <numeric>
+
+
+#include "dataIO.hpp"
+#include "fileSystem.hpp"
+
+
+#include "streams.hpp"
+
+static const size_t numcharFlag = 8;
+
+static inline unsigned char binaryFlag__[numcharFlag] = {255, 255, 255, 255, 255, 255, 255 ,0};
+
+inline 
+pFlow::uint64 chunkSizeOffeset(pFlow::uint64 procNo)
+{
+	// 1 is added for number of processors 
+	return (1+procNo)*sizeof(pFlow::uint64);
+}
+
+bool writeBinaryBlockFlagSTD(std::FILE* fh)
+{
+
+	std::size_t nw = std::fwrite( binaryFlag__ , sizeof(unsigned char), numcharFlag, fh );
+
+	if(nw < numcharFlag) 
+		return false;
+	else
+		return true;
+}
+
+pFlow::uint64 findBindaryBlockFlagSTD(std::FILE* fh)
+{
+	// get the current postion 
+	long fpos;
+	if( fpos = std::ftell( fh) ; fpos == -1L )
+	{
+		fatalErrorInFunction;
+		return -1;
+	}
+
+	pFlow::uint64 filePos = static_cast<pFlow::uint64>(fpos);
+
+	// start reading char by char 
+	int c; 
+	unsigned char ch;
+	int currPos = 0;
+    while ( std::fread(&ch, sizeof(ch), 1, fh) == 1 ) 
+    {
+   		if(std::ferror(fh)) return -1;	
+   		if(std::feof(fh))return -1;
+
+   		filePos++;
+
+   		if(ch == binaryFlag__[currPos] ) 
+   		{
+   			currPos++;
+
+   			if(currPos == numcharFlag) return filePos;
+   		}
+   		else
+   		{
+   			currPos = 0;
+   		}   
+    }
+
+    return -1;
+}
+
+
+#ifdef pFlow_Build_MPI
+pFlow::uint64 findBindaryBlockFlagMPI(MPI_File fh)
+{
+	// get the current postion 
+	MPI_Offset fpos;
+	if( MPI_File_get_position( fh, &fpos) != MPI_SUCCESS )
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+	pFlow::uint64 filePos = static_cast<pFlow::uint64>(fpos);
+
+	// start reading char by char 
+	unsigned char ch;
+	int currPos = 0;
+
+    while( MPI_File_read(
+    	fh, 
+    	&ch, 
+    	1, 
+    	MPI_UNSIGNED_CHAR, 
+    	MPI_STATUS_IGNORE) == MPI_SUCCESS ) 
+    {
+   		
+   		filePos++;
+   		
+   		if(ch == binaryFlag__[currPos] ) 
+   		{
+   			currPos++;
+
+   			if(currPos == numcharFlag) return filePos;
+   		}
+   		else
+   		{
+   			currPos = 0;
+   		}   
+    }
+
+    return -1;
+}
+
+#endif
+
+
+bool pFlow::dataIO::writeDataToFileEndSTD
+(
+	const fileSystem& filePath, 
+	const span<unsigned char>& data
+)
+{
+
+	if(!processors::isMaster()) return true;
+
+	// openfile 
+	word wFile = filePath.wordPath();
+	auto fh = std::fopen(wFile.c_str(), "ab");
+
+	if(!fh)
+	{
+		fatalErrorInFunction<<
+		"Error in Opening file "<< filePath <<endl;
+		std::fclose(fh);
+		return false;
+	}
+
+	// write the start of binary block flag
+	if(std::fseek(fh, 0 , SEEK_END)!=0)
+	{
+		fatalErrorInFunction<<
+		"error at reaching end of file "<<filePath<<endl;
+		std::fclose(fh);
+		return false;
+	}
+
+	if(!writeBinaryBlockFlagSTD(fh) )
+	{
+		fatalErrorInFunction<<
+		"Error in writing to file "<< filePath<<endl;
+		std::fclose(fh);
+		return false;
+	}
+		
+	uint64 numChunks = 1;	
+
+	// write number of data chunks
+	auto wc = std::fwrite(&numChunks, sizeof(numChunks), 1, fh);
+
+	if(wc < 1)
+	{
+		fatalErrorInFunction<<
+		"Error in writing numChunks to file "<< filePath <<endl;
+		std::fclose(fh);
+		return false;
+	}
+
+
+	// write size of each data chunk
+	uint64 sizeOfData = data.size();
+
+	wc = std::fwrite(&sizeOfData, sizeof(sizeOfData), 1, fh);
+	if(wc <1)
+	{
+		fatalErrorInFunction<<
+		"Error in writing size of data chunk to file "<< filePath <<endl;
+		std::fclose(fh);
+		return false;	
+	}
+
+	if(sizeOfData>0 )
+	{
+		// write data chunk to file
+		wc = std::fwrite(data.data(), sizeof(unsigned char), sizeOfData, fh);
+		if(wc < sizeOfData )
+		{
+			fatalErrorInFunction<<
+			"Error in writing size of data to file "<< filePath <<endl;
+			std::fclose(fh);
+			return false;	
+		}	
+	}
+
+	// close the file 
+	std::fclose(fh);
+
+	return true;
+}
+
+bool pFlow::dataIO::writeDataToFileEndMPI
+(
+	const fileSystem& filePath, 
+	const span<unsigned char>& data
+)
+{	
+
+#ifdef pFlow_Build_MPI
+	
+	// collect information from other processes
+	uint64 numProc 	= processors::globalSize();
+	uint64 thisSize = data.size();
+	uint64 offset;
+
+	CheckMPI
+	(
+		MPI_Scan(&thisSize, &offset, 1, MPI_UINT64_T,  MPI_SUM, MPI_COMM_WORLD),
+		true
+	);
+
+	word wFile = filePath.wordPath();
+
+	MPI_File fh;
+	
+	if( MPI_File_open(
+			MPI_COMM_WORLD,
+			wFile.c_str(),
+			MPI_MODE_WRONLY+MPI_MODE_APPEND,
+			MPI_INFO_NULL,
+			&fh) != MPI_SUCCESS)
+	{
+		fatalErrorInFunction<<
+		"Cannot open file "<< filePath<<endl;
+		return false;
+	}	
+
+	uint64 startPos;
+
+	if( processors::isMaster())
+	{
+		// set position to the end of file 
+		MPI_File_seek(fh, 0 , MPI_SEEK_END);		
+
+		if( MPI_File_write(
+			fh, 
+			binaryFlag__,
+			numcharFlag,
+			MPI_UNSIGNED_CHAR,
+			MPI_STATUS_IGNORE
+			) != MPI_SUCCESS )
+		{
+			fatalErrorInFunction<<
+			"Cannot write binary block flag into "<< filePath<<endl;
+			return false;
+		}
+		
+		MPI_Offset posOfBlock;
+		if( MPI_File_get_position(fh, &posOfBlock) != MPI_SUCCESS )
+		{
+			fatalErrorInFunction<<
+			"Cannot get the end pos of file "<< filePath<<endl;
+			return false;
+		}
+
+		
+		startPos = static_cast<uint64>(posOfBlock);
+	}
+
+		
+	if( MPI_Bcast(
+		&startPos, 
+		1, 
+		MPI_UINT64_T, 
+		processors::masterNo(), 
+		MPI_COMM_WORLD) != MPI_SUCCESS)
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+ 
+
+	if( processors::isMaster())
+	{
+		uint64 numProc = processors::globalSize();
+		if(MPI_File_write(
+			fh,
+			&numProc,
+			1,
+			MPI_UINT64_T,
+			MPI_STATUS_IGNORE) != MPI_SUCCESS)
+		{
+			fatalErrorInFunction<<
+			"Cannot write number of chunks into "<<filePath<<endl;
+			return false;
+		}
+	}
+
+	uint64 sizeOffset = startPos  + chunkSizeOffeset(processors::globalRank());
+
+	
+	if(MPI_File_write_at_all(
+		fh,
+		sizeOffset, 
+		&thisSize,  
+		1,
+		MPI_UINT64_T,
+		MPI_STATUS_IGNORE)!= MPI_SUCCESS)
+	{
+		fatalErrorInFunction<<
+		"Cannot write size of chunk into "<<filePath<<endl;
+		return false;
+	}
+
+	offset -= thisSize;
+
+	uint64 chunkOffset = startPos + chunkSizeOffeset(processors::globalSize()) + offset;
+
+	
+	if(MPI_File_write_at_all(
+		fh,
+		chunkOffset,
+		data.data(),
+		thisSize,
+		MPI_UNSIGNED_CHAR,
+		MPI_STATUS_IGNORE) != MPI_SUCCESS)
+	{
+		fatalErrorInFunction<<
+		"Cannot write data into "<<filePath<<endl;
+		return false;;
+	}
+
+	MPI_File_close(&fh);
+	MPI_Barrier(MPI_COMM_WORLD);
+	return true;
+
+#else
+	return writeDataToFileEndSTD(filePath, data);
+#endif
+
+	
+}
+
+
+bool pFlow::dataIO::readDataSTD
+(
+	const fileSystem& filePath,
+	const std::vector<uint64> chunkSizes,
+	span<unsigned char>& data,
+	uint64 binaryBlockStart
+)
+{
+	// sum of all chuncks
+	uint64 toRecv = std::accumulate(
+		chunkSizes.begin(), 
+		chunkSizes.end(), 
+		static_cast<uint64>(0));
+
+	if( data.size() != toRecv )
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+	word wFile = filePath.wordPath();
+	auto fh = std::fopen(wFile.c_str(), "rb");
+
+	if(!fh)
+	{
+		fatalErrorInFunction<<
+		"Error in Opening file "<< filePath<<endl;
+		return false;
+	}
+
+	// start of data chunks 
+	uint64 offset = binaryBlockStart + chunkSizeOffeset(chunkSizes.size());
+	
+	if(auto res = std::fseek(fh, offset, SEEK_SET); res!= 0 )
+	{
+		fatalErrorInFunction<<
+		"Error in file seek "<< filePath<<endl;
+		std::fclose(fh);
+		return false;
+	}
+
+	if(auto res = std::fread(
+			data.data(),
+			sizeof(unsigned char),
+			data.size(),
+			fh);
+		res!= data.size() )
+	{
+		fatalErrorInFunction<<
+		"Error in reading file "<< filePath<<endl;
+		std::fclose(fh);
+		return false;
+	}
+
+	std::fclose(fh);
+	return true;
+}
+
+
+bool pFlow::dataIO::readDataMPI
+(
+	const fileSystem& filePath, 
+	const std::vector<uint64> chunkSizes,
+	span<unsigned char>& data,
+	uint64 binaryBlockStart
+)
+{
+
+#ifdef pFlow_Build_MPI
+
+	if(chunkSizes.size() != processors::globalSize() )
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+	
+	word wFile = filePath.wordPath();
+	
+	MPI_File fh;
+
+	if( MPI_File_open(
+		MPI_COMM_WORLD,
+		wFile.c_str(),
+		MPI_MODE_RDONLY,
+		MPI_INFO_NULL,
+		&fh))
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+		
+	
+	auto procNo = processors::globalRank();
+
+	uint64 toRecv = chunkSizes[procNo];
+
+	// start of data chunks 
+	uint64 offset = binaryBlockStart + chunkSizeOffeset(processors::globalSize());
+
+	for(auto i=0; i<procNo; i++)
+	{
+		offset += chunkSizes[i];
+	}
+
+	if( data.size() != toRecv )
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+	
+	MPI_Status status;
+	
+	if( MPI_File_read_at_all(
+		fh,
+		offset,
+		data.data(),
+		data.size(),
+		MPI_UNSIGNED_CHAR,
+		&status) != MPI_SUCCESS )
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+#else
+
+#endif
+
+	return true;
+}
+
+
+bool pFlow::dataIO::readMetaMPI
+(
+	const fileSystem& filePath, 
+	std::vector<uint64>& chunkSizes,
+	uint64 &startPosBinaryBlock
+)
+{
+	word wFile = filePath.wordPath();
+
+#ifdef pFlow_Build_MPI	
+	MPI_File fh;
+
+	if(MPI_File_open(
+		MPI_COMM_WORLD, 
+		wFile.c_str(),
+		MPI_MODE_RDONLY,
+		MPI_INFO_NULL,
+		&fh) != MPI_SUCCESS)
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+	
+
+	uint64 startPos = findBindaryBlockFlagMPI(fh);
+	if( startPos == -1 )
+	{
+		fatalErrorInFunction;
+		return false;	
+	} 
+
+	startPosBinaryBlock  = startPos; 
+
+	uint64 numProcInFile;
+
+	if( MPI_File_read_at_all(
+		fh,
+		startPos,
+		&numProcInFile,
+		1,
+		MPI_UINT64_T,
+		MPI_STATUS_IGNORE) != MPI_SUCCESS)
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+	
+	chunkSizes.resize(numProcInFile);
+	
+	if(MPI_File_read_at_all(
+		fh,
+		startPos + sizeof(numProcInFile),
+		chunkSizes.data(), 
+		chunkSizes.size(), 
+		MPI_UINT64_T,
+		MPI_STATUS_IGNORE) != MPI_SUCCESS)
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+	MPI_File_close(&fh);
+
+#endif
+
+	return true;
+}
+
+bool pFlow::dataIO::readMetaSTD
+(
+	const fileSystem& filePath, 
+	std::vector<uint64>& chunkSizes,
+	uint64 &startPosBinaryBlock
+)
+{
+	// only on master
+	if( !processors::isMaster()) return true;
+
+	word wFile = filePath.wordPath();
+	std::FILE *fh = std::fopen(wFile.c_str(), "rb");
+
+	if(!fh)
+	{
+		fatalErrorInFunction<<
+		"Error in Opening file "<< filePath<<endl;
+		return false;
+	}
+
+	uint64 startPos = findBindaryBlockFlagSTD(fh);
+	if(startPos == -1 )
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+	startPosBinaryBlock = startPos;
+
+
+	std::fseek(fh, startPos, SEEK_SET); 
+
+	uint64 numProcInFile;
+	
+	auto res = std::fread(&numProcInFile, sizeof(numProcInFile), 1, fh);
+	
+
+	if(res != 1 )
+	{
+		fatalErrorInFunction<<
+		"Error in reading file "<< filePath<<endl;
+		std::fclose(fh);
+		return false;
+	}
+
+	
+	chunkSizes.resize(numProcInFile);
+
+	res = std::fread(chunkSizes.data(), sizeof(numProcInFile), numProcInFile, fh);
+
+	if(res!= numProcInFile)
+	{
+		fatalErrorInFunction<<
+		"Error in reading chunkSizes from file "<< filePath<<endl;
+		std::fclose(fh);
+		return false;
+	}
+
+	std::fclose(fh);
+	return true;
+}
+
+
diff --git a/src/phasicFlow/streams/dataIO/dataIO.hpp b/src/phasicFlow/streams/dataIO/dataIO.hpp
new file mode 100644
index 00000000..9a9d8453
--- /dev/null
+++ b/src/phasicFlow/streams/dataIO/dataIO.hpp
@@ -0,0 +1,103 @@
+
+#ifndef __dataIO_hpp__
+#define __dataIO_hpp__
+
+#include <vector>
+
+#include "types.hpp"
+#include "span.hpp"
+#include "processors.hpp"
+
+namespace pFlow
+{
+
+class fileSystem;
+
+
+class dataIO
+{
+
+public:
+
+	/**
+	 * Type of input/output
+	 * MasterProcessor: Read or write is done on master processor
+	 *    and the data on master processor is affected.
+	 * AllProcessorsDifferent: Read or write is done on all processors, 
+	 *    and each processor munipulates its own data.
+	 * AllProcessorsSimilar: Read is done on all processors but the read data
+	 *    is similar on processors. Write is done on master processor, since 
+	 *    all processors have the same copy of data. 
+	 */
+	enum IOType : int
+	{
+		MasterProcessor,
+		AllProcessorsDifferent,
+		AllProcessorsSimilar
+	};
+protected:
+
+	IOType IOType_;
+
+	
+	bool writeDataToFileEndSTD(
+		const fileSystem& filePath, 
+		const span<unsigned char>& data);
+
+	bool writeDataToFileEndMPI(
+		const fileSystem& filePath, 
+		const span<unsigned char>& data);
+	
+	bool readDataSTD(
+		const fileSystem& filePath,
+		const std::vector<uint64> chunkSizes,
+		span<unsigned char>& data,
+		uint64 binaryBlockStart);
+	
+	bool readDataMPI(
+		const fileSystem& filePath, 
+		const std::vector<uint64> chunkSizes,
+		span<unsigned char>& data,
+		uint64 binaryBlockStart);
+
+	bool readMetaMPI(
+		const fileSystem& filePath, 
+		std::vector<uint64>& chunkSizes,
+		uint64 &startPosBinaryBlock);
+
+	bool readMetaSTD(
+		const fileSystem& filePath, 
+		std::vector<uint64>& chunkSizes,
+		uint64 &startPosBinaryBlock);
+
+public:
+
+	dataIO(IOType ioT)
+	:
+		IOType_(ioT)
+	{}
+
+	~dataIO()=default;
+
+	template<typename T> 
+	bool writeDataEnd(
+		const fileSystem& filePath,
+		const span<T>& data);
+
+	template<typename T>
+	bool readData(
+		const fileSystem& filePath, 
+		std::vector<T>& data);
+
+	
+
+};
+
+}
+
+#include "dataIOTemplate.cpp"
+
+#endif
+
+
+
diff --git a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
new file mode 100644
index 00000000..b8450f97
--- /dev/null
+++ b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
@@ -0,0 +1,112 @@
+
+template<typename T>
+bool pFlow::dataIO::writeDataEnd(
+	const fileSystem& filePath,
+	const span<T>& data)
+{
+
+	span<unsigned char> charSpan(
+		reinterpret_cast<unsigned char*> (const_cast<T*>(data.data())),
+		data.size()*sizeof(T));
+
+	switch (IOType_)
+	{
+		case MasterProcessor:
+		case AllProcessorsSimilar:
+		{
+			// This	means that only master processor should write
+			// in this case we perform write on master processor only
+			// this means that the data 
+			if(processors::isMaster())
+			{
+				return writeDataToFileEndSTD(filePath, charSpan);
+			}
+			else
+			{
+				return true;
+			}
+			break;
+		}
+		case AllProcessorsDifferent:
+		{
+			// This means that all processors should write their own
+			// copy of data 
+			return writeDataToFileEndMPI(filePath, charSpan);
+			break;
+		}
+	}
+
+	return false;
+}
+
+template<typename T>
+bool pFlow::dataIO::readData
+(
+	const fileSystem& filePath, 
+	std::vector<T>& data
+)
+{
+	std::vector<uint64> chunkSizes;
+	uint64 startPosBinaryBlock;
+
+	// read meta data
+	switch (IOType_)
+	{
+		case MasterProcessor:
+		{
+			if(!readMetaSTD(
+				filePath, 
+				chunkSizes, 
+				startPosBinaryBlock))
+			{
+				return false;
+			}
+			break;
+		}
+		case AllProcessorsDifferent:
+		case AllProcessorsSimilar:
+		{
+			if(!readMetaMPI(
+				filePath,
+				chunkSizes,
+				startPosBinaryBlock))
+			{
+				return false;
+			}
+			break;
+		}
+	}
+
+	data.clear();
+	if(IOType_ == MasterProcessor)
+	{
+		auto sizeOfData = std::accumulate( 
+			chunkSizes.begin(), 
+			chunkSizes.end(),
+			static_cast<uint64>(0));
+
+		data.resize(sizeOfData/sizeof(T));
+
+		span<unsigned char> charSpan(
+			reinterpret_cast<unsigned char*>(data.data()),
+			data.size()*sizeof(T));
+
+		readDataSTD(filePath, chunkSizes, charSpan, startPosBinaryBlock);
+	}
+	if( IOType_ == AllProcessorsDifferent )
+	{
+		auto thisProc = processors::globalRank();
+
+		data.resize(chunkSizes[thisProc]/sizeof(T));
+
+		span<unsigned char> charSpan(
+			reinterpret_cast<unsigned char*>(data.data()),
+			data.size()*sizeof(T));
+
+		std::cout<<"MPI part"<<std::endl;
+		readDataMPI(filePath, chunkSizes, charSpan, startPosBinaryBlock);
+
+	}
+	
+	return true;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/streams/iStream/iIstream.cpp b/src/phasicFlow/streams/iStream/iIstream.cpp
index f91798b2..b909b999 100755
--- a/src/phasicFlow/streams/iStream/iIstream.cpp
+++ b/src/phasicFlow/streams/iStream/iIstream.cpp
@@ -75,6 +75,12 @@ bool pFlow::iIstream::peekBack(token& tok)
     return putBack_;
 }
 
+size_t pFlow::iIstream::findBinaryBlockStart()
+{
+    notImplementedFunction;
+    return 0;
+}
+
 bool pFlow::iIstream::findToken( const word & w )
 {
     rewind();
diff --git a/src/phasicFlow/streams/iStream/iIstream.hpp b/src/phasicFlow/streams/iStream/iIstream.hpp
index 90a2f81d..7f0ddb43 100755
--- a/src/phasicFlow/streams/iStream/iIstream.hpp
+++ b/src/phasicFlow/streams/iStream/iIstream.hpp
@@ -128,8 +128,8 @@ public:
 	    /// Read a doubleScalar
 	    virtual iIstream& read(double&) = 0;
 
+	    /// Write a block of binray data 
 	    virtual iIstream& read(char* buffer, std::streamsize count) =0;
-
 	    
 	    /// Rewind the stream so that it may be read again
 	    virtual void rewind() = 0;
@@ -137,6 +137,11 @@ public:
 
     ////- find and lookups
 
+	    /// It seek for a character sequence that indicates the start of 
+	    /// a binary block
+	    /// char sequence is 255 255 255 0 
+	    virtual size_t findBinaryBlockStart();
+
         /// search for all tokesn and find the first word token tbat matchs w
         virtual bool findToken( const word & w );
 
diff --git a/src/phasicFlow/streams/iStream/iOstream.cpp b/src/phasicFlow/streams/iStream/iOstream.cpp
index 622ff494..dfe82685 100644
--- a/src/phasicFlow/streams/iStream/iOstream.cpp
+++ b/src/phasicFlow/streams/iStream/iOstream.cpp
@@ -21,9 +21,16 @@ Licence:
 
 #include "iOstream.hpp"
 #include "token.hpp"
+#include "error.hpp"
 
 // * * * * * * * * * * * * * * * Member Functions  * * * * * * * * * * * * * //
 
+pFlow::iOstream& pFlow::iOstream::writeBinaryBlockFlag()
+{
+    notImplementedFunction;
+    return *this;
+}
+
 void pFlow::iOstream::decrIndent()
 {
     if (!indentLevel_)
diff --git a/src/phasicFlow/streams/iStream/iOstream.hpp b/src/phasicFlow/streams/iStream/iOstream.hpp
index 76141a01..1a82f8b1 100644
--- a/src/phasicFlow/streams/iStream/iOstream.hpp
+++ b/src/phasicFlow/streams/iStream/iOstream.hpp
@@ -135,8 +135,14 @@ public:
         /// Write double
         virtual iOstream& write(const double val) = 0;
        
+        /// Write size_t
+        virtual iOstream& write(const size_t val) = 0;
+         
         /// Write a block of binray data 
         virtual iOstream& write(const char* binaryData, std::streamsize count) = 0;
+
+        /// Write the flag to indicate the start of a binary block
+        virtual iOstream& writeBinaryBlockFlag();
         
     
     //// - Indent 
@@ -411,6 +417,11 @@ inline iOstream& operator<<( iOstream& os, const double& val)
     return os.write(val);
 }
 
+inline iOstream& operator<<( iOstream& os, const size_t& val)
+{
+    return os.write(val);
+}
+
 // Useful aliases for tab and newline characters
 constexpr char tab = '\t';
 constexpr char nl = '\n';
diff --git a/src/phasicFlow/streams/masterOstream/masterOstream.cpp b/src/phasicFlow/streams/masterOstream/masterOstream.cpp
index 6c02c7a2..24d0931a 100755
--- a/src/phasicFlow/streams/masterOstream/masterOstream.cpp
+++ b/src/phasicFlow/streams/masterOstream/masterOstream.cpp
@@ -153,6 +153,15 @@ pFlow::iOstream& pFlow::masterOstream::write(const double val)
     return *this; 
 }
 
+pFlow::iOstream& pFlow::masterOstream::write(const size_t val)
+{
+    if(showOutput())
+    {
+        Ostream::write(val);
+    }
+    return *this; 
+}
+
 
 pFlow::iOstream& pFlow::masterOstream::write
 (
diff --git a/src/phasicFlow/streams/masterOstream/masterOstream.hpp b/src/phasicFlow/streams/masterOstream/masterOstream.hpp
index 6568bb0d..60931ea4 100755
--- a/src/phasicFlow/streams/masterOstream/masterOstream.hpp
+++ b/src/phasicFlow/streams/masterOstream/masterOstream.hpp
@@ -64,11 +64,20 @@ public:
 
 
     //// - Methods
+        /// Set if this processor is slave or master 
         void setMasterSlave(bool master)
         {
             isThisMaster_ = master;
         }
 
+        /// Write token to stream or otherwise handle it.
+        /// return false if the token type was not handled by this method
+        bool write(const token& tok)
+        // to prevent compiler warning, this method is overriden agian 
+        {
+            return Ostream::write(tok);
+        }
+
         /// Write character
         iOstream& write(const char c)override;
 
@@ -105,6 +114,9 @@ public:
 
         /// Write double
         iOstream& write(const double val) override;
+
+        /// Write double
+        iOstream& write(const size_t val) override;
         
         /// Write a block of binray data 
         iOstream& write(const char* binaryData, std::streamsize count) override;
diff --git a/src/phasicFlow/streams/processorOstream/processorOstream.cpp b/src/phasicFlow/streams/processorOstream/processorOstream.cpp
index 5f39d158..b91950cd 100755
--- a/src/phasicFlow/streams/processorOstream/processorOstream.cpp
+++ b/src/phasicFlow/streams/processorOstream/processorOstream.cpp
@@ -134,6 +134,11 @@ pFlow::iOstream& pFlow::processorOstream::write(const double val)
     return Ostream::write(val);
 }
 
+pFlow::iOstream& pFlow::processorOstream::write(const size_t val)
+{
+    checkForPrefix();
+    return Ostream::write(val);
+}
 
 pFlow::iOstream& pFlow::processorOstream::write
 (
diff --git a/src/phasicFlow/streams/processorOstream/processorOstream.hpp b/src/phasicFlow/streams/processorOstream/processorOstream.hpp
index 6f6dd7e6..d448f082 100755
--- a/src/phasicFlow/streams/processorOstream/processorOstream.hpp
+++ b/src/phasicFlow/streams/processorOstream/processorOstream.hpp
@@ -85,6 +85,14 @@ public:
             printPrefix_ = true;
         }
         
+        /// Write token to stream or otherwise handle it.
+        /// return false if the token type was not handled by this method
+        bool write(const token& tok)
+        // to prevent compiler warning, this method is overriden agian 
+        {
+            return Ostream::write(tok);
+        }
+
         /// Write character
         iOstream& write(const char c)override;
 
@@ -121,6 +129,9 @@ public:
 
         /// Write double
         iOstream& write(const double val) override;
+
+        /// Write double
+        iOstream& write(const size_t val) override;
         
         /// Write a block of binray data 
         iOstream& write(const char* binaryData, std::streamsize count) override;
diff --git a/src/phasicFlow/types/basicTypes/builtinTypes.hpp b/src/phasicFlow/types/basicTypes/builtinTypes.hpp
index 340179ec..d87a0a73 100755
--- a/src/phasicFlow/types/basicTypes/builtinTypes.hpp
+++ b/src/phasicFlow/types/basicTypes/builtinTypes.hpp
@@ -64,6 +64,8 @@ using size_t  = std::size_t;
 
 using word    = std::string;
 
+inline const int  numBytesForReal__ = sizeof(real);
+
 inline 
 word floatingPointDescription()
 {
diff --git a/src/phasicFlow/types/basicTypes/math.hpp b/src/phasicFlow/types/basicTypes/math.hpp
index 0ac62f6c..cd61e2d3 100755
--- a/src/phasicFlow/types/basicTypes/math.hpp
+++ b/src/phasicFlow/types/basicTypes/math.hpp
@@ -23,11 +23,15 @@ Licence:
 
 #include <cmath>
 
+#include "pFlowMacros.hpp"
+#include "builtinTypes.hpp"
+
+
 #ifdef __CUDACC__
 #include "math.h"
 #endif
 
-#include "builtinTypes.hpp"
+
 
 //* * * * * * * * * * *  List of functinos * * * * * * * * //
 // abs, mod, exp, log, log10, pow, sqrt, cbrt

From 66fc880fcdbde896ac9d380878d8381dcdefb80e Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Thu, 19 Oct 2023 12:18:29 +0330
Subject: [PATCH 13/60] math.hpp modified to remove ambiguis calls in cuda
 build

---
 src/phasicFlow/commandLine/CLI/Validators.hpp |   2 +-
 src/phasicFlow/types/basicTypes/math.hpp      | 269 +++++++-----------
 src/phasicFlow/types/triple/tripleMath.hpp    |  24 +-
 src/phasicFlow/types/types.hpp                |   4 +
 4 files changed, 130 insertions(+), 169 deletions(-)

diff --git a/src/phasicFlow/commandLine/CLI/Validators.hpp b/src/phasicFlow/commandLine/CLI/Validators.hpp
index 03eb77b6..ffddd84b 100644
--- a/src/phasicFlow/commandLine/CLI/Validators.hpp
+++ b/src/phasicFlow/commandLine/CLI/Validators.hpp
@@ -11,7 +11,7 @@
 #include "TypeTools.hpp"
 
 // [CLI11:public_includes:set]
-#include <cmath>
+#include "math.hpp"
 #include <cstdint>
 #include <functional>
 #include <iostream>
diff --git a/src/phasicFlow/types/basicTypes/math.hpp b/src/phasicFlow/types/basicTypes/math.hpp
index cd61e2d3..29482eae 100755
--- a/src/phasicFlow/types/basicTypes/math.hpp
+++ b/src/phasicFlow/types/basicTypes/math.hpp
@@ -21,16 +21,16 @@ Licence:
 #ifndef __math_hpp__
 #define __math_hpp__
 
-#include <cmath>
-
-#include "pFlowMacros.hpp"
-#include "builtinTypes.hpp"
-
 
 #ifdef __CUDACC__
 #include "math.h"
+#else
+#include <cmath>
 #endif
 
+#include "pFlowMacros.hpp"
+#include "builtinTypes.hpp"
+
 
 
 //* * * * * * * * * * *  List of functinos * * * * * * * * //
@@ -44,7 +44,8 @@ namespace pFlow
 {
 
 
-INLINE_FUNCTION_HD real abs(real x)
+INLINE_FUNCTION_HD 
+real abs(real x)
 {
 #ifdef __CUDACC__
 	return ::fabs(x);
@@ -53,24 +54,20 @@ INLINE_FUNCTION_HD real abs(real x)
 #endif
 }
 
-
-INLINE_FUNCTION_HD int64 abs(int64 x)
-{
-#ifdef __CUDACC__
-	return ::abs(x);
-#else
-	return std::abs(x);
+#ifndef __CUDACC__
+	INLINE_FUNCTION_HD 
+	int64 abs(int64 x)
+	{
+		return std::abs(x);
+	}
 #endif
-}
 
+#ifndef __CUDACC__
 INLINE_FUNCTION_HD int32 abs(int32 x)
 {
-#ifdef __CUDACC__
-	return ::abs(x);
-#else
 	return std::abs(x);
-#endif
 }
+#endif
 
 
 INLINE_FUNCTION_HD real mod(real x, real y)
@@ -102,163 +99,132 @@ INLINE_FUNCTION_HD auto mod(uint32 x, uint32 y)
 	return x%y;
 }
 
+#ifndef __CUDACC__
 INLINE_FUNCTION_HD real remainder(real x, real y)
 {
-#ifdef __CUDACC__
-	return ::remainder(x,y);
-#else
 	return std::remainder(x,y);
-#endif
 }
+#endif
 
-INLINE_FUNCTION_HD real exp(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_H 
+real exp(real x)
 {
-#ifdef __CUDACC__
-	return ::exp(x);
-#else
 	return std::exp(x);
-#endif
 }
+#endif
 
-INLINE_FUNCTION_HD real log(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real log(real x)
 {
-#ifdef __CUDACC__
-	return ::log(x);
-#else
 	return std::log(x);
-#endif
 }
+#endif
 
-INLINE_FUNCTION_HD real log10(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real log10(real x)
 {
-#ifdef __CUDACC__
-	return ::log10(x);
-#else
 	return std::log10(x);
-#endif
 }
+#endif
 
-INLINE_FUNCTION_HD real pow(real x, real y)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real pow(real x, real y)
 {
-#ifdef __CUDACC__
-	return ::pow(x, y);
-#else
 	return std::pow(x, y);
+}
 #endif
 
-}
-
-
-INLINE_FUNCTION_HD real sqrt(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real sqrt(real x)
 {
-#ifdef __CUDACC__
-	return ::sqrt(x);
-#else
 	return std::sqrt(x);
-#endif
 }
+#endif
 
-
-INLINE_FUNCTION_HD real cbrt (real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real cbrt (real x)
 {
-#ifdef __CUDACC__
-	return ::cbrt (x);
-#else
 	return std::cbrt (x);
-#endif
 }
+#endif
 
-
-INLINE_FUNCTION_HD real sin(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real sin(real x)
 {
-#ifdef __CUDACC__
-	return ::sin(x);
-#else
 	return std::sin(x);
-#endif
 }
+#endif
 
-
-INLINE_FUNCTION_HD real cos(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real cos(real x)
 {
-#ifdef __CUDACC__
-	return ::cos(x);
-#else
 	return std::cos(x);
-#endif
 }
+#endif
 
-
-INLINE_FUNCTION_HD real tan(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real tan(real x)
 {
-#ifdef __CUDACC__
-	return ::tan(x);
-#else
 	return std::tan(x);
-#endif
 }
+#endif
 
-INLINE_FUNCTION_HD real asin(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real asin(real x)
 {
-#ifdef __CUDACC__
-	return ::asin(x);
-#else
 	return std::asin(x);
-#endif
-	
 }
+#endif
 
-
-INLINE_FUNCTION_HD real acos(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real acos(real x)
 {
-#ifdef __CUDACC__
-	return ::acos(x);
-#else
 	return std::acos(x);
-#endif
 }
+#endif
 
-
-INLINE_FUNCTION_HD real atan(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real atan(real x)
 {
-#ifdef __CUDACC__
-	return ::atan(x);
-#else
 	return std::atan(x);
+}
 #endif
 
-}
-
-
-INLINE_FUNCTION_HD real atan2(real y, real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD real 
+atan2(real y, real x)
 {
-#ifdef __CUDACC__
-	return ::atan2(y, x);
-#else
 	return std::atan2(y, x);
-#endif
 }
+#endif
 
-
-INLINE_FUNCTION_HD real sinh(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real sinh(real x)
 {
-#ifdef __CUDACC__
-	return ::sinh(x);
-#else
 	return std::sinh(x);
-#endif
 }
+#endif
 
-
-INLINE_FUNCTION_HD real cosh(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real cosh(real x)
 {
-#ifdef __CUDACC__
-	return ::cosh(x);
-#else
 	return std::cosh(x);
-#endif
 }
-
+#endif
 
 INLINE_FUNCTION_HD real tanh(real x)
 {
@@ -287,14 +253,14 @@ INLINE_FUNCTION_HD real acosh(real x)
 #endif
 }
 
-INLINE_FUNCTION_HD real atanh(real x)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+real atanh(real x)
 {
-#ifdef __CUDACC__
-	return ::atanh(x);
-#else
 	return std::atanh(x);
-#endif
 }
+#endif
+
 
 INLINE_FUNCTION_HD real min(real x, real y)
 {
@@ -305,43 +271,36 @@ INLINE_FUNCTION_HD real min(real x, real y)
 #endif
 }
 
-INLINE_FUNCTION_HD int64 min(int32 x, int32 y)
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+int64 min(int32 x, int32 y)
 {
-#ifdef __CUDACC__
-	return ::min(x, y);
-#else
 	return std::min(x, y);
-#endif
 }
-
-INLINE_FUNCTION_HD int64 min(int64 x, int64 y)
-{
-#ifdef __CUDACC__
-	return ::min(x, y);
-#else
-	return std::min(x, y);
-#endif
-}
-
-INLINE_FUNCTION_HD uint64 min(uint64 x, uint64 y)
-{
-#ifdef __CUDACC__
-	return ::min(x, y);
-#else
-	return std::min(x, y);
 #endif
 
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+int64 min(int64 x, int64 y)
+{
+	return std::min(x, y);
 }
+#endif
 
+#ifndef __CUDACC__
+INLINE_FUNCTION_HD 
+uint64 min(uint64 x, uint64 y)
+{
+	return std::min(x, y);
+}
+#endif
+
+#ifndef __CUDACC__
 INLINE_FUNCTION_HD uint32 min(uint32 x, uint32 y)
 {
-#ifdef __CUDACC__
-	return ::min(x, y);
-#else
 	return std::min(x, y);
-#endif
 }
-
+#endif
 
 
 INLINE_FUNCTION_HD real max(real x, real y)
@@ -353,42 +312,34 @@ INLINE_FUNCTION_HD real max(real x, real y)
 #endif
 }
 
+
+#ifndef __CUDACC__
 INLINE_FUNCTION_HD int64 max(int64 x, int64 y)
 {
-#ifdef __CUDACC__
-	return ::max(x, y);
-#else
 	return std::max(x, y);
-#endif
 }
+#endif
 
+#ifndef __CUDACC__
 INLINE_FUNCTION_HD int32 max(int32 x, int32 y)
 {
-#ifdef __CUDACC__
-	return ::max(x, y);
-#else
 	return std::max(x, y);
-#endif
 }
+#endif
 
+#ifndef __CUDACC__
 INLINE_FUNCTION_HD uint64 max(uint64 x, uint64 y)
 {
-#ifdef __CUDACC__
-	return ::max(x, y);
-#else
 	return std::max(x, y);
-#endif
 }
+#endif
 
-
+#ifndef __CUDACC__
 INLINE_FUNCTION_HD uint32 max(uint32 x, uint32 y)
 {
-#ifdef __CUDACC__
-	return ::max(x, y);
-#else
 	return std::max(x, y);
-#endif
 }
+#endif
 
 
 } // pFlow
diff --git a/src/phasicFlow/types/triple/tripleMath.hpp b/src/phasicFlow/types/triple/tripleMath.hpp
index 00566ed3..dc016739 100644
--- a/src/phasicFlow/types/triple/tripleMath.hpp
+++ b/src/phasicFlow/types/triple/tripleMath.hpp
@@ -18,18 +18,22 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
+namespace pFlow
+
+{
+
 #define T3Func(fnName) 									\
 template<typename T> 									\
-INLINE_FUNCTION_HD pFlow::triple<T> pFlow::fnName(const pFlow::triple<T>& v) 			\
+INLINE_FUNCTION_HD triple<T> fnName(const triple<T>& v) 			\
 {																\
-	return pFlow::triple<T>(fnName(v.x_), fnName(v.y_), fnName(v.z_));	\
+	return triple<T>(fnName(v.x_), fnName(v.y_), fnName(v.z_));	\
 }
 
 #define T3Func2(fnName)  															\
 template<typename T>																\
-INLINE_FUNCTION_HD pFlow::triple<T> pFlow::fnName(const pFlow::triple<T>& arg1, const pFlow::triple<T>& arg2)	\
+INLINE_FUNCTION_HD triple<T> fnName(const triple<T>& arg1, const triple<T>& arg2)	\
 {																					\
-	return pFlow::triple<T>(fnName(arg1.x_, arg2.x_), fnName(arg1.y_,arg2.y_), fnName(arg1.z_, arg2.z_)); \
+	return triple<T>(fnName(arg1.x_, arg2.x_), fnName(arg1.y_,arg2.y_), fnName(arg1.z_, arg2.z_)); \
 }
 
 //* * * * * * * * * * *  List of functinos * * * * * * * * //
@@ -68,21 +72,21 @@ T3Func2(max);
 
 // elements of t3 raised by e
 template<typename T>
-INLINE_FUNCTION_HD pFlow::triple<T> pFlow::pow(const pFlow::triple<T>& t3, T e)
+INLINE_FUNCTION_HD triple<T> pow(const triple<T>& t3, T e)
 {
-	return pFlow::triple<T>( pow(t3.x_, e), pow(t3.y_,e), pow(t3.z_,e));
+	return triple<T>( pow(t3.x_, e), pow(t3.y_,e), pow(t3.z_,e));
 }
 
 // return the min of 3 elements x, y, z
 template<typename T>
-INLINE_FUNCTION_HD T pFlow::min(const pFlow::triple<T>& t3)
+INLINE_FUNCTION_HD T min(const triple<T>& t3)
 {
 	return min( min(t3.x_, t3.y_), t3.z_);
 }
 
 // return the max of 3 elements x, y, z
 template<typename T>
-INLINE_FUNCTION_HD T pFlow::max(const pFlow::triple<T>& t3)
+INLINE_FUNCTION_HD T max(const triple<T>& t3)
 {
 	return max( max(t3.x_, t3.y_), t3.z_);
 }
@@ -90,4 +94,6 @@ INLINE_FUNCTION_HD T pFlow::max(const pFlow::triple<T>& t3)
 
 
 #undef T3Func
-#undef T3Func2
\ No newline at end of file
+#undef T3Func2
+
+}
diff --git a/src/phasicFlow/types/types.hpp b/src/phasicFlow/types/types.hpp
index 7025b734..924e41cc 100644
--- a/src/phasicFlow/types/types.hpp
+++ b/src/phasicFlow/types/types.hpp
@@ -50,6 +50,8 @@ using realx3x3 	= triple<realx3>;
 
 using realx4 	= quadruple<real>;
 
+using realx4x3 = quadruple<realx3>;
+
 
 template<>
 inline word basicTypeName<int8x3>(){	return "int8x3"; }
@@ -85,6 +87,8 @@ inline word basicTypeName<realx3x3>(){ return "realx3x3"; }
 template<>
 inline word basicTypeName<realx4>(){	return "realx4";	}
 
+template<>
+inline word basicTypeName<realx4x3>(){  return "realx4x3";  }
 
 extern const realx3 zero3;
 extern const realx3 one3;

From d65aa02cbbdf8d75ebf1b24c29b1814778d6bc69 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sat, 28 Oct 2023 12:09:40 +0330
Subject: [PATCH 14/60] Parallel IO before round 2

---
 src/phasicFlow/CMakeLists.txt                 |   8 +-
 src/phasicFlow/containers/Field/Field.cpp     |  50 ++-
 src/phasicFlow/containers/Field/Field.hpp     | 143 +++----
 src/phasicFlow/containers/Field/Fields.cpp    |   4 +-
 src/phasicFlow/containers/Field/Fields.hpp    |  19 +-
 src/phasicFlow/containers/Vector/Vector.cpp   | 100 +----
 src/phasicFlow/containers/Vector/Vector.hpp   |  39 +-
 src/phasicFlow/containers/Vector/Vectors.cpp  |   4 +-
 .../containers/Vector/stdVectorHelper.hpp     | 132 +++++++
 .../containers/VectorHD/VectorSingle.hpp      |  36 +-
 src/phasicFlow/containers/span/span.hpp       |  21 +-
 src/phasicFlow/fileSystem/fileSystem.cpp      |  25 +-
 src/phasicFlow/fileSystem/fileSystem.hpp      |  17 +-
 src/phasicFlow/processors/processors.hpp      |  10 +-
 .../repository/IOobject/IOPattern.cpp         |  31 ++
 .../repository/IOobject/IOPattern.hpp         | 152 ++++++++
 .../repository/IOobject/IOfileHeader.cpp      |  20 +-
 .../repository/IOobject/IOfileHeader.hpp      |  10 +-
 .../repository/IOobject/objectFile.cpp        |  12 +-
 .../repository/IOobject/objectFile.hpp        |  25 +-
 src/phasicFlow/streams/Stream/Istream.cpp     |  22 ++
 src/phasicFlow/streams/Stream/Istream.hpp     |   7 +-
 src/phasicFlow/streams/Stream/Ostream.cpp     |  16 +
 src/phasicFlow/streams/Stream/Ostream.hpp     |   8 +
 src/phasicFlow/streams/TStream/iTstream.cpp   |  10 +
 src/phasicFlow/streams/TStream/iTstream.hpp   |   6 +-
 src/phasicFlow/streams/TStream/oTstream.cpp   |   4 +
 src/phasicFlow/streams/TStream/oTstream.hpp   |  10 +
 src/phasicFlow/streams/dataIO/dataIO.cpp      | 261 +++++++++----
 src/phasicFlow/streams/dataIO/dataIO.hpp      | 113 ++++--
 .../streams/dataIO/dataIOTemplate.cpp         | 356 ++++++++++++++----
 src/phasicFlow/streams/iStream/IOstream.hpp   |   2 +-
 src/phasicFlow/streams/iStream/iIstream.hpp   |   4 +
 src/phasicFlow/streams/iStream/iOstream.hpp   |   8 +-
 .../infinitePlane/infinitePlane.cpp           |  64 ++++
 .../infinitePlane/infinitePlane.hpp           | 165 ++++++++
 src/phasicFlow/structuredData/line/line.hpp   |  16 +-
 src/phasicFlow/structuredData/plane/plane.cpp |  68 ++++
 src/phasicFlow/structuredData/plane/plane.hpp | 136 +++++++
 39 files changed, 1618 insertions(+), 516 deletions(-)
 create mode 100644 src/phasicFlow/containers/Vector/stdVectorHelper.hpp
 create mode 100644 src/phasicFlow/repository/IOobject/IOPattern.cpp
 create mode 100644 src/phasicFlow/repository/IOobject/IOPattern.hpp
 create mode 100644 src/phasicFlow/structuredData/infinitePlane/infinitePlane.cpp
 create mode 100644 src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp
 create mode 100644 src/phasicFlow/structuredData/plane/plane.cpp
 create mode 100644 src/phasicFlow/structuredData/plane/plane.hpp

diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index d9d701eb..4f138123 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -4,8 +4,6 @@ types/basicTypes/bTypesFunctions.cpp
 types/basicTypes/Logical.cpp
 types/types.cpp
 
-
-
 globals/error.cpp
 
 streams/token/tokenIO.cpp
@@ -35,10 +33,16 @@ dictionary/entry/dataEntry.cpp
 dictionary/twoPartEntry/twoPartEntry.cpp
 
 containers/Vector/Vectors.cpp
+containers/Field/Fields.cpp
 
 repository/IOobject/objectFile.cpp
 repository/IOobject/IOfileHeader.cpp
 repository/IOobject/IOobject.cpp
+repository/IOobject/IOPattern.cpp
+
+structuredData/line/line.cpp
+structuredData/infinitePlane/infinitePlane.cpp
+structuredData/plane/plane.cpp
 
 )
 
diff --git a/src/phasicFlow/containers/Field/Field.cpp b/src/phasicFlow/containers/Field/Field.cpp
index 5569ea9b..70e33dfd 100644
--- a/src/phasicFlow/containers/Field/Field.cpp
+++ b/src/phasicFlow/containers/Field/Field.cpp
@@ -18,7 +18,7 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-template<template<class, class> class VectorField, class T, class PropType>
+/*template<template<class, class> class VectorField, class T, class PropType>
 bool pFlow::Field<VectorField, T, PropType>::readUniform
 ( 
 	iIstream& is,
@@ -94,10 +94,10 @@ bool pFlow::Field<VectorField, T, PropType>::readNonUniform
 		
 
 	return true;	
-}
+}*/
 
 
-template<template<class, class> class VectorField, class T, class PropType>
+/*template<template<class, class> class VectorField, class T, class PropType>
 bool pFlow::Field<VectorField, T, PropType>::readField
 (
 	iIstream& is,
@@ -177,6 +177,50 @@ bool pFlow::Field<VectorField, T, PropType>::writeField(iOstream& os)const
 	
 	os.endEntry();
 
+	return true;
+}*/
+
+
+template<template<class, class> class VectorField, class T, class PropType>
+bool pFlow::Field<VectorField, T, PropType>::read
+(
+	iIstream& is,
+	IOPattern::IOType iotype
+)
+{
+	
+	bool tokenFound;
+	tokenFound = is.findToken(fieldKey_);
+
+	if( !tokenFound )
+	{
+		ioErrorInFile( is.name(), is.lineNumber() ) <<
+		" error in searching for filedkey " << fieldKey_<<endl;
+		return false;
+	}
+	
+	if( !VectorType::read(is, iotype) )
+	{
+		ioErrorInFile(is.name(), is.lineNumber())<<
+		"error in reading field data from field "<< this->name()<<endl;
+	}
+	is.readEndStatement("Field::read");
+
+
+	return true;
+}
+
+template<template<class, class> class VectorField, class T, class PropType>
+bool pFlow::Field<VectorField, T, PropType>::write(
+	iOstream& os, 
+	IOPattern::IOType iotype)const
+{
+
+	
+	os.writeWordKeyword(fieldKey_)<<endl;
+	VectorType::write(os, iotype);
+	os.endEntry();
+
 	return true;
 }
 
diff --git a/src/phasicFlow/containers/Field/Field.hpp b/src/phasicFlow/containers/Field/Field.hpp
index 1a0f2448..5074c2c0 100644
--- a/src/phasicFlow/containers/Field/Field.hpp
+++ b/src/phasicFlow/containers/Field/Field.hpp
@@ -21,8 +21,13 @@ Licence:
 #ifndef __Field_hpp__
 #define __Field_hpp__
 
-#include "VectorSingle.hpp"
-#include "vocabs.hpp"
+//#include "VectorSingle.hpp"
+//#include "vocabs.hpp"
+
+
+#include "types.hpp"
+#include "Vector.hpp"
+
 
 namespace pFlow
 {
@@ -62,144 +67,108 @@ protected:
 
 	const word fieldKey_ = FKey;
 
-	bool readUniform( iIstream& is, size_t len, bool readLength = true);
+	/*bool readUniform( iIstream& is, size_t len, bool readLength = true);
 
-	bool readNonUniform( iIstream& is, size_t len);
+	bool readNonUniform( iIstream& is, size_t len);*/
 
 public:
 
-	// - type info
+	/// type info
 	TypeInfoTemplateNV2("Field", T, VectorType::memoerySpaceName());
 
 	//// - Constructors
 
-		// construct an empty Filed with default fieldKey
+		/// construct an empty Filed with default fieldKey
 		Field()
 		:
 			VectorType()
 		{}
 
-		// construct an empty Field with fieldKey
-		Field(const word& fieldKey)
-		:
-			VectorType(),
-			fieldKey_(fieldKey)
-		{}
-
-		// construct an empty field with name and fieldKey 
+		
+		/// Construct an empty field with name and fieldKey 
 		Field(const word& name, const word& fieldKey)
 		:
 			VectorType(name),
 			fieldKey_(fieldKey)
 		{}
 
-		// construct an empty Filed with default fieldKey
-		Field(size_t len)
-		:
-			VectorType(len)
-		{}
-
-		// construct an empty Field with fieldKey
-		Field(const word& fieldKey, size_t len)
-		:
-			VectorType(len),
-			fieldKey_(fieldKey)
-		{}
-
-		// construct an empty field with name and fieldKey 
+		
+		/// Construct a field with name and fieldKey and specified len
 		Field(const word& name, const word& fieldKey, size_t len)
 		:
 			VectorType(name, len),
 			fieldKey_(fieldKey)
 		{}
 
-		// construct an empty Filed with default fieldKey and set vector to val
-		Field(size_t len, const T& val)
-		:
-			VectorType(len, val)
-		{}
-
-		// construct an empty Field with fieldKey and set vector to val
-		Field(const word& fieldKey, size_t len, const T& val)
-		:
-			VectorType(len, val),
-			fieldKey_(fieldKey)
-		{}
-
-		// construct an empty field with name and fieldKey and set vector to val
+		
+		/// Construct a field with name, fieldKey and 
+		/// set length to len and value to val
 		Field(const word& name, const word& fieldKey, size_t len, const T& val)
 		:
 			VectorType(name, len, val),
 			fieldKey_(fieldKey)
 		{}
 
-		// construct a field with capacity and len and default fieldKey
-		Field(size_t capacity, size_t len, RESERVE)
-		:
-			VectorType(capacity, len, RESERVE())
-		{}
-
-		// construct an empty Field with fieldKey
-		Field(const word& fieldKey, size_t capacity, size_t len, RESERVE)
-		:
-			VectorType(capacity, len, RESERVE()),
-			fieldKey_(fieldKey)
-		{}
-
-		// construct an empty field with name and fieldKey 
+		/// Construct a field with name, fieldKey, capacity and len
 		Field(const word& name, const word& fieldKey, size_t capacity, size_t len, RESERVE)
 		:
 			VectorType(name, capacity, len, RESERVE()),
 			fieldKey_(fieldKey)
 		{}
 
-		// construct with vec and default fieldKey
-		Field(const Vector<T>& vec)
-		:
-			VectorType(vec)
-		{}
-
-		// construct an empty Field with fieldKey
+		/// Construct a field with fieldKey and Vector vec
 		Field(const word& fieldKey, const Vector<T>& vec)
 		:
-			VectorType(vec),
+			VectorType(vec.name(), vec.vectorField()),
 			fieldKey_(fieldKey)
 		{}
 
-		// construct an empty field with name and fieldKey 
+		/// Construct a field with name, fieldKey and Vector vec
 		Field(const word& name, const word& fieldKey, const Vector<T>& vec)
+		:
+			VectorType(name, vec.vectorField()),
+			fieldKey_(fieldKey)
+		{}
+
+		/// Construct a field with name and fieldKey and std::vector 
+		Field(const word& name, const word& fieldKey, const std::vector<T>& vec)
 		:
 			VectorType(name, vec),
 			fieldKey_(fieldKey)
 		{}
 
-
-		// - copy construct with new name and fieldkey
+		/// Copy construct with new name and fieldkey
 		Field(const word& name, const word& fieldKey, const FieldType& src):
 			VectorType(name, src),
 			fieldKey_(fieldKey)
 		{}
 
-		// - default copy constructor
+		/// Default copy constructor
 		Field(const FieldType&) = default;
 
-		// - default copy assignment 
-		FieldType& operator = (const FieldType&) = default;
+		/// Copy assignment, name and fieldKey
+		/// on the left hand side are preserved
+		FieldType& operator = (const FieldType& rhs)
+		{
+			if(&rhs == this) return *this;
+			VectorType::operator=(rhs);
+			return *this;
+		}
 
-		// - no move constructor 
-		Field(FieldType&&) = delete;
+		/// Move constructor 
+		Field(FieldType&&) = default;
 
-		// - no move assignment 
-		FieldType& operator = (FieldType&&) = delete;
+		/// Move assignment 
+		FieldType& operator = (FieldType&&) = default;
 
-		// - clone as a uniquePtr
+		/// clone as a uniquePtr
 		INLINE_FUNCTION_H
 		uniquePtr<FieldType> clone() const
 		{
 			return makeUnique<FieldType>(*this);
 		}
 
-		// - clone as a raw pointer 
+		/// clone as a raw pointer 
 		INLINE_FUNCTION_H
 		FieldType* clonePtr()const
 		{
@@ -208,31 +177,27 @@ public:
 
 	//// - Methods
 
+		/// return field key
 		const word& fieldKey()const
 		{
 			return fieldKey_;
 		}
 	
 	//// - IO operations 
-		bool readField(iIstream& is, const size_t len, bool resume, bool readLength = true);
+		/*bool readField(iIstream& is, const size_t len, bool resume, bool readLength = true);
 		
 		
 		bool readField(iIstream& is, bool resume );
 
 		
-		bool writeField(iOstream& os)const;
+		bool writeField(iOstream& os)const;*/
 
 		
-		bool read(iIstream& is, bool resume = false)
-		{
-			return readField(is, resume);
-		}
+		bool read(iIstream& is, IOPattern::IOType iotype);
+		
 
-		bool write(iOstream& os)const
-		{
-			return writeField(os);
-		}
-	
+		bool write(iOstream& os, IOPattern::IOType iotype )const;
+			
 
 };
 
@@ -240,7 +205,7 @@ public:
 template<template<class, class> class VectorField, class T, class PropType>
 inline iIstream& operator >> (iIstream & is, Field<VectorField, T, PropType> & ifld )
 {
-	if( !ifld.readField(is, false) )
+	if( !ifld.read(is, IOPattern::MasterProcessor) )
 	{
 		ioErrorInFile (is.name(), is.lineNumber());
 		fatalExit;
@@ -252,7 +217,7 @@ template<template<class, class> class VectorField, class T, class PropType>
 inline iOstream& operator << (iOstream& os, const Field<VectorField, T, PropType>& ofld )
 {
 	
-	if( !ofld.writeField(os) )
+	if( !ofld.write(os, IOPattern::AllProcessorsDifferent) )
 	{
 		ioErrorInFile(os.name(), os.lineNumber());
 		fatalExit;
diff --git a/src/phasicFlow/containers/Field/Fields.cpp b/src/phasicFlow/containers/Field/Fields.cpp
index 28779371..e43c4330 100644
--- a/src/phasicFlow/containers/Field/Fields.cpp
+++ b/src/phasicFlow/containers/Field/Fields.cpp
@@ -23,7 +23,7 @@ Licence:
 
 template class pFlow::Field<pFlow::VectorSingle, pFlow::int8>;
 
-template class pFlow::Field<pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace>;
+/*template class pFlow::Field<pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace>;
 
 template class pFlow::Field<pFlow::VectorSingle, pFlow::int16>;
 
@@ -76,6 +76,6 @@ template class pFlow::Field<pFlow::VectorDual, pFlow::realx3>;
 template class pFlow::Field<pFlow::VectorDual, pFlow::realx3x3>;
 
 
-template class pFlow::Field<pFlow::Vector, pFlow::word, pFlow::vecAllocator<pFlow::word>>;
+template class pFlow::Field<pFlow::Vector, pFlow::word, pFlow::vecAllocator<pFlow::word>>;*/
 
 
diff --git a/src/phasicFlow/containers/Field/Fields.hpp b/src/phasicFlow/containers/Field/Fields.hpp
index 8b2ff92c..2a4b0ca0 100644
--- a/src/phasicFlow/containers/Field/Fields.hpp
+++ b/src/phasicFlow/containers/Field/Fields.hpp
@@ -24,22 +24,17 @@ Licence:
 #include "types.hpp"
 #include "Field.hpp"
 #include "VectorSingle.hpp"
-#include "VectorDual.hpp"
+//#include "VectorDual.hpp"
 
 
 namespace pFlow
 {
 
-
 using int8Field_D 		= Field<VectorSingle, int8>;
 
 using int8Field_H 		= Field<VectorSingle, int8, HostSpace>;
 
-using int16Field_D 		= Field<VectorSingle, int16>;
-
-using int16Field_H 		= Field<VectorSingle, int16, HostSpace>;
-
-using int32Field_D 		= Field<VectorSingle, int32>;
+/*using int32Field_D 		= Field<VectorSingle, int32>;
 
 using int32Field_H 		= Field<VectorSingle, int32, HostSpace>;
 
@@ -81,16 +76,14 @@ using int64x3Field_H 	= Field<VectorSingle, int64x3, HostSpace>;
 
 using realx3x3Field_D 	= Field<VectorSingle, realx3x3>;
 
-using realx3x3Field_H 	= Field<VectorSingle, realx3x3, HostSpace>;
+using realx3x3Field_H 	= Field<VectorSingle, realx3x3, HostSpace>;*/
 
 // - no typedef on device (since word does not compile on CUDA)
 using wordField_H 		= Field<VectorSingle, word, HostSpace>;
 
 
 // host device fields
-using int8Field_HD 		= Field<VectorDual, int8>;
-
-using int16Field_HD 	= Field<VectorDual, int16>;
+/*using int8Field_HD 		= Field<VectorDual, int8>;
 
 using int32Field_HD 	= Field<VectorDual, int32>;
 
@@ -104,15 +97,13 @@ using realField_HD 		= Field<VectorDual, real>;
 
 using realx3Field_HD 	= Field<VectorDual, realx3>;
 
-using uint16x3Field_HD 	= Field<VectorDual, uint32x3>;
-
 using uint32x3Field_HD  = Field<VectorDual, uint32x3>;
 
 using int32x3Field_HD 	= Field<VectorDual, int32x3>;
 
 using int64x3Field_HD 	= Field<VectorDual, int64x3>;
 
-using realx3x3Field_HD 	= Field<VectorDual, realx3x3>;
+using realx3x3Field_HD 	= Field<VectorDual, realx3x3>;*/
 
 
 using wordField 		= Field<Vector, word , vecAllocator<word>>; 
diff --git a/src/phasicFlow/containers/Vector/Vector.cpp b/src/phasicFlow/containers/Vector/Vector.cpp
index 71dc312a..9904d4a3 100644
--- a/src/phasicFlow/containers/Vector/Vector.cpp
+++ b/src/phasicFlow/containers/Vector/Vector.cpp
@@ -23,111 +23,21 @@ template<typename T, typename Allocator>
 bool pFlow::Vector<T, Allocator>::readVector
 (
 	iIstream& is,
-	size_t len
+	IOPattern::IOType iotype
 )
 {
-	
-	if(is.isBinary() && !std::is_same_v<T,word>)
-	{
-		this->resize(len);
-		is.read(reinterpret_cast<char*>(this->data()), this->size()*sizeof(T));	
-	}
-	else
-	{
-		this->clear();
-		is.fatalCheck(FUNCTION_NAME);
-
-		token firstToken(is);
-
-		T val{};
-		if( firstToken.isPunctuation() ) // start of vector 
-		{
-			if(firstToken != token::BEGIN_LIST)
-			{
-				warningInFunction
-				<< "expected token "<< token::BEGIN_LIST 
-				<< " but found "<< firstToken ;
-				return false;
-
-			}
-
-			token lastToken(is);
-			
-			
-			is.fatalCheck(FUNCTION_NAME);
-			
-			while 
-				( !(
-						lastToken.isPunctuation()
-	             	&& lastToken == token::END_LIST
-	             	 
-	             	) 
-	            )
-			{
-
-				is.putBack(lastToken);
-				
-				is >> val;
-				this->push_back(val);
-				
-				is >> lastToken;
-				is.fatalCheck(FUNCTION_NAME);
-			}
-
-		} else
-		{
-			warningInFunction
-			<< "expected token "<< token::BEGIN_LIST 
-			<< " but found "<< firstToken ;
-			return false;
-		}
-	}
-
-	return true;
+	return readStdVector(is, vectorField(), iotype);
 }
 
 
 template<typename T, typename Allocator>
 bool pFlow::Vector<T, Allocator>::writeVector
 (
-	iOstream& os
+	iOstream& os,
+	IOPattern::IOType iotype
 ) const
 {
-	
-	span<T> s( const_cast<T*>(this->data()), this->size());
-	os<<s;
-
-	// start of 
-	/*if( os.isBinary() && !std::is_same_v<T,word>)
-	{
-		os.write(reinterpret_cast<const char*>(this->data()), this->size()*sizeof(T));
-	}
-	else
-	{
-
-		auto len = size();
-		auto stride  = getVectorStride(len);
-		os << token::BEGIN_LIST;
-		size_t i = 0;
-		while( i<len )
-		{
-
-			os << this->operator[](i++);
-			for(size_t j=0; j<stride-1 && i<len; j++ )
-			{
-				os << token::SPACE << this->operator[](i++);	
-			}
-
-		 	if(i<len)
-		 		os<< token::NL;
-		}
-	    
-	    os << token::END_LIST;
-
-	    os.check(FUNCTION_NAME);
-	}*/
-
-    return true;
+	return writeStdVector(os, vectorField(), iotype);	
 }
 
 /*template<typename T, typename Allocator>
diff --git a/src/phasicFlow/containers/Vector/Vector.hpp b/src/phasicFlow/containers/Vector/Vector.hpp
index 44e3beb3..3377efdc 100644
--- a/src/phasicFlow/containers/Vector/Vector.hpp
+++ b/src/phasicFlow/containers/Vector/Vector.hpp
@@ -33,6 +33,8 @@ Licence:
 #include "iOstream.hpp"
 #include "iIstream.hpp"
 
+#include "stdVectorHelper.hpp"
+
 #ifndef __RESERVE__
 #define __RESERVE__
 	struct RESERVE{};
@@ -40,7 +42,7 @@ Licence:
 
 namespace pFlow
 {
-
+ 
 
 template<typename T, typename Allocator>
 class Vector;
@@ -48,18 +50,7 @@ class Vector;
 #include "VectorFwd.hpp"
 
 
-template <class T>
-class noConstructAllocator
-    : public std::allocator<T>
-{
-public:
-    using std::allocator<T>::allocator;
 
-    template <class U, class... Args> void construct(U*, Args&&...) {}
-};
-
-template<typename T>
-using vecAllocator = std::allocator<T>;
 
 template<typename T, typename Allocator = vecAllocator<T> >
 class Vector
@@ -351,19 +342,20 @@ public:
 
 	inline VectorType operator -()const;
 
-	
-	bool readVector(iIstream& is, size_t len=0);
+	/// Read vector (assume ASCII in input)
+	bool readVector(iIstream& is, IOPattern::IOType iotype);
 
-	bool writeVector(iOstream& os) const;
+	/// write vector 
+	bool writeVector(iOstream& os, IOPattern::IOType iotype) const;
 
-	bool read(iIstream& is)
+	bool read(iIstream& is, IOPattern::IOType iotype)
 	{
-		return readVector(is);
+		return readVector(is, iotype);
 	}
 
-	bool write(iOstream& os)const
+	bool write(iOstream& os, IOPattern::IOType iotype)const
 	{
-		return writeVector(os);
+		return writeVector(os, iotype);
 	}
 
 };
@@ -372,7 +364,7 @@ public:
 template<typename T, typename Allocator>
 inline iIstream& operator >> (iIstream & is, Vector<T, Allocator> & ivec )
 {
-	if( !ivec.readVector(is) )
+	if( !ivec.readVector(is, IOPattern::MasterProcessor) )
 	{
 		ioErrorInFile (is.name(), is.lineNumber());
 		fatalExit;
@@ -382,19 +374,16 @@ inline iIstream& operator >> (iIstream & is, Vector<T, Allocator> & ivec )
 
 template<typename T, typename Allocator> 
 inline iOstream& operator << (iOstream& os, const Vector<T, Allocator>& ovec )
-{
-	
-	if( !ovec.writeVector(os) )
+{	
+	if( !ovec.writeVector(os, IOPattern::AllProcessorsDifferent) )
 	{
 		ioErrorInFile(os.name(), os.lineNumber());
 		fatalExit;
 	}
-
 	return os; 
 }
 
 
-
 } // pFlow
 
 
diff --git a/src/phasicFlow/containers/Vector/Vectors.cpp b/src/phasicFlow/containers/Vector/Vectors.cpp
index 43d2952f..8db0fb40 100644
--- a/src/phasicFlow/containers/Vector/Vectors.cpp
+++ b/src/phasicFlow/containers/Vector/Vectors.cpp
@@ -22,7 +22,7 @@ Licence:
 
 // instantiation just for numeral types 
 
-template class pFlow::Vector<pFlow::int8>;
+/*template class pFlow::Vector<pFlow::int8>;
 
 template class pFlow::Vector<pFlow::int32>;
 
@@ -32,7 +32,7 @@ template class pFlow::Vector<pFlow::real>;
 
 template class pFlow::Vector<pFlow::realx3>;
 
-template class pFlow::Vector<pFlow::realx3x3>;
+template class pFlow::Vector<pFlow::realx3x3>;*/
 
 
 
diff --git a/src/phasicFlow/containers/Vector/stdVectorHelper.hpp b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
new file mode 100644
index 00000000..7ffbfaf8
--- /dev/null
+++ b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
@@ -0,0 +1,132 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#ifndef __stdVectorHelper_hpp__
+#define __stdVectorHelper_hpp__
+
+#include <vector>
+#include <algorithm>
+
+#include "span.hpp"
+#include "iOstream.hpp"
+#include "iIstream.hpp"
+#include "dataIO.hpp"
+
+
+namespace pFlow
+{
+ 
+
+template <class T>
+class noConstructAllocator
+    : public std::allocator<T>
+{
+public:
+    using std::allocator<T>::allocator;
+
+    template <class U, class... Args> void construct(U*, Args&&...) {}
+};
+
+template<typename T>
+using vecAllocator = std::allocator<T>;
+
+
+template<typename T>
+inline
+bool writeSpan(
+    iOstream& os, 
+    const span<T>& sp, 
+    IOPattern::IOType iotype)
+{
+   
+   dataIO io(iotype);
+
+   if(!io.writeData(os, sp))
+   {
+   		fatalErrorInFunction;
+   		return false;
+   }
+    return true; 
+}
+
+
+template<typename T, typename Allocator>
+bool writeStdVector
+(
+	iOstream& os, 
+	const std::vector<T,Allocator>& vec,
+	IOPattern::IOType iotype 
+)
+{
+	span<T> sp( const_cast<T*>(vec.data()), vec.size());
+
+	return writeSpan(os, sp, iotype);
+}
+
+	
+
+
+template<typename T, typename Allocator>
+bool readStdVector
+(
+	iIstream& is, 
+	std::vector<T,Allocator>& vec,
+	IOPattern::IOType iotype 
+)
+{
+	dataIO io(iotype);
+
+	if(!io.readData(is, vec))
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+	return true;
+	
+}
+
+template<typename T, typename Allocator>
+iOstream& operator<<( iOstream& os, const std::vector<T,Allocator>& vec)
+{
+	if(!writeStdVector(os, vec, IOPattern::AllProcessorsDifferent))
+	{
+		fatalErrorInFunction;
+		fatalExit;
+	}
+	return os;
+}
+
+/// Always assume ASCII is in the input stream 
+template<typename T, typename Allocator>
+iIstream& operator>>(iIstream& is, std::vector<T,Allocator>& vec)
+{
+	if( !readStdVector(is,vec, IOPattern::MasterProcessor))
+	{
+		fatalErrorInFunction;
+		fatalExit;
+	}
+	return is;
+}
+
+} // pFlow
+
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index cf1069fd..2fa36459 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -26,7 +26,6 @@ Licence:
 
 
 #include "globalSettings.hpp"
-#include "typeInfo.hpp"
 #include "types.hpp"
 #include "error.hpp"
 #include "indexContainer.hpp"
@@ -35,7 +34,7 @@ Licence:
 #include "span.hpp"
 #include "Vector.hpp"
 #include "phasicFlowKokkos.hpp"
-
+#include "dataIO.hpp"
 
 
 #ifndef __RESERVE__
@@ -240,7 +239,7 @@ public:
 		:
 			VectorSingle(src.name(), src)
 		{	
-			copy(deviceVector(), src.deviceVector());
+			//copy(deviceVector(), src.deviceVector());
 		}
 
 		/// Copy construct with a new name (perform deep copy)
@@ -577,34 +576,27 @@ public:
 
 	//// - IO operations
 
-		/// Read vector from is stream (ASCII or Binary)
-		/// For binary read, len should be provided 
+		/// Read vector from stream (ASCII)
 		FUNCTION_H
-		bool readVector(iIstream& is,	size_t len=0)
+		bool read(iIstream& is, IOPattern::IOType iotype)
 		{
-			Vector<T> vecFromFile;
-			if( !vecFromFile.readVector(is,len) ) return false;
+			std::vector<T> vecFromFile;
+			if(! readStdVector(is, vecFromFile, iotype)) return false;
 
 			this->assign(vecFromFile);
 
 			return true;
 		}
 
-		/// Read vector from stream (ASCII)
+		/// Write the vector to os
 		FUNCTION_H
-		bool read(iIstream& is)
-		{
-			return readVector(is);
-		}
-
-		/// Write the vector to os (ASCII or Binary)
-		FUNCTION_H
-		bool write(iOstream& os)const
+		bool write(iOstream& os, IOPattern::IOType iotype)const
 		{
 			auto hVec = hostVector();
 			auto sp = span<T>( const_cast<T*>(hVec.data()), hVec.size());
-			os<<sp;
-			return true;
+			
+			return writeSpan(os, sp, iotype);
+			
 		}
 
 }; // class VectorSingle
@@ -612,7 +604,7 @@ public:
 template<typename T, typename MemorySpace>
 inline iIstream& operator >> (iIstream & is, VectorSingle<T, MemorySpace> & ivec )
 {
-	if( !ivec.read(is) )
+	if( !ivec.read(is, IOPattern::MasterProcessor ) )
 	{
 		ioErrorInFile (is.name(), is.lineNumber());
 		fatalExit;
@@ -624,7 +616,7 @@ template<typename T, typename MemorySpace>
 inline iOstream& operator << (iOstream& os, const VectorSingle<T, MemorySpace>& ovec )
 {
 	
-	if( !ovec.write(os) )
+	if( !ovec.write(os, IOPattern::AllProcessorsDifferent) )
 	{
 		ioErrorInFile(os.name(), os.lineNumber());
 		fatalExit;
@@ -634,8 +626,6 @@ inline iOstream& operator << (iOstream& os, const VectorSingle<T, MemorySpace>&
 }
 
 
-
-
 } // - pFlow
 
 #include "VectorSingleAlgorithms.hpp"
diff --git a/src/phasicFlow/containers/span/span.hpp b/src/phasicFlow/containers/span/span.hpp
index 0ee41e71..094ffe1d 100644
--- a/src/phasicFlow/containers/span/span.hpp
+++ b/src/phasicFlow/containers/span/span.hpp
@@ -159,6 +159,7 @@ public:
     INLINE_FUNCTION_H
     bool writeASCII(iOstream& os) const
     {
+        os<< size()<<endl;
         os << token::BEGIN_LIST;
         if(size()>0)
         {
@@ -177,34 +178,22 @@ public:
         return true;
     }
 
-    /// Write in Binray format, can be used for numeral types (Not word or similar ones)
-    INLINE_FUNCTION_H
-    bool writeBinary(iOstream& os) const
-    {
-        os.write(reinterpret_cast<const char*>(data_), this->size()*sizeof(T));
-        os.check(FUNCTION_NAME);
-        return true;
-    }
 
 };
 
+
 template<typename T>
 inline 
 iOstream& operator<<(iOstream& os, const span<T>& s)
 {
 
-    if( os.isBinary() && !std::is_same_v<T,word>)
-    {
-        s.writeBinary(os);
-    }
-    else
-    {
-        s.writeASCII(os);
-    }
+    s.writeASCII(os);
 
     return os;
 }
 
+
+
 } // pFlow
 
 #endif //__span_hpp__
diff --git a/src/phasicFlow/fileSystem/fileSystem.cpp b/src/phasicFlow/fileSystem/fileSystem.cpp
index 79065498..c5c5317b 100644
--- a/src/phasicFlow/fileSystem/fileSystem.cpp
+++ b/src/phasicFlow/fileSystem/fileSystem.cpp
@@ -41,6 +41,18 @@ bool pFlow::fileSystem::checkFileName(const word& name)
 }
 
 
+/// From full path 
+pFlow::fileSystem::fileSystem(const word & wPath)
+:
+	path_(wPath),
+	isDir_(std::filesystem::is_directory(path_))
+{
+	std::cout<<"file name is " << fileName()<<std::endl;
+	if( !isDir_ && !checkFileName(fileName()))
+	{
+		fatalExit;
+	}
+}
 
 pFlow::fileSystem::fileSystem( const word& dir, const word& file)
 {
@@ -74,10 +86,9 @@ pFlow::fileSystem::fileSystem( const char* dir, const char* file)
 
 pFlow::fileSystem::fileSystem( const pathType& path )
 :
-	path_(path)
-{
-	isDir_ = isDirectory(*this);
-}
+	path_(path),
+	isDir_(std::filesystem::is_directory(path_))
+{}
 
 pFlow::fileSystem pFlow::fileSystem::dirPath() const
 {
@@ -175,9 +186,7 @@ bool pFlow::fileSystem::dirExist
 	
 }
 
-bool pFlow::fileSystem::exist
-(
-)const
+bool pFlow::fileSystem::exist()const
 {
 	try
 	{
@@ -321,7 +330,7 @@ pFlow::fileSystemList pFlow::subDirectories
 		auto dOps = std::filesystem::directory_options::skip_permission_denied;
 		for( auto& subPath: std::filesystem::directory_iterator(path.path(), dOps) )
 		{
-			if(isDirectory( subPath.path() ) )
+			if(isDirectory( fileSystem(subPath.path()) ) )
 			{
 				dirs.emplace_back(subPath.path());
 			}
diff --git a/src/phasicFlow/fileSystem/fileSystem.hpp b/src/phasicFlow/fileSystem/fileSystem.hpp
index 2904407e..9eb70122 100644
--- a/src/phasicFlow/fileSystem/fileSystem.hpp
+++ b/src/phasicFlow/fileSystem/fileSystem.hpp
@@ -71,19 +71,19 @@ public:
 protected:
 	
 	/// File path 
-	std::filesystem::path path_;
+	pathType 	path_;
 	
 	/// Is this a directory path?
-	bool isDir_;
+	bool 		isDir_;
 
 
 	/// Not premitted chars in file name 	
-	inline static word notPermittedCharsFile = word(" ") + word("\t\n\0;:?*/<>\"?\'");
+	inline static word notPermittedCharsFile = word(" ") + word("&\t\n;:?*/<>\"?\'");
 	
 	/// Is name is valid for a file? 
 	bool static validFileName(const word& name)
 	{
-		return name.find_first_of(notPermittedCharsFile);
+		return name.find_first_of(notPermittedCharsFile)==word::npos;
 	}
 
 	/// Is a valid file name?
@@ -107,13 +107,18 @@ public:
 			isDir_(true)
 		{}
 
+		/// From full path 
+		explicit
+		fileSystem(const word & wPath);
+
 		/// From dir and file name 
-		fileSystem( const word& dir, const word& file = "");
+		fileSystem( const word& dir, const word& file);
 		
 		/// From dir and file name 
-		fileSystem( const char* dir, const char* file = "");
+		fileSystem( const char* dir, const char* file="");
 
 		/// Copy
+		explicit
 		fileSystem( const pathType& path );
 
 		/// Copy 
diff --git a/src/phasicFlow/processors/processors.hpp b/src/phasicFlow/processors/processors.hpp
index 49fe3d1f..494787a6 100644
--- a/src/phasicFlow/processors/processors.hpp
+++ b/src/phasicFlow/processors/processors.hpp
@@ -82,14 +82,14 @@ public:
 	~processors();
 	
 	/// Master processors number (globaly in MPI).
-	static
+	static inline
 	int masterNo()
 	{
 		return 0;
 	}
 
 	/// Is this a parallel MPI run.
-	static
+	static inline
 	bool isParallel()
 	{
 		return processors::globalSize()>1;
@@ -104,21 +104,21 @@ public:
 	bool isFinalized();
 	
 	/// Is this processor the master processor?
-	static
+	static inline
 	bool isMaster()
 	{
 		return processors::globalRank() == processors::masterNo();
 	}
 	
 	/// Global size of processors
-	static
+	static inline
 	int globalSize()
 	{
 		return globalSize_;
 	}
 	
 	/// Rank of the processor in the global MPI
-	static
+	static inline
 	int globalRank()
 	{
 		return globalRank_;
diff --git a/src/phasicFlow/repository/IOobject/IOPattern.cpp b/src/phasicFlow/repository/IOobject/IOPattern.cpp
new file mode 100644
index 00000000..ffb0eb78
--- /dev/null
+++ b/src/phasicFlow/repository/IOobject/IOPattern.cpp
@@ -0,0 +1,31 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#include "processors.hpp"
+#include "IOPattern.hpp"
+
+pFlow::IOPattern::IOPattern( IOType iotype)
+:
+	ioType_(iotype),
+	globalSize_(processors::globalSize()),
+	globalRank_(processors::globalRank()),
+	isMaster_(processors::isMaster()),
+	isParallel_(processors::isParallel())
+{}
+
diff --git a/src/phasicFlow/repository/IOobject/IOPattern.hpp b/src/phasicFlow/repository/IOobject/IOPattern.hpp
new file mode 100644
index 00000000..c539aabb
--- /dev/null
+++ b/src/phasicFlow/repository/IOobject/IOPattern.hpp
@@ -0,0 +1,152 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __IOPattern_hpp__
+#define __IOPattern_hpp__
+
+
+#include "processors.hpp"
+
+namespace pFlow
+{
+
+
+class IOPattern
+{
+public:
+
+	/**
+	 * Type of input/output
+	 * 
+	 * MasterProcessorOnly: Read or write is done on master processor
+	 *    and the data on master processor is affected.
+	 * 
+	 * MasterProcessorDistribute: Read is done on master processor, but 
+	 * the data should be distributed between processors based on an externally 
+	 * specified pattern. Write is done on master processors and the data is 
+	 * collected from all processors (collection is done based on the externally 
+	 * specified pattern). 
+	 * 
+	 * AllProcessorsSimilar: Read is done on all processors and processors 
+	 *    read the same data. Write is done on master processor, since 
+	 *    all processors have the same copy of data. 
+	 */
+	enum IOType : int
+	{
+		MasterProcessorOnly			= 0,
+		AllProcessorsSimilar 		= 1,
+		MasterProcessorDistribute	= 4
+	};
+
+protected:
+
+	IOType 		ioType_;
+
+	int  			globalSize_ = 1;
+
+	int 			globalRank_ = 0;
+
+	bool 			isMaster_ = true;
+
+	bool 			isParallel_ = false;
+
+public:
+
+	IOPattern( IOType iotype);
+	
+	IOPattern(const IOPattern&)=default;
+
+	IOPattern& operator=(const IOPattern&)=default;
+
+	~IOPattern() = default;
+
+	inline
+	bool isMasterProcessorOnly()const
+	{
+		return ioType_ == MasterProcessorOnly;
+	}
+
+	inline
+	bool isAllProcessorSimilar()const
+	{
+		return ioType_ == AllProcessorsSimilar;
+	}
+
+	inline
+	bool isMasterProcessorDistribute()const
+	{
+		return ioType_ == MasterProcessorDistribute;
+	}
+
+	inline
+	bool isMaster()const
+	{
+		return isMaster_;
+	}
+
+	inline 
+	bool isParallel()const
+	{
+		return isParallel_;
+	}
+
+	inline
+	bool thisProcReadData()const
+	{
+		if(isMasterProcessor() && !isMaster())return false;
+		if(isMasterProcessorDistribute() && !isMaster()) return false;
+		return true;
+	}
+
+	inline
+	bool thisProcWriteData()const
+	{
+		return isMaster();
+	}
+
+	inline 
+	bool thisProcReadHeader()const
+	{
+		return thisProcReadData();
+	}
+
+	inline
+	bool thisProcWriteHeader()const
+	{
+		return isMaster();
+	}
+
+	inline 
+	auto globalSize()const
+	{
+		return globalSize_;
+	}
+
+	inline 
+	auto globalRank()const
+	{
+		return globalRank_;
+	}
+
+};
+
+}
+
+#endif //__IOPattern_hpp__
\ No newline at end of file
diff --git a/src/phasicFlow/repository/IOobject/IOfileHeader.cpp b/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
index 8c92c944..3015dc2a 100644
--- a/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
+++ b/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
@@ -135,6 +135,7 @@ bool pFlow::IOfileHeader::readIfPresent()const
 
 bool pFlow::IOfileHeader::writeHeader()const
 {
+
 	if( !this->readWriteHeader() ) return false;
 	if( !processors::isMaster() ) return false;
 	if( !implyWrite() ) return false;
@@ -150,7 +151,10 @@ bool pFlow::IOfileHeader::writeHeader
 ) const
 {
 
-	if(!forceWrite && !writeHeader()) return true;
+	if(!forceWrite)
+	{
+		if(!writeHeader()) return true;
+	} 
 
 	writeBanner(os);
 
@@ -180,8 +184,9 @@ bool pFlow::IOfileHeader::writeHeader(iOstream& os, bool forceWrite) const
 
 bool pFlow::IOfileHeader::readHeader()const
 {
-	if( !this->readWriteHeader() ) return false;
-	return true;
+	if( !implyRead())return false;
+	if( !this->readWriteHeader() ) return false;  
+	return ioPattern().thisProcReadHeader();
 }
 
 bool pFlow::IOfileHeader::readHeader(iIstream& is, bool silent)
@@ -228,15 +233,14 @@ bool pFlow::IOfileHeader::readHeader(iIstream& is, bool silent)
 
 bool pFlow::IOfileHeader::writeData()const
 {
-	if( processors::isMaster() || this->differentDataOnProcessors())
-		return true;
-	else
-		return false;
+	if(!implyWrite())return false;
+	return ioPattern().thisProcWriteData();
 }
 
 bool pFlow::IOfileHeader::readData()const
 {
-	return true;
+	if(!implyRead())return false;
+	return ioPattern().thisProcReadData();
 }
 
 bool pFlow::IOfileHeader::writeBanner(iOstream& os)const
diff --git a/src/phasicFlow/repository/IOobject/IOfileHeader.hpp b/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
index e019a79e..569e6ab6 100644
--- a/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
+++ b/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
@@ -109,7 +109,7 @@ public:
 
 	/// Check if the header should be written to file
 	/// True: on master + implyWrite + readWriteHeader = true
-	/// False: slave or NOT implyWrite
+	/// False: otherwise
 	bool writeHeader()const;
 
 	/// Write the header to the file , typeName comes from caller
@@ -119,13 +119,9 @@ public:
 	bool writeHeader(iOstream& os, bool forceWrite = false) const;
 
 	/// Check if the data should be written to file 
-	/// True: on master or differentDataOnProcessor is true
-	/// False: otherwise 
 	bool writeData()const;
 
 	/// Check if header should be read from file
-	/// True: All processors, read the file header 
-	/// False: readWriteHeader = false
 	bool readHeader()const;
 
 	/// Read the header in the file
@@ -135,10 +131,10 @@ public:
 	/// Always return true
 	bool readData()const;
 	
-	// - write the banner 
+	/// write the banner 
 	bool writeBanner(iOstream& os)const;
 
-	// - wirte a separator line 
+	/// wirte a separator line 
 	bool writeSeparator(iOstream& os)const;
 
 };
diff --git a/src/phasicFlow/repository/IOobject/objectFile.cpp b/src/phasicFlow/repository/IOobject/objectFile.cpp
index c9957daf..a0b41f0c 100644
--- a/src/phasicFlow/repository/IOobject/objectFile.cpp
+++ b/src/phasicFlow/repository/IOobject/objectFile.cpp
@@ -30,11 +30,11 @@ pFlow::objectFile::objectFile
 
 pFlow::objectFile::objectFile
 (
-	const word& 			name,
-	const fileSystem& 		localPath,
-	const readFlag&   		rf, 
-	const writeFlag&  		wf,
-	bool  diffDataOnProcessors,
+	const word& 		name,
+	const fileSystem& 	localPath,
+	const readFlag&   	rf, 
+	const writeFlag&  	wf,
+	IOPattern::IOType	ioType,
 	bool  rwHdr
 )
 :
@@ -42,7 +42,7 @@ pFlow::objectFile::objectFile
 	rFlag_(rf),
 	wFlag_(wf),
 	localPath_(localPath),
-	differentDataOnProcessors_(diffDataOnProcessors),
+	ioPattern_(ioType),
 	readWriteHeader_(rwHdr)	
 {
 }
\ No newline at end of file
diff --git a/src/phasicFlow/repository/IOobject/objectFile.hpp b/src/phasicFlow/repository/IOobject/objectFile.hpp
index 6dd70ca2..39f9adf8 100644
--- a/src/phasicFlow/repository/IOobject/objectFile.hpp
+++ b/src/phasicFlow/repository/IOobject/objectFile.hpp
@@ -23,6 +23,7 @@ Licence:
 
 #include "types.hpp"
 #include "fileSystem.hpp"
+#include "IOPattern.hpp"
 
 
 namespace pFlow
@@ -47,6 +48,7 @@ public:
 		WRITE_NEVER
 	};
 
+
 protected:
 
 	/// Name of the entity
@@ -61,16 +63,10 @@ protected:
 	/// Local path of entity
 	fileSystem localPath_ = "";
 
-	/// Number of bytes used for writing/reading real variable (mostly used for binray)
+	/// Number of bytes used for writing/reading real variable (used for binray)
 	int 		numBytesForReal_ = numBytesForReal__;
 	
-	/// All processors have the different set of data or not?
-	/// True: Each processor should read its own part of data from file and should write 
-	/// its own part of data to the file.  
-	/// Flase: All processors read the same data from file and in writing, only master data
-	/// write the data to the file. 
-
-	bool differentDataOnProcessors_ = true;
+	IOPattern 	ioPattern_ = {IOPattern::MasterProcessor};
 
 	/// Does the objectFile write the header or not
 	bool readWriteHeader_ = true;
@@ -89,10 +85,10 @@ public:
 	objectFile
 	(
 		const word& name,
-		const fileSystem& localPath,
-		const readFlag&   rf = READ_NEVER,
-		const writeFlag&  wf = WRITE_NEVER,
-		bool  diffDataOnProcessors = true,
+		const fileSystem& 	localPath,
+		const readFlag&   	rf = READ_NEVER,
+		const writeFlag&  	wf = WRITE_NEVER,
+		IOPattern::IOType	ioType = IOPattern::MasterProcessor,
 		bool  rwHdr = true
 	);
 
@@ -160,10 +156,9 @@ public:
 		return wFlag_ == WRITE_NEVER;
 	}
 
-	inline
-	bool differentDataOnProcessors()const
+	const IOPattern& ioPattern()const
 	{
-		return differentDataOnProcessors_;
+		return ioPattern_;
 	}
 
 	inline 
diff --git a/src/phasicFlow/streams/Stream/Istream.cpp b/src/phasicFlow/streams/Stream/Istream.cpp
index be2ea9cb..3786448a 100755
--- a/src/phasicFlow/streams/Stream/Istream.cpp
+++ b/src/phasicFlow/streams/Stream/Istream.cpp
@@ -899,6 +899,28 @@ void pFlow::Istream::rewind()
     stdStream().rdbuf()->pubseekpos(0, std::ios_base::in);
 }
 
+void pFlow::Istream::seek(size_t pos)
+{
+    stdStream().clear();  // Clear the iostate error state flags
+    setGood();            // Sync local copy of iostate
+    resetPutBack();
+    // pubseekpos() rather than seekg() so that it works with gzstream
+    stdStream().rdbuf()->pubseekpos(pos, std::ios_base::in);
+}
+
+size_t pFlow::Istream::tell() 
+{
+
+    auto pos = static_cast<size_t>(stdStream().tellg());
+    if(stdStream().fail())
+    {
+        fatalErrorInFunction<<
+        "Error in getting current position from stream "<<
+        this->name()<<endl;
+        fatalExit;
+    }
+    return pos;
+}
 
 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
 
diff --git a/src/phasicFlow/streams/Stream/Istream.hpp b/src/phasicFlow/streams/Stream/Istream.hpp
index 2c324214..4e8dd969 100755
--- a/src/phasicFlow/streams/Stream/Istream.hpp
+++ b/src/phasicFlow/streams/Stream/Istream.hpp
@@ -156,7 +156,12 @@ public:
     size_t findBinaryBlockStart()override;
 
     /// Rewind the stream so that it may be read again
-    virtual void rewind();
+    void rewind() override;
+
+    void seek(size_t pos) override;
+
+    /// Return current position indicator 
+    size_t tell() override;
 
 
     /// Set stream flags
diff --git a/src/phasicFlow/streams/Stream/Ostream.cpp b/src/phasicFlow/streams/Stream/Ostream.cpp
index d3c74dbc..e4cf6cbc 100755
--- a/src/phasicFlow/streams/Stream/Ostream.cpp
+++ b/src/phasicFlow/streams/Stream/Ostream.cpp
@@ -258,6 +258,10 @@ pFlow::iOstream& pFlow::Ostream::writeBinaryBlockFlag()
     return *this;
 }
 
+void pFlow::Ostream::seek(size_t pos)
+{
+    os_.seekp(pos, std::ios_base::cur);
+}
 
 void pFlow::Ostream::indent()
 {
@@ -267,6 +271,18 @@ void pFlow::Ostream::indent()
     }
 }
 
+void pFlow::Ostream::startOfBinaryStreaming()
+{
+    this->endl();
+    this->flush();
+}
+
+void pFlow::Ostream::endOfBinaryStreaming()
+{
+    os_.seekp(0, std::ios_base::end);
+    this->endl();
+    this->flush();
+}
 
 void pFlow::Ostream::flush()
 {
diff --git a/src/phasicFlow/streams/Stream/Ostream.hpp b/src/phasicFlow/streams/Stream/Ostream.hpp
index 4d5f3205..256270b5 100755
--- a/src/phasicFlow/streams/Stream/Ostream.hpp
+++ b/src/phasicFlow/streams/Stream/Ostream.hpp
@@ -132,12 +132,20 @@ public:
 
         iOstream& writeBinaryBlockFlag() override;
 
+        void seek(size_t pos) override;
+
         /// Add indentation characters
         void indent() override;
 
         /// Set stream flags
         ios_base::fmtflags flags(const ios_base::fmtflags f) override;
 
+        /// Add a new line and flush stream 
+        void startOfBinaryStreaming() override;
+
+        /// Reach end of file add a new line and flush stream 
+        void endOfBinaryStreaming() override ;
+
         /// Flush stream
         void flush() override;
 
diff --git a/src/phasicFlow/streams/TStream/iTstream.cpp b/src/phasicFlow/streams/TStream/iTstream.cpp
index a786561a..49b80cee 100755
--- a/src/phasicFlow/streams/TStream/iTstream.cpp
+++ b/src/phasicFlow/streams/TStream/iTstream.cpp
@@ -309,6 +309,10 @@ void pFlow::iTstream::rewind()
     setGood();
 }
 
+void pFlow::iTstream::seek(size_t pos) 
+{
+    notImplementedFunction;
+}
 
 void pFlow::iTstream::reset()
 {
@@ -318,6 +322,12 @@ void pFlow::iTstream::reset()
     setGood();
 }
 
+size_t pFlow::iTstream::tell() 
+{
+    notImplementedFunction;
+    return -1;
+}
+
 const pFlow::tokenList& pFlow::iTstream::tokens()const
 {
     return tokenList_;
diff --git a/src/phasicFlow/streams/TStream/iTstream.hpp b/src/phasicFlow/streams/TStream/iTstream.hpp
index 8bb2e824..2f7e0786 100755
--- a/src/phasicFlow/streams/TStream/iTstream.hpp
+++ b/src/phasicFlow/streams/TStream/iTstream.hpp
@@ -130,7 +130,11 @@ public:
         iIstream& read(char* buffer, std::streamsize count) override;
 
         /// Rewind the stream so that it may be read again
-        virtual void rewind();
+        virtual void rewind()override;
+
+        void seek(size_t pos) override;
+
+        size_t tell() override;
 
         /// reset the iTstream and make the stream empty
         virtual void reset();
diff --git a/src/phasicFlow/streams/TStream/oTstream.cpp b/src/phasicFlow/streams/TStream/oTstream.cpp
index 381dfaa1..35c9d0c8 100755
--- a/src/phasicFlow/streams/TStream/oTstream.cpp
+++ b/src/phasicFlow/streams/TStream/oTstream.cpp
@@ -173,6 +173,10 @@ pFlow::iOstream& pFlow::oTstream::write
     return *this;
 }
 
+void pFlow::oTstream::seek(size_t pos) 
+{
+    notImplementedFunction;
+}
 
 void pFlow::oTstream::append(const token& tok)
 {
diff --git a/src/phasicFlow/streams/TStream/oTstream.hpp b/src/phasicFlow/streams/TStream/oTstream.hpp
index 23752a5d..110e9410 100755
--- a/src/phasicFlow/streams/TStream/oTstream.hpp
+++ b/src/phasicFlow/streams/TStream/oTstream.hpp
@@ -132,6 +132,8 @@ public:
         /// Write double
         virtual iOstream& write(const size_t val) override;
 
+        void seek(size_t pos) override;
+
         /// Write a block of binray data
         iOstream& write(
             const char* binaryData, 
@@ -157,6 +159,14 @@ public:
         virtual void indent()
         {}
 
+        /// Add a new line and flush stream 
+        virtual void startOfBinaryStreaming()
+        {}
+
+        /// Reach end of file add a new line and flush stream 
+        virtual void endOfBinaryStreaming()
+        {}
+
         /// Flush stream
         virtual void flush()
         {}
diff --git a/src/phasicFlow/streams/dataIO/dataIO.cpp b/src/phasicFlow/streams/dataIO/dataIO.cpp
index 9789c56e..4f44f21e 100644
--- a/src/phasicFlow/streams/dataIO/dataIO.cpp
+++ b/src/phasicFlow/streams/dataIO/dataIO.cpp
@@ -7,12 +7,9 @@
 #include <cstdio>
 #include <numeric>
 
-
 #include "dataIO.hpp"
-#include "fileSystem.hpp"
 
 
-#include "streams.hpp"
 
 static const size_t numcharFlag = 8;
 
@@ -43,19 +40,18 @@ pFlow::uint64 findBindaryBlockFlagSTD(std::FILE* fh)
 	if( fpos = std::ftell( fh) ; fpos == -1L )
 	{
 		fatalErrorInFunction;
-		return -1;
+		return pFlow::dataIO::ErrorReturn;
 	}
 
 	pFlow::uint64 filePos = static_cast<pFlow::uint64>(fpos);
 
 	// start reading char by char 
-	int c; 
 	unsigned char ch;
 	int currPos = 0;
     while ( std::fread(&ch, sizeof(ch), 1, fh) == 1 ) 
     {
-   		if(std::ferror(fh)) return -1;	
-   		if(std::feof(fh))return -1;
+   		if(std::ferror(fh)) return pFlow::dataIO::ErrorReturn;	
+   		if(std::feof(fh))return pFlow::dataIO::ErrorReturn;
 
    		filePos++;
 
@@ -71,22 +67,16 @@ pFlow::uint64 findBindaryBlockFlagSTD(std::FILE* fh)
    		}   
     }
 
-    return -1;
+    return pFlow::dataIO::ErrorReturn;
 }
 
 
 #ifdef pFlow_Build_MPI
-pFlow::uint64 findBindaryBlockFlagMPI(MPI_File fh)
+pFlow::uint64 findBindaryBlockFlagMPI(MPI_File fh, pFlow::uint64 startPosSearch)
 {
-	// get the current postion 
-	MPI_Offset fpos;
-	if( MPI_File_get_position( fh, &fpos) != MPI_SUCCESS )
-	{
-		fatalErrorInFunction;
-		return false;
-	}
+	
 
-	pFlow::uint64 filePos = static_cast<pFlow::uint64>(fpos);
+	pFlow::uint64 filePos = static_cast<pFlow::uint64>(startPosSearch);
 
 	// start reading char by char 
 	unsigned char ch;
@@ -114,7 +104,7 @@ pFlow::uint64 findBindaryBlockFlagMPI(MPI_File fh)
    		}   
     }
 
-    return -1;
+    return pFlow::dataIO::ErrorReturn;
 }
 
 #endif
@@ -122,21 +112,18 @@ pFlow::uint64 findBindaryBlockFlagMPI(MPI_File fh)
 
 bool pFlow::dataIO::writeDataToFileEndSTD
 (
-	const fileSystem& filePath, 
+	const word& wordPath, 
 	const span<unsigned char>& data
 )
 {
 
-	if(!processors::isMaster()) return true;
-
 	// openfile 
-	word wFile = filePath.wordPath();
-	auto fh = std::fopen(wFile.c_str(), "ab");
+	auto fh = std::fopen(wordPath.c_str(), "ab");
 
 	if(!fh)
 	{
 		fatalErrorInFunction<<
-		"Error in Opening file "<< filePath <<endl;
+		"Error in Opening file "<< wordPath <<endl;
 		std::fclose(fh);
 		return false;
 	}
@@ -145,15 +132,16 @@ bool pFlow::dataIO::writeDataToFileEndSTD
 	if(std::fseek(fh, 0 , SEEK_END)!=0)
 	{
 		fatalErrorInFunction<<
-		"error at reaching end of file "<<filePath<<endl;
+		"error at reaching end of file "<<wordPath<<endl;
 		std::fclose(fh);
 		return false;
 	}
-
+	
+	
 	if(!writeBinaryBlockFlagSTD(fh) )
 	{
 		fatalErrorInFunction<<
-		"Error in writing to file "<< filePath<<endl;
+		"Error in writing to file "<< wordPath<<endl;
 		std::fclose(fh);
 		return false;
 	}
@@ -166,7 +154,7 @@ bool pFlow::dataIO::writeDataToFileEndSTD
 	if(wc < 1)
 	{
 		fatalErrorInFunction<<
-		"Error in writing numChunks to file "<< filePath <<endl;
+		"Error in writing numChunks to file "<< wordPath <<endl;
 		std::fclose(fh);
 		return false;
 	}
@@ -179,7 +167,7 @@ bool pFlow::dataIO::writeDataToFileEndSTD
 	if(wc <1)
 	{
 		fatalErrorInFunction<<
-		"Error in writing size of data chunk to file "<< filePath <<endl;
+		"Error in writing size of data chunk to file "<< wordPath <<endl;
 		std::fclose(fh);
 		return false;	
 	}
@@ -191,12 +179,15 @@ bool pFlow::dataIO::writeDataToFileEndSTD
 		if(wc < sizeOfData )
 		{
 			fatalErrorInFunction<<
-			"Error in writing size of data to file "<< filePath <<endl;
+			"Error in writing size of data to file "<< wordPath <<endl;
 			std::fclose(fh);
 			return false;	
 		}	
 	}
-
+	
+		
+	lastPosRead_ = static_cast<uint64>(std::ftell(fh));
+		
 	// close the file 
 	std::fclose(fh);
 
@@ -205,7 +196,7 @@ bool pFlow::dataIO::writeDataToFileEndSTD
 
 bool pFlow::dataIO::writeDataToFileEndMPI
 (
-	const fileSystem& filePath, 
+	const word& wordPath, 
 	const span<unsigned char>& data
 )
 {	
@@ -223,19 +214,18 @@ bool pFlow::dataIO::writeDataToFileEndMPI
 		true
 	);
 
-	word wFile = filePath.wordPath();
 
 	MPI_File fh;
 	
 	if( MPI_File_open(
 			MPI_COMM_WORLD,
-			wFile.c_str(),
+			wordPath.c_str(),
 			MPI_MODE_WRONLY+MPI_MODE_APPEND,
 			MPI_INFO_NULL,
 			&fh) != MPI_SUCCESS)
 	{
 		fatalErrorInFunction<<
-		"Cannot open file "<< filePath<<endl;
+		"Cannot open file "<< wordPath<<endl;
 		return false;
 	}	
 
@@ -255,7 +245,7 @@ bool pFlow::dataIO::writeDataToFileEndMPI
 			) != MPI_SUCCESS )
 		{
 			fatalErrorInFunction<<
-			"Cannot write binary block flag into "<< filePath<<endl;
+			"Cannot write binary block flag into "<< wordPath<<endl;
 			return false;
 		}
 		
@@ -263,7 +253,7 @@ bool pFlow::dataIO::writeDataToFileEndMPI
 		if( MPI_File_get_position(fh, &posOfBlock) != MPI_SUCCESS )
 		{
 			fatalErrorInFunction<<
-			"Cannot get the end pos of file "<< filePath<<endl;
+			"Cannot get the end pos of file "<< wordPath<<endl;
 			return false;
 		}
 
@@ -295,7 +285,7 @@ bool pFlow::dataIO::writeDataToFileEndMPI
 			MPI_STATUS_IGNORE) != MPI_SUCCESS)
 		{
 			fatalErrorInFunction<<
-			"Cannot write number of chunks into "<<filePath<<endl;
+			"Cannot write number of chunks into "<<wordPath<<endl;
 			return false;
 		}
 	}
@@ -312,7 +302,7 @@ bool pFlow::dataIO::writeDataToFileEndMPI
 		MPI_STATUS_IGNORE)!= MPI_SUCCESS)
 	{
 		fatalErrorInFunction<<
-		"Cannot write size of chunk into "<<filePath<<endl;
+		"Cannot write size of chunk into "<<wordPath<<endl;
 		return false;
 	}
 
@@ -330,30 +320,50 @@ bool pFlow::dataIO::writeDataToFileEndMPI
 		MPI_STATUS_IGNORE) != MPI_SUCCESS)
 	{
 		fatalErrorInFunction<<
-		"Cannot write data into "<<filePath<<endl;
+		"Cannot write data into "<<wordPath<<endl;
 		return false;;
 	}
 
+	
+
 	MPI_File_close(&fh);
 	MPI_Barrier(MPI_COMM_WORLD);
-	return true;
+
+	uint64 lastPos = chunkOffset + thisSize;
+	return maxReduction(lastPos, lastPosWrite_);
+
+	/*if( MPI_Allreduce(
+			&lastPos,
+			&lastPosWrite_,
+			1,
+			MPI_UINT64_T,
+			MPI_MAX,
+			MPI_COMM_WORLD) != MPI_SUCCESS )
+	{
+		fatalErrorInFunction<<
+		"Error in max_reduction for write operation"<<endl;
+		return false;
+	}
+
+	return true;*/
 
 #else
-	return writeDataToFileEndSTD(filePath, data);
+	// if MPI is not active, we use std routins
+	return writeDataToFileEndSTD(wordPath, data);
 #endif
-
-	
 }
 
 
 bool pFlow::dataIO::readDataSTD
 (
-	const fileSystem& filePath,
+	const word& wordPath,
 	const std::vector<uint64> chunkSizes,
 	span<unsigned char>& data,
 	uint64 binaryBlockStart
 )
 {
+	
+	
 	// sum of all chuncks
 	uint64 toRecv = std::accumulate(
 		chunkSizes.begin(), 
@@ -366,27 +376,29 @@ bool pFlow::dataIO::readDataSTD
 		return false;
 	}
 
-	word wFile = filePath.wordPath();
-	auto fh = std::fopen(wFile.c_str(), "rb");
+	
+	auto fh = std::fopen(wordPath.c_str(), "rb");
 
 	if(!fh)
 	{
 		fatalErrorInFunction<<
-		"Error in Opening file "<< filePath<<endl;
+		"Error in Opening file "<< wordPath<<endl;
 		return false;
 	}
 
 	// start of data chunks 
 	uint64 offset = binaryBlockStart + chunkSizeOffeset(chunkSizes.size());
 	
+
 	if(auto res = std::fseek(fh, offset, SEEK_SET); res!= 0 )
 	{
 		fatalErrorInFunction<<
-		"Error in file seek "<< filePath<<endl;
+		"Error in file seek "<< wordPath<<endl;
 		std::fclose(fh);
 		return false;
 	}
 
+
 	if(auto res = std::fread(
 			data.data(),
 			sizeof(unsigned char),
@@ -395,11 +407,13 @@ bool pFlow::dataIO::readDataSTD
 		res!= data.size() )
 	{
 		fatalErrorInFunction<<
-		"Error in reading file "<< filePath<<endl;
+		"Error in reading file "<< wordPath<<endl;
 		std::fclose(fh);
 		return false;
 	}
 
+	lastPosRead_ = static_cast<uint64>(std::ftell(fh));
+		
 	std::fclose(fh);
 	return true;
 }
@@ -407,7 +421,7 @@ bool pFlow::dataIO::readDataSTD
 
 bool pFlow::dataIO::readDataMPI
 (
-	const fileSystem& filePath, 
+	const word& wordPath, 
 	const std::vector<uint64> chunkSizes,
 	span<unsigned char>& data,
 	uint64 binaryBlockStart
@@ -416,19 +430,12 @@ bool pFlow::dataIO::readDataMPI
 
 #ifdef pFlow_Build_MPI
 
-	if(chunkSizes.size() != processors::globalSize() )
-	{
-		fatalErrorInFunction;
-		return false;
-	}
-	
-	word wFile = filePath.wordPath();
 	
 	MPI_File fh;
 
 	if( MPI_File_open(
 		MPI_COMM_WORLD,
-		wFile.c_str(),
+		wordPath.c_str(),
 		MPI_MODE_RDONLY,
 		MPI_INFO_NULL,
 		&fh))
@@ -470,29 +477,47 @@ bool pFlow::dataIO::readDataMPI
 		fatalErrorInFunction;
 		return false;
 	}
-#else
+	
+	MPI_File_close(&fh);
 
+	uint64 lastPos = offset + data.size();
+	/*if( MPI_Allreduce(
+		&lastPos,
+		&lastPosRead_, 
+		1, 
+		MPI_UINT64_T,  
+		MPI_MAX, 
+		MPI_COMM_WORLD) != MPI_SUCCESS)
+	{
+		fatalErrorInFunction<<
+		"Error in max_reduction for lastPosRead_"<<endl;
+		return false;
+	}*/
+
+	return maxReduction(lastPos, lastPosRead_);
+#else
+	return readDataSTD(wordPath, chunkSizes, data, binaryBlockStart);
 #endif
 
-	return true;
+	
 }
 
 
 bool pFlow::dataIO::readMetaMPI
 (
-	const fileSystem& filePath, 
+	const word& wordPath, 
 	std::vector<uint64>& chunkSizes,
+	uint64 startPosSearch,
 	uint64 &startPosBinaryBlock
 )
 {
-	word wFile = filePath.wordPath();
 
 #ifdef pFlow_Build_MPI	
 	MPI_File fh;
 
 	if(MPI_File_open(
 		MPI_COMM_WORLD, 
-		wFile.c_str(),
+		wordPath.c_str(),
 		MPI_MODE_RDONLY,
 		MPI_INFO_NULL,
 		&fh) != MPI_SUCCESS)
@@ -502,8 +527,8 @@ bool pFlow::dataIO::readMetaMPI
 	}
 	
 
-	uint64 startPos = findBindaryBlockFlagMPI(fh);
-	if( startPos == -1 )
+	uint64 startPos = findBindaryBlockFlagMPI(fh, startPosSearch);
+	if( startPos == pFlow::dataIO::ErrorReturn )
 	{
 		fatalErrorInFunction;
 		return false;	
@@ -539,36 +564,53 @@ bool pFlow::dataIO::readMetaMPI
 		fatalErrorInFunction;
 		return false;
 	}
-
 	MPI_File_close(&fh);
 
-#endif
+	uint64 lastPos = startPos + sizeof(numProcInFile) + chunkSizes.size();
+	return maxReduction(lastPos, lastPosRead_);
 
-	return true;
+	/*if( MPI_Allreduce(
+		&lastPos,
+		&lastPosRead_, 
+		1, 
+		MPI_UINT64_T,  
+		MPI_MAX, 
+		MPI_COMM_WORLD) != MPI_SUCCESS)
+	{
+		fatalErrorInFunction<<
+		"Error in max_reduction for lastPosRead_"<<endl;
+		return false;
+	}*/
+
+#else
+	return readMetaSTD(wordPath, chunkSizes, startPosBinaryBlock);
+#endif
 }
 
 bool pFlow::dataIO::readMetaSTD
 (
-	const fileSystem& filePath, 
+	const word& wordPath, 
 	std::vector<uint64>& chunkSizes,
+	uint64 startPosSearch,
 	uint64 &startPosBinaryBlock
 )
 {
-	// only on master
-	if( !processors::isMaster()) return true;
 
-	word wFile = filePath.wordPath();
-	std::FILE *fh = std::fopen(wFile.c_str(), "rb");
+	std::FILE *fh = std::fopen(wordPath.c_str(), "rb");
 
 	if(!fh)
 	{
 		fatalErrorInFunction<<
-		"Error in Opening file "<< filePath<<endl;
+		"Error in Opening file "<< wordPath<<endl;
 		return false;
 	}
 
+	// set the start position for search 
+	std::fseek(fh, startPosSearch, SEEK_SET); 
+
+
 	uint64 startPos = findBindaryBlockFlagSTD(fh);
-	if(startPos == -1 )
+	if(startPos == ErrorReturn )
 	{
 		fatalErrorInFunction;
 		return false;
@@ -587,7 +629,7 @@ bool pFlow::dataIO::readMetaSTD
 	if(res != 1 )
 	{
 		fatalErrorInFunction<<
-		"Error in reading file "<< filePath<<endl;
+		"Error in reading file "<< wordPath<<endl;
 		std::fclose(fh);
 		return false;
 	}
@@ -600,13 +642,76 @@ bool pFlow::dataIO::readMetaSTD
 	if(res!= numProcInFile)
 	{
 		fatalErrorInFunction<<
-		"Error in reading chunkSizes from file "<< filePath<<endl;
+		"Error in reading chunkSizes from file "<< wordPath<<endl;
 		std::fclose(fh);
 		return false;
 	}
 
+	lastPosRead_ = static_cast<uint64>(std::ftell(fh));
+	
 	std::fclose(fh);
 	return true;
 }
 
+bool pFlow::dataIO::waitForAllMPI()
+{
+#ifdef pFlow_Build_MPI
+	MPI_Barrier(MPI_COMM_WORLD);
+#endif
 
+	return true;
+}
+
+
+bool pFlow::dataIO::maxReduction( uint64& src, uint64& dst)
+{
+	
+#ifdef pFlow_Build_MPI
+	if(processors::isParallel())
+	{
+		if(MPI_Allreduce(
+			&src,
+			&dst,
+			1,
+			MPI_UINT64_T,
+			MPI_MAX,
+			MPI_COMM_WORLD) != MPI_SUCCESS )
+		{
+			fatalErrorInFunction<<
+			"Error in max_reduction for write operation"<<endl;
+			return false;
+		}
+		return true;
+	}
+	else
+	{
+		dst = src;
+		return true;
+	}
+#else
+	dst = src;
+	return true;
+#endif
+	
+}
+
+bool pFlow::dataIO::BcastPos(uint64 & pos)
+{
+#ifdef pFlow_Build_MPI
+	if(processors::isParallel())
+	{
+		if( MPI_Bcast(
+			& pos,
+			1,
+			MPI_UINT64_T,
+			processors::masterNo(),
+			MPI_COMM_WORLD)!=MPI_SUCCESS )
+		{
+			fatalErrorInFunction<<
+			"Error in Bcast position"<<endl;
+			return false;
+		}
+	}
+#endif
+	return true;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIO.hpp b/src/phasicFlow/streams/dataIO/dataIO.hpp
index 9a9d8453..2622f4e4 100644
--- a/src/phasicFlow/streams/dataIO/dataIO.hpp
+++ b/src/phasicFlow/streams/dataIO/dataIO.hpp
@@ -6,7 +6,7 @@
 
 #include "types.hpp"
 #include "span.hpp"
-#include "processors.hpp"
+#include "IOPattern.hpp"
 
 namespace pFlow
 {
@@ -19,80 +19,133 @@ class dataIO
 
 public:
 
-	/**
-	 * Type of input/output
-	 * MasterProcessor: Read or write is done on master processor
-	 *    and the data on master processor is affected.
-	 * AllProcessorsDifferent: Read or write is done on all processors, 
-	 *    and each processor munipulates its own data.
-	 * AllProcessorsSimilar: Read is done on all processors but the read data
-	 *    is similar on processors. Write is done on master processor, since 
-	 *    all processors have the same copy of data. 
-	 */
-	enum IOType : int
-	{
-		MasterProcessor,
-		AllProcessorsDifferent,
-		AllProcessorsSimilar
-	};
+
+	static inline const uint64 ErrorReturn = static_cast<uint64>(-1);
+	
 protected:
 
-	IOType IOType_;
+	IOPattern ioPattern_;
+
+	uint64 lastPosWrite_ = 0;
+
+	uint64 lastPosRead_  = 0;
 
 	
 	bool writeDataToFileEndSTD(
-		const fileSystem& filePath, 
+		const word& wordPath, 
 		const span<unsigned char>& data);
 
 	bool writeDataToFileEndMPI(
-		const fileSystem& filePath, 
+		const word& wordPath, 
 		const span<unsigned char>& data);
 	
 	bool readDataSTD(
-		const fileSystem& filePath,
+		const word& wordPath,
 		const std::vector<uint64> chunkSizes,
 		span<unsigned char>& data,
 		uint64 binaryBlockStart);
 	
 	bool readDataMPI(
-		const fileSystem& filePath, 
+		const word& wordPath, 
 		const std::vector<uint64> chunkSizes,
 		span<unsigned char>& data,
 		uint64 binaryBlockStart);
 
 	bool readMetaMPI(
-		const fileSystem& filePath, 
+		const word& wordPath, 
 		std::vector<uint64>& chunkSizes,
+		uint64 startPosSearch,
 		uint64 &startPosBinaryBlock);
 
 	bool readMetaSTD(
-		const fileSystem& filePath, 
+		const word& wordPath, 
 		std::vector<uint64>& chunkSizes,
+		uint64 startPosSearch,
 		uint64 &startPosBinaryBlock);
 
+	bool waitForAllMPI();
+
+	bool maxReduction( uint64& src, uint64& dst);
+
+	bool BcastPos(uint64 & pos);
+
 public:
 
-	dataIO(IOType ioT)
+	dataIO(IOPattern::IOType iotype)
 	:
-		IOType_(ioT)
+		ioPattern_(iotype)
 	{}
 
 	~dataIO()=default;
 
 	template<typename T> 
 	bool writeDataEnd(
-		const fileSystem& filePath,
+		const word& wordPath,
 		const span<T>& data);
 
+	template<typename T>
+	bool writeAsciiEnd(
+		iOstream& os,
+		const span<T>& data);
+
+	template<typename T>
+	bool readDataBinary(
+		const word& wordPath, 
+		std::vector<T>& data,
+		uint64 startPos = 0);
+
+	template<typename T>
+	bool readAscii(
+		iIstream& is,
+		std::vector<T>& vec	);
+
 	template<typename T>
 	bool readData(
-		const fileSystem& filePath, 
-		std::vector<T>& data);
+		iIstream& is, 
+		std::vector<T>& vec,
+		bool resume = false); // resume only works for binary
+							  // for ascii, by default it starts from the current position
+
+
+	template<typename T>
+	bool writeData(iOstream& os,
+		const span<T>& data);
 
 	
-
 };
 
+template<>
+inline
+bool pFlow::dataIO::writeData<pFlow::word>
+(
+	iOstream& os,
+	const span<word>& data
+)
+{
+	if( !writeAsciiEnd(os, data) )
+    {
+        fatalErrorInFunction;
+        return false;
+    }
+	return true;	
+}
+
+template<>
+inline
+bool pFlow::dataIO::readData<pFlow::word>(
+	iIstream& is, 
+	std::vector<word>& vec,
+	bool resume)
+{
+	if(!readAscii(is, vec))
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+	return true;
+}
+
+
 }
 
 #include "dataIOTemplate.cpp"
diff --git a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
index b8450f97..54b1452f 100644
--- a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
+++ b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
@@ -1,112 +1,320 @@
-
 template<typename T>
 bool pFlow::dataIO::writeDataEnd(
-	const fileSystem& filePath,
+	const word& wordPath,
 	const span<T>& data)
 {
 
-	span<unsigned char> charSpan(
+	if( ioPattern_.thisProcWriteData() )
+	{
+		span<unsigned char> charSpan(
 		reinterpret_cast<unsigned char*> (const_cast<T*>(data.data())),
 		data.size()*sizeof(T));
 
-	switch (IOType_)
+		if( ioPattern_.isParallel() )
+		{
+			return writeDataToFileEndMPI(wordPath, charSpan);
+		}
+		else
+		{
+			return writeDataToFileEndSTD(wordPath, charSpan);
+		}
+	}
+	else
 	{
-		case MasterProcessor:
-		case AllProcessorsSimilar:
-		{
-			// This	means that only master processor should write
-			// in this case we perform write on master processor only
-			// this means that the data 
-			if(processors::isMaster())
-			{
-				return writeDataToFileEndSTD(filePath, charSpan);
-			}
-			else
-			{
-				return true;
-			}
-			break;
-		}
-		case AllProcessorsDifferent:
-		{
-			// This means that all processors should write their own
-			// copy of data 
-			return writeDataToFileEndMPI(filePath, charSpan);
-			break;
-		}
+		return true;
 	}
 
 	return false;
 }
 
 template<typename T>
-bool pFlow::dataIO::readData
+bool pFlow::dataIO::writeAsciiEnd
 (
-	const fileSystem& filePath, 
-	std::vector<T>& data
+	iOstream& os,
+	const span<T>& data
 )
 {
+	if(ioPattern_.thisProcWriteData())
+	{
+		return data.writeASCII(os);
+	}
+	else
+		return true;
+}
+
+
+
+template<typename T>
+bool pFlow::dataIO::readDataBinary
+(
+	const word& wordPath, 
+	std::vector<T>& data,
+	uint64 startPos
+)
+{
+
 	std::vector<uint64> chunkSizes;
 	uint64 startPosBinaryBlock;
 
-	// read meta data
-	switch (IOType_)
-	{
-		case MasterProcessor:
-		{
-			if(!readMetaSTD(
-				filePath, 
-				chunkSizes, 
-				startPosBinaryBlock))
-			{
-				return false;
-			}
-			break;
-		}
-		case AllProcessorsDifferent:
-		case AllProcessorsSimilar:
-		{
-			if(!readMetaMPI(
-				filePath,
-				chunkSizes,
-				startPosBinaryBlock))
-			{
-				return false;
-			}
-			break;
-		}
-	}
-
 	data.clear();
-	if(IOType_ == MasterProcessor)
+	
+	if( ioPattern_.thisProcReadData())
 	{
-		auto sizeOfData = std::accumulate( 
+		
+		// read meta 
+		if(!readMetaSTD(
+				wordPath, 
+				chunkSizes, 
+				startPos,
+				startPosBinaryBlock))
+		{
+			fatalErrorInFunction;
+			return false;
+		}
+		
+		
+		if( ioPattern_.isMasterProcessor()  ||
+			ioPattern_.isAllProcessorSimilar()
+		)
+		{
+
+			auto sizeOfData = std::accumulate( 
 			chunkSizes.begin(), 
 			chunkSizes.end(),
 			static_cast<uint64>(0));
+			
+			
+			data.resize(sizeOfData/sizeof(T));
 
-		data.resize(sizeOfData/sizeof(T));
+			span<unsigned char> charSpan(
+				reinterpret_cast<unsigned char*>(data.data()),
+				data.size()*sizeof(T));
 
-		span<unsigned char> charSpan(
-			reinterpret_cast<unsigned char*>(data.data()),
-			data.size()*sizeof(T));
+			if(!readDataSTD(wordPath, chunkSizes, charSpan, startPosBinaryBlock))
+			{
+				fatalErrorInFunction;
+				return false;
+			}
 
-		readDataSTD(filePath, chunkSizes, charSpan, startPosBinaryBlock);
+			return true;
+
+		}
+		else if( ioPattern_.isAllProcessorDifferent() )
+		{
+
+			if(chunkSizes.size() != ioPattern_.globalSize())
+			{
+				if( ioPattern_.isMaster())
+				{
+					auto sizeOfData = std::accumulate( 
+					chunkSizes.begin(), 
+					chunkSizes.end(),
+					static_cast<uint64>(0));
+					
+					
+					data.resize(sizeOfData/sizeof(T));
+
+					span<unsigned char> charSpan(
+						reinterpret_cast<unsigned char*>(data.data()),
+						data.size()*sizeof(T));
+
+					if(!readDataSTD(wordPath, chunkSizes, charSpan, startPosBinaryBlock))
+					{
+						fatalErrorInFunction;
+						return false;
+					}
+					return true;
+
+				}
+				else
+				{
+					return true;
+				}
+			}
+			else
+			{
+				auto thisProc = ioPattern_.globalRank();
+
+				data.resize(chunkSizes[thisProc]/sizeof(T));
+
+				span<unsigned char> charSpan(
+					reinterpret_cast<unsigned char*>(data.data()),
+					data.size()*sizeof(T));
+
+				
+				if( !readDataMPI(wordPath, chunkSizes, charSpan, startPosBinaryBlock) )
+				{
+					fatalErrorInFunction;
+					return false;
+				}
+				return true;	
+			}
+
+			
+		}
+		else
+		{
+			fatalErrorInFunction;
+			return false;	
+		}
 	}
-	if( IOType_ == AllProcessorsDifferent )
+	else
 	{
-		auto thisProc = processors::globalRank();
+		return true;
+	}
 
-		data.resize(chunkSizes[thisProc]/sizeof(T));
+	return false;
+		
+	
+}
 
-		span<unsigned char> charSpan(
-			reinterpret_cast<unsigned char*>(data.data()),
-			data.size()*sizeof(T));
+template<typename T>
+bool pFlow::dataIO::readAscii
+(
+	iIstream& is,
+	std::vector<T>& vec
+)
+{
 
-		std::cout<<"MPI part"<<std::endl;
-		readDataMPI(filePath, chunkSizes, charSpan, startPosBinaryBlock);
+	if( !ioPattern_.thisProcReadData() ) return true;
+	
 
+	is.fatalCheck(FUNCTION_NAME);
+
+	vec.clear();
+	
+	token firstToken(is);
+
+	size_t len = 0;
+	if( firstToken.isInt64())
+	{
+		len = firstToken.int64Token();
+		vec.reserve(len);
+		firstToken  = token(is);
+	}
+
+	T val{};
+	if( firstToken.isPunctuation() ) // start of vector 
+	{
+		if(firstToken != token::BEGIN_LIST)
+		{
+			warningInFunction
+			<< "expected token "<< token::BEGIN_LIST 
+			<< " but found "<< firstToken ;
+			return false;
+
+		}
+
+		token lastToken(is);
+		
+		is.fatalCheck(FUNCTION_NAME);
+		
+		while(!(lastToken.isPunctuation()
+             	&& lastToken == token::END_LIST ))
+		{
+
+			is.putBack(lastToken);
+			
+			is >> val;
+			vec.push_back(val);
+			
+			is >> lastToken;
+			is.fatalCheck(FUNCTION_NAME);
+		}
+
+	} else
+	{
+		warningInFunction
+		<< "expected token "<< token::BEGIN_LIST 
+		<< " but found "<< firstToken<<endl; ;
+		return false;
 	}
 	
+	if(len>0&& len != vec.size())
+	{
+		warningInFunction<<"vector lendth specified "<< len << 
+		" is different from number of elements "<< vec.size()<<endl;
+		return false;
+	}
+
 	return true;
-}
\ No newline at end of file
+}
+
+template<typename T>
+bool pFlow::dataIO::readData
+(
+	iIstream& is, 
+	std::vector<T>& vec,
+	bool resume
+)
+{
+	if(is.isBinary())
+	{
+		uint64 currPos = 0;
+		if( resume )
+		{
+			currPos = is.tell();
+		}
+
+		if(! BcastPos(currPos) ) return false;
+		
+		if(!this->readDataBinary(is.name(), vec, currPos))
+		{
+			fatalErrorInFunction;
+			return false;
+		}
+
+		auto lastPos = lastPosRead_;
+		maxReduction( lastPos, lastPosRead_);
+		//std::cout<<"last post read "<< lastPosRead_<<std::endl;
+		
+		/// set the stream indicator to the last position 
+		is.seek(lastPosRead_);
+		
+		return true;
+	}
+	else
+	{
+		if(!readAscii(is, vec))
+		{
+			fatalErrorInFunction;
+			return false;
+		}
+		return true;
+	}
+}
+
+template<typename T>
+bool pFlow::dataIO::writeData
+(
+	iOstream& os,
+	const span<T>& sp
+)
+{
+	if( os.isBinary() )
+	{
+	    os.startOfBinaryStreaming();
+
+	    if(!writeDataEnd(os.name(), sp))
+	    {
+	        fatalErrorInFunction;
+	        return false;
+	    }
+
+	    os.endOfBinaryStreaming();
+
+	}
+	else
+	{
+	    if( !writeAsciiEnd(os, sp) )
+	    {
+	        fatalErrorInFunction;
+	        return false;
+	    }
+	}
+	return true; 
+
+}
+
+
+
diff --git a/src/phasicFlow/streams/iStream/IOstream.hpp b/src/phasicFlow/streams/iStream/IOstream.hpp
index a0f037de..3a6982cf 100644
--- a/src/phasicFlow/streams/iStream/IOstream.hpp
+++ b/src/phasicFlow/streams/iStream/IOstream.hpp
@@ -180,7 +180,7 @@ public:
         bool isBinary()const
         {
             return writeFormat_ == BINARY;
-        }
+        }    
 
         /// Return true if next operation might succeed
         bool good() const
diff --git a/src/phasicFlow/streams/iStream/iIstream.hpp b/src/phasicFlow/streams/iStream/iIstream.hpp
index 7f0ddb43..2dbf0fa9 100755
--- a/src/phasicFlow/streams/iStream/iIstream.hpp
+++ b/src/phasicFlow/streams/iStream/iIstream.hpp
@@ -134,6 +134,10 @@ public:
 	    /// Rewind the stream so that it may be read again
 	    virtual void rewind() = 0;
 
+	    virtual void seek(size_t pos) = 0;
+
+	    /// Return current position indicator 
+	    virtual size_t tell() = 0;
 
     ////- find and lookups
 
diff --git a/src/phasicFlow/streams/iStream/iOstream.hpp b/src/phasicFlow/streams/iStream/iOstream.hpp
index 1a82f8b1..ceaa2edd 100644
--- a/src/phasicFlow/streams/iStream/iOstream.hpp
+++ b/src/phasicFlow/streams/iStream/iOstream.hpp
@@ -144,7 +144,7 @@ public:
         /// Write the flag to indicate the start of a binary block
         virtual iOstream& writeBinaryBlockFlag();
         
-    
+        virtual void seek(size_t pos) = 0;
     //// - Indent 
 
         /// Add indentation characters
@@ -238,6 +238,12 @@ public:
 
     ////- Stream state functions
 
+        /// Add a new line and flush stream 
+        virtual void startOfBinaryStreaming() =0;
+
+        /// Reach end of file add a new line and flush stream 
+        virtual void endOfBinaryStreaming() = 0 ;
+
         /// Flush stream
         virtual void flush() = 0;
 
diff --git a/src/phasicFlow/structuredData/infinitePlane/infinitePlane.cpp b/src/phasicFlow/structuredData/infinitePlane/infinitePlane.cpp
new file mode 100644
index 00000000..d9f41a38
--- /dev/null
+++ b/src/phasicFlow/structuredData/infinitePlane/infinitePlane.cpp
@@ -0,0 +1,64 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "infinitePlane.hpp"
+
+pFlow::infinitePlane::infinitePlane
+(
+  const realx3& p1, 
+  const realx3& p2, 
+  const realx3& p3
+)
+{
+	auto ln = cross(p2-p1, p3-p1);
+
+	if( equal(ln.length(),0.0) )
+	{
+		fatalErrorInFunction<<
+		"invalid input to form a infinte wall "<< realx3x3(p1,p2,p3)<<endl;
+		fatalExit;
+	}
+	normal_ = normalize(ln);
+	d_ = -dot(normal_, p1);
+}
+
+bool pFlow::infinitePlane::write(iOstream& os)const
+{
+	os.writeWordEntry("normal", normal_);
+	os.writeWordEntry("d", d_);
+	return os.check(FUNCTION_NAME);
+}
+
+bool pFlow::infinitePlane::read(iIstream & is)
+{
+	if(!is.nextData<realx3>("normal", normal_)) return false;
+	if(!is.nextData<real>("d", d_)) return false;
+	return true;
+}
+
+bool pFlow::infinitePlane::validPlane3
+(
+  const realx3& p1, 
+  const realx3& p2, 
+  const realx3& p3
+)
+{
+  return !equal(cross(p2-p1, p3-p1).length(), 0.0);
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp b/src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp
new file mode 100644
index 00000000..3140915c
--- /dev/null
+++ b/src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp
@@ -0,0 +1,165 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __infinitePlane_hpp__
+#define __infinitePlane_hpp__
+
+#include "types.hpp"
+//#include "dictionary.hpp"
+#include "iIstream.hpp"
+#include "iOstream.hpp"
+
+namespace pFlow
+{
+
+class infinitePlane
+{
+protected:
+	
+	/// normal vector 
+	realx3 	normal_{1,0,0};
+	
+	/// distance value 
+	real  	d_ = 0;
+
+public:
+
+	// - type info
+	TypeInfoNV("infinitePlane");
+
+	//// - Constructors 
+		
+		/// Default
+		INLINE_FUNCTION_HD 
+		infinitePlane(){}
+
+		/// From components
+		INLINE_FUNCTION_HD 
+		infinitePlane(const realx3& normal, const real& d)
+		:
+			normal_(normal),
+			d_(d)
+		{}
+
+		INLINE_FUNCTION_HD
+		infinitePlane(const realx3& normal, const realx3& p)
+		:
+			normal_(normal),
+			d_(-dot(normal,p))
+		{}
+
+		/// From 3 points
+		infinitePlane(const realx3& p1, const realx3& p2, const realx3& p3);
+		
+		FUNCTION_HD
+		infinitePlane(const infinitePlane&) = default;
+
+		FUNCTION_HD
+		infinitePlane(infinitePlane&&) = default;
+
+		FUNCTION_HD
+		infinitePlane& operator=(const infinitePlane&) = default;
+
+		FUNCTION_HD
+		infinitePlane& operator=(infinitePlane&&) = default;
+
+		~infinitePlane()=default;
+
+		/*FUNCTION_H
+		infinitePlane(const dictionary& dict);
+
+		FUNCTION_H
+		infinitePlane(iIstream& is);*/
+	
+
+	//// - Methods
+
+		INLINE_FUNCTION_HD
+		real pointFromPlane(const realx3& p)const
+		{
+			return dot(normal_, p) + d_;
+		}
+
+		INLINE_FUNCTION_HD
+		bool pointInPositiveSide(const realx3& p)const
+		{
+			return pointFromPlane(p)>=0;
+		}
+
+		INLINE_FUNCTION_HD
+		bool pointInNegativeSide(const realx3& p)const
+		{
+			return pointFromPlane(p)<0;
+		}
+
+		INLINE_FUNCTION_HD
+		bool pointOnPlane(const realx3& p)const
+		{
+			return equal(pointFromPlane(p),0.0);
+		}
+
+		INLINE_FUNCTION_HD
+		realx3 projectPoint(const realx3& p)const
+		{
+			real t = -(dot(normal_, p) + d_);
+			return t*normal_ + p;
+		}
+
+	//// - IO operation 
+
+		FUNCTION_H
+		bool write(iOstream& os)const;
+
+		bool read(iIstream & is);
+
+		/*FUNCTION_H
+		bool read(iIstream & is);
+
+		FUNCTION_H
+		bool write(iOstream& os)const;
+
+		FUNCTION_H
+		bool read(const dictionary& dict);
+
+		FUNCTION_H
+		bool write(dictionary& dict)const;*/
+
+		static bool validPlane3(
+			const realx3& p1, 
+			const realx3& p2, 
+			const realx3& p3);
+};
+
+/*FUNCTION_H
+iIstream& operator >>(iIstream& is, box& b);
+
+FUNCTION_H
+iOstream& operator << (iOstream& os, const box& b);
+
+INLINE_FUNCTION_HD
+box extendBox(const box& b, const realx3& dl)
+{
+	return box(b.minPoint()-dl , b.maxPoint()+dl);
+}*/
+
+}
+
+
+#endif // __infinitePlane_hpp__
diff --git a/src/phasicFlow/structuredData/line/line.hpp b/src/phasicFlow/structuredData/line/line.hpp
index a8a302e2..375588a4 100755
--- a/src/phasicFlow/structuredData/line/line.hpp
+++ b/src/phasicFlow/structuredData/line/line.hpp
@@ -55,19 +55,27 @@ public:
 		FUNCTION_HD
 		line(const realx3 &lp1, const realx3 &lp2);
 
+		INLINE_FUNCTION_HD
+		line(const realx3 &v21, const realx3 &p1, bool)
+		:
+			v21_(v21),
+			p1_(p1)
+		{}
+
+
 		FUNCTION_H
 		line(const dictionary& dict);
 
-		FUNCTION_HD
+		INLINE_FUNCTION_HD
 		line(const line& src) = default;
 
-		FUNCTION_HD
+		INLINE_FUNCTION_HD
 		line(line&& src) = default;
 
-		FUNCTION_HD
+		INLINE_FUNCTION_HD
 		line& operator = (const line&) = default;
 
-		FUNCTION_HD
+		INLINE_FUNCTION_HD
 		line& operator = (line&&) = default;
 
 	
diff --git a/src/phasicFlow/structuredData/plane/plane.cpp b/src/phasicFlow/structuredData/plane/plane.cpp
new file mode 100644
index 00000000..fbac188c
--- /dev/null
+++ b/src/phasicFlow/structuredData/plane/plane.cpp
@@ -0,0 +1,68 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "plane.hpp"
+
+pFlow::plane::plane
+(
+	const realx3& p1, 
+	const realx3& p2, 
+	const realx3& p3, 
+	const realx3& p4
+)
+:
+	infinitePlane(p1,p2,p3),
+	p1_(p1),
+	p2_(p2),
+	p3_(p3),
+	p4_(p4)
+{
+
+	if(!pointOnPlane(p4))
+	{
+		fatalErrorInFunction<<
+		"points "<< realx4x3(p1,p2,p3,p4)<<" do not form a planner surface"<<endl;
+		fatalExit;
+	}
+}
+
+
+pFlow::plane pFlow::plane::parallelPlane(real distance)const
+{
+	auto pp1 = line(normal_, p1_, true).point(distance);
+	auto pp2 = line(normal_, p2_, true).point(distance);
+	auto pp3 = line(normal_, p3_, true).point(distance);
+	auto pp4 = line(normal_, p4_, true).point(distance);
+
+	return plane(pp1, pp2, pp3, pp4);
+}
+
+bool pFlow::plane::validPlane4
+(
+	const realx3& p1, 
+	const realx3& p2, 
+	const realx3& p3, 
+	const realx3& p4
+)
+{
+	if( !validPlane3(p1,p2,p3)) return false;
+	if( !infinitePlane(p1,p2,p3).pointOnPlane(p4)) return false;
+	return true;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/plane/plane.hpp b/src/phasicFlow/structuredData/plane/plane.hpp
new file mode 100644
index 00000000..7fbdea03
--- /dev/null
+++ b/src/phasicFlow/structuredData/plane/plane.hpp
@@ -0,0 +1,136 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __plane_hpp__
+#define __plane_hpp__
+
+#include "infinitePlane.hpp"
+#include "line.hpp"
+
+namespace pFlow
+{
+
+class plane
+:
+	public infinitePlane
+{
+protected:
+	
+	/// First point 
+	realx3 p1_;
+	
+	/// Second point 
+	realx3 p2_;
+	
+	/// Third point 
+	realx3 p3_;
+	
+	/// Fourth point 
+	realx3 p4_;
+
+public:
+
+	INLINE_FUNCTION_HD
+	plane(){}
+
+	plane(
+		const realx3& p1, 
+		const realx3& p2, 
+		const realx3& p3, 
+		const realx3& p4);
+
+	INLINE_FUNCTION_HD
+	plane(const plane&) = default;
+
+	INLINE_FUNCTION_HD
+	plane(plane&&) = default;
+
+	INLINE_FUNCTION_HD
+	plane& operator = (const plane&) = default;
+
+	INLINE_FUNCTION_HD
+	plane& operator =( plane&&)=default;
+	
+	INLINE_FUNCTION_HD
+	~plane()=default;
+
+	INLINE_FUNCTION_HD
+	const realx3& p1()const
+	{
+		return p1_;
+	}
+
+	INLINE_FUNCTION_HD
+	const realx3& p2()const
+	{
+		return p2_;
+	}
+
+	INLINE_FUNCTION_HD
+	const realx3& p3()const
+	{
+		return p3_;
+	}
+
+	INLINE_FUNCTION_HD
+	const realx3& p4()const
+	{
+		return p4_;
+	}
+
+	INLINE_FUNCTION_HD
+	line line1()const
+	{
+		return line(p1_,p2_);
+	}
+
+	INLINE_FUNCTION_HD
+	line line2()const
+	{
+		return line(p2_,p3_);
+	}
+
+	INLINE_FUNCTION_HD
+	line line3()const
+	{
+		return line(p3_,p4_);
+	}
+
+	INLINE_FUNCTION_HD
+	line line4()const
+	{
+		return line(p4_,p1_);
+	}
+
+	// return the parallel plane to this plane 
+	plane parallelPlane(real distance)const;
+
+	static 
+	bool validPlane4(
+		const realx3& p1, 
+		const realx3& p2, 
+		const realx3& p3, 
+		const realx3& p4);
+
+};
+
+}
+
+#endif //__plane_hpp__
\ No newline at end of file

From 143a5867307da682f95097ff3ce6de6e8c97a880 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Wed, 8 Nov 2023 20:35:18 +0330
Subject: [PATCH 15/60] new-message-observer-subscriber and anyList for holding
 a list of variables of any type

---
 src/phasicFlow/CMakeLists.txt                 |  10 +-
 src/phasicFlow/containers/Field/Field.cpp     |   8 +-
 src/phasicFlow/containers/Field/Field.hpp     |  22 +-
 src/phasicFlow/containers/Field/Fields.hpp    |  28 +-
 src/phasicFlow/containers/List/List/List.hpp  |  46 +-
 src/phasicFlow/containers/List/List/ListI.hpp |  34 +-
 .../containers/List/anyList/anyList.cpp       |  43 ++
 .../containers/List/anyList/anyList.hpp       | 243 ++++++
 src/phasicFlow/containers/Vector/Vector.hpp   |   2 +-
 .../containers/Vector/stdVectorHelper.hpp     |  22 +-
 .../containers/VectorHD/VectorSingle.hpp      |  28 +-
 src/phasicFlow/containers/span/span.hpp       |   4 +-
 src/phasicFlow/eventManagement/message.hpp    | 159 ++++
 src/phasicFlow/eventManagement/observer.cpp   |  59 ++
 src/phasicFlow/eventManagement/observer.hpp   |  76 ++
 src/phasicFlow/eventManagement/subscriber.cpp | 147 ++++
 src/phasicFlow/eventManagement/subscriber.hpp |  68 ++
 .../repository/IOobject/IOPattern.cpp         |   7 +
 .../repository/IOobject/IOPattern.hpp         |  20 +-
 .../repository/IOobject/objectFile.hpp        |   4 +-
 src/phasicFlow/smartPointers/uniquePtr.hpp    |  33 +-
 src/phasicFlow/streams/dataIO/dataIO.cpp      | 723 +-----------------
 src/phasicFlow/streams/dataIO/dataIO.hpp      | 134 +++-
 src/phasicFlow/streams/dataIO/dataIONoMPI.cpp |  20 +
 src/phasicFlow/streams/dataIO/dataIONoMPI.hpp |  48 ++
 .../streams/dataIO/dataIOTemplate.cpp         | 173 ++++-
 src/phasicFlow/streams/iStream/iOstream.hpp   |   7 +
 src/phasicFlow/streams/streams.hpp            |   7 -
 .../boundaries/boundaryBase/boundaryBase.cpp  |  23 +
 .../boundaries/boundaryBase/boundaryBase.hpp  |  74 ++
 .../boundaryBase/scatterFieldAccess.hpp       |  89 +++
 src/phasicFlow/structuredData/box/box.hpp     |  13 +-
 .../structuredData/domain/domain.cpp          |  59 ++
 .../structuredData/domain/domain.hpp          | 163 ++++
 .../infinitePlane/infinitePlane.hpp           |  15 +
 .../pointStructure/internalPoints.cpp         | 250 ++++++
 .../pointStructure/internalPoints.hpp         | 332 ++++++++
 .../pointStructure/pointFlag.hpp              | 279 +++++++
 .../pointStructure/pointFlagKernels.hpp       | 260 +++++++
 .../pointStructure/pointStructure.hpp         | 283 +------
 .../types/basicTypes/bTypesFunctions.hpp      |   4 +-
 src/phasicFlow/types/triple/triple.hpp        |  12 +-
 42 files changed, 2950 insertions(+), 1081 deletions(-)
 create mode 100644 src/phasicFlow/containers/List/anyList/anyList.cpp
 create mode 100644 src/phasicFlow/containers/List/anyList/anyList.hpp
 create mode 100644 src/phasicFlow/eventManagement/message.hpp
 create mode 100644 src/phasicFlow/eventManagement/observer.cpp
 create mode 100644 src/phasicFlow/eventManagement/observer.hpp
 create mode 100644 src/phasicFlow/eventManagement/subscriber.cpp
 create mode 100644 src/phasicFlow/eventManagement/subscriber.hpp
 create mode 100644 src/phasicFlow/streams/dataIO/dataIONoMPI.cpp
 create mode 100644 src/phasicFlow/streams/dataIO/dataIONoMPI.hpp
 create mode 100644 src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
 create mode 100644 src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
 create mode 100644 src/phasicFlow/structuredData/boundaries/boundaryBase/scatterFieldAccess.hpp
 create mode 100644 src/phasicFlow/structuredData/domain/domain.cpp
 create mode 100644 src/phasicFlow/structuredData/domain/domain.hpp
 create mode 100644 src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
 create mode 100644 src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
 create mode 100644 src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
 create mode 100644 src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp

diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 4f138123..eb52ef39 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -20,7 +20,8 @@ streams/TStream/oTstream.cpp
 streams/Fstream/iFstream.cpp
 streams/Fstream/oFstream.cpp
 streams/Fstream/fileStream.cpp
-streams/dataIO/dataIO.cpp 
+streams/dataIO/dataIO.cpp
+streams/dataIO/dataIONoMPI.cpp 
 streams/streams.cpp 
 
 fileSystem/fileSystem.cpp
@@ -34,15 +35,22 @@ dictionary/twoPartEntry/twoPartEntry.cpp
 
 containers/Vector/Vectors.cpp
 containers/Field/Fields.cpp
+containers/List/anyList/anyList.cpp
 
 repository/IOobject/objectFile.cpp
 repository/IOobject/IOfileHeader.cpp
 repository/IOobject/IOobject.cpp
 repository/IOobject/IOPattern.cpp
 
+eventManagement/subscriber.cpp
+eventManagement/observer.cpp
+
 structuredData/line/line.cpp
 structuredData/infinitePlane/infinitePlane.cpp
 structuredData/plane/plane.cpp
+structuredData/domain/domain.cpp
+structuredData/pointStructure/internalPoints.cpp
+structuredData/boundaries/boundaryBase/boundaryBase.cpp
 
 )
 
diff --git a/src/phasicFlow/containers/Field/Field.cpp b/src/phasicFlow/containers/Field/Field.cpp
index 70e33dfd..4f895a98 100644
--- a/src/phasicFlow/containers/Field/Field.cpp
+++ b/src/phasicFlow/containers/Field/Field.cpp
@@ -216,10 +216,14 @@ bool pFlow::Field<VectorField, T, PropType>::write(
 	IOPattern::IOType iotype)const
 {
 
-	
 	os.writeWordKeyword(fieldKey_)<<endl;
-	VectorType::write(os, iotype);
+
+	if(!os.check(FUNCTION_NAME))return false;
+
+	if(!VectorType::write(os, iotype)) return false;
+
 	os.endEntry();
+	if(!os.check(FUNCTION_NAME))return false;
 
 	return true;
 }
diff --git a/src/phasicFlow/containers/Field/Field.hpp b/src/phasicFlow/containers/Field/Field.hpp
index 5074c2c0..d183b5c8 100644
--- a/src/phasicFlow/containers/Field/Field.hpp
+++ b/src/phasicFlow/containers/Field/Field.hpp
@@ -197,6 +197,26 @@ public:
 		
 
 		bool write(iOstream& os, IOPattern::IOType iotype )const;
+
+		template<typename HostMask>
+		bool write(
+			iOstream& os, 
+			IOPattern::IOType iotype, 
+			const HostMask& mask)const
+		{
+			
+			os.writeWordKeyword(fieldKey_)<<endl;
+
+			if(!os.check(FUNCTION_NAME))return false;
+
+			if(!VectorType::write(os, iotype)) return false;
+
+			os.endEntry();
+			if(!os.check(FUNCTION_NAME))return false;
+
+			return true;
+		}
+		
 			
 
 };
@@ -205,7 +225,7 @@ public:
 template<template<class, class> class VectorField, class T, class PropType>
 inline iIstream& operator >> (iIstream & is, Field<VectorField, T, PropType> & ifld )
 {
-	if( !ifld.read(is, IOPattern::MasterProcessor) )
+	if( !ifld.read(is, IOPattern::MasterProcessorOnly) )
 	{
 		ioErrorInFile (is.name(), is.lineNumber());
 		fatalExit;
diff --git a/src/phasicFlow/containers/Field/Fields.hpp b/src/phasicFlow/containers/Field/Fields.hpp
index 2a4b0ca0..411bedf7 100644
--- a/src/phasicFlow/containers/Field/Fields.hpp
+++ b/src/phasicFlow/containers/Field/Fields.hpp
@@ -34,7 +34,7 @@ using int8Field_D 		= Field<VectorSingle, int8>;
 
 using int8Field_H 		= Field<VectorSingle, int8, HostSpace>;
 
-/*using int32Field_D 		= Field<VectorSingle, int32>;
+using int32Field_D 		= Field<VectorSingle, int32>;
 
 using int32Field_H 		= Field<VectorSingle, int32, HostSpace>;
 
@@ -42,13 +42,17 @@ using int64Field_D 		= Field<VectorSingle, int64>;
 
 using int64Field_H 		= Field<VectorSingle, int64, HostSpace>;
 
+using uint8Field_D     = Field<VectorSingle, uint8>;
+
+using uint8Field_H     = Field<VectorSingle, uint8, HostSpace>;
+
 using uint32Field_D 	= Field<VectorSingle, uint32>;
 
 using uint32Field_H 	= Field<VectorSingle, uint32, HostSpace>;
 
-using labelField_D 		= Field<VectorSingle, label>;
+using uint64Field_D 		= Field<VectorSingle, uint64>;
 
-using labelField_H 		= Field<VectorSingle, label, HostSpace> ;
+using uint64Field_H 		= Field<VectorSingle, uint64, HostSpace> ;
 
 using realField_D 		= Field<VectorSingle, real>;
 
@@ -58,25 +62,9 @@ using realx3Field_D 	= Field<VectorSingle, realx3>;
 
 using realx3Field_H 	= Field<VectorSingle, realx3, HostSpace>;
 
-using uint16x3Field_D 	= Field<VectorSingle, uint16x3>;
-
-using uint16x3Field_H 	= Field<VectorSingle, uint16x3, HostSpace>;
-
-using uint32x3Field_D   = Field<VectorSingle, uint32x3>;
-
-using uint32x3Field_H   = Field<VectorSingle, uint32x3, HostSpace>;
-
-using int32x3Field_D 	= Field<VectorSingle, int32x3>;
-
-using int32x3Field_H 	= Field<VectorSingle, int32x3, HostSpace>;
-
-using int64x3Field_D 	= Field<VectorSingle, int64x3>;
-
-using int64x3Field_H 	= Field<VectorSingle, int64x3, HostSpace>;
-
 using realx3x3Field_D 	= Field<VectorSingle, realx3x3>;
 
-using realx3x3Field_H 	= Field<VectorSingle, realx3x3, HostSpace>;*/
+using realx3x3Field_H 	= Field<VectorSingle, realx3x3, HostSpace>;
 
 // - no typedef on device (since word does not compile on CUDA)
 using wordField_H 		= Field<VectorSingle, word, HostSpace>;
diff --git a/src/phasicFlow/containers/List/List/List.hpp b/src/phasicFlow/containers/List/List/List.hpp
index f20bfaff..a11d34fd 100644
--- a/src/phasicFlow/containers/List/List/List.hpp
+++ b/src/phasicFlow/containers/List/List/List.hpp
@@ -49,11 +49,11 @@ public:
 
 	using iterator 		= typename listType::iterator;
 	
-	using constIterator = typename listType::const_iterator;
+	using const_iterator = typename listType::const_iterator;
 	
 	using reference 	= typename listType::reference;
 	
-	using constReference= typename listType::const_reference;
+	using const_reference= typename listType::const_reference;
 	
 	using initList 		= typename std::initializer_list<T>;
 	
@@ -62,12 +62,7 @@ public:
 
 protected:
 
-	// position of ith element
-	auto pos(size_t i);
-
-	// position of ith element 
-	const auto pos(size_t i)const;
-
+	
 	static inline size_t getListStride(const size_t& len)
 	{
 		size_t stride = 1;
@@ -114,30 +109,19 @@ public:
 
 
 		// - copy construct
-		List(const List& src):
-			listType(src)
-		{}
+		List(const List& src) = default;
+			
 
 		// - move construct
-		List( List && mv)
-		:
-			listType(std::move(mv))
-		{}
-
+		List( List && mv) = default;
+		
 		// - copy assignment
-		ListType& operator=(const ListType& rhs)
-		{
-			listType::operator=(rhs);
-			return *this;
-		}
+		ListType& operator=(const ListType& rhs) = default;
+		
 
 		// - move assignment
-		ListType& operator=(ListType&& rhs)
-		{
-			listType::operator=(std::move(rhs));
-			return *this;
-		}	
-
+		ListType& operator=(ListType&& rhs) = default;
+		
 
 		uniquePtr<ListType> clone()const{
 			return makeUnique<ListType>(*this);
@@ -162,6 +146,12 @@ public:
 		// - size of container
 		size_t size()const;
 		
+		// position of ith element
+		auto pos(size_t i, bool noError = false);
+
+		// position of ith element 
+		const auto pos(size_t i, bool noError = false)const;
+
 		// - access to ith element
 		//   fatal exit if out of range
 		T& operator[](size_t i);
@@ -172,7 +162,7 @@ public:
 		
 		// - find the position of the first element with value val
 		//   cend() if not found
-		constIterator find(const T& val) const;
+		const_iterator find(const T& val) const;
 		
 		// - find the position of the first element with value val
 		//    end() if not found
diff --git a/src/phasicFlow/containers/List/List/ListI.hpp b/src/phasicFlow/containers/List/List/ListI.hpp
index 60caf3b2..c46d3efa 100644
--- a/src/phasicFlow/containers/List/List/ListI.hpp
+++ b/src/phasicFlow/containers/List/List/ListI.hpp
@@ -21,14 +21,22 @@ Licence:
 template<typename T>
 auto pFlow::List<T>::pos
 (
-	size_t i
+	size_t i,
+	bool noError
 )
 {
 	if( i >= size() )
 	{
-		fatalErrorInFunction<<
-		"our of range access to list element. \n";
-		fatalExit;
+		if(noError)
+		{
+			return std::end(*this);
+		}
+		else
+		{
+			fatalErrorInFunction<<
+			"out of range access to list element. \n";
+			fatalExit;
+		}
 	}
 	auto iter = listType::begin();
 	std::advance(iter, i);
@@ -38,14 +46,22 @@ auto pFlow::List<T>::pos
 template<typename T>
 const auto pFlow::List<T>::pos
 (
-	size_t i
+	size_t i,
+	bool noError
 )const 
 {
 	if( i >= size() )
 	{
-		fatalErrorInFunction<<
-		"our of range access to list element. \n";
-		fatalExit;
+		if(noError)
+		{
+			return std::end(*this);
+		}
+		else
+		{
+			fatalErrorInFunction<<
+			"out of range access to list element. \n";
+			fatalExit;
+		}
 	}
 	auto iter = listType::cbegin();
 	std::advance(iter, i);
@@ -88,7 +104,7 @@ inline const T& pFlow::List<T>::operator[]
 }
 
 template<typename T>
-inline typename  pFlow::List<T>::constIterator pFlow::List<T>::find
+inline typename  pFlow::List<T>::const_iterator pFlow::List<T>::find
 (
 	const T& val
 ) const
diff --git a/src/phasicFlow/containers/List/anyList/anyList.cpp b/src/phasicFlow/containers/List/anyList/anyList.cpp
new file mode 100644
index 00000000..c66ad975
--- /dev/null
+++ b/src/phasicFlow/containers/List/anyList/anyList.cpp
@@ -0,0 +1,43 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#include "anyList.hpp"
+
+
+size_t pFlow::anyList::size()const
+{
+	return anyList_.size();
+}
+
+bool pFlow::anyList::empty()const
+{
+	return size()==0;
+}
+
+bool pFlow::anyList::contains(const word& name)const
+{
+	return names_.search(name);
+}
+
+const pFlow::wordList& pFlow::anyList::names()const
+{
+	return names_;
+}
diff --git a/src/phasicFlow/containers/List/anyList/anyList.hpp b/src/phasicFlow/containers/List/anyList/anyList.hpp
new file mode 100644
index 00000000..9ed114b1
--- /dev/null
+++ b/src/phasicFlow/containers/List/anyList/anyList.hpp
@@ -0,0 +1,243 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __anyList_hpp__
+#define __anyList_hpp__
+
+#include <any>
+
+#include "types.hpp"
+#include "List.hpp"
+
+
+namespace pFlow
+{
+
+
+class anyList
+{
+
+public:
+
+	using anyListType 	= List<std::any>;
+
+	using reference 	= typename anyListType::reference;
+
+	using iterator 		= typename anyListType::iterator;
+
+	using const_iterator= typename anyListType::const_iterator;
+
+
+protected:
+
+	/// Contains a list of variables with any type 
+	anyListType 	anyList_;
+
+	/// List of variable names in anyList_ 
+	wordList 		names_;	
+
+public:
+
+	// - Type info
+	TypeInfoNV("anyList");
+
+	//// - Constructors
+
+		// All five constructors are created by compiler 
+	
+
+	//// -  Methods
+		
+		/// Size of container
+		size_t size()const;
+
+		/// Is container empty
+		bool empty()const;
+
+		/// Does container contain this variable name?
+		bool contains(const word& name)const;
+
+		/// List of varibales names
+		const wordList& names()const;
+
+		/// Create variable using constructor in-place 
+		template<typename T, typename... Args>
+		reference emplaceBack(const word& name, Args&&... args)
+		{
+			if( contains(name))
+			{
+				fatalErrorInFunction<<
+				"variable name "<< name << " already exists in the anyList."<<endl<<
+				"list of variables is "<<names_<<endl;
+				fatalExit;
+			}
+			names_.push_back(name);
+			return anyList_.emplace_back( 
+				std::in_place_type<T>, 
+				std::forward<Args>(args)...);
+		}
+
+		/// Create variable using copy constructor
+		template<typename T>
+		reference emplaceBack(const word& name, const T & other)
+		{
+			if( contains(name) )
+			{
+				fatalErrorInFunction<<
+				"variable name "<< name << " already exists in the anyList."<<endl<<
+				"list of variables is "<<names_<<endl;
+				fatalExit;
+			}
+			names_.push_back(name);
+			return anyList_.emplace_back(std::in_place_type<T>, other);
+		}
+
+		/// Create variable using move constructor 
+		template<typename T>
+		reference emplaceBack(const word& name, T&& other)
+		{
+			if( contains(name) )
+			{
+				fatalErrorInFunction<<
+				"variable name "<< name << " already exists in the anyList."<<endl<<
+				"list of variables is "<<names_<<endl;
+				fatalExit;
+			}
+			names_.push_back(name);
+			return anyList_.emplace_back(std::in_place_type<T>, std::move(other));
+		}
+
+		/// Get the reference to variable by index
+		template<typename T>
+		T& getObject(size_t i)
+		{
+			std::any *a = &(*anyList_.pos(i));
+			if(!a->has_value())
+			{
+				fatalErrorInFunction<<
+				"any does not have a value for dereferencing. "<<
+				"index in anyList is "<<i<<"."<<endl;
+				fatalExit;
+			}
+			return *std::any_cast<T>(a);
+		}
+
+		/// Get the reference to variable by name 
+		template<typename T>
+		T& getObject(const word& name)
+		{
+			int32 i = names_.findi(name);
+			if(i == -1 )
+			{
+				fatalErrorInFunction<<
+				"variable name "<< name << " does not exist in the anyList."<<endl<<
+				"list of variables is "<<names_<<endl;
+				fatalExit;
+			}
+			std::any *a = &(*anyList_.pos(i));
+			if(!a->has_value())
+			{
+				fatalErrorInFunction<<
+				"any does not have a value for dereferencing. "<<
+				"index in anyList is "<<i<<"."<<endl;
+				fatalExit;
+			}
+			return *std::any_cast<T>(a);
+		}
+
+		/// Get the const reference to variable by name 
+		template<typename T>
+		const T& getObject(const word& name)const
+		{
+			int32 i = names_.findi(name);
+			if(i == -1 )
+			{
+				fatalErrorInFunction<<
+				"variable name "<< name << " does not exist in the anyList."<<endl<<
+				"list of variables is "<<names_<<endl;
+				fatalExit;
+			}
+			const std::any *a = &(*anyList_.pos(i));
+			if(!a->has_value())
+			{
+				fatalErrorInFunction<<
+				"any does not have a value for dereferencing. "<<
+				"index in anyList is "<<i<<"."<<endl;
+				fatalExit;
+			}
+			return *std::any_cast<const T>(a);
+		}
+
+		/// Get the const reference to object by index
+		template<typename T>
+		const T& getObject(size_t i)const
+		{
+			const std::any *a = &(*anyList_.pos(i));
+			if(!a->has_value())
+			{
+				fatalErrorInFunction<<
+				"any does not have a value for dereferencing. "<<
+				"index in anyList is "<<i<<"."<<endl;
+				fatalExit;
+			}
+			return *std::any_cast<const T>(a);
+		}
+
+		/// Get the pointer to variable by index
+		template<typename T>
+		T* getObjectPtr(size_t i)
+		{
+			if(i>= size())return nullptr;
+
+			std::any *a = &(*anyList_.pos(i));
+			if( a->has_value())
+			{
+				return std::any_cast<T>(a);	
+			}
+			else
+			{
+				return nullptr;
+			}	
+		}
+
+		/// Get the const pointer to variable by index 
+		template<typename T>
+		const T* getObjectPtr(size_t i)const
+		{
+			if(i>=size())return nullptr;
+			const std::any *a = &(*anyList_.pos(i));
+			if( a->has_value())
+			{
+				return std::any_cast<const T>(a);	
+			}
+			else
+			{
+				return nullptr;
+			}	
+		}
+			
+};
+
+
+
+} // pFlow
+
+
+#endif //__anyList_hpp__
diff --git a/src/phasicFlow/containers/Vector/Vector.hpp b/src/phasicFlow/containers/Vector/Vector.hpp
index 3377efdc..b025a148 100644
--- a/src/phasicFlow/containers/Vector/Vector.hpp
+++ b/src/phasicFlow/containers/Vector/Vector.hpp
@@ -364,7 +364,7 @@ public:
 template<typename T, typename Allocator>
 inline iIstream& operator >> (iIstream & is, Vector<T, Allocator> & ivec )
 {
-	if( !ivec.readVector(is, IOPattern::MasterProcessor) )
+	if( !ivec.readVector(is, IOPattern::MasterProcessorOnly) )
 	{
 		ioErrorInFile (is.name(), is.lineNumber());
 		fatalExit;
diff --git a/src/phasicFlow/containers/Vector/stdVectorHelper.hpp b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
index 7ffbfaf8..9c67a4ce 100644
--- a/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
+++ b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
@@ -57,9 +57,15 @@ bool writeSpan(
     IOPattern::IOType iotype)
 {
    
-   dataIO io(iotype);
+   auto ioPtr = dataIO::create(iotype, IOPattern::exeMode());
 
-   if(!io.writeData(os, sp))
+   if(!ioPtr)
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+   if(!ioPtr().writeData(os, sp))
    {
    		fatalErrorInFunction;
    		return false;
@@ -92,9 +98,15 @@ bool readStdVector
 	IOPattern::IOType iotype 
 )
 {
-	dataIO io(iotype);
+	auto ioPtr = dataIO::create(iotype, IOPattern::exeMode());
 
-	if(!io.readData(is, vec))
+	if(!ioPtr)
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+	if(!ioPtr().readData(is, vec))
 	{
 		fatalErrorInFunction;
 		return false;
@@ -118,7 +130,7 @@ iOstream& operator<<( iOstream& os, const std::vector<T,Allocator>& vec)
 template<typename T, typename Allocator>
 iIstream& operator>>(iIstream& is, std::vector<T,Allocator>& vec)
 {
-	if( !readStdVector(is,vec, IOPattern::MasterProcessor))
+	if( !readStdVector(is,vec, IOPattern::MasterProcessorOnly))
 	{
 		fatalErrorInFunction;
 		fatalExit;
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 2fa36459..46b461b3 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -599,12 +599,38 @@ public:
 			
 		}
 
+		template<typename HostMask>
+		FUNCTION_H
+		bool write(iOstream& os, IOPattern::IOType iotype, const HostMask& mask)const
+		{
+			auto hVec = hostVector();
+			
+			auto numActive = mask.numActive();
+			std::vector<T> finalField;
+			finalField.clear();
+			finalField.reserve(numActive);
+			
+			uint32 start 	= mask.activeRange().start();
+			uint32 end 		= mask.activeRange().end();
+			
+			for(uint32 i=start; i<end; i++ )
+			{
+				if( mask() )
+					finalField.push_back(hVec[i]);
+			}
+
+			auto sp = span<T>( finalField.data(), finalField.size());
+
+			return writeSpan(os, sp, iotype);
+
+		}
+
 }; // class VectorSingle
 
 template<typename T, typename MemorySpace>
 inline iIstream& operator >> (iIstream & is, VectorSingle<T, MemorySpace> & ivec )
 {
-	if( !ivec.read(is, IOPattern::MasterProcessor ) )
+	if( !ivec.read(is, IOPattern::MasterProcessorOnly ) )
 	{
 		ioErrorInFile (is.name(), is.lineNumber());
 		fatalExit;
diff --git a/src/phasicFlow/containers/span/span.hpp b/src/phasicFlow/containers/span/span.hpp
index 094ffe1d..8947c039 100644
--- a/src/phasicFlow/containers/span/span.hpp
+++ b/src/phasicFlow/containers/span/span.hpp
@@ -77,11 +77,11 @@ public:
 
     /// move
     INLINE_FUNCTION_HD
-    span(span&&) = delete;
+    span(span&&) = default;
 
     /// assignment
     INLINE_FUNCTION_HD
-    span& operator=(span&) = delete;
+    span& operator=(span&) = default;
 
     
     INLINE_FUNCTION_HD
diff --git a/src/phasicFlow/eventManagement/message.hpp b/src/phasicFlow/eventManagement/message.hpp
new file mode 100644
index 00000000..bf2d2f9a
--- /dev/null
+++ b/src/phasicFlow/eventManagement/message.hpp
@@ -0,0 +1,159 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __message_hpp__
+#define __message_hpp__
+
+#include <bitset>
+
+#include "types.hpp"
+#include "iOstream.hpp"
+
+
+namespace pFlow
+{
+
+class message
+{
+public:
+	enum EVENT : size_t
+	{
+		DEFAULT 		= 0,
+		CAP_CHANGED 	= 1,
+		SIZE_CHANGED 	= 2,
+		ITEM_DELETE	 	= 3,
+		ITEM_INSERT  	= 4,
+		RANGE_CHANGED   = 5,
+		ITEM_REARRANGE 	= 6	
+	};
+
+protected:
+
+	std::bitset<16> events_{0x0000};
+	
+
+public:
+
+	message()=default;
+
+	message(EVENT evnt)
+	{
+		add(evnt);
+	}
+
+	message(size_t i )
+	{
+		if(i<16)
+		{
+			events_.set(i);
+		}
+	}
+
+	message(const message&) = default;
+
+	message(message&&) = default;
+
+	message& operator=(const message&) = default;
+
+	message& operator=(message&&) = default;
+
+	~message()=default;
+
+	inline message& add( EVENT evnt)
+	{
+		events_.set(static_cast<size_t>(evnt));
+		return *this;
+	}
+
+	inline message& remove(EVENT evnt)
+	{
+		events_.set(static_cast<size_t>(evnt), false);
+		return *this;
+	}
+
+	inline bool equivalentTo( EVENT evnt )const
+	{
+		return equivalentTo(static_cast<size_t>(evnt));
+	}
+
+	inline bool equivalentTo(size_t i)const
+	{
+		return events_.test(i);
+	}
+
+	inline bool isNull()const
+	{
+		return events_.none();
+	}
+
+	inline auto size()const
+	{
+		return events_.size();
+	}
+
+	inline
+	message& operator+(EVENT evnt)
+	{
+		return add(evnt);
+	}
+
+	inline
+	message& operator-(EVENT evnt)
+	{
+		return remove(evnt);
+	}
+
+	static 
+	message Default()
+	{
+		message msg;
+		return msg+DEFAULT;
+	}
+
+	static 
+	message Empty()	
+	{
+		message msg;
+		return msg;
+	}
+	
+};
+
+inline
+iOstream& operator<<(iOstream& os, const message& msg)
+{
+	for(size_t i=msg.size(); i>0; i--)
+	{
+		os<< msg.equivalentTo(i-1)? '1':0;
+	}
+	os<<endl;
+
+	return os;
+}
+
+inline
+message operator + (message::EVENT evnt1, message::EVENT evnt2)
+{
+	message msg = message::Empty().add(evnt1).add(evnt2);
+	return msg;
+}
+
+}
+
+#endif // __eventMessage_hpp__
diff --git a/src/phasicFlow/eventManagement/observer.cpp b/src/phasicFlow/eventManagement/observer.cpp
new file mode 100644
index 00000000..03621f31
--- /dev/null
+++ b/src/phasicFlow/eventManagement/observer.cpp
@@ -0,0 +1,59 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "observer.hpp"
+#include "subscriber.hpp" 
+
+pFlow::observer::observer():
+	subscriber_(nullptr)
+{}
+
+pFlow::observer::observer
+(
+	const subscriber* subscrbr,
+	message msg
+)
+:
+	subscriber_(subscrbr),
+	message_(msg)
+{
+	if(subscriber_)
+	{
+		if(!subscriber_->subscribe(msg, this))
+		{
+			fatalErrorInFunction<<
+			"error in subscribing an observer"<<endl;
+			fatalExit;
+		}
+	}
+}
+
+pFlow::observer::~observer()
+{
+	if( subscriber_)
+		subscriber_->unsubscribe(this);
+	invalidateSubscriber();
+}
+
+bool pFlow::observer::addToSubscriber(const subscriber& subscrbr)
+{
+	subscriber_ = &subscrbr;
+	return subscriber_->subscribe(message_, this);
+}
\ No newline at end of file
diff --git a/src/phasicFlow/eventManagement/observer.hpp b/src/phasicFlow/eventManagement/observer.hpp
new file mode 100644
index 00000000..c5433f3b
--- /dev/null
+++ b/src/phasicFlow/eventManagement/observer.hpp
@@ -0,0 +1,76 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#ifndef __observer_hpp__
+#define __observer_hpp__
+
+#include "message.hpp"
+
+namespace pFlow
+{
+
+class subscriber;
+class anyList;
+
+class observer
+{
+protected:
+	
+
+	/// pointer to subscriber 
+	const subscriber* 	subscriber_ = nullptr;
+	
+	/// list of events in the message 
+	const message 		message_;
+
+
+public:
+
+	observer();
+
+	observer(
+		const subscriber* subscrbr, 
+		message msg);
+
+	virtual 
+	~observer();
+
+	inline 
+	bool subscribed()const 
+	{
+		return subscriber_!=nullptr;
+	}
+
+	bool addToSubscriber(const subscriber& subscriber);
+	
+	inline void invalidateSubscriber()
+	{
+		subscriber_ = nullptr;
+	}
+
+
+	virtual bool update(const message& msg, const anyList& varList)=0;
+};
+
+} // pFlow
+
+
+#endif // __observer_hpp__
diff --git a/src/phasicFlow/eventManagement/subscriber.cpp b/src/phasicFlow/eventManagement/subscriber.cpp
new file mode 100644
index 00000000..9cb2dfcc
--- /dev/null
+++ b/src/phasicFlow/eventManagement/subscriber.cpp
@@ -0,0 +1,147 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#include "subscriber.hpp"
+#include "anyList.hpp"
+#include "observer.hpp"
+#include "message.hpp"
+
+
+pFlow::subscriber::~subscriber()
+{
+	for(size_t i=0; i<observerList_.size(); i++)
+	{
+		for( auto obsvr: observerList_[i] )
+		{
+			if(obsvr)
+			{
+				obsvr->invalidateSubscriber();
+			}
+		}
+	}
+}
+
+bool pFlow::subscriber::subscribe
+(
+	message 	msg,
+	observer* 	obsevr
+)const
+{
+	if( msg.size()>16 )
+	{
+		fatalErrorInFunction<<
+		"message size is greater than 16!"<<endl;
+		return false;
+	}
+	// do not subscribe nullptr 
+	if(!obsevr)return false;
+
+	for(size_t i=0; i<msg.size(); i++)
+	{
+		if(msg.equivalentTo(i))
+		{
+			if(!observerList_[i].search(obsevr))
+			{
+				observerList_[i].push_back(obsevr);
+			}
+		}
+	}
+	return true;
+}
+
+bool pFlow::subscriber::unsubscribe
+(
+	observer* obsrvr
+)const
+{
+	if(obsrvr)
+	{
+		for(size_t i=0; i<observerList_.size(); i++)
+		{
+			if( auto iter = observerList_[i].find(obsrvr); iter!= observerList_[i].end())
+			{
+				(*iter)->invalidateSubscriber();
+				observerList_[i].erase(iter);
+			}
+		}
+	}
+	return true;
+}
+
+bool pFlow::subscriber::notify
+(
+	const message msg, 
+	const anyList& varList
+)
+{
+	if( msg.size()>16 )
+	{
+		fatalErrorInFunction<<
+		"message size is greater than 16!"<<endl;
+		return false;
+	}
+
+	for(size_t i=0; i<msg.size(); i++)
+	{
+		if(msg.equivalentTo(i))
+		{
+			for( auto obsvr: observerList_[i] )
+			{
+				obsvr->update(message(i), varList);
+			}
+		}
+	}
+
+	return true;
+}
+
+/*bool pFlow::subscriber::notify
+(
+	const eventMessage &msg
+)
+{
+	for ( auto& observer:observerList_ )
+	{
+		if(observer)
+			if( !observer->update(msg) ) return false;
+	}
+
+	return true;
+}
+
+bool pFlow::eventSubscriber::notify
+(
+	const eventMessage& msg,
+	const List<eventObserver*>& exclutionList
+)
+{
+	Set<eventObserver*> sortedExcList(exclutionList.begin(),exclutionList.end());
+
+	for(auto& observer:observerList_)
+	{
+		if( observer && sortedExcList.count(observer) == 0 )
+		{
+			if(!observer->update(msg)) return false;
+		}
+	}
+
+	return true;
+}*/
\ No newline at end of file
diff --git a/src/phasicFlow/eventManagement/subscriber.hpp b/src/phasicFlow/eventManagement/subscriber.hpp
new file mode 100644
index 00000000..3c424a3a
--- /dev/null
+++ b/src/phasicFlow/eventManagement/subscriber.hpp
@@ -0,0 +1,68 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __subscriber_hpp__
+#define __subscriber_hpp__
+
+
+
+#include <array>
+
+#include "List.hpp"
+
+namespace pFlow
+{
+
+class observer;
+class message;
+class anyList;
+
+class subscriber
+{
+protected:
+
+	// - list of subsribed objectd that recieve updage messages 
+	mutable std::array<List<observer*>,16> observerList_;
+
+public:
+
+	subscriber()
+	{}
+
+	virtual ~subscriber();
+
+	virtual bool subscribe(message msg, observer* obsevr)const;
+
+	virtual bool unsubscribe(observer* obsevr)const;
+
+	//bool notify(const eventMessage& msg);
+
+	//bool notify(const eventMessage& msg, const List<eventObserver*>& exclutionList );
+
+	
+	bool notify(const message msg, const anyList& varList);
+	
+
+};
+
+} // pFlow
+
+
+
+#endif // __eventSubscriber_hpp__
diff --git a/src/phasicFlow/repository/IOobject/IOPattern.cpp b/src/phasicFlow/repository/IOobject/IOPattern.cpp
index ffb0eb78..e5264175 100644
--- a/src/phasicFlow/repository/IOobject/IOPattern.cpp
+++ b/src/phasicFlow/repository/IOobject/IOPattern.cpp
@@ -29,3 +29,10 @@ pFlow::IOPattern::IOPattern( IOType iotype)
 	isParallel_(processors::isParallel())
 {}
 
+pFlow::word pFlow::IOPattern::exeMode()
+{
+    if(processors::isParallel())
+    	return word("MPI");
+    else
+    	return word("NoMPI");
+}
\ No newline at end of file
diff --git a/src/phasicFlow/repository/IOobject/IOPattern.hpp b/src/phasicFlow/repository/IOobject/IOPattern.hpp
index c539aabb..092aae0f 100644
--- a/src/phasicFlow/repository/IOobject/IOPattern.hpp
+++ b/src/phasicFlow/repository/IOobject/IOPattern.hpp
@@ -22,7 +22,8 @@ Licence:
 #define __IOPattern_hpp__
 
 
-#include "processors.hpp"
+
+#include "types.hpp"
 
 namespace pFlow
 {
@@ -52,7 +53,9 @@ public:
 	{
 		MasterProcessorOnly			= 0,
 		AllProcessorsSimilar 		= 1,
-		MasterProcessorDistribute	= 4
+		MasterProcessorDistribute	= 4,
+		AllProcessorsDifferent  = 8 // this is used for << and >> operators for 
+									// standard input and output streams 
 	};
 
 protected:
@@ -95,6 +98,12 @@ public:
 		return ioType_ == MasterProcessorDistribute;
 	}
 
+	inline
+	bool isAllProcessorsDifferent()const
+	{
+		return ioType_ == AllProcessorsDifferent;
+	}
+
 	inline
 	bool isMaster()const
 	{
@@ -110,7 +119,7 @@ public:
 	inline
 	bool thisProcReadData()const
 	{
-		if(isMasterProcessor() && !isMaster())return false;
+		if(isMasterProcessorOnly() && !isMaster())return false;
 		if(isMasterProcessorDistribute() && !isMaster()) return false;
 		return true;
 	}
@@ -118,6 +127,7 @@ public:
 	inline
 	bool thisProcWriteData()const
 	{
+		if(isAllProcessorsDifferent()) return true;
 		return isMaster();
 	}
 
@@ -145,6 +155,10 @@ public:
 		return globalRank_;
 	}
 
+	static 
+	word exeMode();
+
+
 };
 
 }
diff --git a/src/phasicFlow/repository/IOobject/objectFile.hpp b/src/phasicFlow/repository/IOobject/objectFile.hpp
index 39f9adf8..d6a50eac 100644
--- a/src/phasicFlow/repository/IOobject/objectFile.hpp
+++ b/src/phasicFlow/repository/IOobject/objectFile.hpp
@@ -66,7 +66,7 @@ protected:
 	/// Number of bytes used for writing/reading real variable (used for binray)
 	int 		numBytesForReal_ = numBytesForReal__;
 	
-	IOPattern 	ioPattern_ = {IOPattern::MasterProcessor};
+	IOPattern 	ioPattern_ = {IOPattern::MasterProcessorOnly};
 
 	/// Does the objectFile write the header or not
 	bool readWriteHeader_ = true;
@@ -88,7 +88,7 @@ public:
 		const fileSystem& 	localPath,
 		const readFlag&   	rf = READ_NEVER,
 		const writeFlag&  	wf = WRITE_NEVER,
-		IOPattern::IOType	ioType = IOPattern::MasterProcessor,
+		IOPattern::IOType	ioType = IOPattern::MasterProcessorOnly,
 		bool  rwHdr = true
 	);
 
diff --git a/src/phasicFlow/smartPointers/uniquePtr.hpp b/src/phasicFlow/smartPointers/uniquePtr.hpp
index 9375d15c..6789e027 100644
--- a/src/phasicFlow/smartPointers/uniquePtr.hpp
+++ b/src/phasicFlow/smartPointers/uniquePtr.hpp
@@ -54,24 +54,20 @@ public:
 
 
 	template<typename... Args>
-    inline static uniquePtr<T> makeUnique(Args&&... args)
-    {
-    	return uniquePtr<T>(new T(std::forward<Args>(args)...));
-    }
+	inline static uniquePtr<T> makeUnique(Args&&... args)
+	{
+		return uniquePtr<T>(new T(std::forward<Args>(args)...));
+	}
 
-    void clear()
-    {
-    	if( ! (*this) )
-    	{
-    		auto p = this->release();
-    		delete p;
-    	}
-    }
+	void clear()
+	{
+		this->reset(nullptr);
+	}
 
-    // ref to the object of type T
+	// ref to the object of type T
 	T& operator ()()
 	{
-		if(!this->get())
+		if(!*this)
 		{
 			fatalErrorInFunction <<
 			"uniquePtr is empty, and you are trying to get its reference. \n" <<
@@ -84,14 +80,19 @@ public:
 	// const ref to the object of type T
 	const T& operator() () const
 	{
-		if(!this->get())
+		if(!*this)
 		{
 			fatalErrorInFunction <<
 			"uniquePtr is empty, and you are trying to get its reference. \n" <<
 			"Type name is "<< typeid(T).name()<<"\n";
 			fatalExit;
 		}
-		return const_cast<T&>(*this->get());
+		return static_cast<const T&>(*this->get());
+	}
+
+	explicit operator bool() const
+	{
+		return this->get()!= nullptr;
 	}
 
 };
diff --git a/src/phasicFlow/streams/dataIO/dataIO.cpp b/src/phasicFlow/streams/dataIO/dataIO.cpp
index 4f44f21e..d64fbe59 100644
--- a/src/phasicFlow/streams/dataIO/dataIO.cpp
+++ b/src/phasicFlow/streams/dataIO/dataIO.cpp
@@ -1,717 +1,34 @@
 
-#include "phasicFlowConfig.H"
-#ifdef pFlow_Build_MPI
-	#include <mpi.h>
-#endif
-
-#include <cstdio>
-#include <numeric>
-
 #include "dataIO.hpp"
 
 
-
-static const size_t numcharFlag = 8;
-
-static inline unsigned char binaryFlag__[numcharFlag] = {255, 255, 255, 255, 255, 255, 255 ,0};
-
-inline 
-pFlow::uint64 chunkSizeOffeset(pFlow::uint64 procNo)
-{
-	// 1 is added for number of processors 
-	return (1+procNo)*sizeof(pFlow::uint64);
-}
-
-bool writeBinaryBlockFlagSTD(std::FILE* fh)
-{
-
-	std::size_t nw = std::fwrite( binaryFlag__ , sizeof(unsigned char), numcharFlag, fh );
-
-	if(nw < numcharFlag) 
-		return false;
-	else
-		return true;
-}
-
-pFlow::uint64 findBindaryBlockFlagSTD(std::FILE* fh)
-{
-	// get the current postion 
-	long fpos;
-	if( fpos = std::ftell( fh) ; fpos == -1L )
-	{
-		fatalErrorInFunction;
-		return pFlow::dataIO::ErrorReturn;
-	}
-
-	pFlow::uint64 filePos = static_cast<pFlow::uint64>(fpos);
-
-	// start reading char by char 
-	unsigned char ch;
-	int currPos = 0;
-    while ( std::fread(&ch, sizeof(ch), 1, fh) == 1 ) 
-    {
-   		if(std::ferror(fh)) return pFlow::dataIO::ErrorReturn;	
-   		if(std::feof(fh))return pFlow::dataIO::ErrorReturn;
-
-   		filePos++;
-
-   		if(ch == binaryFlag__[currPos] ) 
-   		{
-   			currPos++;
-
-   			if(currPos == numcharFlag) return filePos;
-   		}
-   		else
-   		{
-   			currPos = 0;
-   		}   
-    }
-
-    return pFlow::dataIO::ErrorReturn;
-}
-
-
-#ifdef pFlow_Build_MPI
-pFlow::uint64 findBindaryBlockFlagMPI(MPI_File fh, pFlow::uint64 startPosSearch)
-{
-	
-
-	pFlow::uint64 filePos = static_cast<pFlow::uint64>(startPosSearch);
-
-	// start reading char by char 
-	unsigned char ch;
-	int currPos = 0;
-
-    while( MPI_File_read(
-    	fh, 
-    	&ch, 
-    	1, 
-    	MPI_UNSIGNED_CHAR, 
-    	MPI_STATUS_IGNORE) == MPI_SUCCESS ) 
-    {
-   		
-   		filePos++;
-   		
-   		if(ch == binaryFlag__[currPos] ) 
-   		{
-   			currPos++;
-
-   			if(currPos == numcharFlag) return filePos;
-   		}
-   		else
-   		{
-   			currPos = 0;
-   		}   
-    }
-
-    return pFlow::dataIO::ErrorReturn;
-}
-
-#endif
-
-
-bool pFlow::dataIO::writeDataToFileEndSTD
+pFlow::uniquePtr<pFlow::dataIO> pFlow::dataIO::create
 (
-	const word& wordPath, 
-	const span<unsigned char>& data
+	IOPattern::IOType iotype, 
+	word exeMode
 )
 {
+	auto ioMode = angleBracketsNames("dataIO", exeMode);
 
-	// openfile 
-	auto fh = std::fopen(wordPath.c_str(), "ab");
-
-	if(!fh)
+	if( wordvCtorSelector_.search(ioMode) )
 	{
-		fatalErrorInFunction<<
-		"Error in Opening file "<< wordPath <<endl;
-		std::fclose(fh);
-		return false;
-	}
-
-	// write the start of binary block flag
-	if(std::fseek(fh, 0 , SEEK_END)!=0)
-	{
-		fatalErrorInFunction<<
-		"error at reaching end of file "<<wordPath<<endl;
-		std::fclose(fh);
-		return false;
-	}
-	
-	
-	if(!writeBinaryBlockFlagSTD(fh) )
-	{
-		fatalErrorInFunction<<
-		"Error in writing to file "<< wordPath<<endl;
-		std::fclose(fh);
-		return false;
-	}
-		
-	uint64 numChunks = 1;	
-
-	// write number of data chunks
-	auto wc = std::fwrite(&numChunks, sizeof(numChunks), 1, fh);
-
-	if(wc < 1)
-	{
-		fatalErrorInFunction<<
-		"Error in writing numChunks to file "<< wordPath <<endl;
-		std::fclose(fh);
-		return false;
-	}
-
-
-	// write size of each data chunk
-	uint64 sizeOfData = data.size();
-
-	wc = std::fwrite(&sizeOfData, sizeof(sizeOfData), 1, fh);
-	if(wc <1)
-	{
-		fatalErrorInFunction<<
-		"Error in writing size of data chunk to file "<< wordPath <<endl;
-		std::fclose(fh);
-		return false;	
-	}
-
-	if(sizeOfData>0 )
-	{
-		// write data chunk to file
-		wc = std::fwrite(data.data(), sizeof(unsigned char), sizeOfData, fh);
-		if(wc < sizeOfData )
-		{
-			fatalErrorInFunction<<
-			"Error in writing size of data to file "<< wordPath <<endl;
-			std::fclose(fh);
-			return false;	
-		}	
-	}
-	
-		
-	lastPosRead_ = static_cast<uint64>(std::ftell(fh));
-		
-	// close the file 
-	std::fclose(fh);
-
-	return true;
-}
-
-bool pFlow::dataIO::writeDataToFileEndMPI
-(
-	const word& wordPath, 
-	const span<unsigned char>& data
-)
-{	
-
-#ifdef pFlow_Build_MPI
-	
-	// collect information from other processes
-	uint64 numProc 	= processors::globalSize();
-	uint64 thisSize = data.size();
-	uint64 offset;
-
-	CheckMPI
-	(
-		MPI_Scan(&thisSize, &offset, 1, MPI_UINT64_T,  MPI_SUM, MPI_COMM_WORLD),
-		true
-	);
-
-
-	MPI_File fh;
-	
-	if( MPI_File_open(
-			MPI_COMM_WORLD,
-			wordPath.c_str(),
-			MPI_MODE_WRONLY+MPI_MODE_APPEND,
-			MPI_INFO_NULL,
-			&fh) != MPI_SUCCESS)
-	{
-		fatalErrorInFunction<<
-		"Cannot open file "<< wordPath<<endl;
-		return false;
-	}	
-
-	uint64 startPos;
-
-	if( processors::isMaster())
-	{
-		// set position to the end of file 
-		MPI_File_seek(fh, 0 , MPI_SEEK_END);		
-
-		if( MPI_File_write(
-			fh, 
-			binaryFlag__,
-			numcharFlag,
-			MPI_UNSIGNED_CHAR,
-			MPI_STATUS_IGNORE
-			) != MPI_SUCCESS )
-		{
-			fatalErrorInFunction<<
-			"Cannot write binary block flag into "<< wordPath<<endl;
-			return false;
-		}
-		
-		MPI_Offset posOfBlock;
-		if( MPI_File_get_position(fh, &posOfBlock) != MPI_SUCCESS )
-		{
-			fatalErrorInFunction<<
-			"Cannot get the end pos of file "<< wordPath<<endl;
-			return false;
-		}
-
-		
-		startPos = static_cast<uint64>(posOfBlock);
-	}
-
-		
-	if( MPI_Bcast(
-		&startPos, 
-		1, 
-		MPI_UINT64_T, 
-		processors::masterNo(), 
-		MPI_COMM_WORLD) != MPI_SUCCESS)
-	{
-		fatalErrorInFunction;
-		return false;
-	}
- 
-
-	if( processors::isMaster())
-	{
-		uint64 numProc = processors::globalSize();
-		if(MPI_File_write(
-			fh,
-			&numProc,
-			1,
-			MPI_UINT64_T,
-			MPI_STATUS_IGNORE) != MPI_SUCCESS)
-		{
-			fatalErrorInFunction<<
-			"Cannot write number of chunks into "<<wordPath<<endl;
-			return false;
-		}
-	}
-
-	uint64 sizeOffset = startPos  + chunkSizeOffeset(processors::globalRank());
-
-	
-	if(MPI_File_write_at_all(
-		fh,
-		sizeOffset, 
-		&thisSize,  
-		1,
-		MPI_UINT64_T,
-		MPI_STATUS_IGNORE)!= MPI_SUCCESS)
-	{
-		fatalErrorInFunction<<
-		"Cannot write size of chunk into "<<wordPath<<endl;
-		return false;
-	}
-
-	offset -= thisSize;
-
-	uint64 chunkOffset = startPos + chunkSizeOffeset(processors::globalSize()) + offset;
-
-	
-	if(MPI_File_write_at_all(
-		fh,
-		chunkOffset,
-		data.data(),
-		thisSize,
-		MPI_UNSIGNED_CHAR,
-		MPI_STATUS_IGNORE) != MPI_SUCCESS)
-	{
-		fatalErrorInFunction<<
-		"Cannot write data into "<<wordPath<<endl;
-		return false;;
-	}
-
-	
-
-	MPI_File_close(&fh);
-	MPI_Barrier(MPI_COMM_WORLD);
-
-	uint64 lastPos = chunkOffset + thisSize;
-	return maxReduction(lastPos, lastPosWrite_);
-
-	/*if( MPI_Allreduce(
-			&lastPos,
-			&lastPosWrite_,
-			1,
-			MPI_UINT64_T,
-			MPI_MAX,
-			MPI_COMM_WORLD) != MPI_SUCCESS )
-	{
-		fatalErrorInFunction<<
-		"Error in max_reduction for write operation"<<endl;
-		return false;
-	}
-
-	return true;*/
-
-#else
-	// if MPI is not active, we use std routins
-	return writeDataToFileEndSTD(wordPath, data);
-#endif
-}
-
-
-bool pFlow::dataIO::readDataSTD
-(
-	const word& wordPath,
-	const std::vector<uint64> chunkSizes,
-	span<unsigned char>& data,
-	uint64 binaryBlockStart
-)
-{
-	
-	
-	// sum of all chuncks
-	uint64 toRecv = std::accumulate(
-		chunkSizes.begin(), 
-		chunkSizes.end(), 
-		static_cast<uint64>(0));
-
-	if( data.size() != toRecv )
-	{
-		fatalErrorInFunction;
-		return false;
-	}
-
-	
-	auto fh = std::fopen(wordPath.c_str(), "rb");
-
-	if(!fh)
-	{
-		fatalErrorInFunction<<
-		"Error in Opening file "<< wordPath<<endl;
-		return false;
-	}
-
-	// start of data chunks 
-	uint64 offset = binaryBlockStart + chunkSizeOffeset(chunkSizes.size());
-	
-
-	if(auto res = std::fseek(fh, offset, SEEK_SET); res!= 0 )
-	{
-		fatalErrorInFunction<<
-		"Error in file seek "<< wordPath<<endl;
-		std::fclose(fh);
-		return false;
-	}
-
-
-	if(auto res = std::fread(
-			data.data(),
-			sizeof(unsigned char),
-			data.size(),
-			fh);
-		res!= data.size() )
-	{
-		fatalErrorInFunction<<
-		"Error in reading file "<< wordPath<<endl;
-		std::fclose(fh);
-		return false;
-	}
-
-	lastPosRead_ = static_cast<uint64>(std::ftell(fh));
-		
-	std::fclose(fh);
-	return true;
-}
-
-
-bool pFlow::dataIO::readDataMPI
-(
-	const word& wordPath, 
-	const std::vector<uint64> chunkSizes,
-	span<unsigned char>& data,
-	uint64 binaryBlockStart
-)
-{
-
-#ifdef pFlow_Build_MPI
-
-	
-	MPI_File fh;
-
-	if( MPI_File_open(
-		MPI_COMM_WORLD,
-		wordPath.c_str(),
-		MPI_MODE_RDONLY,
-		MPI_INFO_NULL,
-		&fh))
-	{
-		fatalErrorInFunction;
-		return false;
-	}
-		
-	
-	auto procNo = processors::globalRank();
-
-	uint64 toRecv = chunkSizes[procNo];
-
-	// start of data chunks 
-	uint64 offset = binaryBlockStart + chunkSizeOffeset(processors::globalSize());
-
-	for(auto i=0; i<procNo; i++)
-	{
-		offset += chunkSizes[i];
-	}
-
-	if( data.size() != toRecv )
-	{
-		fatalErrorInFunction;
-		return false;
-	}
-
-	
-	MPI_Status status;
-	
-	if( MPI_File_read_at_all(
-		fh,
-		offset,
-		data.data(),
-		data.size(),
-		MPI_UNSIGNED_CHAR,
-		&status) != MPI_SUCCESS )
-	{
-		fatalErrorInFunction;
-		return false;
-	}
-	
-	MPI_File_close(&fh);
-
-	uint64 lastPos = offset + data.size();
-	/*if( MPI_Allreduce(
-		&lastPos,
-		&lastPosRead_, 
-		1, 
-		MPI_UINT64_T,  
-		MPI_MAX, 
-		MPI_COMM_WORLD) != MPI_SUCCESS)
-	{
-		fatalErrorInFunction<<
-		"Error in max_reduction for lastPosRead_"<<endl;
-		return false;
-	}*/
-
-	return maxReduction(lastPos, lastPosRead_);
-#else
-	return readDataSTD(wordPath, chunkSizes, data, binaryBlockStart);
-#endif
-
-	
-}
-
-
-bool pFlow::dataIO::readMetaMPI
-(
-	const word& wordPath, 
-	std::vector<uint64>& chunkSizes,
-	uint64 startPosSearch,
-	uint64 &startPosBinaryBlock
-)
-{
-
-#ifdef pFlow_Build_MPI	
-	MPI_File fh;
-
-	if(MPI_File_open(
-		MPI_COMM_WORLD, 
-		wordPath.c_str(),
-		MPI_MODE_RDONLY,
-		MPI_INFO_NULL,
-		&fh) != MPI_SUCCESS)
-	{
-		fatalErrorInFunction;
-		return false;
-	}
-	
-
-	uint64 startPos = findBindaryBlockFlagMPI(fh, startPosSearch);
-	if( startPos == pFlow::dataIO::ErrorReturn )
-	{
-		fatalErrorInFunction;
-		return false;	
-	} 
-
-	startPosBinaryBlock  = startPos; 
-
-	uint64 numProcInFile;
-
-	if( MPI_File_read_at_all(
-		fh,
-		startPos,
-		&numProcInFile,
-		1,
-		MPI_UINT64_T,
-		MPI_STATUS_IGNORE) != MPI_SUCCESS)
-	{
-		fatalErrorInFunction;
-		return false;
-	}
-
-	
-	chunkSizes.resize(numProcInFile);
-	
-	if(MPI_File_read_at_all(
-		fh,
-		startPos + sizeof(numProcInFile),
-		chunkSizes.data(), 
-		chunkSizes.size(), 
-		MPI_UINT64_T,
-		MPI_STATUS_IGNORE) != MPI_SUCCESS)
-	{
-		fatalErrorInFunction;
-		return false;
-	}
-	MPI_File_close(&fh);
-
-	uint64 lastPos = startPos + sizeof(numProcInFile) + chunkSizes.size();
-	return maxReduction(lastPos, lastPosRead_);
-
-	/*if( MPI_Allreduce(
-		&lastPos,
-		&lastPosRead_, 
-		1, 
-		MPI_UINT64_T,  
-		MPI_MAX, 
-		MPI_COMM_WORLD) != MPI_SUCCESS)
-	{
-		fatalErrorInFunction<<
-		"Error in max_reduction for lastPosRead_"<<endl;
-		return false;
-	}*/
-
-#else
-	return readMetaSTD(wordPath, chunkSizes, startPosBinaryBlock);
-#endif
-}
-
-bool pFlow::dataIO::readMetaSTD
-(
-	const word& wordPath, 
-	std::vector<uint64>& chunkSizes,
-	uint64 startPosSearch,
-	uint64 &startPosBinaryBlock
-)
-{
-
-	std::FILE *fh = std::fopen(wordPath.c_str(), "rb");
-
-	if(!fh)
-	{
-		fatalErrorInFunction<<
-		"Error in Opening file "<< wordPath<<endl;
-		return false;
-	}
-
-	// set the start position for search 
-	std::fseek(fh, startPosSearch, SEEK_SET); 
-
-
-	uint64 startPos = findBindaryBlockFlagSTD(fh);
-	if(startPos == ErrorReturn )
-	{
-		fatalErrorInFunction;
-		return false;
-	}
-
-	startPosBinaryBlock = startPos;
-
-
-	std::fseek(fh, startPos, SEEK_SET); 
-
-	uint64 numProcInFile;
-	
-	auto res = std::fread(&numProcInFile, sizeof(numProcInFile), 1, fh);
-	
-
-	if(res != 1 )
-	{
-		fatalErrorInFunction<<
-		"Error in reading file "<< wordPath<<endl;
-		std::fclose(fh);
-		return false;
-	}
-
-	
-	chunkSizes.resize(numProcInFile);
-
-	res = std::fread(chunkSizes.data(), sizeof(numProcInFile), numProcInFile, fh);
-
-	if(res!= numProcInFile)
-	{
-		fatalErrorInFunction<<
-		"Error in reading chunkSizes from file "<< wordPath<<endl;
-		std::fclose(fh);
-		return false;
-	}
-
-	lastPosRead_ = static_cast<uint64>(std::ftell(fh));
-	
-	std::fclose(fh);
-	return true;
-}
-
-bool pFlow::dataIO::waitForAllMPI()
-{
-#ifdef pFlow_Build_MPI
-	MPI_Barrier(MPI_COMM_WORLD);
-#endif
-
-	return true;
-}
-
-
-bool pFlow::dataIO::maxReduction( uint64& src, uint64& dst)
-{
-	
-#ifdef pFlow_Build_MPI
-	if(processors::isParallel())
-	{
-		if(MPI_Allreduce(
-			&src,
-			&dst,
-			1,
-			MPI_UINT64_T,
-			MPI_MAX,
-			MPI_COMM_WORLD) != MPI_SUCCESS )
-		{
-			fatalErrorInFunction<<
-			"Error in max_reduction for write operation"<<endl;
-			return false;
-		}
-		return true;
+		auto objPtr = wordvCtorSelector_[ioMode] 
+			(
+				iotype,
+				exeMode
+			);
+		return objPtr;
 	}
 	else
 	{
-		dst = src;
-		return true;
+		printKeys
+		( 
+			fatalError << "Ctor Selector "<< Yellow_Text(ioMode) << " dose not exist. \n"
+			<<"Avaiable ones are: \n\n"
+			,
+			wordvCtorSelector_
+		);
+		fatalExit;
 	}
-#else
-	dst = src;
-	return true;
-#endif
-	
+	return nullptr;
 }
-
-bool pFlow::dataIO::BcastPos(uint64 & pos)
-{
-#ifdef pFlow_Build_MPI
-	if(processors::isParallel())
-	{
-		if( MPI_Bcast(
-			& pos,
-			1,
-			MPI_UINT64_T,
-			processors::masterNo(),
-			MPI_COMM_WORLD)!=MPI_SUCCESS )
-		{
-			fatalErrorInFunction<<
-			"Error in Bcast position"<<endl;
-			return false;
-		}
-	}
-#endif
-	return true;
-}
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIO.hpp b/src/phasicFlow/streams/dataIO/dataIO.hpp
index 2622f4e4..1a11ac2c 100644
--- a/src/phasicFlow/streams/dataIO/dataIO.hpp
+++ b/src/phasicFlow/streams/dataIO/dataIO.hpp
@@ -7,6 +7,10 @@
 #include "types.hpp"
 #include "span.hpp"
 #include "IOPattern.hpp"
+#include "iOstream.hpp"
+#include "iIstream.hpp"
+#include "virtualConstructor.hpp"
+
 
 namespace pFlow
 {
@@ -24,14 +28,124 @@ public:
 	
 protected:
 
-	IOPattern ioPattern_;
+	IOPattern 	ioPattern_;
 
-	uint64 lastPosWrite_ = 0;
+	word 		executionMode_;
 
-	uint64 lastPosRead_  = 0;
+	span<char> 			buffer_;
 
+	template<typename T>
+	span<char> createSpan( span<T> sp )
+	{
+		return span<char>( reinterpret_cast<char*>(sp.data()), sp.size()*sizeof(T) );
+	}
+
+public:
+
+	/// Type info
+	TypeInfo("dataIO");
+
+	dataIO(IOPattern::IOType iotype, word exeMode)
+	:
+	ioPattern_(iotype),
+	executionMode_(exeMode)
+	{}
+
+
+	dataIO(const dataIO&) = default;
+
+	dataIO(dataIO &&) = default;
+
+	dataIO& operator = (const dataIO&) = default;
+
+	dataIO& operator = (dataIO&&) = default;
+
+	virtual ~dataIO() = default;
+
+	create_vCtor
+	(
+		dataIO,
+		word,
+		(
+			IOPattern::IOType iotype, 
+			word exeMode
+		),
+		(iotype, exeMode)
+	);
+
+	/// Gather data from all processors and put the results in 
+	/// buffer_
+	virtual bool gatherData(span<char> sp ) = 0;
+
+	/// Write data to the end of file from all processors.
+	/// This method should be called from all processors. 
+	template<typename T>
+	bool writeData(iOstream& os, span<T> data);
+
+	template<typename T>
+	bool readData(iIstream& is, std::vector<T>& data);
+
+	template<typename T>
+	bool readAscii(
+		iIstream& is,
+		std::vector<T>& vec	);
+
+	static
+	uniquePtr<dataIO> create(IOPattern::IOType iotype, word exeMode);
+
+
+};
 	
-	bool writeDataToFileEndSTD(
+
+template<>
+inline 
+bool dataIO::writeData<word>(iOstream& os, span<word> data)
+{
+	/*std::ostringstream ist();
+
+	for(auto i=0; i<data.size(); i++)
+	{
+		ist<< data[i]<<std::endl;
+	}
+
+	span<char> sp(ist.str().data(), ist.str().size());
+
+	if(!gatherData( sp) )
+	{
+		fatalErrorInFunction<<
+		"Error in gathering data for out stream "<< os.name()<<endl;
+		return false;
+	}
+
+	uint64 len = buffer_.size();
+	os<< len << endl;
+
+	if(!os.write(buffer_.data(), buffer_.size()))
+	{
+		fatalErrorInFunction<<
+    	"error in writing binary data to "<<os.name()<<endl;
+    	return false;
+	}*/
+
+	if( !data.writeASCII(os) )
+    {
+    	fatalErrorInFunction<<
+    	"error in writing ASCII data to "<<os.name()<<endl;
+    	return false;
+    }
+
+	return true;
+}
+
+}
+
+#include "dataIOTemplate.cpp"
+
+#endif
+
+
+
+/*bool writeDataToFileEndSTD(
 		const word& wordPath, 
 		const span<unsigned char>& data);
 
@@ -143,14 +257,4 @@ bool pFlow::dataIO::readData<pFlow::word>(
 		return false;
 	}
 	return true;
-}
-
-
-}
-
-#include "dataIOTemplate.cpp"
-
-#endif
-
-
-
+}*/
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIONoMPI.cpp b/src/phasicFlow/streams/dataIO/dataIONoMPI.cpp
new file mode 100644
index 00000000..a2dfd6be
--- /dev/null
+++ b/src/phasicFlow/streams/dataIO/dataIONoMPI.cpp
@@ -0,0 +1,20 @@
+
+#include "dataIONoMPI.hpp"
+
+
+pFlow::dataIONoMPI::dataIONoMPI
+(
+	IOPattern::IOType iotype,
+	word exeMode
+)
+:
+	dataIO(iotype, exeMode)
+{}
+
+
+bool pFlow::dataIONoMPI::gatherData( span<char> sp )
+{
+	/// in serial mode, no gathering is required. 
+	buffer_ = sp;
+	return true;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIONoMPI.hpp b/src/phasicFlow/streams/dataIO/dataIONoMPI.hpp
new file mode 100644
index 00000000..64878fe2
--- /dev/null
+++ b/src/phasicFlow/streams/dataIO/dataIONoMPI.hpp
@@ -0,0 +1,48 @@
+#ifndef __datIONoMPI_hpp__
+#define __datIONoMPI_hpp__
+
+#include "dataIO.hpp"
+
+namespace pFlow
+{
+
+
+class dataIONoMPI
+:
+	public dataIO
+{
+protected:
+
+public:
+
+	TypeInfo("dataIO<NoMPI>");
+
+	dataIONoMPI(IOPattern::IOType iotype, word exeMode);
+
+	dataIONoMPI(const dataIONoMPI&) = default;
+
+	dataIONoMPI(dataIONoMPI&&) = default;
+
+
+	dataIONoMPI& operator=(const dataIONoMPI&) = default;
+
+	dataIONoMPI& operator=(dataIONoMPI&&) = default;
+
+	~dataIONoMPI() = default;
+
+	add_vCtor
+	(
+		dataIO,
+		dataIONoMPI,
+		word
+	);
+
+	bool gatherData(span<char> sp ) override;
+	
+};
+
+
+}
+
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
index 54b1452f..a485d2b1 100644
--- a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
+++ b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
@@ -1,4 +1,175 @@
+
 template<typename T>
+bool pFlow::dataIO::writeData(iOstream& os, span<T> data)
+{
+	/// first gather data from all processors (if any)
+	if(!gatherData( createSpan(data) ) )
+	{
+		fatalErrorInFunction<<
+		"Error in gathering data for out stream "<< os.name()<<endl;
+		return false;
+	}
+
+	if( ioPattern_.thisProcWriteData())
+	{
+		if( os.isBinary() )
+		{
+			// first write the size of data 		    
+			uint64 len = buffer_.size()/sizeof(T);
+			os<< len << endl;
+
+			if(!os.write(buffer_.data(), buffer_.size()))
+			{
+				fatalErrorInFunction<<
+		    	"error in writing binary data to "<<os.name()<<endl;
+		    	return false;
+			}
+
+		}
+		else
+		{
+
+			/// cast the data into T
+			span<T> allData( 
+				reinterpret_cast<T*>(buffer_.data()), 
+				buffer_.size()/sizeof(T));
+		    
+		    if( !allData.writeASCII(os) )
+		    {
+		    	fatalErrorInFunction<<
+		    	"error in writing ASCII data to "<<os.name()<<endl;
+		    	return false;
+		    }
+		}
+
+		return os.check(FUNCTION_NAME);
+	}
+	else
+	{
+		return true;
+	}
+}
+
+template<typename T>
+bool pFlow::dataIO::readData
+(
+	iIstream& is, 
+	std::vector<T>& data
+)
+{
+	
+	data.clear();
+
+	if(ioPattern_.thisProcReadData())
+	{
+		if(is.isBinary())
+		{
+			// read length of data 			
+			token firstToken(is);
+			
+			size_t len = 0;
+			if( firstToken.isInt64())
+			{
+				len = firstToken.int64Token();
+				data.resize(len);	
+			}
+			else
+			{
+				fatalErrorInFunction<<
+				"expected length of vector in the stream "<<is.name()<<
+				"but found this "<< firstToken<<endl;
+				return false;
+			}
+
+			is.read(reinterpret_cast<char*>(data.data()), len*sizeof(T));	
+			
+			return is.check(FUNCTION_NAME);
+		}
+		else
+		{
+			
+			return readAscii(is, data);
+		}
+	}
+	else
+	{
+		return true;
+	}
+}
+
+template<typename T>
+bool pFlow::dataIO::readAscii
+(
+	iIstream& is,
+	std::vector<T>& vec
+)
+{
+
+	if( !ioPattern_.thisProcReadData() ) return true;
+	
+
+	is.fatalCheck(FUNCTION_NAME);
+
+	vec.clear();
+	
+	token firstToken(is);
+
+	size_t len = 0;
+	if( firstToken.isInt64())
+	{
+		len = firstToken.int64Token();
+		vec.reserve(len);
+		firstToken  = token(is);
+	}
+
+	T val{};
+	if( firstToken.isPunctuation() ) // start of vector 
+	{
+		if(firstToken != token::BEGIN_LIST)
+		{
+			warningInFunction
+			<< "expected token "<< token::BEGIN_LIST 
+			<< " but found "<< firstToken ;
+			return false;
+
+		}
+
+		token lastToken(is);
+		
+		is.fatalCheck(FUNCTION_NAME);
+		
+		while(!(lastToken.isPunctuation()
+             	&& lastToken == token::END_LIST ))
+		{
+
+			is.putBack(lastToken);
+			
+			is >> val;
+			vec.push_back(val);
+			
+			is >> lastToken;
+			is.fatalCheck(FUNCTION_NAME);
+		}
+
+	} else
+	{
+		warningInFunction
+		<< "expected token "<< token::BEGIN_LIST 
+		<< " but found "<< firstToken<<endl; ;
+		return false;
+	}
+	
+	if(len>0&& len != vec.size())
+	{
+		warningInFunction<<"vector lendth specified "<< len << 
+		" is different from number of elements "<< vec.size()<<endl;
+		return false;
+	}
+
+	return true;
+}
+
+/*template<typename T>
 bool pFlow::dataIO::writeDataEnd(
 	const word& wordPath,
 	const span<T>& data)
@@ -314,7 +485,7 @@ bool pFlow::dataIO::writeData
 	}
 	return true; 
 
-}
+}*/
 
 
 
diff --git a/src/phasicFlow/streams/iStream/iOstream.hpp b/src/phasicFlow/streams/iStream/iOstream.hpp
index ceaa2edd..11b73674 100644
--- a/src/phasicFlow/streams/iStream/iOstream.hpp
+++ b/src/phasicFlow/streams/iStream/iOstream.hpp
@@ -36,6 +36,13 @@ const inline char* whiteColor   = "\033[37m";
 
 const inline char* boldChar     = "\033[1m";
 
+#define Red_Text(text)      redColor<<text<<defaultColor
+#define Yellow_Text(text)   yellowColor<<text<<defaultColor
+#define Blue_Text(text)     blueColor<<text<<defaultColor
+#define Green_Text(text)    greenColor<<text<<defaultColor
+#define Magenta_Text(text)  magentaColor<<text<<defaultColor
+#define Cyan_Text(text)         cyanColor<<text<<defaultColor
+#define Bold_Text(text)         boldChar<<text<<defaultColor
 
 namespace pFlow
 {
diff --git a/src/phasicFlow/streams/streams.hpp b/src/phasicFlow/streams/streams.hpp
index c4808d1b..683bba58 100755
--- a/src/phasicFlow/streams/streams.hpp
+++ b/src/phasicFlow/streams/streams.hpp
@@ -32,13 +32,6 @@ namespace pFlow
 
 }
 
-#define Red_Text(text)     	redColor<<text<<defaultColor
-#define Yellow_Text(text)  	yellowColor<<text<<defaultColor
-#define Blue_Text(text)    	blueColor<<text<<defaultColor
-#define Green_Text(text)   	greenColor<<text<<defaultColor
-#define Magenta_Text(text) 	magentaColor<<text<<defaultColor
-#define Cyan_Text(text) 		cyanColor<<text<<defaultColor
-#define Bold_Text(text) 		boldChar<<text<<defaultColor
 
 #define INFORMATION pFlow::mOutput<<boldChar<<magentaColor<<"> INFO: "<<defaultColor<<magentaColor
 #define END_INFO defaultColor<<pFlow::endl
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
new file mode 100644
index 00000000..f2f1eeb9
--- /dev/null
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
@@ -0,0 +1,23 @@
+
+
+
+#include "boundaryBase.hpp"
+
+
+pFlow::boundaryBase::boundaryBase
+(
+	const plane& 		bplane,
+	uint32 				mirrorProc, 
+	const word& 		name,
+	const word& 		type,
+	internalPoints& 	internal
+)
+:
+boundaryPlane_(bplane),
+name_(name),
+type_(type),
+mirrorProcessoNo_(mirrorProc),
+internal_(internal)
+{
+	
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
new file mode 100644
index 00000000..709eb413
--- /dev/null
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
@@ -0,0 +1,74 @@
+
+#ifndef __boundaryBase_hpp__
+#define __boundaryBase_hpp__
+
+
+#include "VectorSingles.hpp"
+#include "plane.hpp"
+
+
+
+namespace pFlow
+{
+
+// forward 
+
+class internalPoints;
+
+class boundaryBase
+{
+public:
+
+	enum DIRECTION: int8
+	{
+		
+	};
+
+protected:
+
+	plane 		boundaryPlane_;
+
+	word 		name_;
+
+	word 		type_;
+
+	uint32 		mirrorProcessoNo_;
+
+	/// list of particles indices on device 
+	uint32Vector_D 	indexList_;
+
+	/// a reference to 
+	internalPoints& internal_;
+
+public:
+
+	TypeInfo("boundaryBase");
+
+	boundaryBase(
+		const plane& 		bplane,
+		uint32 				mirrorProc, 
+		const word& 		name,
+		const word& 		type,
+		internalPoints& 	internal);
+
+	boundaryBase(const boundaryBase&) = default;
+
+	boundaryBase& operator=(const boundaryBase&) = default;
+
+	boundaryBase(boundaryBase&&) = delete;
+
+	boundaryBase& operator=(boundaryBase&&) = delete;
+
+	virtual ~boundaryBase() = default;
+
+	virtual bool update() = 0 ;
+
+	virtual bool iterate(uint32 iterNum, real t) = 0;
+
+	
+};
+
+}
+
+
+#endif //__boundaryBase_hpp__
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/scatterFieldAccess.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/scatterFieldAccess.hpp
new file mode 100644
index 00000000..b67ceb34
--- /dev/null
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/scatterFieldAccess.hpp
@@ -0,0 +1,89 @@
+
+#ifndef __scatterFieldAccess_hpp__
+#define __scatterFieldAccess_hpp__
+
+
+#include "phasicFlowKokkos.hpp"
+
+namespace pFlow
+{
+
+
+template<typename T, typename ExecutionSpace>
+class scatterFieldAccess
+{
+public:
+	
+	using execution_space 	= ExecutionSpace;
+
+	using memory_space 		= typename execution_space::memory_space;
+
+protected:
+
+	uint32 								size_ = 0;
+
+	ViewType1D<uint32, memory_space> 	indices_;
+
+	ViewType1D<T, memory_space> 		fieldVals_;
+
+public:
+
+	scatterFieldAccess(
+		uint32 	sz
+		ViewType1D<uint32, memory_space> ind,
+		ViewType1D<T, memory_space> fVals)
+	:
+		size_(sz),
+		indices_(ind),
+		fieldVals_(fVals)
+	{}
+
+	scatterFieldAccess(const scatterFieldAccess&) = default;
+
+	scatterFieldAccess(scatterFieldAccess&&) = default;
+
+	scatterFieldAccess& operator=(const scatterFieldAccess&) = default;
+
+	scatterFieldAccess& operator=(scatterFieldAccess&&) = default;
+
+	~scatterFieldAccess() = default;
+
+	// - Methods
+
+	T& operator()(uint32 i)
+	{
+		return fieldVals_(indices_(i));
+	}
+
+	const T& operator()(uint32 i)const
+	{
+		return fieldVals_(indices_(i));
+	}
+
+	T& operator[](uint32 i)
+	{
+		return fieldVals_(indices_(i));
+	}
+
+	const T& operator[](uint32 i)const
+	{
+		return fieldVals_(indices_(i));
+	}
+
+	uint32 	size()const
+	{
+		return size_;
+	}
+
+	bool empty()const
+	{
+		return size_ == 0;
+	}
+
+};
+
+}
+
+
+#endif //__scatterFieldAccess_hpp__
+
diff --git a/src/phasicFlow/structuredData/box/box.hpp b/src/phasicFlow/structuredData/box/box.hpp
index 428e0534..5ad65de9 100644
--- a/src/phasicFlow/structuredData/box/box.hpp
+++ b/src/phasicFlow/structuredData/box/box.hpp
@@ -62,18 +62,19 @@ public:
 		FUNCTION_H
 		box(iIstream& is);
 
-		FUNCTION_HD
+		INLINE_FUNCTION_HD
 		box(const box&) = default;
 
-		FUNCTION_HD
+		INLINE_FUNCTION_HD
 		box(box&&) = default;
 
-		FUNCTION_HD
+		INLINE_FUNCTION_HD
 		box& operator=(const box&) = default;
 
-		FUNCTION_HD
+		INLINE_FUNCTION_HD
 		box& operator=(box&&) = default;
 
+		INLINE_FUNCTION_HD
 		~box()=default;
 
 	//// - Methods 
@@ -85,13 +86,13 @@ public:
 		}
 
 		INLINE_FUNCTION_HD
-		realx3 minPoint()const
+		const realx3& minPoint()const
 		{
 			return min_;
 		}
 
 		INLINE_FUNCTION_HD
-		realx3 maxPoint()const
+		const realx3& maxPoint()const
 		{
 			return max_;
 		}
diff --git a/src/phasicFlow/structuredData/domain/domain.cpp b/src/phasicFlow/structuredData/domain/domain.cpp
new file mode 100644
index 00000000..8a6b9939
--- /dev/null
+++ b/src/phasicFlow/structuredData/domain/domain.cpp
@@ -0,0 +1,59 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "domain.hpp"
+
+FUNCTION_H 
+pFlow::domain::domain(const box& db)
+:
+	domainBox_(db),
+	left_(
+		db.minPoint(),
+		realx3(db.minPoint().x(), db.maxPoint().y(), db.minPoint().z()),
+		realx3(db.minPoint().x(), db.maxPoint().y(), db.maxPoint().z()),
+		realx3(db.minPoint().x(), db.minPoint().y(), db.maxPoint().z())),
+	right_(
+		db.maxPoint(),
+		realx3(db.maxPoint().x(), db.maxPoint().y(), db.minPoint().z()),
+		realx3(db.maxPoint().x(), db.minPoint().y(), db.minPoint().z()),
+		realx3(db.maxPoint().x(), db.minPoint().y(), db.maxPoint().z())),
+	bottom_(
+		db.minPoint(),
+		realx3(db.minPoint().x(), db.minPoint().y(), db.maxPoint().z()),
+		realx3(db.maxPoint().x(), db.minPoint().y(), db.maxPoint().z()),
+		realx3(db.maxPoint().x(), db.minPoint().y(), db.minPoint().z())),
+	top_(
+		db.maxPoint(),
+		realx3(db.minPoint().x(), db.maxPoint().y(), db.maxPoint().z()),
+		realx3(db.minPoint().x(), db.maxPoint().y(), db.minPoint().z()),
+		realx3(db.maxPoint().x(), db.maxPoint().y(), db.minPoint().z())),
+	rear_(
+		db.minPoint(),
+		realx3(db.maxPoint().x(), db.minPoint().y(), db.minPoint().z()),
+		realx3(db.maxPoint().x(), db.maxPoint().y(), db.minPoint().z()),
+		realx3(db.minPoint().x(), db.maxPoint().y(), db.minPoint().z())),
+	front_(
+		db.maxPoint(),
+		realx3(db.maxPoint().x(), db.minPoint().y(), db.maxPoint().z()),
+		realx3(db.minPoint().x(), db.minPoint().y(), db.maxPoint().z()),
+		realx3(db.minPoint().x(), db.maxPoint().y(), db.maxPoint().z()))
+{
+
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/domain/domain.hpp b/src/phasicFlow/structuredData/domain/domain.hpp
new file mode 100644
index 00000000..220eda2f
--- /dev/null
+++ b/src/phasicFlow/structuredData/domain/domain.hpp
@@ -0,0 +1,163 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __domain_hpp__
+#define __domain_hpp__
+
+
+#include "box.hpp"
+#include "plane.hpp"
+
+namespace pFlow
+{
+
+class domain
+{
+protected:
+	
+	box 		domainBox_;
+
+	/// -x
+	plane 		left_;
+
+	/// +x
+	plane 		right_;
+
+	/// -y
+	plane 		bottom_;
+
+	/// +y
+	plane		top_;
+
+	/// -z
+	plane 		rear_;
+
+	/// +z
+	plane 		front_;
+
+
+public:
+
+	// - type info
+	TypeInfoNV("domain");
+
+	//// - Constructors 
+		INLINE_FUNCTION_HD 
+		domain(){}
+
+		FUNCTION_H 
+		domain(const box& db);
+		
+		INLINE_FUNCTION_HD
+		domain(const domain&) = default;
+
+		INLINE_FUNCTION_HD
+		domain(domain&&) = default;
+
+		INLINE_FUNCTION_HD
+		domain& operator=(const domain&) = default;
+
+		INLINE_FUNCTION_HD
+		domain& operator=(domain&&) = default;
+
+		INLINE_FUNCTION_HD
+		~domain()=default;
+
+	//// - Methods 
+
+		INLINE_FUNCTION_HD
+		const auto& domainBox()const
+		{
+			return domainBox_;
+		}
+
+		INLINE_FUNCTION_HD
+		const auto& left()const
+		{
+			return left_;
+		}
+
+		INLINE_FUNCTION_HD
+		const auto& right()const
+		{
+			return right_;
+		}
+
+		INLINE_FUNCTION_HD
+		const auto& bottom()const
+		{
+			return bottom_;
+		}
+
+		INLINE_FUNCTION_HD
+		const auto& top()const
+		{
+			return top_;
+		}
+
+		INLINE_FUNCTION_HD
+		const auto& rear()const
+		{
+			return rear_;
+		}
+
+		INLINE_FUNCTION_HD
+		const auto& front()const
+		{
+			return front_;
+		}
+
+	
+}; // domain
+
+INLINE_FUNCTION_HD
+bool equal(const domain& d1, const domain& d2)
+{
+	return equal(d1.domainBox(), d2.domainBox());
+}
+
+INLINE_FUNCTION_HD
+bool equal(const domain& d1, const domain& d2, real tol)
+{
+	return equal(d1.domainBox(), d2.domainBox(), tol);
+}
+
+INLINE_FUNCTION_HD
+bool operator ==(const domain& d1, const domain& d2)
+{
+	return equal(d1, d2);
+}
+
+/*FUNCTION_H
+iIstream& operator >>(iIstream& is, box& b);
+
+FUNCTION_H
+iOstream& operator << (iOstream& os, const box& b);
+
+INLINE_FUNCTION_HD
+box extendBox(const box& b, const realx3& dl)
+{
+	return box(b.minPoint()-dl , b.maxPoint()+dl);
+}*/
+
+}
+
+
+#endif
diff --git a/src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp b/src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp
index 3140915c..14aea880 100644
--- a/src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp
+++ b/src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp
@@ -103,6 +103,21 @@ public:
 			return pointFromPlane(p)>=0;
 		}
 
+		INLINE_FUNCTION_HD
+		bool inPositiveDistance(const realx3& p, real dist)const
+		{	
+			real d = pointFromPlane(p);
+			return d >= 0.0 && d <= dist;
+		}
+
+		INLINE_FUNCTION_HD
+		bool inNegativeDistance(const realx3& p, real dist)const
+		{	
+			real d = pointFromPlane(p);
+			return d < 0.0 && d <= -dist;
+		}
+
+
 		INLINE_FUNCTION_HD
 		bool pointInNegativeSide(const realx3& p)const
 		{
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
new file mode 100644
index 00000000..d551a7ea
--- /dev/null
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
@@ -0,0 +1,250 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#include "internalPoints.hpp"
+
+
+void pFlow::internalPoints::syncPFlag()const
+{
+	if(!pFlagSync_)
+	{
+		pFlagsH_ = pFlagsD_.clone<DefaultHostExecutionSpace>();
+		pFlagSync_ = true;
+	}
+}
+
+/*#include "setFieldList.hpp"
+#include "error.hpp"
+#include "iOstream.hpp"
+
+#include "mortonIndexing.hpp"*/
+
+/*FUNCTION_H
+bool pFlow::internalPoints::evaluateinternalPoints()
+{
+	if(pointFlag_.size() != pointPosition_.size())
+	{
+		fatalErrorInFunction<<
+		"number of elements in pointFlag and pointPosition is not equal \n";
+		return false;
+	}
+
+	setNumMaxPoints();
+
+	int32 minActive, maxActive;
+	numActivePoints_ = pFlow::internalPointsKernels::scanPointFlag(
+		0,
+		numPoints_,
+		static_cast<int8>(internalPoints::ACTIVE),
+		pointFlag_.deviceVectorAll(),
+		minActive,
+		maxActive
+		);
+	
+	activeRange_ = {minActive, maxActive};	
+	
+	return true;
+}
+
+FUNCTION_H
+void pFlow::internalPoints::setNumMaxPoints()
+{
+	maxPoints_ = pointFlag_.capacity();
+	numPoints_ = pointFlag_.size();
+}
+
+FUNCTION_H
+pFlow::realx3Field_D& pFlow::internalPoints::pointPosition()
+{
+	return pointPosition_;
+}
+
+FUNCTION_H
+pFlow::int8Field_HD& pFlow::internalPoints::pointFlag()
+{
+	return pointFlag_;
+}
+		
+pFlow::uniquePtr<pFlow::int32IndexContainer> 
+	pFlow::internalPoints::getNewPointsIndices(int32 numNewPoints)const
+{
+
+
+	if( capacity() - activeRange_.second >=  numNewPoints )
+	{
+		// fill the sequence starting from activeRange_.second-1
+		return makeUnique<int32IndexContainer>(
+			activeRange_.second,
+			activeRange_.second+numNewPoints);
+
+	}
+
+	// second, check if there is space at the beginning
+	if( activeRange_.first >= numNewPoints)
+	{
+		return makeUnique<int32IndexContainer>(
+			0,
+			numNewPoints);	
+	}
+
+	// otherwise scan the points from first to the end to find empty spaces 
+	int32Vector newPoints(
+		numNewPoints,
+		RESERVE());
+
+	newPoints.clear();
+	int32 numAdded = 0;
+	ForAll(i, pointFlag_)
+	{
+		if(!isActive(i))
+		{
+			newPoints.push_back(static_cast<int32>(i));
+			numAdded++;
+		}
+
+		if(numAdded == numNewPoints)
+		{
+			return makeUnique<int32IndexContainer>(
+				newPoints.data(),
+				numNewPoints);
+		}
+	}
+
+	// check if there is space at the end for the remaining of points
+	if( numAdded <numNewPoints && capacity() - size() >= numNewPoints - numAdded )
+	{
+		int32 ind = size();
+		for(int32 i=numAdded; i<numNewPoints; i++)
+		{
+			newPoints.push_back(ind);
+			ind++;
+		}
+		
+		return makeUnique<int32IndexContainer>(
+			newPoints.data(),
+			numNewPoints);
+	}
+	else
+	{
+		fatalErrorInFunction<<"not enough capacity for inserting particles into the point structure\n";
+		return nullptr;
+	}
+
+	return nullptr;
+}*/
+
+pFlow::internalPoints::internalPoints()
+:
+	pointPosition_("internalPoints", "internalPoints", initialCapacity_, 0, RESERVE()),
+	pFlagsD_(initialCapacity_, 0 , 0)
+{
+	syncPFlag();
+}
+
+
+pFlow::internalPoints::internalPoints
+(
+	const std::vector<realx3>& posVec
+)
+:
+	pointPosition_("internalPoints", "internalPoints", posVec.capacity(), 0, RESERVE()),
+	pFlagsD_(posVec.capacity(), 0, posVec.size())
+{
+
+	pointPosition_.assign(posVec);
+
+	syncPFlag();
+
+}
+
+
+const pFlow::internalPoints::pFlagTypeDevice& 
+	pFlow::internalPoints::activePointsMaskD() const 
+{
+	return pFlagsD_;
+}
+
+
+const pFlow::internalPoints::pFlagTypeHost&
+	pFlow::internalPoints::activePointsMaskH() const
+{
+	syncPFlag();
+	return pFlagsH_;
+}
+
+FUNCTION_H
+void pFlow::internalPoints::updateFlag
+(
+	const domain& dm, 
+	real dist
+)
+{
+	pFlagsD_.markDeleteInDomain
+	(
+		dm,
+		pointPosition_.deviceVectorAll(),
+		dist
+	);
+}
+
+
+FUNCTION_H
+bool pFlow::internalPoints::read
+(
+	iIstream& is, 
+	IOPattern::IOType iotype
+)
+{
+	
+	if( !pointPosition_.read(is, iotype))
+	{
+		fatalErrorInFunction<<
+		"Error in reading pointPosition from stream "<< is.name()<<endl;
+		return false;
+	}
+
+	pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
+	pFlagSync_ = false;
+	syncPFlag();
+
+	return true;
+}
+		
+
+
+FUNCTION_H
+bool pFlow::internalPoints::write
+(
+	iOstream& os, 
+	IOPattern::IOType iotype
+)const
+{
+	if( pFlagsD_.isAllActive())
+	{
+		return pointPosition_.write(os, iotype);
+	}
+	else
+	{
+		return pointPosition_.write(os, iotype, activePointsMaskH());
+	}
+}
+
+
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
new file mode 100644
index 00000000..cec42337
--- /dev/null
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
@@ -0,0 +1,332 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#ifndef __internalPoints_hpp__
+#define __internalPoints_hpp__
+
+#include "Fields.hpp"
+#include "pointFlag.hpp"
+
+
+//#include "indexContainer.hpp"
+
+
+
+namespace pFlow
+{
+
+//forward
+/*class box;
+class setFieldList;
+class repository;*/
+
+class internalPoints
+
+{
+public:
+	
+	inline static const uint32 initialCapacity_ = 10000;
+
+	using pointsType 		= realx3Field_D;
+
+	using device_type 		= typename pointsType::deviceType;
+
+	using memory_space 		= typename pointsType::memorySpace;
+
+	using execution_space 	= typename pointsType::executionSpace;
+
+	using pFlagTypeDevice 	= pointFlag<execution_space>;
+
+	using pFlagTypeHost 	= pointFlag<DefaultHostExecutionSpace>;
+
+
+protected:
+
+	//// - data members
+
+		// position of points on device
+		realx3Field_D 			pointPosition_;
+
+		// flag of points on device
+		mutable pFlagTypeDevice 		pFlagsD_;
+
+		mutable pFlagTypeHost 			pFlagsH_;
+
+		mutable bool 					pFlagSync_ = false;
+	
+
+	void syncPFlag()const;
+
+public:
+
+	friend class dynamicinternalPoints;
+	
+	// - type info
+	TypeInfo("internalPoints");
+	
+
+	//// - Constructors 
+
+		// - an empty internalPoints, good for reading from file 
+		internalPoints();
+
+		/// Construct from components
+		//internalPoints(const int8Vector& flgVec, const realx3Vector& posVec);
+
+		/// Construct from point positions, assume all points are active
+		internalPoints(const std::vector<realx3>& posVec);
+
+		/// Copy construct
+		internalPoints(const internalPoints&) = default;
+
+		/// Move construct 
+		internalPoints(internalPoints&&) = default;
+
+		/// Copy assignment 
+		internalPoints& operator=(const internalPoints&) = default;
+
+		/// Move assignment 
+		internalPoints& operator=(internalPoints&&) = delete;
+
+		/// Destructor 
+		virtual ~internalPoints() = default;
+
+
+	//// - Methods
+		FUNCTION_H
+		const pFlagTypeDevice& activePointsMaskD()const;
+
+
+		FUNCTION_H
+		const pFlagTypeHost& 	activePointsMaskH()const;
+
+		// - Const access pointPosition
+		FUNCTION_H
+		const realx3Field_D& pointPosition()const;
+		
+		
+
+		/*INLINE_FUNCTION_H
+		auto pointPositionHostAll()
+		{
+			return pointPosition_.hostVectorAll();
+		}*/
+
+		// - size of data structure
+		INLINE_FUNCTION_H
+		uint32 size()const
+		{
+			return pointPosition_.size();
+		}
+		
+		// - maximum capacity of data structure 
+		INLINE_FUNCTION_H
+		uint32 capacity()const
+		{
+			return pointPosition_.capacity();
+		}
+		
+		// - number of active points 
+		INLINE_FUNCTION_H
+		uint32 numActive() const
+		{
+			return pFlagsD_.numActive();
+		}
+				
+		// - if all points are active 
+		INLINE_FUNCTION_H
+		bool isAllActive()const
+		{
+			return pFlagsD_.isAllActive();
+		}
+
+		INLINE_FUNCTION_H
+		auto activeRange()const
+		{
+			return pFlagsD_.activeRange();
+		}
+
+		
+		FUNCTION_H
+		void updateFlag(const domain& dm, real dist);
+
+		/*FUNCTION_H
+		size_t markDeleteOutOfBox(const box& domain);*/
+
+		
+		///////////////////////////////////////////////////////////////////////////////////////////////////
+		
+		// - const access to points to be newly inserted
+		/*FUNCTION_H 
+		auto insertedPointIndex()const
+		{
+			return tobeInsertedIndex_;
+		}
+
+		FUNCTION_H 
+		auto insertedPointIndexH()const
+		{
+			return tobeInsertedIndex_.hostView();
+		}
+
+		FUNCTION_H 
+		auto insertedPointIndexD()const
+		{
+			return tobeInsertedIndex_.deviceView();
+		}
+
+
+		FUNCTION_H
+		auto mortonSortedIndex()const
+		{
+			return mortonSortedIndex_;
+		}
+
+
+		// - update data structure by inserting/setting new points 
+		//   Notifies all the fields in the registered list of data structure
+		//   and exclude the fields that re in the exclusionList
+		//   retrun nullptr if it fails 
+		/*FUNCTION_H
+		virtual uniquePtr<int32IndexContainer> insertPoints(
+			const realx3Vector& pos,
+			const setFieldList& setField,
+			repository& owner,
+			const List<eventObserver*>& exclusionList={nullptr}
+		);*/
+
+	
+	//// - IO operations 
+		
+		/// Read 
+		FUNCTION_H
+		bool read(iIstream& is, IOPattern::IOType iotype);
+		
+
+		/// Write 
+		FUNCTION_H
+		bool write(iOstream& os, IOPattern::IOType iotype)const;	
+
+};
+
+iOstream& operator<<(iOstream& os, const internalPoints& ip)
+{
+	if( !ip.write(os, IOPattern::AllProcessorsDifferent) )
+	{
+		ioErrorInFile(os.name(), os.lineNumber());
+		fatalExit;
+	}
+
+	return os;
+}
+
+} // pFlow
+
+
+
+
+#endif //__internalPoints_hpp__
+
+
+/*class activePointsDevice
+	{
+	protected:
+		ViewType1D<int8> 	flag_;
+
+		bool allActive_;
+
+		range activeRange_;
+
+	public:
+
+		INLINE_FUNCTION_H
+		activePointsDevice(bool allActive, range active, const ViewType1D<int8>& flag)
+		:
+			flag_(flag),
+			allActive_(allActive),
+			activeRange_(active)
+		{}
+
+		INLINE_FUNCTION_HD
+		activePointsDevice(const activePointsDevice&) = default;
+
+		INLINE_FUNCTION_HD
+		activePointsDevice& operator=(const activePointsDevice&) = default;
+
+		INLINE_FUNCTION_HD
+		bool operator()(int32 i)const {
+			if(i<activeRange_.second && flag_[i] == 1)return true;
+			return false;
+		}
+
+		INLINE_FUNCTION_HD
+		auto activeRange()const {
+			return activeRange_; 
+		}
+
+		INLINE_FUNCTION_HD
+		auto allActive()const {
+			return allActive_;
+		}
+
+	};
+
+	class activePointsHost
+	{
+	protected:
+		
+		ViewType1D<int8, HostSpace> 	flag_;
+
+		bool allActive_;
+
+		range activeRange_;
+
+	public:
+
+		INLINE_FUNCTION_H
+		activePointsHost(bool allActive, range active, const ViewType1D<int8, HostSpace>& flag)
+		:
+			flag_(flag),
+			allActive_(allActive),
+			activeRange_(active){}
+
+		INLINE_FUNCTION_H
+		activePointsHost(const activePointsHost&) = default;
+
+		INLINE_FUNCTION_H
+		activePointsHost& operator=(const activePointsHost&) = default;
+
+		INLINE_FUNCTION_H
+		bool operator()(int32 i)const {
+			if(i <activeRange_.second && flag_[i] == PointFlag::ACTIVE)return true;
+			return false;
+		}
+
+		INLINE_FUNCTION_H
+		auto activeRange()const{
+			return activeRange_;
+		}
+
+		INLINE_FUNCTION_H
+		bool allActive()const {
+			return allActive_;
+		}
+	};*/
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
new file mode 100644
index 00000000..974a2866
--- /dev/null
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
@@ -0,0 +1,279 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __pointFlag_hpp__
+#define __pointFlag_hpp__
+
+
+#include "phasicFlowKokkos.hpp"
+#include "domain.hpp"
+
+
+
+namespace pFlow
+{
+
+
+template<typename ExecutionSpace>
+class pointFlag
+{
+	enum Flag: uint8
+	{
+		DELETED 	= 1, 	//10000000
+		INTERNAL 	= 2,	//00000001
+		LEFT 		= 4,	//00000010
+		RIGHT 		= 8,    //00000100
+		BOTTOM 		= 16,	//00001000
+		TOP 		= 32,	//00010000
+		REAR 		= 64, 	//00100000
+		FRONT 		= 128	//01000000
+	};
+
+	using execution_space 	= ExecutionSpace;
+
+	using memory_space 		= typename execution_space::memory_space;
+
+	using viewType 			= ViewType1D<uint8, memory_space>;
+
+	using device_type 		= typename viewType::device_type;
+
+protected:
+	
+	viewType 	flags_;
+
+	uint32 		numActive_ 		= 0;
+
+	rangeU32 	activeRange_ 	= {0,0};
+
+	bool 			isAllActive_	= false;
+
+	uint32 		nLeft_ 	= 0;
+
+	uint32 		nRight_ = 0;
+
+	uint32 		nBottom_= 0;
+
+	uint32 		nTop_ 	= 0;
+
+	uint32 		nRear_ 	= 0;
+
+	uint32 		nFront_ = 0;
+
+	//- Protected methods 
+
+	
+
+public:
+
+	friend class internalPoints;
+
+	pointFlag()
+	{}
+
+	pointFlag(uint32 capacity, uint32 start, uint32 end )
+	:
+		flags_("pointFlag", capacity ),
+		numActive_(end-start),
+		activeRange_(start, end),
+		isAllActive_(true)
+	{
+		fill(flags_, 0, capacity, static_cast<uint8>(Flag::DELETED));
+		fill(flags_, activeRange_, static_cast<uint8>(Flag::INTERNAL));
+	}
+
+	pointFlag(
+		viewType 	flags,
+		uint32 		numActive,
+		rangeU32 	activeRange,
+		bool 		isAllActive)
+	:
+		flags_(flags),
+		numActive_(numActive),
+		activeRange_(activeRange),
+		isAllActive_(isAllActive)
+	{}
+
+	pointFlag(const pointFlag&) = default;
+
+	pointFlag& operator=(const pointFlag&) = default;
+
+	pointFlag(pointFlag&&) = default;
+
+	pointFlag& operator=(pointFlag&&) = default;
+
+	~pointFlag() = default;	
+
+	INLINE_FUNCTION_HD
+	bool isAllActive()const
+	{
+		return isAllActive_;
+	}
+
+	INLINE_FUNCTION_HD
+	const auto& activeRange()const
+	{
+		return activeRange_;
+	}
+
+	INLINE_FUNCTION_HD
+	auto numActive()const
+	{
+		return numActive_;
+	}
+
+	INLINE_FUNCTION_HD
+	bool operator()(uint32 i)
+	{
+		return isActive(i);
+	}
+
+	INLINE_FUNCTION_HD
+	bool isActive(uint32 i)const
+	{
+		return flags_[i] > DELETED;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isBoundary(uint32 i)const
+	{
+		return flags_[i] > INTERNAL;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isBoundary(uint8 flg)const
+	{
+		return flg > INTERNAL;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isLeft(uint32 i)const
+	{
+		return (flags_[i]&LEFT) == LEFT;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isLeft(uint8 flg)const
+	{
+		return (flg&LEFT) == LEFT;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isRight(uint32 i)const
+	{
+		return (flags_[i]&&RIGHT) == RIGHT;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isRight(uint8 flg)const
+	{
+		return (flg&&RIGHT) == RIGHT;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isBottom(uint32 i)const
+	{
+		return (flags_[i]&&BOTTOM) == BOTTOM;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isBottom(uint8 flg)const
+	{
+		return (flg&&BOTTOM) == BOTTOM;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isTop(uint32 i)const
+	{
+		return (flags_[i]&&TOP) == TOP;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isTop(uint8 flg)const
+	{
+		return (flg&&TOP) == TOP;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isRear(uint32 i)const
+	{
+		return (flags_[i]&&REAR) == REAR;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isRear(uint8 flg)const
+	{
+		return (flg&&REAR) == REAR;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isFront(uint32 i)const
+	{
+		return (flags_[i]&&FRONT) == FRONT;
+	}
+
+	INLINE_FUNCTION_HD
+	bool isFront(uint8 flg)const
+	{
+		return (flg&&FRONT) == FRONT;
+	}
+
+
+	template<typename ExeSpace>
+	pointFlag<ExeSpace> clone()const
+	{
+		using newViewType = ViewType1D<uint8, typename ExeSpace::memory_space>;
+		newViewType newFlags(
+			"pointFlag",
+			flags_.size());
+
+		copy(newFlags, flags_);
+
+		return pointFlag<ExeSpace>(
+			newFlags,
+			numActive_,
+			activeRange_,
+			isAllActive_);
+	}
+
+	
+	uint32 scanPointFlag();
+
+	uint32 markDeleteInDomain(
+		domain 								dm,
+		ViewType1D<realx3, memory_space> 	points,
+		real dist);
+
+	void fillNeighborsLists(
+		ViewType1D<uint32, memory_space> leftList,
+		ViewType1D<uint32, memory_space> rightList,
+		ViewType1D<uint32, memory_space> bottomList,
+		ViewType1D<uint32, memory_space> topList,
+		ViewType1D<uint32, memory_space> rearList,
+		ViewType1D<uint32, memory_space> frontList);
+
+
+
+};
+
+
+}
+
+#include "pointFlagKernels.hpp"
+
+#endif // __pointFlag_hpp__
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
new file mode 100644
index 00000000..107ac2e9
--- /dev/null
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
@@ -0,0 +1,260 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __pointFlagKernels_hpp__
+#define __pointFlagKernels_hpp__
+
+
+
+template<typename ExecutionSpace>
+pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::scanPointFlag()
+{
+		
+	using rpScanFlag = Kokkos::RangePolicy<execution_space,  
+			Kokkos::IndexType<uint32>>;
+
+	uint32 numActive = 0;
+	
+	
+	uint32 start = activeRange().start();
+	uint32 end   = activeRange().end();
+
+	uint32 minRange = end;
+	uint32 maxRange = start;
+
+	if(start<end)
+	{
+		Kokkos::parallel_reduce(
+			"pointFlagKernels::scanPointFlag",
+			rpScanFlag(start, end),
+			CLASS_LAMBDA_HD(
+				uint32 i, 
+				uint32& minUpdate, 
+				uint32& maxUpdate, 
+				uint32& sumToUpdate)
+			{
+				if(this->isActive(i))
+				{
+					sumToUpdate++;
+					minUpdate = min(minUpdate,i);
+					maxUpdate = max(maxUpdate,i);
+				}
+			},
+			Kokkos::Min<uint32>(minRange), 
+			Kokkos::Max<uint32>(maxRange),
+			numActive);	
+	}
+	
+	if(numActive==0)
+	{
+		minRange = 0;
+		maxRange = 0;
+	}
+	else
+	{
+		// add one to maxRange to make it half-open
+		maxRange ++;
+	}
+
+	activeRange_ = {minRange, maxRange};
+	numActive_ 	= numActive;
+	isAllActive_ = activeRange_.numElements() == numActive_;
+
+	return numActive;
+}
+
+
+template<typename ExecutionSpace>
+pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markDeleteInDomain
+(
+	domain 								dm,
+	ViewType1D<realx3, memory_space> 	points,
+	real dist)
+{
+	
+	using rpMark = Kokkos::RangePolicy<execution_space,  
+			Kokkos::IndexType<uint32>>;
+
+	uint32 start = activeRange().start();
+	uint32 end   = activeRange().end();
+
+	uint32 minRange = end;
+	uint32 maxRange = start;
+
+	uint32 numMarked = 0;
+	uint32 nLeft = 0, nRight = 0;
+	uint32 nBottom = 0, nTop = 0;
+	uint32 nRear = 0, nFront = 0;
+
+	if(start<end)
+	{
+		
+		Kokkos::parallel_reduce(
+			"pointFlagKernels::markDeleteInDomain",
+			rpMark(start,end),
+			CLASS_LAMBDA_HD(
+				uint32 i, 
+				uint32& minUpdate, 
+				uint32& maxUpdate, 
+				uint32& valDelete,
+				uint32& valLeft,
+				uint32& valRight,
+				uint32& valBottom,
+				uint32& valTop,
+				uint32& valRear,
+				uint32& valFront){
+				if(this->isActive(i))
+				{
+					realx3 p = points[i];
+					if( !dm.domainBox().isInside(p) )
+					{
+						flags_[i] = DELETED;
+						valDelete++;
+					}
+					else
+					{
+
+						uint8 flg  = 0;
+						minUpdate = min(minUpdate,i);
+						maxUpdate = max(maxUpdate,i);
+
+						if(dm.left().inPositiveDistance(p, dist))
+						{
+							flg += LEFT;
+							valLeft++;	
+						} 
+
+						if(dm.right().inPositiveDistance(p, dist))
+						{
+							flg += RIGHT;
+							valRight++;
+						}
+						
+						if(dm.bottom().inPositiveDistance(p, dist))
+						{
+							flg += BOTTOM;
+							valBottom++;
+						} 
+
+						if(dm.top().inPositiveDistance(p, dist)) 
+						{
+							flg += TOP;
+							valTop++;
+						}
+						
+						if(dm.rear().inPositiveDistance(p, dist)) 
+						{
+							flg += REAR;
+							valRear++;
+						}
+
+						if(dm.front().inPositiveDistance(p, dist))
+						{
+							flg += FRONT;
+							valFront++;
+						} 
+
+						flags_[i] = flg>static_cast<uint8>(0)? flg: INTERNAL;
+					}
+				}
+			},
+			Kokkos::Min<uint32>(minRange), 
+			Kokkos::Max<uint32>(maxRange),
+			numMarked,
+			nLeft,
+			nRight,
+			nBottom,
+			nTop,
+			nRear,
+			nFront);
+
+	}
+	
+	// means either range was empty or all points have been deleted.
+	if(minRange<start || maxRange>end)
+	{
+		minRange = 0;
+		maxRange = 0;
+	}
+	else
+	{
+		maxRange++; // add one to make it half
+	}
+
+	activeRange_ = {minRange, maxRange};
+	isAllActive_ = isAllActive_ && numMarked == 0; 
+	numActive_ 	-= numMarked;
+
+	nLeft_ 	= nLeft;
+	nRight_	= nRight;
+	nBottom_= nBottom;
+	nTop_ 	= nTop;
+	nRear_	= nRear;
+	nFront_ = nFront;
+
+	return numMarked;
+}
+
+template<typename ExecutionSpace>
+void pFlow::pointFlag<ExecutionSpace>::fillNeighborsLists
+(
+	ViewType1D<uint32, memory_space> leftList,
+	ViewType1D<uint32, memory_space> rightList,
+	ViewType1D<uint32, memory_space> bottomList,
+	ViewType1D<uint32, memory_space> topList,
+	ViewType1D<uint32, memory_space> rearList,
+	ViewType1D<uint32, memory_space> frontList
+)
+{
+	using rpMark = Kokkos::RangePolicy<execution_space,  
+			Kokkos::IndexType<uint32>>;
+
+	uint32 start = activeRange().start();
+	uint32 end   = activeRange().end();
+
+	ViewType1D<uint32, memory_space> nElems("nElems",6);
+
+	fill(nElems, 0, 6, 0);
+
+	if(start<end)
+	{
+		Kokkos::parallel_for(
+			"pointFlagKernels::markDeleteInDomain",
+			rpMark(start,end),
+			CLASS_LAMBDA_HD(uint32 i){
+
+				uint32 flg = flags_(i);
+
+				if(this->isBoundary(flg))
+				{
+					if(this->isLeft(flg)) leftList[Kokkos::atomic_fetch_add(&nElems[0],1)] = i;
+					if(this->isRight(flg)) rightList[Kokkos::atomic_fetch_add(&nElems[1],1)] = i;
+					if(this->isBottom(flg)) bottomList[Kokkos::atomic_fetch_add(&nElems[2],1)] = i;
+					if(this->isTop(flg)) topList[Kokkos::atomic_fetch_add(&nElems[3],1)] = i;
+					if(this->isRear(flg)) rearList[Kokkos::atomic_fetch_add(&nElems[4],1)] = i;
+					if(this->isFront(flg)) frontList[Kokkos::atomic_fetch_add(&nElems[5],1)] = i;
+				}
+			});
+		Kokkos::fence();	
+	}
+	
+
+}
+
+#endif // __pointFlagKernels_hpp__
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
index be70072d..09afa2af 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
@@ -23,6 +23,8 @@ Licence:
 #define __pointStructure_hpp__
 
 
+#include "Lists.hpp"
+#include "internalPoints.hpp"
 
 #include "Vectors.hpp"
 #include "VectorSingles.hpp"
@@ -37,9 +39,8 @@ namespace pFlow
 {
 
 //forward
-class box;
-class setFieldList;
-class repository;
+class boundaryBase;
+
 
 class pointStructure
 :
@@ -47,152 +48,24 @@ class pointStructure
 {
 public:
 	
-	enum PointFlag: int8
-	{
-		DELETED 	= -1,
-		ACTIVE 		= 1
-	};
-
-	
-	inline static const size_t maxSizeDefault_ = 10000;
-
-	class activePointsDevice
-	{
-	protected:
-		ViewType1D<int8> 	flag_;
-
-		bool allActive_;
-
-		range activeRange_;
-
-	public:
-
-		INLINE_FUNCTION_H
-		activePointsDevice(bool allActive, range active, const ViewType1D<int8>& flag)
-		:
-			flag_(flag),
-			allActive_(allActive),
-			activeRange_(active)
-		{}
-
-		INLINE_FUNCTION_HD
-		activePointsDevice(const activePointsDevice&) = default;
-
-		INLINE_FUNCTION_HD
-		activePointsDevice& operator=(const activePointsDevice&) = default;
-
-		INLINE_FUNCTION_HD
-		bool operator()(int32 i)const {
-			if(i<activeRange_.second && flag_[i] == 1)return true;
-			return false;
-		}
-
-		INLINE_FUNCTION_HD
-		auto activeRange()const {
-			return activeRange_; 
-		}
-
-		INLINE_FUNCTION_HD
-		auto allActive()const {
-			return allActive_;
-		}
-
-	};
-
-	class activePointsHost
-	{
-	protected:
-		
-		ViewType1D<int8, HostSpace> 	flag_;
-
-		bool allActive_;
-
-		range activeRange_;
-
-	public:
-
-		INLINE_FUNCTION_H
-		activePointsHost(bool allActive, range active, const ViewType1D<int8, HostSpace>& flag)
-		:
-			flag_(flag),
-			allActive_(allActive),
-			activeRange_(active){}
-
-		INLINE_FUNCTION_H
-		activePointsHost(const activePointsHost&) = default;
-
-		INLINE_FUNCTION_H
-		activePointsHost& operator=(const activePointsHost&) = default;
-
-		INLINE_FUNCTION_H
-		bool operator()(int32 i)const {
-			if(i <activeRange_.second && flag_[i] == PointFlag::ACTIVE)return true;
-			return false;
-		}
-
-		INLINE_FUNCTION_H
-		auto activeRange()const{
-			return activeRange_;
-		}
-
-		INLINE_FUNCTION_H
-		bool allActive()const {
-			return allActive_;
-		}
-	};
+	using boundaryListType = ListPtr<boundaryBase>;
 
 protected:
 
 	//// - data members 
+		domain 				globalDomain_;
 
-		// number of points / size of structure
-		size_t 			numPoints_ 		= 0;	
+		domain 				thisDomain_;
 
-		// maximum number of points
-		size_t 			maxPoints_ 		= maxSizeDefault_;
+		internalPoints 		internal_;
 
-		// flag of points on device
-		int8Field_HD 			pointFlag_;
+		boundaryListType 	boundaries_;
 
-		// position of points on device
-		realx3Field_D 			pointPosition_;
-
-		// number of active points
-		size_t 					numActivePoints_ = 0;
-
-		// index range of active points (half-open range)
-		range 					activeRange_;	
-
-		/// Index vector for points to be inserted 
-		int32IndexContainer   	tobeInsertedIndex_;
-
-		/// Sorted index of particles based on morton code 
-		int32IndexContainer 	mortonSortedIndex_;
-	
-
-	//// - protected methods
-		FUNCTION_H
-		bool evaluatePointStructure();
-
-		FUNCTION_H
-		void setNumMaxPoints();
-
-		// - access to pointPosition
-		FUNCTION_H
-		realx3Field_D& pointPosition();
-		
-		// - access to pointFlag
-		FUNCTION_H
-		int8Field_HD& pointFlag();
-
-		FUNCTION_H
-		uniquePtr<int32IndexContainer> 
-			getNewPointsIndices(int32 numNewPoints)const;
+		wordList 			boundaryTypes_;	
 
 public:
 
-	friend class dynamicPointStructure;
-	
+		
 	// - type info
 	TypeInfo("pointStructure");
 	
@@ -228,41 +101,7 @@ public:
 		pointStructure& operator=(pointStructure&&) = delete;
 
 		// - destructor 
-		virtual ~pointStructure() = default;
-
-
-	//// - Methods
-		activePointsDevice activePointsMaskD()const
-		{
-			return activePointsDevice(
-				this->allActive(),
-				activeRange(),
-				pointFlag_.deviceVectorAll()
-				);
-		}
-
-		activePointsHost activePointsMaskH()const
-		{
-			return activePointsHost(
-				this->allActive(),
-				activeRange(),
-				pointFlag_.hostVectorAll()
-				);
-		}
-
-		// - const access pointPosition
-		FUNCTION_H
-		const realx3Field_D& pointPosition()const;
-		
-		// - const access to pointFlag
-		FUNCTION_H
-		const int8Field_HD& pointFlag()const;
-
-		INLINE_FUNCTION_H
-		auto pointPositionHostAll()
-		{
-			return pointPosition_.hostVectorAll();
-		}
+		virtual ~pointStructure() = default
 
 		// - size of data structure
 		FUNCTION_H
@@ -272,103 +111,37 @@ public:
 		FUNCTION_H
 		label capacity()const;
 		
-		// - number of active points 
-		FUNCTION_H
-		label numActive() const;
-				
-		// - if all points are active 
-		FUNCTION_H
-		bool allActive()const;
-
-		INLINE_FUNCTION_H
-		range activeRange()const
-		{
-			return activeRange_;
-		}
-
-		INLINE_FUNCTION_H
-		bool isActive(label i)const
-		{
-			return pointFlag_[i] == ACTIVE;
-		}
-
-		FUNCTION_H
-		size_t markDeleteOutOfBox(const box& domain);
-
-		// - update data structure by removing the marked points 
-		//   Notifies all the fields that are built based on this data structure
-		//   and then apply removing to the pointPosition_ and pointFlag_
-		FUNCTION_H
-		virtual bool updateForDelete();
-
-
-		FUNCTION_H
-		virtual bool mortonSortPoints(const box& domain, real dx);
-
-		///////////////////////////////////////////////////////////////////////////////////////////////////
 		
-		// - const access to points to be newly inserted
-		FUNCTION_H 
-		auto insertedPointIndex()const
-		{
-			return tobeInsertedIndex_;
-		}
-
-		FUNCTION_H 
-		auto insertedPointIndexH()const
-		{
-			return tobeInsertedIndex_.hostView();
-		}
-
-		FUNCTION_H 
-		auto insertedPointIndexD()const
-		{
-			return tobeInsertedIndex_.deviceView();
-		}
-
-
-		FUNCTION_H
-		auto mortonSortedIndex()const
-		{
-			return mortonSortedIndex_;
-		}
-
-
 		// - update data structure by inserting/setting new points 
 		//   Notifies all the fields in the registered list of data structure
 		//   and exclude the fields that re in the exclusionList
 		//   retrun nullptr if it fails 
 		FUNCTION_H
-		virtual uniquePtr<int32IndexContainer> insertPoints(
+		/*virtual uniquePtr<int32IndexContainer> insertPoints(
 			const realx3Vector& pos,
 			const setFieldList& setField,
 			repository& owner,
 			const List<eventObserver*>& exclusionList={nullptr}
-		);
+		);*/
+
+		boundaryBase& boundary(size_t i)
+		{
+			return boundaries_[i];
+		}
+
+
+		const boundaryBase& boundary(size_t i)const
+		{
+			return boundaries_[i];
+		}
+
 
 	
 	//// - IO operations 
-		// - read pointStructure from is
-		FUNCTION_H
-		bool readPointStructure(iIstream& is);
+		
+		
 
-		// - write pointStructure to os
-		FUNCTION_H
-		bool writePointStructure(iOstream& os)const;
 
-		// - read 
-		FUNCTION_H
-		bool read(iIstream& is)
-		{
-			return readPointStructure(is);
-		}
-
-		// - write 
-		FUNCTION_H
-		bool write(iOstream& os)const
-		{
-			return writePointStructure(os);
-		}
 
 };
 
diff --git a/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp b/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp
index 84a4542f..77cd983a 100755
--- a/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp
+++ b/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp
@@ -190,9 +190,9 @@ bool readValue(const word& w, bool& val)
 
 
 INLINE_FUNCTION_HD 
-bool equal(const real& s1, const real& s2)
+bool equal(const real& s1, const real& s2, real tol = smallValue)
 {
-    return abs(s1 - s2) <= smallValue;
+    return abs(s1 - s2) <= tol;
 }
 
 INLINE_FUNCTION_HD 
diff --git a/src/phasicFlow/types/triple/triple.hpp b/src/phasicFlow/types/triple/triple.hpp
index 616c1e36..356e5a00 100644
--- a/src/phasicFlow/types/triple/triple.hpp
+++ b/src/phasicFlow/types/triple/triple.hpp
@@ -231,7 +231,17 @@ struct triple
 };
 
 template<typename T>
-bool INLINE_FUNCTION_HD equal( const triple<T>& opr1, const triple<T>& opr2 );
+bool INLINE_FUNCTION_HD equal( const triple<T>& opr1, const triple<T>& opr2);
+
+
+bool
+INLINE_FUNCTION_HD
+equal(const triple<real>& opr1, const triple<real>& opr2, real tol)
+{
+	return 	equal( opr1.x(), opr2.x(), tol ) && 
+			equal( opr1.y(), opr2.y(), tol ) && 
+			equal( opr1.z(), opr2.z(), tol );
+}
 
 
 } /// end of pFlow

From f1baff5a59c184e1f36b4a98f286d1a74821f1c9 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 17 Dec 2023 15:27:05 +0330
Subject: [PATCH 16/60] pointStructure with boundaries, construction tested

---
 CMakeLists.txt                                |   2 +-
 src/phasicFlow/CMakeLists.txt                 |  15 +
 src/phasicFlow/containers/Field/Field.hpp     |  10 +-
 .../containers/List/ListPtr/ListPtr.hpp       |   9 +-
 .../containers/List/ListPtr/ListPtrI.hpp      |  19 +-
 src/phasicFlow/containers/Vector/Vector.hpp   |  26 +-
 .../containers/VectorHD/VectorSingle.hpp      |  41 +-
 .../containers/VectorHD/VectorSingleI.hpp     |   6 +-
 src/phasicFlow/dictionary/dictionary.cpp      |  14 +-
 src/phasicFlow/dictionary/dictionary.hpp      |  25 +-
 .../eventManagement/eventManagement.hpp       |  16 +
 src/phasicFlow/eventManagement/subscriber.hpp |  15 +-
 src/phasicFlow/globals/vocabs.hpp             |   1 +
 src/phasicFlow/processors/processors.hpp      |  12 +
 src/phasicFlow/ranges/stridedRange.hpp        |   6 +-
 src/phasicFlow/repository/Time/Time.cpp       |   2 +-
 src/phasicFlow/repository/Time/Time.hpp       |   2 +-
 .../repository/Time/timeControl.cpp           |   2 +-
 .../repository/repository/repository.cpp      |   2 +-
 .../systemControl/dynamicLinkLibs.cpp         |   4 +-
 .../systemControl/systemControl.cpp           |  18 +-
 .../systemControl/systemControl.hpp           |  17 +-
 .../boundaries/boundaryBase/boundaryBase.cpp  |  82 ++-
 .../boundaries/boundaryBase/boundaryBase.hpp  |  87 ++-
 .../boundaries/boundaryExit/boundaryExit.cpp  |  64 ++
 .../boundaries/boundaryExit/boundaryExit.hpp  |  75 +++
 .../structuredData/domain/domain.hpp          |  11 +
 .../domain/regularSimulationDomain.cpp        | 114 ++++
 .../domain/regularSimulationDomain.hpp        |  56 ++
 .../domain/simulationDomain.cpp               |  56 ++
 .../domain/simulationDomain.hpp               | 142 ++++
 .../structuredData/domain/subDomain.hpp       | 104 +++
 .../pointStructure/boundaryList.cpp           |  53 ++
 .../pointStructure/boundaryList.hpp           |  77 +++
 .../pointStructure/internalPoints.cpp         |  31 +-
 .../pointStructure/internalPoints.hpp         |  62 +-
 .../pointStructure/pStcutold.txt              | 540 +++++++++++++++
 .../pointStructure/pointFlag.hpp              |  57 +-
 .../pointStructure/pointFlagKernels.hpp       |  93 ++-
 .../pointStructure/pointStructure.cpp         | 614 +++---------------
 .../pointStructure/pointStructure.hpp         |  92 +--
 src/setHelpers/initialize.hpp                 |   4 +-
 src/setHelpers/initialize_Control.hpp         |  14 +-
 utilities/CMakeLists.txt                      |  12 +-
 utilities/particlesPhasicFlow/empty/empty.cpp |   3 +-
 utilities/particlesPhasicFlow/empty/empty.hpp |   8 +-
 .../particlesPhasicFlow.cpp                   |   2 +-
 .../positionOrdered/positionOrdered.cpp       |   1 +
 .../positionOrdered/positionOrdered.hpp       |   4 +-
 .../positionParticles/positionParticles.cpp   |   6 +
 .../positionParticles/positionParticles.hpp   |   9 +-
 .../positionRandom/positionRandom.cpp         |   3 +-
 .../positionRandom/positionRandom.hpp         |   8 +-
 53 files changed, 1957 insertions(+), 791 deletions(-)
 create mode 100644 src/phasicFlow/eventManagement/eventManagement.hpp
 create mode 100644 src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
 create mode 100644 src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
 create mode 100644 src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
 create mode 100644 src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
 create mode 100644 src/phasicFlow/structuredData/domain/simulationDomain.cpp
 create mode 100644 src/phasicFlow/structuredData/domain/simulationDomain.hpp
 create mode 100644 src/phasicFlow/structuredData/domain/subDomain.hpp
 create mode 100644 src/phasicFlow/structuredData/pointStructure/boundaryList.cpp
 create mode 100644 src/phasicFlow/structuredData/pointStructure/boundaryList.hpp
 create mode 100644 src/phasicFlow/structuredData/pointStructure/pStcutold.txt

diff --git a/CMakeLists.txt b/CMakeLists.txt
index 3ce683a4..e411fe79 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -74,7 +74,7 @@ add_subdirectory(src)
 
 #add_subdirectory(solvers)
 
-#add_subdirectory(utilities)
+add_subdirectory(utilities)
 
 #add_subdirectory(DEMSystems)
 add_subdirectory(testIO)
diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index eb52ef39..2129f985 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -37,20 +37,35 @@ containers/Vector/Vectors.cpp
 containers/Field/Fields.cpp
 containers/List/anyList/anyList.cpp
 
+Timer/Timer.cpp
+Timer/Timers.cpp
+
 repository/IOobject/objectFile.cpp
 repository/IOobject/IOfileHeader.cpp
 repository/IOobject/IOobject.cpp
 repository/IOobject/IOPattern.cpp
+repository/repository/repository.cpp
+repository/Time/Time.cpp
+repository/Time/timeControl.cpp
+repository/systemControl/systemControl.cpp
+repository/systemControl/dynamicLinkLibs.cpp
 
 eventManagement/subscriber.cpp
 eventManagement/observer.cpp
 
+structuredData/box/box.cpp
 structuredData/line/line.cpp
 structuredData/infinitePlane/infinitePlane.cpp
 structuredData/plane/plane.cpp
 structuredData/domain/domain.cpp
+structuredData/domain/simulationDomain.cpp
+structuredData/domain/regularSimulationDomain.cpp
+structuredData/pointStructure/boundaryList.cpp
 structuredData/pointStructure/internalPoints.cpp
+structuredData/pointStructure/pointStructure.cpp
 structuredData/boundaries/boundaryBase/boundaryBase.cpp
+structuredData/boundaries/boundaryExit/boundaryExit.cpp
+
 
 )
 
diff --git a/src/phasicFlow/containers/Field/Field.hpp b/src/phasicFlow/containers/Field/Field.hpp
index d183b5c8..aafbfbd2 100644
--- a/src/phasicFlow/containers/Field/Field.hpp
+++ b/src/phasicFlow/containers/Field/Field.hpp
@@ -48,17 +48,17 @@ public:
 
 	using iterator        = typename VectorType::iterator;
 
-  	using constIterator   = typename VectorType::constIterator;
+	using const_iterator   = typename VectorType::const_iterator;
 
 	using reference       = typename VectorType::reference;
   	
-  	using constReference  = typename VectorType::constReference;
+	using const_reference  = typename VectorType::const_reference;
 
-	using valueType       = typename VectorType::valueType;
+	using value_type       = typename VectorType::value_type;
   	
-  	using pointer         = typename VectorType::pointer;
+	using pointer         = typename VectorType::pointer;
   	
-  	using constPointer    = typename VectorType::constPointer;
+	using const_pointer    = typename VectorType::const_pointer;
   	
 
 protected:
diff --git a/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp b/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
index ed150eed..fe1f1850 100644
--- a/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
+++ b/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
@@ -30,7 +30,6 @@ Licence:
 #include "error.hpp"
 #include "iOstream.hpp"
 
-
 namespace pFlow
 {
 
@@ -91,7 +90,7 @@ public:
 		// - a list with initial length of len
 		ListPtr(size_t len)
 		:
-			list_(len)
+			list_(len, nullptr)
 		{}
 
 		// - copy construct, create new objects out of the pointers in the src 
@@ -141,10 +140,10 @@ public:
 	//// - Methods 
 
 		// - set the ith element 
-		T* set(size_t i, T* ptr);
+		uniquePtr<T> set(size_t i, T* ptr);
 		
 		// - set the ith element and take the ownership from uniquePtr
-		uniquePtr<T> set(size_t i, uniquePtr<T>& ptr );
+		uniquePtr<T> set(size_t i, uniquePtr<T>&& ptr );
 		
 		// - create the object in-place and set the pointer in ith position
 		//   if oject creation fails, uniquePtr deletes the memeory
@@ -155,7 +154,7 @@ public:
 	    void push_back(T* ptr);
 	    
 	    // - put the pointer at the end
-	    void push_back(uniquePtr<T>& ptr);
+	    void push_back(uniquePtr<T>&& ptr);
 	    
 	    // - safely create (in-place) and put the pointer at the end
 	    template<typename... Args>
diff --git a/src/phasicFlow/containers/List/ListPtr/ListPtrI.hpp b/src/phasicFlow/containers/List/ListPtr/ListPtrI.hpp
index 57f42c2b..77ef5a99 100644
--- a/src/phasicFlow/containers/List/ListPtr/ListPtrI.hpp
+++ b/src/phasicFlow/containers/List/ListPtr/ListPtrI.hpp
@@ -144,7 +144,7 @@ pFlow::ListPtr<T>& pFlow::ListPtr<T>::operator=
 }
 
 template<typename T>
-T* pFlow::ListPtr<T>::set
+pFlow::uniquePtr<T> pFlow::ListPtr<T>::set
 (
 	size_t i, T* ptr
 )
@@ -158,7 +158,7 @@ template<typename T>
 pFlow::uniquePtr<T> pFlow::ListPtr<T>::set
 (
 	size_t i,
-	uniquePtr<T>& ptr
+	uniquePtr<T>&& ptr
 )
 {
 	if( i > size() )
@@ -171,10 +171,9 @@ pFlow::uniquePtr<T> pFlow::ListPtr<T>::set
 
 	auto iter = list_.begin();
 	std::advance(iter, i);
-	auto oldIter = iter;
+	T* oldPtr = *iter;
 	*iter = ptr.release();
-	return *oldIter;
-
+	return uniquePtr<T>(oldPtr);
 }
 
 
@@ -200,7 +199,7 @@ void pFlow::ListPtr<T>::push_back
 }
 
 template<typename T>
-void pFlow::ListPtr<T>::push_back(uniquePtr<T>& ptr)
+void pFlow::ListPtr<T>::push_back(uniquePtr<T>&& ptr)
 {
 	list_.push_back( ptr.release() );
 }
@@ -271,17 +270,23 @@ pFlow::uniquePtr<T> pFlow::ListPtr<T>::release
 	return p;
 }
 
+
+
 template<typename T>
 void pFlow::ListPtr<T>::clear()
 {
+	
+	int i =0;
 	for( auto iter = list_.begin(); iter != list_.end(); ++iter )
 	{
 		if(*iter != nullptr)
 		{
+	
 			delete *iter;
 			*iter = nullptr;
-		}
+		}	
 	}
+
 	list_.clear();
 }
 
diff --git a/src/phasicFlow/containers/Vector/Vector.hpp b/src/phasicFlow/containers/Vector/Vector.hpp
index b025a148..05275ce5 100644
--- a/src/phasicFlow/containers/Vector/Vector.hpp
+++ b/src/phasicFlow/containers/Vector/Vector.hpp
@@ -65,19 +65,19 @@ public:
 
 	typedef typename vectorType::iterator 			iterator;
 	
-	typedef typename vectorType::const_iterator 	constIterator;
+	typedef typename vectorType::const_iterator 	const_iterator;
 	
 	typedef typename vectorType::reference 			reference;
 	
-	typedef typename vectorType::const_reference 	constReference;
+	typedef typename vectorType::const_reference 	const_reference;
 	
-	typedef  T 										valueType; 		
+	typedef  T 										value_type; 		
 
 	typedef  T* 									pointer;
 
-	typedef const T*  								constPointer;
+	typedef const T*  								const_pointer;
 
-	typedef typename std::initializer_list<T> 		initList;
+	typedef typename std::initializer_list<T> 		init_list;
 
 protected:
 
@@ -139,7 +139,7 @@ public:
 
 
 		/// Vector from name and initializer list 
-		inline Vector(const word& name, const initList &l)
+		inline Vector(const word& name, const init_list &l)
 		:
 			vectorType(l),
 			name_(name)
@@ -325,11 +325,25 @@ public:
 	// - fill the whole content of vector, [begin, end), with val 
 	inline void fill( const T& val);
 
+	inline
+	auto getSpan()
+	{
+		return span<T>(this->data(), this->size());
+	}
+	
+	inline 
+	auto getSpan()const
+	{
+		return span<const T>(this->data(), this->size());
+	}
+
 	static constexpr bool isHostAccessible()
 	{
 		return isHostAccessible_;
 	}
 
+	
+
 	inline void operator +=( const T& val);
 	inline void operator -=( const T& val);
 	inline void operator *=( const T& val);
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 46b461b3..4e3b3d2d 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -62,27 +62,27 @@ public:
 
 		using iterator        = T*;
 
-		using constIterator   = const T*;
+		using const_iterator   = const T*;
 	  	
 		using reference       = T&;
 	  	
-	 	using constReference  = const T&;
+	 	using const_reference  = const T&;
 
-		using valueType       = T;
+		using value_type       = T;
 	  	
 		using pointer         = T*;
 	  	
-		using constPointer    = const T*;
+		using const_pointer    = const T*;
   	
 	//- typedefs related to memory management 
 
 		using viewType 			= ViewType1D<T, MemorySpace>;
 
-		using deviceType 		= typename viewType::device_type;
+		using device_type 		= typename viewType::device_type;
 
-		using memorySpace 		= typename viewType::memory_space;
+		using memory_space 		= typename viewType::memory_space;
 
-		using executionSpace 	= typename viewType::execution_space;
+		using execution_space 	= typename viewType::execution_space;
 
 protected:
 	
@@ -102,19 +102,19 @@ protected:
 
 		/// Is the memory of this vector accessible from Host
 		static constexpr 
-		bool  isHostAccessible_ = isHostAccessible<executionSpace>();
-			//Kokkos::SpaceAccessibility<executionSpace,HostSpace>::accessible;
+		bool  isHostAccessible_ = isHostAccessible<execution_space>();
+			//Kokkos::SpaceAccessibility<execution_space,HostSpace>::accessible;
 
 		/// Is the memory of this vector accessiple from Divce
 		static constexpr
-		bool isDeviceAccessible_ = isDeviceAccessible<executionSpace>();
+		bool isDeviceAccessible_ = isDeviceAccessible<execution_space>();
 
 
 		/// Name of the memory space
 	  	constexpr static inline 
 	  	const char* memoerySpaceName()
 	  	{
-	  		return memorySpace::name();
+	  		return memory_space::name();
 	  	}
 
 	  	/// Evaluate capacity based on the input size 
@@ -461,6 +461,17 @@ public:
 			assign(src, src.capacity());
 		}
 
+		INLINE_FUNCTION_H
+		auto getSpan()
+		{
+			return span<T>(view_.data(), size());
+		}
+		
+		INLINE_FUNCTION_H 
+		auto getSpan()const
+		{
+			return span<const T>(view_.data(), this->size());
+		}
 
 		INLINE_FUNCTION_H
 		bool insertSetElement(uint32IndexContainer indices, const T& val);
@@ -520,7 +531,7 @@ public:
 		}
 
 		INLINE_FUNCTION_H 
-		constPointer data()const{
+		const_pointer data()const{
 			return view_.data();
 		}
 
@@ -535,7 +546,7 @@ public:
 		/// Return begin iterator. it works when host is accessible.
 		template<bool Enable = true>
 		INLINE_FUNCTION_H 
-		typename std::enable_if_t<isHostAccessible_ && Enable,constIterator>
+		typename std::enable_if_t<isHostAccessible_ && Enable,const_iterator>
 		begin()const {
 			return data();
 		}
@@ -553,7 +564,7 @@ public:
 		/// Return end iterator. it works when host is accessible.
 		template<bool Enable = true>
 		INLINE_FUNCTION_H
-		typename std::enable_if_t<isHostAccessible_ && Enable,constIterator>
+		typename std::enable_if_t<isHostAccessible_ && Enable,const_iterator>
 		end()const{
 			return size_ > 0 ? data() + size_: data();
 		}
@@ -569,7 +580,7 @@ public:
 		/// Return reference to element i. it works when host is accessible.
 		template<bool Enable = true>
 		INLINE_FUNCTION_H 
-		typename std::enable_if_t<isHostAccessible_ && Enable,constReference>
+		typename std::enable_if_t<isHostAccessible_ && Enable,const_reference>
 		 operator[](size_t i)const{
 			return view_[i];
 		}
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingleI.hpp b/src/phasicFlow/containers/VectorHD/VectorSingleI.hpp
index 61217a96..2dabf14a 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingleI.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingleI.hpp
@@ -32,7 +32,7 @@ bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement(uint32IndexContainer i
 		resize(maxInd+1);
 	}
 
-	using policy = Kokkos::RangePolicy<executionSpace,Kokkos::IndexType<uint32>>;
+	using policy = Kokkos::RangePolicy<execution_space,Kokkos::IndexType<uint32>>;
 
 	if constexpr( isDeviceAccessible_ )
 	{
@@ -88,7 +88,7 @@ bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
 		resize(maxInd+1);
 	} 
 	
-	using policy = Kokkos::RangePolicy<executionSpace,Kokkos::IndexType<uint32>>;
+	using policy = Kokkos::RangePolicy<execution_space,Kokkos::IndexType<uint32>>;
 
 	hostViewType1D<const T> hVals( vals.data(), vals.size());
 
@@ -153,7 +153,7 @@ bool pFlow::VectorSingle<T,MemorySpace>::reorderItems(uint32IndexContainer indic
 
 	viewType 	sortedView(this->name(), newSize);
 
-	using policy = Kokkos::RangePolicy< executionSpace,Kokkos::IndexType<uint32>>;
+	using policy = Kokkos::RangePolicy< execution_space,Kokkos::IndexType<uint32>>;
 
 	if constexpr( isDeviceAccessible_)
 	{
diff --git a/src/phasicFlow/dictionary/dictionary.cpp b/src/phasicFlow/dictionary/dictionary.cpp
index a52d1d76..156f99a2 100644
--- a/src/phasicFlow/dictionary/dictionary.cpp
+++ b/src/phasicFlow/dictionary/dictionary.cpp
@@ -378,7 +378,8 @@ bool pFlow::dictionary::isFileDict()const
 bool  pFlow::dictionary::addPtr
 (
 	const word& keyword,
-	uniquePtr<iEntry>& entry
+	uniquePtr<iEntry>& entry,
+	bool warning
 )
 {
 
@@ -390,9 +391,13 @@ bool  pFlow::dictionary::addPtr
 	// search all entries for repeated keyword
 	if(auto [ptr, exist] = entries_.find(keyword); exist )
 	{
-		warningInFunction <<
-		"keyword " << keyword << " already exists in the dicrionary " <<
-		this->globalName() << ". The old entry will be replaced by the new one. \n";
+		if(warning)
+		{
+			warningInFunction <<
+			"keyword " << keyword << " already exists in the dicrionary " <<
+			this->globalName() << ". The old entry will be replaced by the new one. \n";
+		}
+		
 		// store the old pointer to entry
 		oldEntryPtr = ptr;
 	}
@@ -400,6 +405,7 @@ bool  pFlow::dictionary::addPtr
 	
 	if( entries_.insertReplace(keyword, entry) )
 	{
+	
 		if(oldEntryPtr)
 		{
 			// this should be replaced 
diff --git a/src/phasicFlow/dictionary/dictionary.hpp b/src/phasicFlow/dictionary/dictionary.hpp
index 661882d5..fcd55ba4 100644
--- a/src/phasicFlow/dictionary/dictionary.hpp
+++ b/src/phasicFlow/dictionary/dictionary.hpp
@@ -175,9 +175,10 @@ public:
 		/// if dictionary is file dictionary, return false
 		virtual bool isFileDict()const;
 
-		/// add a pointer entry (dictionary/dataEntry)
-		//   replaces this entry with existing one
-		bool addPtr(const word& keyword, uniquePtr<iEntry>& etry );
+		/// @brief add a pointer entry (dictionary/dataEntry)
+		///   replaces this entry with existing one and issue a warning
+		bool addPtr(const word& keyword, uniquePtr<iEntry>& etry, bool warning = true );
+
 
 		/// add a float dataEntry 
 		bool add(const word& keyword, const float& v);
@@ -206,13 +207,16 @@ public:
 		/// add a uint8 dataEntry
 		bool add(const word& keyword, const uint8& v);
 
-		// add a dictionary with the specifiedd keyword
+		/// @brief add a dictionary with the specifiedd keyword, if 
+		/// it exists, replace it.
 		bool addDict(const word& keyword, const dictionary& dict);
 
 		/// add a dataEntry of type T
 		template<typename T>
 		bool add(const word& keyword, const T& v );
 
+		template<typename T>
+		bool addOrKeep(const word& keyword, const T& v);
 
 		void clear();
 
@@ -311,6 +315,19 @@ bool dictionary::add(const word& keyword, const T& v )
 }
 
 
+template<typename T>
+bool dictionary::addOrKeep(const word& keyword, const T& v )
+{
+	if(!containsDataEntry(keyword))
+	{
+		uniquePtr<iEntry> ptr = makeUnique<dataEntry>(keyword, *this ,v);
+		return addPtr(keyword, ptr);
+	}
+	
+	return true;
+}
+
+
 template<typename T>
 bool dictionary::readDataEntry
 (
diff --git a/src/phasicFlow/eventManagement/eventManagement.hpp b/src/phasicFlow/eventManagement/eventManagement.hpp
new file mode 100644
index 00000000..3b07b2be
--- /dev/null
+++ b/src/phasicFlow/eventManagement/eventManagement.hpp
@@ -0,0 +1,16 @@
+#ifndef __eventManagement_hpp__
+#define __eventManagement_hpp__
+
+#include "subscriber.hpp"
+#include "observer.hpp"
+#include "pointMessage.hpp"
+
+namespace pFlow
+{
+
+using pointSubcriber = subscriber<pointMessage>
+
+}
+
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/eventManagement/subscriber.hpp b/src/phasicFlow/eventManagement/subscriber.hpp
index 3c424a3a..48090597 100644
--- a/src/phasicFlow/eventManagement/subscriber.hpp
+++ b/src/phasicFlow/eventManagement/subscriber.hpp
@@ -40,11 +40,23 @@ protected:
 	// - list of subsribed objectd that recieve updage messages 
 	mutable std::array<List<observer*>,16> observerList_;
 
+	word subName_;
+
 public:
 
-	subscriber()
+	subscriber(const word& name)
+	:
+		subName_(name)
 	{}
 
+	subscriber(const subscriber&) = delete;
+
+	subscriber(subscriber&&) = default;
+
+	subscriber& operator = (const subscriber&) = delete;
+
+	subscriber& operator = (subscriber&&) = default;
+
 	virtual ~subscriber();
 
 	virtual bool subscribe(message msg, observer* obsevr)const;
@@ -55,6 +67,7 @@ public:
 
 	//bool notify(const eventMessage& msg, const List<eventObserver*>& exclutionList );
 
+
 	
 	bool notify(const message msg, const anyList& varList);
 	
diff --git a/src/phasicFlow/globals/vocabs.hpp b/src/phasicFlow/globals/vocabs.hpp
index 8ac68538..5afac001 100755
--- a/src/phasicFlow/globals/vocabs.hpp
+++ b/src/phasicFlow/globals/vocabs.hpp
@@ -37,6 +37,7 @@ const inline char* integrationFolder__  	= "integration";
 
 // file names
 const inline char* settingsFile__			= "settingsDict";
+const inline char* domainFile__     = "domainDict";
 const inline char* insertionFile__ 			= "particleInsertion";
 const inline char* sphereShapeFile__  		= "sphereShape";
 const inline char* pointStructureFile__ 	= "pStructure";
diff --git a/src/phasicFlow/processors/processors.hpp b/src/phasicFlow/processors/processors.hpp
index 494787a6..98d9314c 100644
--- a/src/phasicFlow/processors/processors.hpp
+++ b/src/phasicFlow/processors/processors.hpp
@@ -95,6 +95,18 @@ public:
 		return processors::globalSize()>1;
 	}
 	
+	static inline
+	const char* runTypeName()
+	{
+		if(isParallel())
+		{
+			return "MPI";
+		}
+		else
+		{
+			return "regular";
+		}
+	}
 	/// Is MPI initialized?
 	static
 	bool isInitialized();
diff --git a/src/phasicFlow/ranges/stridedRange.hpp b/src/phasicFlow/ranges/stridedRange.hpp
index 5ecf7367..ca1cf7ba 100644
--- a/src/phasicFlow/ranges/stridedRange.hpp
+++ b/src/phasicFlow/ranges/stridedRange.hpp
@@ -76,9 +76,9 @@ public:
 
 	stridedRange(const dictionary& dict)
 	:
-		begin_(dict.getVal<label>("begin")),
-		end_(dict.getVal<label>("end")),
-		stride_(dict.getVal<label>("stride"))
+		begin_(dict.getVal<T>("begin")),
+		end_(dict.getVal<T>("end")),
+		stride_(dict.getVal<T>("stride"))
 	{}
 		
 	inline 
diff --git a/src/phasicFlow/repository/Time/Time.cpp b/src/phasicFlow/repository/Time/Time.cpp
index e99679ba..e4367cee 100644
--- a/src/phasicFlow/repository/Time/Time.cpp
+++ b/src/phasicFlow/repository/Time/Time.cpp
@@ -111,7 +111,7 @@ bool pFlow::Time::write
 {
 	if(outputToFile())
 	{
-		REPORT(0)<<"\nWriting to file at time: "<< cyanText(timeName())<<endREPORT;
+		REPORT(0)<<"\nWriting to file at time: "<< Cyan_Text(timeName())<<END_REPORT;
 		return repository::write(verbose);
 	}
 	return true;
diff --git a/src/phasicFlow/repository/Time/Time.hpp b/src/phasicFlow/repository/Time/Time.hpp
index 915c9478..f1887b38 100644
--- a/src/phasicFlow/repository/Time/Time.hpp
+++ b/src/phasicFlow/repository/Time/Time.hpp
@@ -72,7 +72,7 @@ public:
 	//// -  Methods
 		virtual fileSystem localPath()const
 		{
-			return timeName();
+			return fileSystem(timeName());
 		}
 	
 		// - geometry repository 
diff --git a/src/phasicFlow/repository/Time/timeControl.cpp b/src/phasicFlow/repository/Time/timeControl.cpp
index cb6a162a..d9182701 100644
--- a/src/phasicFlow/repository/Time/timeControl.cpp
+++ b/src/phasicFlow/repository/Time/timeControl.cpp
@@ -203,7 +203,7 @@ bool pFlow::timeControl::operator ++(int)
 	currentTime_ += dt_;
 	if(screenReport() && !managedExternaly_)
 	{
-		REPORT(0)<<"Time (s): "<<cyanText( currentTimeWord() )<<endREPORT;
+		REPORT(0)<<"Time (s): "<<Cyan_Text( currentTimeWord() )<<END_REPORT;
 	}
 	// switch outputToFile_ on/off
 	checkForOutputToFile();
diff --git a/src/phasicFlow/repository/repository/repository.cpp b/src/phasicFlow/repository/repository/repository.cpp
index 520afa38..edbf45ba 100644
--- a/src/phasicFlow/repository/repository/repository.cpp
+++ b/src/phasicFlow/repository/repository/repository.cpp
@@ -245,7 +245,7 @@ bool pFlow::repository::write
 	{
 		if(verbose)
 		{
-			REPORT(1)<< "Writing to " << obj.second.path()<<endREPORT;
+			REPORT(1)<< "Writing to " << obj.second.path()<<END_REPORT;
 		}
 		
 		if(!obj.second.write())
diff --git a/src/phasicFlow/repository/systemControl/dynamicLinkLibs.cpp b/src/phasicFlow/repository/systemControl/dynamicLinkLibs.cpp
index 6004dd77..f74b4303 100644
--- a/src/phasicFlow/repository/systemControl/dynamicLinkLibs.cpp
+++ b/src/phasicFlow/repository/systemControl/dynamicLinkLibs.cpp
@@ -37,7 +37,7 @@ pFlow::dynamicLinkLibs::dynamicLinkLibs(
 	}
 	
 
-	REPORT(1)<< "libs are "<< greenText(libNames)<<endREPORT;
+	REPORT(1)<< "libs are "<< Green_Text(libNames)<<END_REPORT;
 
 	for(auto libName:libNames)
 	{
@@ -68,7 +68,7 @@ pFlow::dynamicLinkLibs::~dynamicLinkLibs()
 
 void* pFlow::dynamicLinkLibs::open(word libName)
 {
-	REPORT(2)<<"Loading "<< greenText(libName)<<endREPORT;
+	REPORT(2)<<"Loading "<< Green_Text(libName)<<END_REPORT;
 
 	void* handle = dlopen(libName.c_str(), RTLD_LAZY|RTLD_GLOBAL);
 	
diff --git a/src/phasicFlow/repository/systemControl/systemControl.cpp b/src/phasicFlow/repository/systemControl/systemControl.cpp
index 4cd60260..974567fb 100644
--- a/src/phasicFlow/repository/systemControl/systemControl.cpp
+++ b/src/phasicFlow/repository/systemControl/systemControl.cpp
@@ -137,7 +137,7 @@ pFlow::systemControl::systemControl
 	),
 	libs_(settingsDict_),
 	outFilePrecision_(
-		settingsDict_.getValOrSet("outFilePrecision", static_cast<size_t>(6))
+		settingsDict_.getValOrSet("outFilePrecision", static_cast<uint64>(6))
 		),
 	Time_
 	(
@@ -231,6 +231,22 @@ pFlow::systemControl::systemControl(
 	writeToFileTimer_("Write to file", &timers_)	
 {}
 
+pFlow::dictionary& pFlow::systemControl::domainDict()
+{
+	return 
+	settings().emplaceObjectOrGet<dictionary>
+	(
+		objectFile
+		(
+			domainFile__,
+			"",
+			objectFile::READ_ALWAYS,
+			objectFile::WRITE_NEVER
+		),
+		domainFile__,
+		true
+	);
+}
 
 bool pFlow::systemControl::operator ++(int)
 {
diff --git a/src/phasicFlow/repository/systemControl/systemControl.hpp b/src/phasicFlow/repository/systemControl/systemControl.hpp
index 4556ff40..8d6dfc3b 100644
--- a/src/phasicFlow/repository/systemControl/systemControl.hpp
+++ b/src/phasicFlow/repository/systemControl/systemControl.hpp
@@ -52,25 +52,25 @@ protected:
 
 
 
-	// - settings folder repository
+	/// settings folder repository
 	repository 			settings_;
 
-	// - caseSetup folder repository
+	/// caseSetup folder repository
 	repository 			caseSetup_;
 
-	// - settingsDict fileDictionary
+	/// settingsDict fileDictionary
 	dictionary& 		settingsDict_;
 
-	// - extra libs to be loaded
+	/// extra libs to be loaded
 	dynamicLinkLibs 	libs_;
 	
-	// - precision for writing to file 
+	/// precision for writing to file 
 	size_t 			outFilePrecision_ = 6;
 
-	// - time repository
+	/// time repository
 	Time 			Time_;
 
-	// - if time control is managed externaly
+	/// if time control is managed externaly
 
 	bool 				externalTimeControl_ = false;
 
@@ -163,6 +163,9 @@ public:
 		return settingsDict_;
 	}
 
+	dictionary& domainDict();
+	
+
 	virtual word runName() const
 	{
 		return runName_;
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
index f2f1eeb9..353912d5 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
@@ -1,10 +1,27 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
-
+-----------------------------------------------------------------------------*/
 
 #include "boundaryBase.hpp"
+#include "dictionary.hpp"
 
-
-pFlow::boundaryBase::boundaryBase
+/*pFlow::boundaryBase::boundaryBase
 (
 	const plane& 		bplane,
 	uint32 				mirrorProc, 
@@ -13,11 +30,60 @@ pFlow::boundaryBase::boundaryBase
 	internalPoints& 	internal
 )
 :
-boundaryPlane_(bplane),
-name_(name),
-type_(type),
-mirrorProcessoNo_(mirrorProc),
-internal_(internal)
+	subscriber(groupNames(name,type)),
+	boundaryPlane_(bplane),
+	name_(name),
+	type_(type),
+	mirrorProcessoNo_(mirrorProc),
+	internal_(internal)
 {
 	
+}*/
+
+pFlow::boundaryBase::boundaryBase
+(
+	const dictionary& 	dict,
+	const plane& 		bplane,
+	internalPoints& 	internal
+)
+:
+	subscriber(dict.name()),
+	boundaryPlane_(bplane),
+	neighborLength_(dict.getVal<real>("neighborLength")),
+	internal_(internal),
+	indexList_(groupNames(dict.name(),"indexList")),
+	mirrorProcessoNo_(dict.getVal<uint32>("mirrorProcessorNo")),
+	name_(dict.name()),
+	type_(dict.getVal<word>("type"))
+{
+
+}
+
+
+pFlow::uniquePtr<pFlow::boundaryBase> pFlow::boundaryBase::create
+(
+	const dictionary& 	dict,
+	const plane& 		bplane,
+	internalPoints& 	internal
+)
+{
+	word type = dict.getVal<word>("type");
+	word bType = angleBracketsNames("boundary", type);
+
+	if( dictionaryvCtorSelector_.search(bType) )
+	{
+		return dictionaryvCtorSelector_[bType] (dict, bplane, internal);
+	}
+	else
+	{
+		printKeys
+		( 
+			fatalError << "Ctor Selector "<< bType << " dose not exist. \n"
+			<<"Avaiable ones are: \n\n"
+			,
+			dictionaryvCtorSelector_
+		);
+		fatalExit;
+	}
+	return nullptr;
 }
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
index 709eb413..b66ebc47 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
@@ -1,12 +1,32 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
 
 #ifndef __boundaryBase_hpp__
 #define __boundaryBase_hpp__
 
-
+#include "virtualConstructor.hpp"
+#include "subscriber.hpp"
 #include "VectorSingles.hpp"
 #include "plane.hpp"
 
-
+#include "streams.hpp"
 
 namespace pFlow
 {
@@ -14,8 +34,11 @@ namespace pFlow
 // forward 
 
 class internalPoints;
+class dictionary;
 
 class boundaryBase
+:
+	public subscriber
 {
 public:
 
@@ -26,45 +49,77 @@ public:
 
 protected:
 
-	plane 		boundaryPlane_;
+	const plane& 	boundaryPlane_;
+
+	/// The length defined for creating neighbor list 
+	real  			neighborLength_;	
+
+	/// a reference to 
+	internalPoints& internal_;
+
+	/// list of particles indices on device 
+	uint32Vector_D 	indexList_;
+
+	uint32 			mirrorProcessoNo_;
 
 	word 		name_;
 
 	word 		type_;
 
-	uint32 		mirrorProcessoNo_;
-
-	/// list of particles indices on device 
-	uint32Vector_D 	indexList_;
-
-	/// a reference to 
-	internalPoints& internal_;
 
 public:
 
 	TypeInfo("boundaryBase");
 
-	boundaryBase(
+	/*boundaryBase(
 		const plane& 		bplane,
 		uint32 				mirrorProc, 
 		const word& 		name,
 		const word& 		type,
+		internalPoints& 	internal);*/
+
+	boundaryBase(
+		const dictionary& 	dict,
+		const plane& 		bplane,
 		internalPoints& 	internal);
 
-	boundaryBase(const boundaryBase&) = default;
+	boundaryBase(const boundaryBase&) = delete;
 
-	boundaryBase& operator=(const boundaryBase&) = default;
+	boundaryBase& operator=(const boundaryBase&) = delete;
 
-	boundaryBase(boundaryBase&&) = delete;
+	boundaryBase(boundaryBase&&) = default;
 
-	boundaryBase& operator=(boundaryBase&&) = delete;
+	boundaryBase& operator=(boundaryBase&&) = default;
 
 	virtual ~boundaryBase() = default;
+	
 
-	virtual bool update() = 0 ;
+	create_vCtor
+	(
+		boundaryBase,
+		dictionary,
+		(
+			const dictionary& 	dict,
+			const plane& 		bplane,
+			internalPoints& 	internal
+		),
+		(dict, bplane, internal)
+	);
+
+	virtual bool beforeIteratoin(uint32 iterNum, real t) = 0 ;
 
 	virtual bool iterate(uint32 iterNum, real t) = 0;
 
+	virtual bool afterIteration(uint32 iterNum, real t) = 0;
+
+	static
+	uniquePtr<boundaryBase> create
+	(
+		const dictionary& 	dict,
+		const plane& 		bplane,
+		internalPoints& 	internal
+	);
+
 	
 };
 
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
new file mode 100644
index 00000000..db5d4d5c
--- /dev/null
+++ b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
@@ -0,0 +1,64 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "boundaryExit.hpp"
+#include "dictionary.hpp"
+
+pFlow::boundaryExit::boundaryExit
+(
+	const dictionary& dict,
+	const plane&      bplane,
+	internalPoints&   internal
+)
+:
+	boundaryBase(dict, bplane, internal)
+{
+	exitMarginLength_ = max( 
+		dict.getValOrSet("exitMarginLength",0.0), 0.0);
+	checkForExitInterval_ = max(
+		dict.getValOrSet("checkForExitInterval", 1), 1);
+}
+
+bool pFlow::boundaryExit::beforeIteratoin
+(
+	uint32 iterNum, 
+	real t
+)
+{
+	return true;
+}
+
+bool pFlow::boundaryExit::iterate
+(
+	uint32 iterNum, 
+	real t
+)
+{
+	return true;
+}
+
+bool pFlow::boundaryExit::afterIteration
+(
+	uint32 iterNum, 
+	real t
+)
+{
+	return true;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
new file mode 100644
index 00000000..0d07f48b
--- /dev/null
+++ b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
@@ -0,0 +1,75 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __boundaryExit_hpp__
+#define __boundaryExit_hpp__
+
+
+#include "boundaryBase.hpp"
+
+namespace pFlow
+{
+
+class boundaryExit
+:
+ 	public boundaryBase
+{
+protected:
+
+	/// @brief Length of margin in the negative side of 
+	/// boundary to still allow points stay in the 
+	/// simulation. 
+	real 	exitMarginLength_ = 0;
+
+	/// @brief between successive check for particle exit
+	/// (iteration-based).
+	uint32 	checkForExitInterval_ = 1;
+
+public:
+
+	TypeInfo("boundary<exit>");
+
+	boundaryExit(
+		const dictionary& 	dict,
+		const plane&    	bplane,
+		internalPoints& 	internal);
+
+	virtual 
+	~boundaryExit() = default;
+	
+	add_vCtor
+	(
+		boundaryBase,
+		boundaryExit,
+		dictionary
+	);
+
+	bool beforeIteratoin(uint32 iterNum, real t) override;
+
+	bool iterate(uint32 iterNum, real t) override;
+
+	bool afterIteration(uint32 iterNum, real t) override;
+
+
+};
+
+}
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/domain/domain.hpp b/src/phasicFlow/structuredData/domain/domain.hpp
index 220eda2f..15f57090 100644
--- a/src/phasicFlow/structuredData/domain/domain.hpp
+++ b/src/phasicFlow/structuredData/domain/domain.hpp
@@ -124,6 +124,17 @@ public:
 			return front_;
 		}
 
+		INLINE_FUNCTION_H
+		const auto& boundaryPlane(uint32 i)const 
+		{
+			if(i==0) return left_;
+			if(i==1) return right_;
+			if(i==2) return bottom_;
+			if(i==3) return top_;
+			if(i==4) return rear_;
+			return front_;
+		}
+
 	
 }; // domain
 
diff --git a/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp b/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
new file mode 100644
index 00000000..74fd61da
--- /dev/null
+++ b/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
@@ -0,0 +1,114 @@
+#include <cstring>
+
+#include "regularSimulationDomain.hpp"
+#include "processors.hpp"
+#include "streams.hpp"
+
+bool pFlow::regularSimulationDomain::createBoundaryDicts()
+{
+    auto& boundaries = globalDomainDict_.subDict("boundaries");
+    
+    globalDomainDict_.addDict("regularSimulationDomainBoundaries", boundaries);
+    auto& rbBoundaries = globalDomainDict_.subDict("regularSimulationDomainBoundaries");
+    
+	real neighborLength = boundaries.getVal<real>("neighborLength");
+
+	for(uint32 i=0; i<sizeOfBoundaries(); i++)
+	{
+		word bName = bundaryName(i);
+		if( !boundaries.containsDictionay(bName) )
+		{
+			fatalErrorInFunction<<"dictionary "<< bName<<
+			"does not exist in "<< boundaries.globalName()<<endl;
+			return false;
+		}
+		auto& bDict = rbBoundaries.subDict(bName);
+
+		if(!bDict.addOrKeep("neighborLength", neighborLength))
+		{
+			fatalErrorInFunction<<"error in adding neighborLength to "<< bName <<
+			"in dictionary "<< boundaries.globalName()<<endl;
+			return false;
+		}
+
+		if(!bDict.add("mirrorProcessorNo",(uint32) processors::globalRank()))
+		{
+			fatalErrorInFunction<<"error in adding mirrorProcessorNo to "<< bName <<
+			" in dictionary "<< boundaries.globalName()<<endl;
+			return false;
+		}
+
+	}
+    
+    
+    return true;
+}
+
+bool pFlow::regularSimulationDomain::setThisDomain()
+{
+	thisDomain_ = domain(globalBox_);
+    return true;
+}
+
+pFlow::regularSimulationDomain::regularSimulationDomain(
+    const dictionary &dict)
+    : simulationDomain(dict)
+{
+}
+
+bool pFlow::regularSimulationDomain::updateDomains
+(
+	const realx3Vector& pointPos
+)
+{
+	thisNumPoints_ = pointPos.size();
+	if(!createBoundaryDicts()) return false;
+	if(!setThisDomain()) return false;
+	
+    return true;
+}
+
+pFlow::uint32 pFlow::regularSimulationDomain::thisNumPoints() const
+{
+	return thisNumPoints_;	
+}
+
+bool pFlow::regularSimulationDomain::transferBlockData
+(
+	span<char> src, 
+	span<char> dst,
+	uint32 sizeOfBlock
+)
+{
+	size_t requiredSize = sizeOfBlock*thisNumPoints();
+	if(dst.size() < requiredSize)
+	{
+		fatalErrorInFunction<< 
+		"size of destination data block [in byte]"<< dst.size()<<
+		"is smaller than the required size [in byte]"<< requiredSize<<endl;
+		return false;
+	}
+	
+	if(src.size() < requiredSize )
+	{	
+		fatalErrorInFunction<< 
+		"size of source data block [in byte]"<< src.size()<<
+		"is smaller than the required size [in byte]"<< requiredSize<<endl;
+		return false;
+
+	}
+
+	std::memcpy(dst.data(), src.data(), requiredSize);
+
+    return true;
+}
+
+const pFlow::dictionary &pFlow::regularSimulationDomain::thisBoundaryDict() const
+{
+    return globalDomainDict_.subDict("regularSimulationDomainBoundaries");
+}
+
+bool pFlow::regularSimulationDomain::requiresDataTransfer()const
+{
+    return false;
+}
diff --git a/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp b/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
new file mode 100644
index 00000000..011e8d2c
--- /dev/null
+++ b/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
@@ -0,0 +1,56 @@
+
+#ifndef __regularSimulationDomain_hpp__
+#define __regularSimulationDomain_hpp__
+
+#include "simulationDomain.hpp"
+
+namespace pFlow
+{
+
+class regularSimulationDomain
+:
+	public simulationDomain
+{
+protected:
+
+	uint32 		thisNumPoints_=0;
+
+	bool createBoundaryDicts() override;
+
+	bool setThisDomain()override;
+
+public:
+
+	TypeInfo("simulationDomain<regular>");
+
+	regularSimulationDomain(const dictionary& dict);
+
+	virtual
+	~regularSimulationDomain()=default;
+	
+	add_vCtor
+	(
+		simulationDomain,
+		regularSimulationDomain,
+		dictionary
+	);
+
+	bool updateDomains( 
+		const realx3Vector& pointPos)override;
+
+	uint32 thisNumPoints()const override;
+
+	 
+	bool transferBlockData(
+		span<char> src, 
+		span<char> dst,
+		uint32 sizeOfBlock) override;
+	
+	const dictionary& thisBoundaryDict()const override;
+
+	bool requiresDataTransfer() const override;
+};
+
+}
+
+#endif //__regularSimulationDomain_hpp__
diff --git a/src/phasicFlow/structuredData/domain/simulationDomain.cpp b/src/phasicFlow/structuredData/domain/simulationDomain.cpp
new file mode 100644
index 00000000..1fb0867d
--- /dev/null
+++ b/src/phasicFlow/structuredData/domain/simulationDomain.cpp
@@ -0,0 +1,56 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "simulationDomain.hpp"
+#include "processors.hpp"
+
+pFlow::simulationDomain::simulationDomain(const dictionary& dict)
+:
+    globalBox_(dict.subDict("globalBox")),
+    globalDomainDict_(dict)
+{
+
+}
+
+pFlow::uniquePtr<pFlow::simulationDomain> 
+    pFlow::simulationDomain::create(const dictionary &dict)
+{
+    
+	word sType = angleBracketsNames(
+        "simulationDomain", 
+        processors::runTypeName());
+
+	if( dictionaryvCtorSelector_.search(sType) )
+	{
+		return dictionaryvCtorSelector_[sType] (dict);
+	}
+	else
+	{
+		printKeys
+		( 
+			fatalError << "Ctor Selector "<< sType << " dose not exist. \n"
+			<<"Avaiable ones are: \n\n"
+			,
+			dictionaryvCtorSelector_
+		);
+		fatalExit;
+	}
+    return nullptr;
+}
diff --git a/src/phasicFlow/structuredData/domain/simulationDomain.hpp b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
new file mode 100644
index 00000000..5844f437
--- /dev/null
+++ b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
@@ -0,0 +1,142 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __simulationDomain_hpp__
+#define __simulationDomain_hpp__
+
+#include "domain.hpp"
+#include "virtualConstructor.hpp"
+#include "Vectors.hpp"
+
+#include "streams.hpp"
+
+namespace pFlow
+{
+
+class simulationDomain
+{
+private:
+
+static inline constexpr uint32 sizeOfBoundaries_ = 6;
+
+static 
+inline const std::array<word,6>  boundaryNames_ = 
+{
+	"left", "right", 
+	"top", "bottom",
+	"rear", "front"
+};
+
+protected:	
+
+	/// @brief acutal limits of the simulation domain
+	box 			globalBox_;
+
+	/// @brief the actual limits of this processor domain 
+	domain 			thisDomain_;
+
+	dictionary 		globalDomainDict_ ;
+
+	bool 			boundariesSet_ = false;
+	
+	virtual bool createBoundaryDicts() = 0;
+
+	virtual bool setThisDomain() = 0;
+
+public:
+
+	// - type info
+	TypeInfo("simulationDomain");
+
+	/// Constrcut from components 
+	simulationDomain(const dictionary& dict);
+	
+	/// Destructor 
+	virtual 
+	~simulationDomain() = default;
+	
+
+	create_vCtor
+	(
+		simulationDomain,
+		dictionary,
+		(const dictionary& dict),
+		(dict)	
+	);
+
+	virtual 
+	const dictionary& thisBoundaryDict()const = 0;
+	
+
+	virtual 
+	bool updateDomains(
+		const realx3Vector& pointPos) = 0;
+
+	//virtual getImportExportList() = 0;
+
+	//virtual getNumberInThisList() = 0;
+
+	virtual
+	uint32 thisNumPoints()const = 0;
+
+	virtual 
+	bool transferBlockData(
+		span<char> src, 
+		span<char> dst,
+		uint32 sizeOfBlock) = 0;
+
+	virtual 
+	bool requiresDataTransfer() const = 0;
+
+	inline
+	const dictionary& boundaryDict(uint32 i)const
+	{
+		return thisBoundaryDict().subDict(bundaryName(i));
+	}
+	
+	inline
+	const auto& boundaryPlane(uint32 i)const
+	{
+		return thisDomain_.boundaryPlane(i);
+	}
+
+	static inline
+	const word& bundaryName(uint32 i)
+	{
+		return boundaryNames_[i];
+	}
+
+	static inline 
+	uint32 sizeOfBoundaries() 
+	{
+		return boundaryNames_.size();
+	}
+	
+	static
+	uniquePtr<simulationDomain> create(const dictionary& dict);
+
+}; // simulationDomain
+
+
+
+}
+
+
+#endif //__simulationDomain_hpp__
diff --git a/src/phasicFlow/structuredData/domain/subDomain.hpp b/src/phasicFlow/structuredData/domain/subDomain.hpp
new file mode 100644
index 00000000..b90ccb61
--- /dev/null
+++ b/src/phasicFlow/structuredData/domain/subDomain.hpp
@@ -0,0 +1,104 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __subDomain_hpp__
+#define __subDomain_hpp__
+
+#include "domain.hpp"
+
+
+namespace pFlow
+{
+
+class subDomain
+{
+protected:	
+
+	/// the actual limits of global domain 
+	const domain& 		globalDomain_;
+
+	/// @brief dictionary of boundaries
+	const dictionary& 	boundaryDict_;
+
+
+	/// the actual limits of this processor domain 
+	domain 		thisDomain_;
+
+
+
+public:
+
+	// - type info
+	TypeInfo("subDomain");
+
+
+	subDomain(
+		const domain& gDomain,
+		const domain& thisD, 
+		const dictionary& bDicts)
+	:
+		globalDomain_(gDomain),
+		thisDomain_(thisD),
+		boundaryDict_(bDicts)
+	{}
+	
+	const auto& thisDomain()const
+	{
+		return thisDomain_;
+	}
+
+	const dictionary& leftDict()const
+	{
+		return boundaryDict_.subDict("left");
+	}
+
+	const dictionary& rightDict()const
+	{
+		return boundaryDict_.subDict("right");
+	}
+
+	const dictionary& bottomDict()const
+	{
+		return boundaryDict_.subDict("bottom");;
+	}
+
+	const dictionary& topDict()const
+	{
+		return boundaryDict_.subDict("top");;
+	}
+
+	const dictionary& rearDict()const
+	{
+		return boundaryDict_.subDict("rear");;
+	}
+
+	const dictionary& frontDict()const
+	{
+		return boundaryDict_.subDict("front");;
+	}
+	
+}; // subDomain
+
+
+
+}
+
+
+#endif //__subDomain_hpp__
diff --git a/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp b/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp
new file mode 100644
index 00000000..cd25a6b2
--- /dev/null
+++ b/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp
@@ -0,0 +1,53 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "boundaryList.hpp"
+#include "simulationDomain.hpp"
+
+pFlow::boundaryList::boundaryList
+(
+	const simulationDomain& simD,
+	internalPoints& internal
+)
+:
+	simDomain_(simD),
+	internal_(internal),
+	boundaryList_(simD.sizeOfBoundaries())
+{}
+
+bool pFlow::boundaryList::updateLists()
+{
+
+	for(auto i=0; i<simDomain_.sizeOfBoundaries();i++)
+	{
+		boundaryList_.set
+		(
+			i,
+			boundaryBase::create
+			(
+				simDomain_.boundaryDict(i),
+				simDomain_.boundaryPlane(i),
+				internal_
+			)
+		);
+	}
+	listSet_ = true;
+	return true;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp b/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp
new file mode 100644
index 00000000..cb52807f
--- /dev/null
+++ b/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp
@@ -0,0 +1,77 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#ifndef __boundaryList_hpp__
+#define __boundaryList_hpp__
+
+#include "boundaryBase.hpp"
+#include "ListPtr.hpp"
+
+#include "streams.hpp"
+
+namespace pFlow
+{
+
+class simulationDomain;
+
+class boundaryList
+{
+
+protected:
+
+	//// - data members
+        internalPoints& 		internal_;
+		
+        const simulationDomain& simDomain_;
+
+        ListPtr<boundaryBase> 	boundaryList_;
+
+        bool                    listSet_ = false;
+
+    
+
+public:
+	
+	/// type info
+	TypeInfo("boundaryList");
+	
+
+	//// - Constructors
+
+	boundaryList(
+		const simulationDomain& simD, 
+		internalPoints& internal);
+
+	//~boundaryList() = default;
+
+  ~boundaryList() = default;
+
+  bool updateLists();
+};
+
+} // pFlow
+
+
+
+
+#endif //__boundaryList_hpp__
+
+
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
index d551a7ea..d797993c 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
@@ -20,7 +20,7 @@ Licence:
 
 
 #include "internalPoints.hpp"
-
+#include "Vector.hpp"
 
 void pFlow::internalPoints::syncPFlag()const
 {
@@ -31,11 +31,6 @@ void pFlow::internalPoints::syncPFlag()const
 	}
 }
 
-/*#include "setFieldList.hpp"
-#include "error.hpp"
-#include "iOstream.hpp"
-
-#include "mortonIndexing.hpp"*/
 
 /*FUNCTION_H
 bool pFlow::internalPoints::evaluateinternalPoints()
@@ -153,6 +148,7 @@ pFlow::uniquePtr<pFlow::int32IndexContainer>
 
 pFlow::internalPoints::internalPoints()
 :
+	subscriber("internalPoints"),
 	pointPosition_("internalPoints", "internalPoints", initialCapacity_, 0, RESERVE()),
 	pFlagsD_(initialCapacity_, 0 , 0)
 {
@@ -162,9 +158,10 @@ pFlow::internalPoints::internalPoints()
 
 pFlow::internalPoints::internalPoints
 (
-	const std::vector<realx3>& posVec
+	const realx3Vector& posVec
 )
 :
+	subscriber("internalPoints"),
 	pointPosition_("internalPoints", "internalPoints", posVec.capacity(), 0, RESERVE()),
 	pFlagsD_(posVec.capacity(), 0, posVec.size())
 {
@@ -194,14 +191,19 @@ FUNCTION_H
 void pFlow::internalPoints::updateFlag
 (
 	const domain& dm, 
-	real dist
+	const std::array<real,6>& dist
 )
 {
-	pFlagsD_.markDeleteInDomain
+	pFlagsD_.markPointRegions
 	(
 		dm,
 		pointPosition_.deviceVectorAll(),
-		dist
+		dist[0],
+		dist[1],
+		dist[2],
+		dist[3],
+		dist[4],
+		dist[5]
 	);
 }
 
@@ -214,13 +216,20 @@ bool pFlow::internalPoints::read
 )
 {
 	
-	if( !pointPosition_.read(is, iotype))
+	Field<Vector, realx3 , vecAllocator<realx3>> fRead("internalPoints", "internalPoints");
+
+	if( !fRead.read(is, iotype))
 	{
 		fatalErrorInFunction<<
 		"Error in reading pointPosition from stream "<< is.name()<<endl;
 		return false;
 	}
 
+	/// here there should be some mechanism for field distribution between procesors
+	
+
+	pointPosition_.assign(fRead.vectorField());
+
 	pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
 	pFlagSync_ = false;
 	syncPFlag();
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
index cec42337..095bdff1 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
@@ -17,29 +17,23 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
-
 #ifndef __internalPoints_hpp__
 #define __internalPoints_hpp__
 
+#include "subscriber.hpp"
+#include "Vectors.hpp"
 #include "Fields.hpp"
 #include "pointFlag.hpp"
 
 
 //#include "indexContainer.hpp"
 
-
-
 namespace pFlow
 {
 
-//forward
-/*class box;
-class setFieldList;
-class repository;*/
-
 class internalPoints
-
+:
+	public subscriber
 {
 public:
 	
@@ -47,11 +41,11 @@ public:
 
 	using pointsType 		= realx3Field_D;
 
-	using device_type 		= typename pointsType::deviceType;
+	using device_type 		= typename pointsType::device_type;
 
-	using memory_space 		= typename pointsType::memorySpace;
+	using memory_space 		= typename pointsType::memory_space;
 
-	using execution_space 	= typename pointsType::executionSpace;
+	using execution_space 	= typename pointsType::execution_space;
 
 	using pFlagTypeDevice 	= pointFlag<execution_space>;
 
@@ -62,22 +56,25 @@ protected:
 
 	//// - data members
 
-		// position of points on device
-		realx3Field_D 			pointPosition_;
+		/// Position of points on device
+		realx3Field_D 				pointPosition_;
 
-		// flag of points on device
-		mutable pFlagTypeDevice 		pFlagsD_;
+		/// flag of points on device
+		mutable pFlagTypeDevice 	pFlagsD_;
 
-		mutable pFlagTypeHost 			pFlagsH_;
+		/// flag of points on host
+		mutable pFlagTypeHost 		pFlagsH_;
 
-		mutable bool 					pFlagSync_ = false;
+		/// if both host and device flags sync
+		mutable bool 				pFlagSync_ = false;
 	
+	//// - protected members
 
-	void syncPFlag()const;
+		void syncPFlag()const;
 
 public:
 
-	friend class dynamicinternalPoints;
+	//friend class dynamicinternalPoints;
 	
 	// - type info
 	TypeInfo("internalPoints");
@@ -88,23 +85,21 @@ public:
 		// - an empty internalPoints, good for reading from file 
 		internalPoints();
 
-		/// Construct from components
-		//internalPoints(const int8Vector& flgVec, const realx3Vector& posVec);
-
+		
 		/// Construct from point positions, assume all points are active
-		internalPoints(const std::vector<realx3>& posVec);
+		internalPoints(const realx3Vector& posVec);
 
-		/// Copy construct
-		internalPoints(const internalPoints&) = default;
+		/// No Copy construct
+		internalPoints(const internalPoints&) = delete;
 
 		/// Move construct 
 		internalPoints(internalPoints&&) = default;
 
-		/// Copy assignment 
-		internalPoints& operator=(const internalPoints&) = default;
+		/// No Copy assignment 
+		internalPoints& operator=(const internalPoints&) = delete;
 
 		/// Move assignment 
-		internalPoints& operator=(internalPoints&&) = delete;
+		internalPoints& operator=(internalPoints&&) = default;
 
 		/// Destructor 
 		virtual ~internalPoints() = default;
@@ -116,7 +111,7 @@ public:
 
 
 		FUNCTION_H
-		const pFlagTypeHost& 	activePointsMaskH()const;
+		const pFlagTypeHost& activePointsMaskH()const;
 
 		// - Const access pointPosition
 		FUNCTION_H
@@ -166,7 +161,9 @@ public:
 
 		
 		FUNCTION_H
-		void updateFlag(const domain& dm, real dist);
+		void updateFlag(
+			const domain& dm, 
+			const std::array<real,6>& dist);
 
 		/*FUNCTION_H
 		size_t markDeleteOutOfBox(const box& domain);*/
@@ -227,6 +224,7 @@ public:
 
 };
 
+inline
 iOstream& operator<<(iOstream& os, const internalPoints& ip)
 {
 	if( !ip.write(os, IOPattern::AllProcessorsDifferent) )
diff --git a/src/phasicFlow/structuredData/pointStructure/pStcutold.txt b/src/phasicFlow/structuredData/pointStructure/pStcutold.txt
new file mode 100644
index 00000000..7d50ca4c
--- /dev/null
+++ b/src/phasicFlow/structuredData/pointStructure/pStcutold.txt
@@ -0,0 +1,540 @@
+#include "pointStructureKernels.hpp"
+#include "setFieldList.hpp"
+#include "error.hpp"
+#include "iOstream.hpp"
+//#include "Time.hpp"
+#include "mortonIndexing.hpp"
+
+FUNCTION_H
+bool pFlow::pointStructure::evaluatePointStructure()
+{
+	if(pointFlag_.size() != pointPosition_.size())
+	{
+		fatalErrorInFunction<<
+		"number of elements in pointFlag and pointPosition is not equal \n";
+		return false;
+	}
+
+	setNumMaxPoints();
+
+	int32 minActive, maxActive;
+	numActivePoints_ = pFlow::pointStructureKernels::scanPointFlag(
+		0,
+		numPoints_,
+		static_cast<int8>(pointStructure::ACTIVE),
+		pointFlag_.deviceVectorAll(),
+		minActive,
+		maxActive
+		);
+	
+	activeRange_ = {minActive, maxActive};	
+	
+	return true;
+}
+
+FUNCTION_H
+void pFlow::pointStructure::setNumMaxPoints()
+{
+	maxPoints_ = pointFlag_.capacity();
+	numPoints_ = pointFlag_.size();
+}
+
+FUNCTION_H
+pFlow::realx3Field_D& pFlow::pointStructure::pointPosition()
+{
+	return pointPosition_;
+}
+
+FUNCTION_H
+pFlow::int8Field_HD& pFlow::pointStructure::pointFlag()
+{
+	return pointFlag_;
+}
+		
+pFlow::uniquePtr<pFlow::int32IndexContainer> 
+	pFlow::pointStructure::getNewPointsIndices(int32 numNewPoints)const
+{
+
+
+	if( capacity() - activeRange_.second >=  numNewPoints )
+	{
+		// fill the sequence starting from activeRange_.second-1
+		return makeUnique<int32IndexContainer>(
+			activeRange_.second,
+			activeRange_.second+numNewPoints);
+
+	}
+
+	// second, check if there is space at the beginning
+	if( activeRange_.first >= numNewPoints)
+	{
+		return makeUnique<int32IndexContainer>(
+			0,
+			numNewPoints);	
+	}
+
+	// otherwise scan the points from first to the end to find empty spaces 
+	int32Vector newPoints(
+		numNewPoints,
+		RESERVE());
+
+	newPoints.clear();
+	int32 numAdded = 0;
+	ForAll(i, pointFlag_)
+	{
+		if(!isActive(i))
+		{
+			newPoints.push_back(static_cast<int32>(i));
+			numAdded++;
+		}
+
+		if(numAdded == numNewPoints)
+		{
+			return makeUnique<int32IndexContainer>(
+				newPoints.data(),
+				numNewPoints);
+		}
+	}
+
+	// check if there is space at the end for the remaining of points
+	if( numAdded <numNewPoints && capacity() - size() >= numNewPoints - numAdded )
+	{
+		int32 ind = size();
+		for(int32 i=numAdded; i<numNewPoints; i++)
+		{
+			newPoints.push_back(ind);
+			ind++;
+		}
+		
+		return makeUnique<int32IndexContainer>(
+			newPoints.data(),
+			numNewPoints);
+	}
+	else
+	{
+		fatalErrorInFunction<<"not enough capacity for inserting particles into the point structure\n";
+		return nullptr;
+	}
+
+	return nullptr;
+}
+
+pFlow::pointStructure::pointStructure()
+:
+	eventSubscriber(),	
+	pointFlag_("pointFlag", "pointFlag", maxPoints_, 0 , RESERVE()),
+	pointPosition_("pointPosition", "pointPosition", maxPoints_, 0, RESERVE()),
+	activeRange_(0,0)
+{}
+
+pFlow::pointStructure::pointStructure
+(
+	const int8Vector& flgVec,
+	const realx3Vector& posVec
+)
+:
+	eventSubscriber(),	
+	maxPoints_(posVec.capacity()),
+	pointFlag_("pointFlag", "pointFlag", maxPoints_, 0 , RESERVE()),
+	pointPosition_("pointPosition", "pointPosition", maxPoints_, 0, RESERVE()),
+	activeRange_(0,0)
+{
+	
+	pointFlag_.assign(flgVec);
+
+	pointPosition_.assign(posVec);
+
+	if( !evaluatePointStructure() )
+	{
+		fatalExit;
+	}
+}
+
+pFlow::pointStructure::pointStructure
+(
+	const realx3Vector& posVec
+)
+:
+	eventSubscriber(),	
+	maxPoints_(posVec.capacity()),
+	pointFlag_("pointFlag", "pointFlag", maxPoints_, 0 , RESERVE()),
+	pointPosition_("pointPosition", "pointPosition", maxPoints_, 0, RESERVE()),
+	activeRange_(0,0)
+{
+
+	pointPosition_.assign(posVec);
+
+	pointFlag_.resize(pointPosition_.size(), static_cast<int8>(pointStructure::ACTIVE) );
+	//pointFlag_.syncViews();
+
+	if( !evaluatePointStructure() )
+	{
+		fatalExit;
+	}
+}
+
+FUNCTION_H
+const pFlow::realx3Field_D& pFlow::pointStructure::pointPosition()const
+{
+	return pointPosition_;
+}
+
+FUNCTION_H
+const pFlow::int8Field_HD& pFlow::pointStructure::pointFlag()const
+{
+	return pointFlag_;
+}
+
+// - size of data structure
+FUNCTION_H
+pFlow::label pFlow::pointStructure::size()const
+{
+	return numPoints_;
+}
+
+FUNCTION_H
+pFlow::label pFlow::pointStructure::capacity()const
+{
+	return maxPoints_;
+}
+
+FUNCTION_H
+pFlow::label pFlow::pointStructure::numActive() const
+{
+	return numActivePoints_;
+}
+
+FUNCTION_H
+bool pFlow::pointStructure::allActive()const
+{
+	return numActivePoints_ == numPoints_;
+}
+
+FUNCTION_H
+bool pFlow::pointStructure::mortonSortPoints(const box& domain, real dx)
+{
+	if( !getSortedIndex(
+		domain, 
+		dx, 
+		activeRange_,
+		pointPosition_.deviceVectorAll(),
+		pointFlag_.deviceVectorAll(),
+		mortonSortedIndex_) )
+	{
+		fatalErrorInFunction<<"failed to perform morton sorting!"<<endl;
+		return false;
+	}
+
+	pointPosition_.sortItems(mortonSortedIndex_);
+	pointFlag_.sortItems(mortonSortedIndex_);
+
+	auto oldSize 			= size();
+	auto oldCapacity 	= capacity();
+	auto oldRange 		= activeRange();
+
+	// update size, range, capacity
+	setNumMaxPoints();
+	activeRange_ = {0, static_cast<int>(mortonSortedIndex_.size())};
+	numActivePoints_ = mortonSortedIndex_.size();
+
+	eventMessage msg(eventMessage::REARRANGE);
+
+	if(oldSize != size() )
+	{
+		msg.add(eventMessage::SIZE_CHANGED);
+	}
+
+	if(oldCapacity != capacity())
+	{
+		msg.add(eventMessage::CAP_CHANGED);
+	}
+
+	if( oldRange != activeRange_)
+	{
+		msg.add(eventMessage::RANGE_CHANGED);
+	}
+
+	// notify all the registered objects except the exclusionList 
+	if( !this->notify(msg) ) return false;
+
+	return true;
+}
+
+FUNCTION_H
+size_t pFlow::pointStructure::markDeleteOutOfBox(const box& domain)
+{
+	if(numPoints_==0) return 0;
+
+	int32 minRange, maxRange;
+	int32 numMarked = 
+	pFlow::pointStructureKernels::markDeleteOutOfBox(
+		domain,
+		activeRange_.first,
+		activeRange_.second,
+		pointStructure::DELETED,
+		pointPosition_.deviceVectorAll(),
+		pointFlag_.deviceVectorAll(),
+		activePointsMaskD(),
+		minRange, maxRange );
+
+	if(numMarked)
+	{
+		pointFlag_.modifyOnDevice();
+		pointFlag_.syncViews();	
+	}
+
+	if( numMarked<=numActivePoints_)
+	{
+		numActivePoints_ -= numMarked;
+	}
+	else
+	{
+		fatalErrorInFunction<<
+		"number of points marked as delete ("<<numMarked<<
+		") is greater than the activePoints ("<<numActivePoints_<<
+		").\n";
+		fatalExit;
+	}
+
+	range newRange = {minRange, maxRange};
+	
+	if( activeRange_ != newRange )
+	{
+		activeRange_ = newRange;
+		eventMessage msg(eventMessage::RANGE_CHANGED);
+		
+		// notify all the registered objects about active range change
+		if( !this->notify(msg) ) 
+		{
+			fatalExit<<
+			"something went wrong in notifying registered object about range change. \n";
+			fatalExit;
+		}
+	}	
+
+	return numMarked;
+	
+}
+
+FUNCTION_H
+bool pFlow::pointStructure::updateForDelete()
+{
+	notImplementedFunction;
+
+	return true;
+}
+
+/*FUNCTION_H
+pFlow::uniquePtr<pFlow::int32IndexContainer> pFlow::pointStructure::insertPoints
+(
+	const realx3Vector& pos,
+	const setFieldList& setField,
+	repository& owner,
+	const List<eventObserver*>& exclusionList
+)
+{
+
+	auto numNew = pos.size();
+	if( numNew==0)
+	{
+		return makeUnique<int32IndexContainer>();
+	}
+		
+	auto newPointsPtr = getNewPointsIndices( numNew );
+
+	if(!newPointsPtr)return nullptr;
+
+	auto oldSize 			= size();
+	auto oldCapacity 	= capacity();
+	auto oldRange 		= activeRange();
+
+	tobeInsertedIndex_ = newPointsPtr();
+
+	// set the position of new points
+	
+	if(!pointPosition_.insertSetElement(
+		newPointsPtr(),
+		pos)
+		)return nullptr;
+
+	
+	if(!pointFlag_.insertSetElement(
+		newPointsPtr(),
+		static_cast<int8>(PointFlag::ACTIVE))
+		)return nullptr;
+
+	
+	setNumMaxPoints();
+	auto minInd = newPointsPtr().min();
+	auto maxInd = newPointsPtr().max();
+
+
+	List<eventObserver*> localExlusion(exclusionList);
+
+	for(auto sfEntry:setField)
+	{
+
+		if(void* fieldPtr = 
+			sfEntry.setPointFieldSelectedAll( 
+				owner, 
+				newPointsPtr(), 
+				false );
+			fieldPtr)
+
+			localExlusion.push_back( 
+				static_cast<eventObserver*>(fieldPtr)
+				);
+		else
+			return nullptr;
+	}
+
+	// changes the active rage based on the new inserted points 
+	activeRange_ = { static_cast<int>(min(activeRange_.first, minInd )),
+					 static_cast<int>(max(activeRange_.second, maxInd+1))};
+
+	numActivePoints_ += numNew;
+
+	eventMessage msg(eventMessage::INSERT);
+
+	if( oldRange != activeRange_ )
+		msg.add(eventMessage::RANGE_CHANGED);
+
+	if( oldSize != size() )
+		msg.add(eventMessage::SIZE_CHANGED);
+
+	if( oldCapacity != capacity() )
+		msg.add(eventMessage::CAP_CHANGED);
+	
+	// notify all the registered objects except the exclusionList 
+	if( !this->notify(msg, localExlusion) ) return nullptr;
+
+	return newPointsPtr;
+}
+
+
+
+/*FUNCTION_H
+bool pFlow::pointStructure::readPointStructure
+(
+	iIstream& is
+)
+{
+	auto psCapacity = is.lookupDataOrSet("pointStructureCapacity", maxSizeDefault_);
+	pointPosition_.reallocate(psCapacity);
+	pointFlag_.reallocate(psCapacity);
+
+	if( !pointPosition_.read(is))
+	{
+		ioErrorInFile(is.name(), is.lineNumber())<<
+		"Error in reading pointPosition in pointStructure \n";
+		return false;	
+	}
+
+	if(! pointFlag_.read(is, true))
+	{
+		ioErrorInFile(is.name(), is.lineNumber())<<
+		"Error in reading pointFlag in pointStructure \n";
+		return false;
+	}
+
+	
+	return evaluatePointStructure();
+}*/
+
+/*FUNCTION_H
+bool pFlow::pointStructure::writePointStructure
+(
+	iOstream& os
+)const
+{
+	os.writeWordEntry("pointStructureCapacity", maxPoints_);
+
+	if(!pointPosition_.write(os))
+	{
+		ioErrorInFile(os.name(), os.lineNumber())<<
+		"error in writing pointPosition to file \n";
+		return false;
+	}
+
+	if(!pointFlag_.write(os))
+	{
+		ioErrorInFile(os.name(), os.lineNumber())<<
+		"error in writing pointFlag to file \n";
+		return false;
+	}
+	return true;
+}*/
+
+
+/*pFlow::uniquePtr<pFlow::int32Vector> 
+pFlow::pointStructure::newPointsIndices(
+	int32 numNewPoints
+)const
+{
+	
+	auto newPointsPtr = makeUnique<int32Vector>(
+		"pointStructure::newPointsPtr",
+		numNewPoints);
+
+	auto& newPoints = newPointsPtr();
+	
+
+	// first, check if there is space at the end
+	if( capacity() - activeRange_.second >=  numNewPoints )
+	{
+		// fill the sequence starting from activeRange_.second-1
+		fillSequence(newPoints, activeRange_.second-1);
+		return newPointsPtr;
+	}
+
+	// second, check if there is space at the beggining
+	if( activeRange_.first >= numNewPoints)
+	{
+		// fill the sequence starting from 0
+		fillSequence(newPoints, 0);
+		return newPointsPtr;
+	}
+
+	// otherwise scan the points from first to the end to find empty spaces 
+	newPoints.clear();
+	int32 numAdded = 0;
+	ForAll(i, pointFlag_)
+	{
+		if(!isActive(i))
+		{
+			newPoints.push_back(static_cast<int32>(i));
+			numAdded++;
+		}
+
+		if(numAdded == numNewPoints)
+		{
+			
+			return newPointsPtr;
+		}
+	}
+
+	// check if there is space at the end for the remaining of points
+	if( capacity() - size() >= numNewPoints - numAdded )
+	{
+		int32 ind = size();
+		for(int32 i=numAdded; i<numNewPoints; i++)
+		{
+			newPoints.push_back(ind);
+			ind++;
+		}
+		
+		return newPointsPtr;
+	}
+	else
+	{
+		fatalErrorInFunction<<"not enough capacity for inserting particles into the point structure\n";
+		return nullptr;
+	}
+
+	return nullptr;
+}*/
+
+pFlow::pointStructure::pointStructure(const dictionary &domainDict)
+{
+
+}
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
index 974a2866..62861957 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
@@ -24,12 +24,9 @@ Licence:
 #include "phasicFlowKokkos.hpp"
 #include "domain.hpp"
 
-
-
 namespace pFlow
 {
 
-
 template<typename ExecutionSpace>
 class pointFlag
 {
@@ -61,7 +58,7 @@ protected:
 
 	rangeU32 	activeRange_ 	= {0,0};
 
-	bool 			isAllActive_	= false;
+	bool 		isAllActive_	= false;
 
 	uint32 		nLeft_ 	= 0;
 
@@ -161,35 +158,19 @@ public:
 		return flg > INTERNAL;
 	}
 
-	INLINE_FUNCTION_HD
-	bool isLeft(uint32 i)const
-	{
-		return (flags_[i]&LEFT) == LEFT;
-	}
-
+	
 	INLINE_FUNCTION_HD
 	bool isLeft(uint8 flg)const
 	{
 		return (flg&LEFT) == LEFT;
 	}
 
-	INLINE_FUNCTION_HD
-	bool isRight(uint32 i)const
-	{
-		return (flags_[i]&&RIGHT) == RIGHT;
-	}
-
 	INLINE_FUNCTION_HD
 	bool isRight(uint8 flg)const
 	{
 		return (flg&&RIGHT) == RIGHT;
 	}
 
-	INLINE_FUNCTION_HD
-	bool isBottom(uint32 i)const
-	{
-		return (flags_[i]&&BOTTOM) == BOTTOM;
-	}
 
 	INLINE_FUNCTION_HD
 	bool isBottom(uint8 flg)const
@@ -197,43 +178,24 @@ public:
 		return (flg&&BOTTOM) == BOTTOM;
 	}
 
-	INLINE_FUNCTION_HD
-	bool isTop(uint32 i)const
-	{
-		return (flags_[i]&&TOP) == TOP;
-	}
-
 	INLINE_FUNCTION_HD
 	bool isTop(uint8 flg)const
 	{
 		return (flg&&TOP) == TOP;
 	}
 
-	INLINE_FUNCTION_HD
-	bool isRear(uint32 i)const
-	{
-		return (flags_[i]&&REAR) == REAR;
-	}
-
 	INLINE_FUNCTION_HD
 	bool isRear(uint8 flg)const
 	{
 		return (flg&&REAR) == REAR;
 	}
 
-	INLINE_FUNCTION_HD
-	bool isFront(uint32 i)const
-	{
-		return (flags_[i]&&FRONT) == FRONT;
-	}
-
 	INLINE_FUNCTION_HD
 	bool isFront(uint8 flg)const
 	{
 		return (flg&&FRONT) == FRONT;
 	}
 
-
 	template<typename ExeSpace>
 	pointFlag<ExeSpace> clone()const
 	{
@@ -254,10 +216,15 @@ public:
 	
 	uint32 scanPointFlag();
 
-	uint32 markDeleteInDomain(
+	uint32 markPointRegions(
 		domain 								dm,
 		ViewType1D<realx3, memory_space> 	points,
-		real dist);
+		real leftLength,
+		real rightLength,
+		real bottomLength,
+		real topLength,
+		real rearLength,
+		real frontLength);
 
 	void fillNeighborsLists(
 		ViewType1D<uint32, memory_space> leftList,
@@ -267,6 +234,12 @@ public:
 		ViewType1D<uint32, memory_space> rearList,
 		ViewType1D<uint32, memory_space> frontList);
 
+	uint32 markDelete(
+		const plane& 		pln,
+		ViewType1D<realx3, memory_space> 	points,
+		ViewType1D<uint32, memory_space> 	indices,
+		ViewType1D<uint32, memory_space> 	onOff);
+
 
 
 };
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
index 107ac2e9..95fcd517 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
@@ -81,11 +81,16 @@ pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::scanPointFlag()
 
 
 template<typename ExecutionSpace>
-pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markDeleteInDomain
+pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markPointRegions
 (
 	domain 								dm,
 	ViewType1D<realx3, memory_space> 	points,
-	real dist)
+	real leftLength,
+	real rightLength,
+	real bottomLength,
+	real topLength,
+	real rearLength,
+	real frontLength)
 {
 	
 	using rpMark = Kokkos::RangePolicy<execution_space,  
@@ -134,37 +139,37 @@ pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markDeleteInDomain
 						minUpdate = min(minUpdate,i);
 						maxUpdate = max(maxUpdate,i);
 
-						if(dm.left().inPositiveDistance(p, dist))
+						if(dm.left().inPositiveDistance(p, leftLength))
 						{
 							flg += LEFT;
 							valLeft++;	
 						} 
 
-						if(dm.right().inPositiveDistance(p, dist))
+						if(dm.right().inPositiveDistance(p, rightLength))
 						{
 							flg += RIGHT;
 							valRight++;
 						}
 						
-						if(dm.bottom().inPositiveDistance(p, dist))
+						if(dm.bottom().inPositiveDistance(p, bottomLength))
 						{
 							flg += BOTTOM;
 							valBottom++;
 						} 
 
-						if(dm.top().inPositiveDistance(p, dist)) 
+						if(dm.top().inPositiveDistance(p, topLength)) 
 						{
 							flg += TOP;
 							valTop++;
 						}
 						
-						if(dm.rear().inPositiveDistance(p, dist)) 
+						if(dm.rear().inPositiveDistance(p, rearLength)) 
 						{
 							flg += REAR;
 							valRear++;
 						}
 
-						if(dm.front().inPositiveDistance(p, dist))
+						if(dm.front().inPositiveDistance(p, frontLength))
 						{
 							flg += FRONT;
 							valFront++;
@@ -257,4 +262,76 @@ void pFlow::pointFlag<ExecutionSpace>::fillNeighborsLists
 
 }
 
+template<typename ExecutionSpace>
+pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markDelete
+(
+	const plane& 		pln,
+	ViewType1D<realx3, memory_space> 	points,
+	ViewType1D<uint32, memory_space> 	indices,
+	ViewType1D<uint32, memory_space> 	onOff
+)
+{
+	// if it is empty, do nothing
+	if(indices.size() == 0 )return 0;
+
+	using rpMark = Kokkos::RangePolicy<execution_space,  
+			Kokkos::IndexType<uint32>>;
+
+	uint32 start = activeRange().start();
+	uint32 end   = activeRange().end();
+
+	uint32 minRange = end;
+	uint32 maxRange = start;
+
+	uint32 numMarked = 0;
+
+	if(start<end)
+	{
+		Kokkos::parallel_reduce(
+			"pointFlagKernels::markDelete",
+			rpScanFlag(0, indices.size()),
+			CLASS_LAMBDA_HD(
+				uint32 i, 
+				uint32& minUpdate, 
+				uint32& maxUpdate, 
+				uint32& sumToUpdate)
+			{
+				auto indx = indices(i);
+				
+				if( pln.pointInNegativeSide(points(indx)))
+				{
+					flags_[indx] = DELETED;
+					sumToUpdate++;
+					onOff[i] = 0;
+				}
+				else
+				{
+					minUpdate = min(minUpdate,i);
+					maxUpdate = max(maxUpdate,i);
+					onOff[i] = 1;
+				}
+			},
+			Kokkos::Min<uint32>(minRange), 
+			Kokkos::Max<uint32>(maxRange),
+			numMarked);	
+	}
+
+	// means either range was empty or all points have been deleted.
+	if(minRange<start || maxRange>end)
+	{
+		minRange = 0;
+		maxRange = 0;
+	}
+	else
+	{
+		maxRange++; // add one to make it half
+	}
+
+	activeRange_ = {minRange, maxRange};
+	isAllActive_ = isAllActive_ && numMarked == 0; 
+	numActive_ 	-= numMarked;
+
+	return numMarked;
+}
+
 #endif // __pointFlagKernels_hpp__
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
index 8dd2494e..a2d4b690 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
@@ -18,540 +18,128 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-
 #include "pointStructure.hpp"
-#include "pointStructureKernels.hpp"
-#include "setFieldList.hpp"
-#include "error.hpp"
-#include "iOstream.hpp"
-//#include "Time.hpp"
-#include "mortonIndexing.hpp"
+#include "simulationDomain.hpp"
 
-FUNCTION_H
-bool pFlow::pointStructure::evaluatePointStructure()
-{
-	if(pointFlag_.size() != pointPosition_.size())
-	{
-		fatalErrorInFunction<<
-		"number of elements in pointFlag and pointPosition is not equal \n";
-		return false;
-	}
+#include "streams.hpp"
 
-	setNumMaxPoints();
-
-	int32 minActive, maxActive;
-	numActivePoints_ = pFlow::pointStructureKernels::scanPointFlag(
-		0,
-		numPoints_,
-		static_cast<int8>(pointStructure::ACTIVE),
-		pointFlag_.deviceVectorAll(),
-		minActive,
-		maxActive
-		);
-	
-	activeRange_ = {minActive, maxActive};	
-	
-	return true;
-}
-
-FUNCTION_H
-void pFlow::pointStructure::setNumMaxPoints()
-{
-	maxPoints_ = pointFlag_.capacity();
-	numPoints_ = pointFlag_.size();
-}
-
-FUNCTION_H
-pFlow::realx3Field_D& pFlow::pointStructure::pointPosition()
-{
-	return pointPosition_;
-}
-
-FUNCTION_H
-pFlow::int8Field_HD& pFlow::pointStructure::pointFlag()
-{
-	return pointFlag_;
-}
-		
-pFlow::uniquePtr<pFlow::int32IndexContainer> 
-	pFlow::pointStructure::getNewPointsIndices(int32 numNewPoints)const
-{
-
-
-	if( capacity() - activeRange_.second >=  numNewPoints )
-	{
-		// fill the sequence starting from activeRange_.second-1
-		return makeUnique<int32IndexContainer>(
-			activeRange_.second,
-			activeRange_.second+numNewPoints);
-
-	}
-
-	// second, check if there is space at the beginning
-	if( activeRange_.first >= numNewPoints)
-	{
-		return makeUnique<int32IndexContainer>(
-			0,
-			numNewPoints);	
-	}
-
-	// otherwise scan the points from first to the end to find empty spaces 
-	int32Vector newPoints(
-		numNewPoints,
-		RESERVE());
-
-	newPoints.clear();
-	int32 numAdded = 0;
-	ForAll(i, pointFlag_)
-	{
-		if(!isActive(i))
-		{
-			newPoints.push_back(static_cast<int32>(i));
-			numAdded++;
-		}
-
-		if(numAdded == numNewPoints)
-		{
-			return makeUnique<int32IndexContainer>(
-				newPoints.data(),
-				numNewPoints);
-		}
-	}
-
-	// check if there is space at the end for the remaining of points
-	if( numAdded <numNewPoints && capacity() - size() >= numNewPoints - numAdded )
-	{
-		int32 ind = size();
-		for(int32 i=numAdded; i<numNewPoints; i++)
-		{
-			newPoints.push_back(ind);
-			ind++;
-		}
-		
-		return makeUnique<int32IndexContainer>(
-			newPoints.data(),
-			numNewPoints);
-	}
-	else
-	{
-		fatalErrorInFunction<<"not enough capacity for inserting particles into the point structure\n";
-		return nullptr;
-	}
-
-	return nullptr;
-}
-
-pFlow::pointStructure::pointStructure()
+pFlow::pointStructure::pointStructure
+(
+  const dictionary& domainDict
+)
 :
-	eventSubscriber(),	
-	pointFlag_("pointFlag", "pointFlag", maxPoints_, 0 , RESERVE()),
-	pointPosition_("pointPosition", "pointPosition", maxPoints_, 0, RESERVE()),
-	activeRange_(0,0)
+  internalPoints(),
+  simulationDomain_
+  (
+    simulationDomain::create(domainDict)
+  ),
+  boundaries_
+  (
+    simulationDomain_(),
+    *this
+  )
 {}
 
-pFlow::pointStructure::pointStructure
+bool pFlow::pointStructure::distributePoints
 (
-	const int8Vector& flgVec,
-	const realx3Vector& posVec
+	const realx3Vector &points
 )
-:
-	eventSubscriber(),	
-	maxPoints_(posVec.capacity()),
-	pointFlag_("pointFlag", "pointFlag", maxPoints_, 0 , RESERVE()),
-	pointPosition_("pointPosition", "pointPosition", maxPoints_, 0, RESERVE()),
-	activeRange_(0,0)
 {
-	
-	pointFlag_.assign(flgVec);
+	uint32 thisN = simulationDomain_->thisNumPoints();
 
-	pointPosition_.assign(posVec);
+    Field<Vector, realx3 , vecAllocator<realx3>> internal(
+        "internalPoints", 
+        "internalPoints", 
+        thisN, 
+        thisN, 
+        RESERVE());
+    
+    
+    auto l = sizeof(realx3);
+    auto pointsSpan = span<char>(
+        reinterpret_cast<char*>
+		(
+			const_cast<realx3*>(points.data())
+		), 
+        points.size()*l );
+
+    auto internalSpan = span<char>(reinterpret_cast<char*>(internal.data()), internal.size()*l);
+
+    if(!simulationDomain_->transferBlockData(pointsSpan, internalSpan, l))
+    {
+        fatalErrorInFunction<<
+        "Error in transfering the block data "<<endl;
+        return false;
+    }
+    
+    pointPosition_.assign(internal.vectorField());
+
+    
+    pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
+    pFlagSync_ = false;
+    syncPFlag();
+    
+    
+
+    return true;
 
-	if( !evaluatePointStructure() )
-	{
-		fatalExit;
-	}
 }
 
-pFlow::pointStructure::pointStructure
+pFlow::pointStructure::pointStructure(
+    const dictionary &domainDict,
+    const realx3Vector &posVec)
+    : internalPoints(),
+      simulationDomain_(
+          simulationDomain::create(domainDict)),
+      boundaries_(
+          simulationDomain_(),
+          *this)
+{
+    if(!simulationDomain_->updateDomains(posVec) )
+    {
+        fatalErrorInFunction<<
+        "Failed to update domains."<<endl;
+        fatalExit;
+    }
+
+    boundaries_.updateLists();
+
+    if( !distributePoints(posVec) )
+    {
+        fatalErrorInFunction<<"Faild to distributes poinst"<<endl;
+        fatalExit;
+    }
+
+    
+}
+
+FUNCTION_H
+bool pFlow::pointStructure::read
 (
-	const realx3Vector& posVec
+    iIstream& is, 
+    IOPattern::IOType iotype
 )
-:
-	eventSubscriber(),	
-	maxPoints_(posVec.capacity()),
-	pointFlag_("pointFlag", "pointFlag", maxPoints_, 0 , RESERVE()),
-	pointPosition_("pointPosition", "pointPosition", maxPoints_, 0, RESERVE()),
-	activeRange_(0,0)
 {
+    Field<Vector, realx3 , vecAllocator<realx3>> fRead("file_internalPoints", "internalPoints");
+    
+    
 
-	pointPosition_.assign(posVec);
-
-	pointFlag_.resize(pointPosition_.size(), static_cast<int8>(pointStructure::ACTIVE) );
-	//pointFlag_.syncViews();
-
-	if( !evaluatePointStructure() )
-	{
-		fatalExit;
-	}
-}
-
-FUNCTION_H
-const pFlow::realx3Field_D& pFlow::pointStructure::pointPosition()const
-{
-	return pointPosition_;
-}
-
-FUNCTION_H
-const pFlow::int8Field_HD& pFlow::pointStructure::pointFlag()const
-{
-	return pointFlag_;
-}
-
-// - size of data structure
-FUNCTION_H
-pFlow::label pFlow::pointStructure::size()const
-{
-	return numPoints_;
-}
-
-FUNCTION_H
-pFlow::label pFlow::pointStructure::capacity()const
-{
-	return maxPoints_;
-}
-
-FUNCTION_H
-pFlow::label pFlow::pointStructure::numActive() const
-{
-	return numActivePoints_;
-}
-
-FUNCTION_H
-bool pFlow::pointStructure::allActive()const
-{
-	return numActivePoints_ == numPoints_;
-}
-
-FUNCTION_H
-bool pFlow::pointStructure::mortonSortPoints(const box& domain, real dx)
-{
-	if( !getSortedIndex(
-		domain, 
-		dx, 
-		activeRange_,
-		pointPosition_.deviceVectorAll(),
-		pointFlag_.deviceVectorAll(),
-		mortonSortedIndex_) )
-	{
-		fatalErrorInFunction<<"failed to perform morton sorting!"<<endl;
-		return false;
-	}
-
-	pointPosition_.sortItems(mortonSortedIndex_);
-	pointFlag_.sortItems(mortonSortedIndex_);
-
-	auto oldSize 			= size();
-	auto oldCapacity 	= capacity();
-	auto oldRange 		= activeRange();
-
-	// update size, range, capacity
-	setNumMaxPoints();
-	activeRange_ = {0, static_cast<int>(mortonSortedIndex_.size())};
-	numActivePoints_ = mortonSortedIndex_.size();
-
-	eventMessage msg(eventMessage::REARRANGE);
-
-	if(oldSize != size() )
-	{
-		msg.add(eventMessage::SIZE_CHANGED);
-	}
-
-	if(oldCapacity != capacity())
-	{
-		msg.add(eventMessage::CAP_CHANGED);
-	}
-
-	if( oldRange != activeRange_)
-	{
-		msg.add(eventMessage::RANGE_CHANGED);
-	}
-
-	// notify all the registered objects except the exclusionList 
-	if( !this->notify(msg) ) return false;
-
-	return true;
-}
-
-FUNCTION_H
-size_t pFlow::pointStructure::markDeleteOutOfBox(const box& domain)
-{
-	if(numPoints_==0) return 0;
-
-	int32 minRange, maxRange;
-	int32 numMarked = 
-	pFlow::pointStructureKernels::markDeleteOutOfBox(
-		domain,
-		activeRange_.first,
-		activeRange_.second,
-		pointStructure::DELETED,
-		pointPosition_.deviceVectorAll(),
-		pointFlag_.deviceVectorAll(),
-		activePointsMaskD(),
-		minRange, maxRange );
-
-	if(numMarked)
-	{
-		pointFlag_.modifyOnDevice();
-		pointFlag_.syncViews();	
-	}
-
-	if( numMarked<=numActivePoints_)
-	{
-		numActivePoints_ -= numMarked;
-	}
-	else
+	if( !fRead.read(is, iotype))
 	{
 		fatalErrorInFunction<<
-		"number of points marked as delete ("<<numMarked<<
-		") is greater than the activePoints ("<<numActivePoints_<<
-		").\n";
-		fatalExit;
-	}
-
-	range newRange = {minRange, maxRange};
-	
-	if( activeRange_ != newRange )
-	{
-		activeRange_ = newRange;
-		eventMessage msg(eventMessage::RANGE_CHANGED);
-		
-		// notify all the registered objects about active range change
-		if( !this->notify(msg) ) 
-		{
-			fatalExit<<
-			"something went wrong in notifying registered object about range change. \n";
-			fatalExit;
-		}
-	}	
-
-	return numMarked;
-	
-}
-
-FUNCTION_H
-bool pFlow::pointStructure::updateForDelete()
-{
-	notImplementedFunction;
-
-	return true;
-}
-
-FUNCTION_H
-pFlow::uniquePtr<pFlow::int32IndexContainer> pFlow::pointStructure::insertPoints
-(
-	const realx3Vector& pos,
-	const setFieldList& setField,
-	repository& owner,
-	const List<eventObserver*>& exclusionList
-)
-{
-
-	auto numNew = pos.size();
-	if( numNew==0)
-	{
-		return makeUnique<int32IndexContainer>();
-	}
-		
-	auto newPointsPtr = getNewPointsIndices( numNew );
-
-	if(!newPointsPtr)return nullptr;
-
-	auto oldSize 			= size();
-	auto oldCapacity 	= capacity();
-	auto oldRange 		= activeRange();
-
-	tobeInsertedIndex_ = newPointsPtr();
-
-	// set the position of new points
-	
-	if(!pointPosition_.insertSetElement(
-		newPointsPtr(),
-		pos)
-		)return nullptr;
-
-	
-	if(!pointFlag_.insertSetElement(
-		newPointsPtr(),
-		static_cast<int8>(PointFlag::ACTIVE))
-		)return nullptr;
-
-	
-	setNumMaxPoints();
-	auto minInd = newPointsPtr().min();
-	auto maxInd = newPointsPtr().max();
-
-
-	List<eventObserver*> localExlusion(exclusionList);
-
-	for(auto sfEntry:setField)
-	{
-
-		if(void* fieldPtr = 
-			sfEntry.setPointFieldSelectedAll( 
-				owner, 
-				newPointsPtr(), 
-				false );
-			fieldPtr)
-
-			localExlusion.push_back( 
-				static_cast<eventObserver*>(fieldPtr)
-				);
-		else
-			return nullptr;
-	}
-
-	// changes the active rage based on the new inserted points 
-	activeRange_ = { static_cast<int>(min(activeRange_.first, minInd )),
-					 static_cast<int>(max(activeRange_.second, maxInd+1))};
-
-	numActivePoints_ += numNew;
-
-	eventMessage msg(eventMessage::INSERT);
-
-	if( oldRange != activeRange_ )
-		msg.add(eventMessage::RANGE_CHANGED);
-
-	if( oldSize != size() )
-		msg.add(eventMessage::SIZE_CHANGED);
-
-	if( oldCapacity != capacity() )
-		msg.add(eventMessage::CAP_CHANGED);
-	
-	// notify all the registered objects except the exclusionList 
-	if( !this->notify(msg, localExlusion) ) return nullptr;
-
-	return newPointsPtr;
-}
-
-
-
-FUNCTION_H
-bool pFlow::pointStructure::readPointStructure
-(
-	iIstream& is
-)
-{
-	auto psCapacity = is.lookupDataOrSet("pointStructureCapacity", maxSizeDefault_);
-	pointPosition_.reallocate(psCapacity);
-	pointFlag_.reallocate(psCapacity);
-
-	if( !pointPosition_.read(is))
-	{
-		ioErrorInFile(is.name(), is.lineNumber())<<
-		"Error in reading pointPosition in pointStructure \n";
-		return false;	
-	}
-
-	if(! pointFlag_.read(is, true))
-	{
-		ioErrorInFile(is.name(), is.lineNumber())<<
-		"Error in reading pointFlag in pointStructure \n";
+		"Error in reading pointPosition from stream "<< is.name()<<endl;
 		return false;
 	}
 
-	
-	return evaluatePointStructure();
-}
+    if(!simulationDomain_->updateDomains(fRead))
+    {
+        fatalErrorInFunction<<
+        "error in updating domains"<<endl;
+        return false;
+    }
 
-FUNCTION_H
-bool pFlow::pointStructure::writePointStructure
-(
-	iOstream& os
-)const
-{
-	os.writeWordEntry("pointStructureCapacity", maxPoints_);
+    boundaries_.updateLists();
 
-	if(!pointPosition_.write(os))
-	{
-		ioErrorInFile(os.name(), os.lineNumber())<<
-		"error in writing pointPosition to file \n";
-		return false;
-	}
-
-	if(!pointFlag_.write(os))
-	{
-		ioErrorInFile(os.name(), os.lineNumber())<<
-		"error in writing pointFlag to file \n";
-		return false;
-	}
-	return true;
-}
-
-
-/*pFlow::uniquePtr<pFlow::int32Vector> 
-pFlow::pointStructure::newPointsIndices(
-	int32 numNewPoints
-)const
-{
-	
-	auto newPointsPtr = makeUnique<int32Vector>(
-		"pointStructure::newPointsPtr",
-		numNewPoints);
-
-	auto& newPoints = newPointsPtr();
-	
-
-	// first, check if there is space at the end
-	if( capacity() - activeRange_.second >=  numNewPoints )
-	{
-		// fill the sequence starting from activeRange_.second-1
-		fillSequence(newPoints, activeRange_.second-1);
-		return newPointsPtr;
-	}
-
-	// second, check if there is space at the beggining
-	if( activeRange_.first >= numNewPoints)
-	{
-		// fill the sequence starting from 0
-		fillSequence(newPoints, 0);
-		return newPointsPtr;
-	}
-
-	// otherwise scan the points from first to the end to find empty spaces 
-	newPoints.clear();
-	int32 numAdded = 0;
-	ForAll(i, pointFlag_)
-	{
-		if(!isActive(i))
-		{
-			newPoints.push_back(static_cast<int32>(i));
-			numAdded++;
-		}
-
-		if(numAdded == numNewPoints)
-		{
-			
-			return newPointsPtr;
-		}
-	}
-
-	// check if there is space at the end for the remaining of points
-	if( capacity() - size() >= numNewPoints - numAdded )
-	{
-		int32 ind = size();
-		for(int32 i=numAdded; i<numNewPoints; i++)
-		{
-			newPoints.push_back(ind);
-			ind++;
-		}
-		
-		return newPointsPtr;
-	}
-	else
-	{
-		fatalErrorInFunction<<"not enough capacity for inserting particles into the point structure\n";
-		return nullptr;
-	}
-
-	return nullptr;
-}*/
\ No newline at end of file
+	return distributePoints(fRead);
+    
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
index 09afa2af..e66a3b61 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
@@ -22,46 +22,31 @@ Licence:
 #ifndef __pointStructure_hpp__
 #define __pointStructure_hpp__
 
-
-#include "Lists.hpp"
 #include "internalPoints.hpp"
-
-#include "Vectors.hpp"
-#include "VectorSingles.hpp"
-#include "VectorDuals.hpp"
-#include "Fields.hpp"
-#include "eventSubscriber.hpp"
-#include "indexContainer.hpp"
-
+#include "simulationDomain.hpp"
+#include "boundaryList.hpp"
+#include "uniquePtr.hpp"
 
 
 namespace pFlow
 {
 
-//forward
-class boundaryBase;
+class simulationDomain;
 
 
 class pointStructure
 :
-	public eventSubscriber
+	public internalPoints
 {
-public:
-	
-	using boundaryListType = ListPtr<boundaryBase>;
-
 protected:
 
 	//// - data members 
-		domain 				globalDomain_;
+	uniquePtr<simulationDomain> simulationDomain_ = nullptr;
 
-		domain 				thisDomain_;
-
-		internalPoints 		internal_;
-
-		boundaryListType 	boundaries_;
-
-		wordList 			boundaryTypes_;	
+	boundaryList 				boundaries_;
+		
+	
+	bool distributePoints(const realx3Vector& points);
 
 public:
 
@@ -73,21 +58,22 @@ public:
 	//// - Constructors 
 
 		// - an empty pointStructure, good for reading from file 
-		pointStructure();
+		pointStructure(const dictionary& domainDict);
 
 		// - construct from components
-		pointStructure(const int8Vector& flgVec, const realx3Vector& posVec);
+		//pointStructure(const int8Vector& flgVec, const realx3Vector& posVec);
 
-		// - construct from point positions, assume all points are active
-		pointStructure(const realx3Vector& posVec);
+		/// construct from point positions, assume all points are active
+		pointStructure(
+			const dictionary& domainDict, 
+			const realx3Vector& posVec);
 
 		// - copy construct
 		//
 		//   should be changed, may causs undefined behavior 
 		//////////////////////////////////////////////////////////////
-		pointStructure(const pointStructure&) = default;
+		pointStructure(const pointStructure&) = delete;
 
-		
 		// - no move construct 
 		pointStructure(pointStructure&&) = delete;
 
@@ -95,49 +81,25 @@ public:
 		//
 		//   should be changed, may causs undefined behavior 
 		//////////////////////////////////////////////////////////////
-		pointStructure& operator=(const pointStructure&) = default;
+		pointStructure& operator=(const pointStructure&) = delete;
 
 		// - no move assignment 
 		pointStructure& operator=(pointStructure&&) = delete;
 
 		// - destructor 
-		virtual ~pointStructure() = default
-
-		// - size of data structure
-		FUNCTION_H
-		label size()const;
+		virtual ~pointStructure() = default;
 		
-		// - maximum capacity of data structure 
+
+	/// Read 
 		FUNCTION_H
-		label capacity()const;
+		bool read(iIstream& is, IOPattern::IOType iotype);
+		
+
+		/// Write 
+		/*FUNCTION_H
+		bool write(iOstream& os, IOPattern::IOType iotype)const;	*/
 		
 		
-		// - update data structure by inserting/setting new points 
-		//   Notifies all the fields in the registered list of data structure
-		//   and exclude the fields that re in the exclusionList
-		//   retrun nullptr if it fails 
-		FUNCTION_H
-		/*virtual uniquePtr<int32IndexContainer> insertPoints(
-			const realx3Vector& pos,
-			const setFieldList& setField,
-			repository& owner,
-			const List<eventObserver*>& exclusionList={nullptr}
-		);*/
-
-		boundaryBase& boundary(size_t i)
-		{
-			return boundaries_[i];
-		}
-
-
-		const boundaryBase& boundary(size_t i)const
-		{
-			return boundaries_[i];
-		}
-
-
-	
-	//// - IO operations 
 		
 		
 
diff --git a/src/setHelpers/initialize.hpp b/src/setHelpers/initialize.hpp
index 8ee05c99..2bdd041b 100644
--- a/src/setHelpers/initialize.hpp
+++ b/src/setHelpers/initialize.hpp
@@ -23,8 +23,8 @@ Licence:
 
 // initilized and finalize should be placed in onc scope 
 REPORT(0)<<"Initializing host/device execution spaces . . . \n";
-REPORT(1)<<"Host execution space is "<< greenText(pFlow::DefaultHostExecutionSpace::name())<<endREPORT;
-REPORT(1)<<"Device execution space is "<<greenText(pFlow::DefaultExecutionSpace::name())<<endREPORT;
+REPORT(1)<<"Host execution space is "<< Green_Text(pFlow::DefaultHostExecutionSpace::name())<<END_REPORT;
+REPORT(1)<<"Device execution space is "<<Green_Text(pFlow::DefaultExecutionSpace::name())<<END_REPORT;
 
 Kokkos::initialize( argc, argv );
 {
diff --git a/src/setHelpers/initialize_Control.hpp b/src/setHelpers/initialize_Control.hpp
index b488a6b7..dfaa5ce7 100644
--- a/src/setHelpers/initialize_Control.hpp
+++ b/src/setHelpers/initialize_Control.hpp
@@ -24,10 +24,10 @@ Licence:
 // initilized and finalize should be placed in onc scope 
 #include "initialize.hpp"
 
-REPORT(0)<<"\nCreating Control repository . . ."<<endREPORT;
+REPORT(0)<<"\nCreating Control repository . . ."<<END_REPORT;
 pFlow::uniquePtr<pFlow::systemControl> ControlPtr = nullptr;
 
-if(isCoupling)
+/*if(isCoupling)
 {
 	pFlow::readControlDict controlDict;
 	
@@ -36,13 +36,13 @@ if(isCoupling)
 		controlDict.startTime(),
 		controlDict.endTime(),
 		controlDict.saveInterval(),
-		controlDict.startTimeName()
+		controlDict.startTimeNreseame()
 	);	
-}
-else
-{
+}*/
+/*else
+{*/
   	ControlPtr = pFlow::makeUnique<pFlow::systemControl>();
-}
+//}
 
 auto& Control = ControlPtr();
 
diff --git a/utilities/CMakeLists.txt b/utilities/CMakeLists.txt
index 3a7e766f..25d955d0 100644
--- a/utilities/CMakeLists.txt
+++ b/utilities/CMakeLists.txt
@@ -1,13 +1,13 @@
 
-add_subdirectory(checkPhasicFlow)
+#add_subdirectory(checkPhasicFlow)
 
-add_subdirectory(particlesPhasicFlow)
+#add_subdirectory(particlesPhasicFlow)
 
-add_subdirectory(geometryPhasicFlow)
+#add_subdirectory(geometryPhasicFlow)
 
-add_subdirectory(pFlowToVTK)
+#add_subdirectory(pFlowToVTK)
 
-add_subdirectory(Utilities)
+#add_subdirectory(Utilities)
 
-add_subdirectory(postprocessPhasicFlow)
+#add_subdirectory(postprocessPhasicFlow)
 
diff --git a/utilities/particlesPhasicFlow/empty/empty.cpp b/utilities/particlesPhasicFlow/empty/empty.cpp
index 1b938c00..71bd478a 100755
--- a/utilities/particlesPhasicFlow/empty/empty.cpp
+++ b/utilities/particlesPhasicFlow/empty/empty.cpp
@@ -23,10 +23,11 @@ Licence:
 
 
 pFlow::empty::empty(
+  systemControl& control,
 	const dictionary& dict
 )
 :
-	positionParticles(dict),
+	positionParticles(control, dict),
 	position_
 	(
 		maxNumberOfParticles_, 0, RESERVE()
diff --git a/utilities/particlesPhasicFlow/empty/empty.hpp b/utilities/particlesPhasicFlow/empty/empty.hpp
index fc3bada1..a4583b7c 100755
--- a/utilities/particlesPhasicFlow/empty/empty.hpp
+++ b/utilities/particlesPhasicFlow/empty/empty.hpp
@@ -44,7 +44,9 @@ public:
 	// - type Info
 	TypeInfo("empty");
 
-	empty(const dictionary& dict);
+	empty(
+		systemControl& control,
+		const dictionary& dict);
 
 	// - add this class to vCtor selection table 
 	add_vCtor(
@@ -56,12 +58,12 @@ public:
 
 	//// - Methods 
 
-	virtual label numPoints()const
+	virtual uint64 numPoints()const
 	{
 		return 0;
 	}
 
-	virtual label size()const
+	virtual uint64 size()const
 	{
 		return 0;
 	}
diff --git a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
index 683d33e4..173f09ce 100755
--- a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
+++ b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
@@ -24,7 +24,7 @@ Licence:
 #include "setFields.hpp"
 #include "systemControl.hpp"
 #include "commandLine.hpp"
-#include "readControlDict.hpp"
+//#include "readControlDict.hpp"
 
 using pFlow::output;
 using pFlow::endl;
diff --git a/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.cpp b/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.cpp
index dc4d69e7..45a1635f 100755
--- a/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.cpp
+++ b/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.cpp
@@ -123,6 +123,7 @@ bool pFlow::positionOrdered::positionPointsOrdered()
 
 pFlow::positionOrdered::positionOrdered
 (
+	systemControl& control,
 	const dictionary& dict
 )
 :
diff --git a/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.hpp b/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.hpp
index 66452ab0..aa5a3881 100755
--- a/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.hpp
+++ b/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.hpp
@@ -62,7 +62,9 @@ public:
 	// - type Info
 	TypeInfo("positionOrdered");
 
-	positionOrdered(const dictionary& dict);
+	positionOrdered(
+		systemControl& control,
+		const dictionary& dict);
 
 	// - add this class to vCtor selection table 
 	add_vCtor(
diff --git a/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp b/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
index fcfb4616..632fceb7 100755
--- a/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
+++ b/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
@@ -76,6 +76,7 @@ pFlow::realx3Vector pFlow::positionParticles::sortByMortonCode(realx3Vector& pos
 
 pFlow::positionParticles::positionParticles
 (
+	systemControl& control,
 	const dictionary& dict
 )
 {
@@ -95,6 +96,11 @@ pFlow::positionParticles::positionParticles
 	{
 		region_ = makeUnique<region<sphere>>(dict.subDict("sphere"));
 	}
+	else
+	{
+		region_ = makeUnique<region<box>>( control.domainDict().subDict("globalBox"));
+	}
+	
 }
 
 
diff --git a/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp b/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp
index 48fc222b..37053a52 100755
--- a/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp
+++ b/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp
@@ -24,6 +24,7 @@ Licence:
 #include "virtualConstructor.hpp"
 #include "Vectors.hpp"
 #include "dictionary.hpp"
+#include "systemControl.hpp"
 
 namespace pFlow
 {
@@ -118,7 +119,9 @@ public:
 	// - type Info
 	TypeInfo("positionParticles");
 
-	positionParticles(const dictionary& dict);
+	positionParticles(
+		systemControl& control, 
+		const dictionary& dict);
 
 	create_vCtor
 	(
@@ -132,9 +135,9 @@ public:
 
 	//// - Methods 
 
-	virtual label numPoints()const = 0;
+	virtual uint64 numPoints()const = 0;
 
-	virtual label size()const = 0;
+	virtual uint64 size()const = 0;
 
 	virtual real maxDiameter() const = 0;
 
diff --git a/utilities/particlesPhasicFlow/positionRandom/positionRandom.cpp b/utilities/particlesPhasicFlow/positionRandom/positionRandom.cpp
index 616dbbca..d0053791 100755
--- a/utilities/particlesPhasicFlow/positionRandom/positionRandom.cpp
+++ b/utilities/particlesPhasicFlow/positionRandom/positionRandom.cpp
@@ -158,10 +158,11 @@ bool pFlow::positionRandom::inCollision
 
 pFlow::positionRandom::positionRandom
 (
+	systemControl& control,
 	const dictionary& dict
 )
 :
-	positionParticles(dict),
+	positionParticles(control, dict),
 	prDict_
 	(  
 		dict.subDict("positionRandomInfo")
diff --git a/utilities/particlesPhasicFlow/positionRandom/positionRandom.hpp b/utilities/particlesPhasicFlow/positionRandom/positionRandom.hpp
index 33bc9899..ff301c54 100755
--- a/utilities/particlesPhasicFlow/positionRandom/positionRandom.hpp
+++ b/utilities/particlesPhasicFlow/positionRandom/positionRandom.hpp
@@ -66,7 +66,9 @@ public:
 	// - type Info
 	TypeInfo("positionRandom");
 
-	positionRandom(const dictionary& dict);
+	positionRandom(
+		systemControl& control,
+		const dictionary& dict);
 
 	// - add this class to vCtor selection table 
 	add_vCtor(
@@ -78,12 +80,12 @@ public:
 
 	//// - Methods 
 
-	virtual label numPoints()const
+	virtual uint64 numPoints()const
 	{
 		return position_.size();
 	}
 
-	virtual label size()const
+	virtual uint64 size()const
 	{
 		return position_.size();
 	}

From 280f53a230d25fc6ad3fbdd73e2a4bfe31043b05 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Mon, 25 Dec 2023 13:59:24 +0330
Subject: [PATCH 17/60] before checking parallelIO for dictionary

---
 src/phasicFlow/CMakeLists.txt                 |   4 +
 .../containers/VectorHD/VectorSingle.cpp      | 596 ++++++++++++++++++
 .../containers/VectorHD/VectorSingle.hpp      | 402 ++++--------
 .../VectorHD/VectorSingleAlgorithms.hpp       |   2 -
 .../containers/VectorHD/VectorSingleI.hpp     | 197 ------
 .../containers/pointField/boundaryField.cpp   |  32 +
 .../containers/pointField/boundaryField.hpp   |  65 ++
 .../pointField/boundaryFieldList.hpp          |  72 +++
 .../containers/pointField/pointField.cpp      |  20 +-
 .../containers/pointField/pointField.hpp      |  46 +-
 .../containers/pointField/pointField_old.hpp  | 196 ++++++
 .../containers/pointField/pointFields.cpp     |   4 +-
 .../containers/pointField/pointFields.hpp     |  12 +-
 src/phasicFlow/demComponent/demComponent.cpp  |  31 +
 .../demComponent/demComponent.hpp             |  32 +-
 src/phasicFlow/dictionary/dictionary.hpp      |  14 +-
 src/phasicFlow/dictionary/fileDictionary.cpp  |  26 +
 src/phasicFlow/dictionary/fileDictionary.hpp  |  53 ++
 .../repository/IOobject/IOobject.cpp          |   4 +-
 .../repository/IOobject/IOobject.hpp          |  12 +-
 .../systemControl/systemControl.cpp           |  20 +-
 .../systemControl/systemControl.hpp           |  10 +-
 .../setFieldList/setFieldEntryTemplates.cpp   |  20 +-
 src/phasicFlow/smartPointers/uniquePtr.hpp    |   3 -
 .../boundaries/boundaryBase/boundaryBase.cpp  |  30 +-
 .../boundaries/boundaryBase/boundaryBase.hpp  |  19 +-
 .../boundaryBase/scatterFieldAccess.hpp       |  25 +-
 .../pointStructure/boundaryList.cpp           |   6 +-
 .../pointStructure/boundaryList.hpp           |  14 +-
 .../pointStructure/internalPoints.cpp         |   6 +
 .../pointStructure/internalPoints.hpp         |   3 +-
 .../pointStructure/pointStructure.cpp         |  76 ++-
 .../pointStructure/pointStructure.hpp         |  59 +-
 utilities/particlesPhasicFlow/CMakeLists.txt  |   2 +-
 utilities/particlesPhasicFlow/empty/empty.cpp |   2 +-
 .../particlesPhasicFlow.cpp                   |  26 +-
 .../positionOrdered/positionOrdered.cpp       |   6 +-
 .../positionOrdered/positionOrdered.hpp       |   4 +-
 .../positionParticles/positionParticles.cpp   |   8 +-
 .../positionParticles/positionParticles.hpp   |   6 +-
 40 files changed, 1496 insertions(+), 669 deletions(-)
 create mode 100644 src/phasicFlow/containers/VectorHD/VectorSingle.cpp
 delete mode 100644 src/phasicFlow/containers/VectorHD/VectorSingleI.hpp
 create mode 100644 src/phasicFlow/containers/pointField/boundaryField.cpp
 create mode 100644 src/phasicFlow/containers/pointField/boundaryField.hpp
 create mode 100644 src/phasicFlow/containers/pointField/boundaryFieldList.hpp
 create mode 100644 src/phasicFlow/containers/pointField/pointField_old.hpp
 create mode 100644 src/phasicFlow/demComponent/demComponent.cpp
 rename src/{ => phasicFlow}/demComponent/demComponent.hpp (91%)
 create mode 100644 src/phasicFlow/dictionary/fileDictionary.cpp
 create mode 100644 src/phasicFlow/dictionary/fileDictionary.hpp

diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 2129f985..021ad360 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -29,6 +29,7 @@ fileSystem/fileSystem.cpp
 processors/processors.cpp
 
 dictionary/dictionary.cpp
+dictionary/fileDictionary.cpp
 dictionary/entry/iEntry.cpp
 dictionary/entry/dataEntry.cpp 
 dictionary/twoPartEntry/twoPartEntry.cpp
@@ -36,6 +37,7 @@ dictionary/twoPartEntry/twoPartEntry.cpp
 containers/Vector/Vectors.cpp
 containers/Field/Fields.cpp
 containers/List/anyList/anyList.cpp
+containers/pointField/pointFields.cpp
 
 Timer/Timer.cpp
 Timer/Timers.cpp
@@ -53,6 +55,8 @@ repository/systemControl/dynamicLinkLibs.cpp
 eventManagement/subscriber.cpp
 eventManagement/observer.cpp
 
+demComponent/demComponent.cpp
+
 structuredData/box/box.cpp
 structuredData/line/line.cpp
 structuredData/infinitePlane/infinitePlane.cpp
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
new file mode 100644
index 00000000..c2b85e79
--- /dev/null
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
@@ -0,0 +1,596 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+pFlow::uint32 pFlow::VectorSingle<T,MemorySpace>::changeSize
+(
+    uint32 n, 
+    bool withInit
+)
+{
+    if(n > this->capacity() )
+    {
+        uint32 newCap = evalCapacity(n);
+        changeCapacity(newCap, withInit);
+    }
+    return setSize(n);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+pFlow::uint32 pFlow::VectorSingle<T,MemorySpace>::changeCapacitySize
+(
+    uint32 actualCap, 
+    uint32 n, 
+    bool withInit
+)
+{
+    changeCapacity(actualCap, withInit);
+    return setSize(n);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+void pFlow::VectorSingle<T,MemorySpace>::changeCapacity
+(
+    uint32 actualCap, 
+    bool withInit
+)
+{
+    if(withInit)
+    {
+        resizeInit(view_, actualCap);
+    }
+    else
+    {
+        resizeNoInit(view_, actualCap);
+    }
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+pFlow::uint32 pFlow::VectorSingle<T,MemorySpace>::reallocateCapacitySize
+(
+    uint32 cap, 
+    uint32 s
+)
+{
+    reallocNoInit(view_, cap);
+    return setSize(s);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+pFlow::uint32 pFlow::VectorSingle<T,MemorySpace>::setSize(uint32 n)
+{
+    auto os = size_;
+    size_ = n;
+    return os;
+}
+
+
+// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *//
+
+template<typename T, typename MemorySpace>
+pFlow::VectorSingle<T,MemorySpace>::VectorSingle()
+:
+    VectorSingle("VectorSingle")
+{}
+
+template<typename T, typename MemorySpace>
+pFlow::VectorSingle<T,MemorySpace>::VectorSingle(const word& name)
+:
+    size_(0),
+    view_(name,2)
+{}
+
+template<typename T, typename MemorySpace>
+pFlow::VectorSingle<T,MemorySpace>::VectorSingle
+(
+    const word& name, 
+    uint32 n
+)
+:
+    size_(n),
+    view_(name, evalCapacity(n))
+{}
+
+template<typename T, typename MemorySpace>
+pFlow::VectorSingle<T,MemorySpace>::VectorSingle
+(
+    const word& name, 
+    uint32 n, 
+    const T& val
+)
+:
+    VectorSingle(name, n)
+{
+    assign(n, val); 
+}
+
+template<typename T, typename MemorySpace>
+pFlow::VectorSingle<T,MemorySpace>::VectorSingle
+(
+    const word& name, 
+    uint32 cap, 
+    uint32 n, 
+    RESERVE
+)
+:
+    size_(n),
+    view_(name, cap)
+{}
+
+template<typename T, typename MemorySpace>
+pFlow::VectorSingle<T,MemorySpace>::VectorSingle
+(
+    const word& name, 
+    const std::vector<T> & src
+) 
+:
+    VectorSingle(name)
+{
+    assign(src);
+}
+
+template<typename T, typename MemorySpace>
+pFlow::VectorSingle<T,MemorySpace>::VectorSingle
+(
+    const word& name, 
+    const std::vector<T> & src, 
+    uint32 cap
+) 
+:
+    VectorSingle(name)
+{
+    assign(src, cap);
+}
+
+template<typename T, typename MemorySpace>
+pFlow::VectorSingle<T,MemorySpace>::VectorSingle
+(
+    const VectorSingle& src
+)
+:
+    VectorSingle(src.name(), src)
+{}
+
+template<typename T, typename MemorySpace>
+pFlow::VectorSingle<T,MemorySpace>::VectorSingle
+(
+    const word& name, 
+    const VectorSingle& src
+)
+:
+    VectorSingle(name, src.capacity(), src.size(), RESERVE())
+{
+    copy(deviceVector(), src.deviceVector());	
+}
+
+template<typename T, typename MemorySpace>
+pFlow::VectorSingle<T,MemorySpace>& 
+    pFlow::VectorSingle<T,MemorySpace>::operator = (const VectorSingle& rhs) 
+{
+    if(&rhs == this) return *this;
+    VectorSingle temp(rhs);
+
+    size_ 	= temp.size();	
+    view_   = temp.view_;
+
+    return *this;
+}
+
+template<typename T, typename MemorySpace>
+pFlow::VectorSingle<T,MemorySpace>::~VectorSingle()
+{
+    view_ = viewType();
+    size_ = 0;
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+pFlow::uniquePtr<pFlow::VectorSingle<T,MemorySpace>>
+ pFlow::VectorSingle<T,MemorySpace>::clone() const  
+{
+    return makeUnique<VectorSingle>( this->name(), *this);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+pFlow::VectorSingle<T,MemorySpace>*
+    pFlow::VectorSingle<T,MemorySpace>::clonePtr()const   
+{
+    return new VectorSingle(this->name(), *this);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+pFlow::VectorSingle<T,MemorySpace>& 
+    pFlow::VectorSingle<T,MemorySpace>::VectorField()
+{
+    return *this;
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+const pFlow::VectorSingle<T,MemorySpace>& 
+pFlow::VectorSingle<T,MemorySpace>::VectorField()const
+{
+    return *this;
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+auto pFlow::VectorSingle<T,MemorySpace>::deviceVectorAll() const
+{
+    return view_;
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+auto pFlow::VectorSingle<T,MemorySpace>::deviceVector()const
+{
+    return Kokkos::subview(view_, Kokkos::make_pair(0,int(size_)));
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+auto pFlow::VectorSingle<T,MemorySpace>::hostVectorAll()const
+{
+    auto hView = Kokkos::create_mirror_view(view_);
+    copy(hView, view_);
+    return hView;
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+auto pFlow::VectorSingle<T,MemorySpace>::hostVector()const
+{
+    auto hView = Kokkos::create_mirror_view(deviceVector());
+    copy(hView, deviceVector());
+    return hView;
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+pFlow::word pFlow::VectorSingle<T,MemorySpace>::name()const
+{
+    return view_.label();
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+pFlow::uint32 pFlow::VectorSingle<T,MemorySpace>::size()const
+{
+    return size_;
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+pFlow::uint32 pFlow::VectorSingle<T,MemorySpace>::capacity()const
+{
+    return view_.extent(0);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+bool pFlow::VectorSingle<T,MemorySpace>::empty()const
+{
+    return size_==0;
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+void pFlow::VectorSingle<T,MemorySpace>::reserve(uint32 cap) 
+{
+    changeCapacity(cap);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+void pFlow::VectorSingle<T,MemorySpace>::reallocate(uint32 cap) 
+{
+    reallocateCapacitySize(cap, 0);			
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+void pFlow::VectorSingle<T,MemorySpace>::reallocate
+(
+    uint32 cap, 
+    uint32 newSize
+) 
+{
+    reallocateCapacitySize(cap, newSize);			
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H   
+void pFlow::VectorSingle<T,MemorySpace>::resize(uint32 n)
+{
+    changeSize(n);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H  
+void pFlow::VectorSingle<T,MemorySpace>::resize(uint32 n, const T& val) 
+{
+    assign(n, val);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+void pFlow::VectorSingle<T,MemorySpace>::clear() 
+{
+    size_ = 0;
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+void pFlow::VectorSingle<T,MemorySpace>::fill(const T& val)
+{
+    if(empty())return;
+    pFlow::fill(view_, rangeU32(0 ,size_) ,val);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+void pFlow::VectorSingle<T,MemorySpace>::assign
+(
+    size_t n, 
+    const T& val
+)
+{
+    if( n > capacity() )
+    {
+        reallocateCapacitySize(evalCapacity(n), n);
+    }
+    else
+    {
+        setSize(n);	
+    }
+    this->fill(val);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+void pFlow::VectorSingle<T,MemorySpace>::assign
+(
+    const std::vector<T>& src, 
+    uint32 cap
+) 
+{
+    uint32 srcSize = src.size();
+    
+    if(cap != capacity())
+    {
+        reallocateCapacitySize(cap, srcSize);
+    }
+    else
+    {
+        setSize(srcSize);
+    }
+    
+    // - unmanaged view in the host
+    hostViewType1D<const T> temp(src.data(), srcSize );
+    copy(deviceVector(), temp);
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+void pFlow::VectorSingle<T,MemorySpace>::assign
+(
+    const std::vector<T>& src
+) 
+{
+    assign(src, src.capacity());
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+auto pFlow::VectorSingle<T,MemorySpace>::getSpan()
+{
+    return span<T>(view_.data(), size());
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+auto pFlow::VectorSingle<T,MemorySpace>::getSpan()const
+{
+    return span<const T>(view_.data(), this->size());
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement(uint32IndexContainer indices, const T& val)
+{
+	if(indices.empty()) return true;
+	
+	auto maxInd = indices.max();
+
+	if(this->empty() || maxInd > size()-1 )
+	{
+		resize(maxInd+1);
+	}
+
+	using policy = Kokkos::RangePolicy<execution_space,Kokkos::IndexType<uint32>>;
+
+	if constexpr( isDeviceAccessible_ )
+	{
+		auto v = view_;
+		auto ind = indices.deviceView();
+
+		Kokkos::parallel_for(
+			"VectorSingle::insertSetElement",
+			policy(0,indices.size()),
+			LAMBDA_HD(uint32 i){
+				v[ind[i]]= val;
+			});
+
+		Kokkos::fence();
+	}
+	else
+	{
+
+		auto v = view_;
+		auto ind = indices.hostView();
+		
+		Kokkos::parallel_for(
+			"VectorSingle::insertSetElement",
+			policy(0,indices.size()),
+			LAMBDA_HD(uint32 i){
+				v[ind[i]]= val;
+			});
+
+		Kokkos::fence();
+
+	}
+
+	return true;
+}
+
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
+(
+	const uint32IndexContainer indices, 
+	const std::vector<T>& vals
+)
+{
+
+	if(indices.size() == 0)return true;
+	if(indices.size() != vals.size())return false;
+
+	auto maxInd = indices.max(); 
+	
+	if(this->empty() || maxInd > size()-1 )
+	{
+		resize(maxInd+1);
+	} 
+	
+	using policy = Kokkos::RangePolicy<execution_space,Kokkos::IndexType<uint32>>;
+
+	hostViewType1D<const T> hVals( vals.data(), vals.size());
+
+	if constexpr( isDeviceAccessible_ )
+	{
+		deviceViewType1D<T> dVals("dVals", indices.size());
+		copy(dVals, hVals);
+		auto dVec = view_;
+		auto ind = indices.deviceView();
+
+		Kokkos::parallel_for(
+			"VectorSingle::insertSetElement",
+			policy(0,indices.size()), LAMBDA_HD(int32 i){	
+				dVec(ind(i))= dVals(i);}
+			);
+
+		Kokkos::fence();
+
+	}
+	else
+	{
+		auto dVec = view_;
+		auto ind = indices.hostView();
+
+		Kokkos::parallel_for(
+			"VectorSingle::insertSetElement",
+			policy(0,indices.size()), LAMBDA_HD(int32 i){	
+				dVec(ind(i))= hVals(i);}
+			);
+
+		Kokkos::fence();
+
+	}
+		
+	return true;
+}
+
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+bool pFlow::VectorSingle<T,MemorySpace>::reorderItems(uint32IndexContainer indices)
+{
+	if(indices.size() == 0)
+	{
+		setSize(0);
+		return true;
+	}
+	
+	auto maxInd = indices.max();
+
+	if(maxInd >= this->size())
+	{
+		fatalErrorInFunction<<"In reordering the VectorSingle ("
+		<< this->name()<< ") maximum index ("<< maxInd << 
+		") exceeds the size of the vector ("	<< this->size()<<")"<<endl;
+		return false;
+	}
+
+	uint32 		newSize = indices.size();
+	
+	setSize(newSize);
+
+	viewType 	sortedView(this->name(), newSize);
+
+	using policy = Kokkos::RangePolicy< execution_space,Kokkos::IndexType<uint32>>;
+
+	if constexpr( isDeviceAccessible_)
+	{
+		auto d_indices = indices.deviceView();
+		auto d_view = view_;
+		
+		Kokkos::parallel_for
+		(
+			"VectorSingle::sortItems",
+			policy(0,newSize), 
+			LAMBDA_HD(uint32 i)
+			{	
+				sortedView(i) = d_view(d_indices(i));
+			}
+		);
+
+		Kokkos::fence();
+
+	}
+	else
+	{
+		auto h_indices = indices.hostView();
+		auto d_view = view_;
+		
+		Kokkos::parallel_for
+		(
+			"VectorSingle::sortItems",
+			policy(0,newSize), 
+			LAMBDA_HD(uint32 i)
+			{	
+				sortedView(i) = d_view(h_indices(i));
+			}
+		);
+		
+		Kokkos::fence();
+	}
+
+	copy(deviceVector(), sortedView);
+	
+	return true;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 4e3b3d2d..7a2ea557 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -17,23 +17,18 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
-
 #ifndef __VectorSingle_hpp__
 #define __VectorSingle_hpp__
 
 #include <vector>
 
-
 #include "globalSettings.hpp"
+#include "phasicFlowKokkos.hpp"
 #include "types.hpp"
 #include "error.hpp"
 #include "indexContainer.hpp"
-#include "iOstream.hpp"
-#include "iIstream.hpp"
+#include "streams.hpp"
 #include "span.hpp"
-#include "Vector.hpp"
-#include "phasicFlowKokkos.hpp"
 #include "dataIO.hpp"
 
 
@@ -49,8 +44,6 @@ namespace pFlow
 template<typename T, typename MemorySpace>
 class VectorSingle;
 
-
-
 template<typename T, typename MemorySpace=void>
 class VectorSingle
 {
@@ -103,7 +96,6 @@ protected:
 		/// Is the memory of this vector accessible from Host
 		static constexpr 
 		bool  isHostAccessible_ = isHostAccessible<execution_space>();
-			//Kokkos::SpaceAccessibility<execution_space,HostSpace>::accessible;
 
 		/// Is the memory of this vector accessiple from Divce
 		static constexpr
@@ -123,356 +115,177 @@ protected:
 			return static_cast<uint32>(n*growthFactor_+1);
 		}
 
-	/// Change size to n and preserve the conetent if realloc 
+	/// @brief Change size to n and preserve the conetent if realloc 
 	/// occurs 
 	INLINE_FUNCTION_H 
-	uint32 changeSize(uint32 n, bool withInit= false)
-	{
-		if(n > this->capacity() )
-		{
-			uint32 newCap = evalCapacity(n);
-			changeCapacity(newCap, withInit);
-		}
-		return setSize(n);
-	}
+	uint32 changeSize(uint32 n, bool withInit= false);
 
+    /// @brief Change the size and capacity of Vector
 	INLINE_FUNCTION_H
-	uint32 changeCapacitySize(uint32 actualCap, uint32 n, bool withInit= false)
-	{
-		changeCapacity(actualCap, withInit);
-		return setSize(n);
-	}
-
+	uint32 changeCapacitySize(uint32 actualCap, uint32 n, bool withInit= false);
+	
 	INLINE_FUNCTION_H
-	void changeCapacity(uint32 actualCap, bool withInit= false)
-	{
-		if(withInit)
-		{
-			resizeInit(view_, actualCap);
-		}
-		else
-		{
-			resizeNoInit(view_, actualCap);
-		}
-	}
-
+	void changeCapacity(uint32 actualCap, bool withInit= false);
+	
 	INLINE_FUNCTION_H
-	uint32 reallocateCapacitySize(uint32 cap, uint32 s)
-	{
-		reallocNoInit(view_, cap);
-		return setSize(s);
-	}
-
+	uint32 reallocateCapacitySize(uint32 cap, uint32 s);
+	
 	INLINE_FUNCTION_H 
-	uint32 setSize(uint32 n)
-	{
-		auto os = size_;
-		size_ = n;
-		return os;
-	}
+	uint32 setSize(uint32 n);
 	
 public:
 
-	// - type info
+	/// Type info
 	TypeInfoTemplateNV2("VectorSingle", T, memoerySpaceName());
 
 	//// - Constructors
 
 		/// Empty vector
-		VectorSingle()
-		:
-			VectorSingle("VectorSingle")
-		{}
-
-		/// Empty vector with a name 
-		VectorSingle(const word& name)
-		:
-			size_(0),
-			view_(name,2)
-		{}
-
+		VectorSingle();
+		
+		/// Empty vector with a name (capacity = 2) 
+		VectorSingle(const word& name);
 		
 		/// Vector with name and size n
-		VectorSingle(const word& name, uint32 n)
-		:
-			size_(n),
-			view_(name, evalCapacity(n))
-		{}
-
+		VectorSingle(const word& name, uint32 n);
 		
-
 		/// Vector with name, size and value
-		VectorSingle(const word& name, uint32 n, const T& val)
-		:
-			VectorSingle(name, n)
-		{
-			assign(n, val); 
-		}
-
+		VectorSingle(const word& name, uint32 n, const T& val);
 
 		/// Vector with name, size (n) and reserved capacity 
-		VectorSingle(const word& name, uint32 cap, uint32 n, RESERVE )
-		:
-			size_(n),
-			view_(name, cap)
-		{}
-
+		VectorSingle(const word& name, uint32 cap, uint32 n, RESERVE );
+		
 		/// Construct with a name and form std::vector (host memory)
-		VectorSingle(const word& name, const std::vector<T> & src) 
-		:
-			VectorSingle(name)
-		{
-			assign(src);
-		}
-
-		/// Construct with a name and form std::vector (host memory)
-		/// and with a desired capacity. 
-		VectorSingle(const word& name, const std::vector<T> & src, uint32 cap) 
-		:
-			VectorSingle(name)
-		{
-			assign(src, cap);
-		}
+		VectorSingle(const word& name, const std::vector<T> & src); 
 
+		/// Construct with a name and form std::vector (host memory) and with a desired capacity. 
+		VectorSingle(const word& name, const std::vector<T> & src, uint32 cap);
+		
 		/// Copy construct (performs deep copy)
-		VectorSingle(const VectorSingle& src)
-		:
-			VectorSingle(src.name(), src)
-		{	
-			//copy(deviceVector(), src.deviceVector());
-		}
-
-		/// Copy construct with a new name (perform deep copy)
-		VectorSingle(const word& name, const VectorSingle& src)
-		:
-			VectorSingle(name, src.capacity(), src.size(), RESERVE())
-		{
-			copy(deviceVector(), src.deviceVector());	
-		}
-
+		VectorSingle(const VectorSingle& src);
+		
+    	/// Copy construct with a new name (perform deep copy)
+		VectorSingle(const word& name, const VectorSingle& src);
+		
 		/// Copy assignment (perform deep copy from rhs to *this)
-		VectorSingle& operator = (const VectorSingle& rhs) 
-		{
-			if(&rhs == this) return *this;
-			VectorSingle temp(rhs);
-
-			size_ 	= temp.size();	
-			view_   = temp.view_;
-
-			return *this;
-		}
-
+		VectorSingle& operator = (const VectorSingle& rhs) ;
+		
 		/// Move construct
 		VectorSingle(VectorSingle&&) = default;   
 
 		/// Move assignment
 		VectorSingle& operator= (VectorSingle&&) = default; 
 
-		/// This may not destroy the underlying memory, sice view is 
+		/// @brief Descructor
+        /// This may not destroy the underlying memory, sice view is 
 		/// shared_ptr and maybe referenced by another object too 
-		~VectorSingle()
-		{
-			view_ = viewType();
-			size_ = 0;
-		}
+		~VectorSingle();
 
 		/// Clone as a uniquePtr (perform deep copy)
 		INLINE_FUNCTION_H 
-		uniquePtr<VectorSingle> clone() const  
-		{
-			return makeUnique<VectorSingle>( this->name(), *this);
-		}
+		uniquePtr<VectorSingle> clone() const;
 
 		/// Clone as a pointer (perform deep copy)
 		INLINE_FUNCTION_H
-		VectorSingle* clonePtr()const   
-		{
-			return new VectorSingle(this->name(), *this);
-		}
-
+		VectorSingle* clonePtr()const;
+	
 	//// - Methods
 
 		/// Return *this
 		INLINE_FUNCTION_H
-		VectorType& VectorField()
-		{
-			return *this;
-		}
+		VectorType& VectorField();
 
 		/// Return *this
 		INLINE_FUNCTION_H
-		const VectorType& VectorField()const
-		{
-			return *this;
-		}
+		const VectorType& VectorField()const;
 
 		/// Device vector range [0,capcity)
 		INLINE_FUNCTION_H 
-		viewType deviceVectorAll() const{
-			return view_;
-		}
+		auto deviceVectorAll() const;
 
 		///  Device vector range [0, size)
 		INLINE_FUNCTION_H 
-		viewType deviceVector()const
-		{
-			return Kokkos::subview(view_, Kokkos::make_pair(0,int(size_)));
-		}
+		auto deviceVector()const;
 
 		/// Return a vector accessible on Host in range [0,capacity)
 		INLINE_FUNCTION_H 
-		auto hostVectorAll()const
-		{
-			auto hView = Kokkos::create_mirror_view(view_);
-			copy(hView, view_);
-			return hView;
-		}
+		auto hostVectorAll()const;
+		
 
 		/// Return a vector accessible on Host in range [0,size)
 		INLINE_FUNCTION_H 
-		auto hostVector()const
-		{
-			auto hView = Kokkos::create_mirror_view(deviceVector());
-			copy(hView, deviceVector());
-			return hView;
-		}
+		auto hostVector()const;
 
 		/// Name of the vector 
 		INLINE_FUNCTION_H 
-		const word name()const
-		{
-			return view_.label();
-		}
+		word name()const;
+		
 		
 		/// Size of the vector 
 		INLINE_FUNCTION_H 
-		uint32 size()const
-		{
-			return size_;
-		}
+		uint32 size()const;
+		
 
 		// Capcity of the vector 
 		INLINE_FUNCTION_H 
-		uint32 capacity()const
-		{
-			return view_.extent(0);
-		}
-
+		uint32 capacity()const;
+		
 		/// If vector is empty 
 		INLINE_FUNCTION_H 
-		bool empty()const
-		{
-			return size_==0;
-		}
-
+		bool empty()const;
+		
 		/// Reserve capacity for vector 
 		/// Preserve the content.
 		INLINE_FUNCTION_H 
-		void reserve(uint32 cap) 
-		{
-			changeCapacity(cap);
-		}
+		void reserve(uint32 cap); 
 
 		/// Reallocate memory to new cap and set size to 0. 
 		INLINE_FUNCTION_H 
-		void reallocate(uint32 cap) 
-		{
-			reallocateCapacitySize(cap, 0);			
-		}
-
+		void reallocate(uint32 cap); 
+		
 		/// Reallocate memory to new cap and set size to newSize. 
 		/// Do not preserve the content
 		INLINE_FUNCTION_H 
-		void reallocate(uint32 cap, uint32 newSize) 
-		{
-			reallocateCapacitySize(cap, newSize);			
-		}
-
+		void reallocate(uint32 cap, uint32 newSize); 
+		
 		/// Resize the vector and preserve the content
 		INLINE_FUNCTION_H   
-		void resize(uint32 n){
-			changeSize(n);
-		}
+		void resize(uint32 n);
 
 		/// Resize the vector and assign the value to it. 
 		INLINE_FUNCTION_H  
-		void resize(uint32 n, const T& val) {
-			assign(n, val);
-		}
+		void resize(uint32 n, const T& val);
 
 		/// Clear the vector, but keep the allocated memory unchanged 
 		INLINE_FUNCTION_H 
-		void clear() 
-		{
-			 size_ = 0;
-		}
-
+		void clear();
+		
 		/// Fill the range [0,size) with val
 		INLINE_FUNCTION_H 
-		void fill(const T& val)
-		{
-			if(empty())return;
-			pFlow::fill(view_, rangeU32(0 ,size_) ,val);
-		}
+		void fill(const T& val);
 		
 		/// Change size of the vector and assign val to vector and 
 		INLINE_FUNCTION_H
-		void assign(size_t n, const T& val)
-		{
-			if( n > capacity() )
-			{
-				reallocateCapacitySize(evalCapacity(n), n);
-			}
-			else
-			{
-				setSize(n);	
-			}
-			this->fill(val);
-		}
-
+		void assign(size_t n, const T& val);
 		
 		/// Assign source vector with specified capacity.
 		/// The size of *this becomes the size of src. 
 		INLINE_FUNCTION_H 
-		void assign(const std::vector<T>& src, uint32 cap) 
-		{
-			uint32 srcSize = src.size();
-			
-			if(cap != capacity())
-			{
-				reallocateCapacitySize(cap, srcSize);
-			}
-			else
-			{
-				setSize(srcSize);
-			}
-			
-			// - unmanaged view in the host
-			hostViewType1D<const T> temp(src.data(), srcSize );
-			copy(deviceVector(), temp);
-		}
+		void assign(const std::vector<T>& src, uint32 cap); 
+		
 
 		/// Assign source vector.
 		/// The size of *this becomes the size of src. 
 		/// The capacity of *this becomes the capacity of src.
 		INLINE_FUNCTION_H 
-		void assign(const std::vector<T>& src) 
-		{
-			assign(src, src.capacity());
-		}
-
-		INLINE_FUNCTION_H
-		auto getSpan()
-		{
-			return span<T>(view_.data(), size());
-		}
+		void assign(const std::vector<T>& src);
 		
+		INLINE_FUNCTION_H
+		auto getSpan();
+				
 		INLINE_FUNCTION_H 
-		auto getSpan()const
-		{
-			return span<const T>(view_.data(), this->size());
-		}
-
+		auto getSpan()const;
+		
 		INLINE_FUNCTION_H
 		bool insertSetElement(uint32IndexContainer indices, const T& val);
 		
@@ -482,40 +295,8 @@ public:
 		INLINE_FUNCTION_H
 		bool reorderItems(uint32IndexContainer indices);
 
-
-		/*INLINE_FUNCTION_H
-		bool append(const deviceViewType1D<T>& dVec, size_t numElems)
-		{
-
-			if(numElems == 0 )return true;
-			auto oldSize = size_;
-			auto newSize = size_ + numElems;
-
-			if(this->empty() || newSize > capacity() )
-			{
-				resize(newSize);
-			}
-			else
-			{
-				size_ = size_+numElems;
-			}
-			
-			auto dSubView = Kokkos::subview(view_, Kokkos::make_pair(oldSize, newSize)); 
-			copy(dSubView, dVec);
-
-			return true;
-		}
-
-		INLINE_FUNCTION_H
-		bool append(const VectorSingle& Vec)
-		{
-			return append(Vec.deviceVector(), Vec.size());
-		}*/
-
-		// - host calls only
-		//   push a new element at the end
-		//   resize if necessary
-		//   works on host accessible vector 
+		/// @brief push a new element at the end (host call only)
+		///  resize if necessary and works on host accessible vector.
 		template<bool Enable = true>
 		INLINE_FUNCTION_H
 		typename std::enable_if<isHostAccessible_ && Enable, void>::type
@@ -535,7 +316,7 @@ public:
 			return view_.data();
 		}
 
-		/// Return begin iterator. it works when host is accessible.
+		/// Return begin iterator. It works when devices is host accessible.
 		template<bool Enable = true>
 		INLINE_FUNCTION_H 
 		typename std::enable_if_t<isHostAccessible_ && Enable,iterator>
@@ -666,8 +447,39 @@ inline iOstream& operator << (iOstream& os, const VectorSingle<T, MemorySpace>&
 } // - pFlow
 
 #include "VectorSingleAlgorithms.hpp"
-#include "VectorSingleI.hpp"
+#include "VectorSingle.cpp"
+
+
 
 
 #endif //__VectorSingle_hpp__
 
+
+/*INLINE_FUNCTION_H
+		bool append(const deviceViewType1D<T>& dVec, size_t numElems)
+		{
+
+			if(numElems == 0 )return true;
+			auto oldSize = size_;
+			auto newSize = size_ + numElems;
+
+			if(this->empty() || newSize > capacity() )
+			{
+				resize(newSize);
+			}
+			else
+			{
+				size_ = size_+numElems;
+			}
+			
+			auto dSubView = Kokkos::subview(view_, Kokkos::make_pair(oldSize, newSize)); 
+			copy(dSubView, dVec);
+
+			return true;
+		}
+
+		INLINE_FUNCTION_H
+		bool append(const VectorSingle& Vec)
+		{
+			return append(Vec.deviceVector(), Vec.size());
+		}*/
\ No newline at end of file
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp b/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp
index bdd5c521..13bce66b 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp
@@ -17,8 +17,6 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
-
 #ifndef __VectorSingleMath_hpp__
 #define __VectorSingleMath_hpp__
 
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingleI.hpp b/src/phasicFlow/containers/VectorHD/VectorSingleI.hpp
deleted file mode 100644
index 2dabf14a..00000000
--- a/src/phasicFlow/containers/VectorHD/VectorSingleI.hpp
+++ /dev/null
@@ -1,197 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-
-template<typename T, typename MemorySpace>
-INLINE_FUNCTION_H
-bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement(uint32IndexContainer indices, const T& val)
-{
-	if(indices.empty()) return true;
-	
-	auto maxInd = indices.max();
-
-	if(this->empty() || maxInd > size()-1 )
-	{
-		resize(maxInd+1);
-	}
-
-	using policy = Kokkos::RangePolicy<execution_space,Kokkos::IndexType<uint32>>;
-
-	if constexpr( isDeviceAccessible_ )
-	{
-		auto v = view_;
-		auto ind = indices.deviceView();
-
-		Kokkos::parallel_for(
-			"VectorSingle::insertSetElement",
-			policy(0,indices.size()),
-			LAMBDA_HD(uint32 i){
-				v[ind[i]]= val;
-			});
-
-		Kokkos::fence();
-	}
-	else
-	{
-
-		auto v = view_;
-		auto ind = indices.hostView();
-		
-		Kokkos::parallel_for(
-			"VectorSingle::insertSetElement",
-			policy(0,indices.size()),
-			LAMBDA_HD(uint32 i){
-				v[ind[i]]= val;
-			});
-
-		Kokkos::fence();
-
-	}
-
-	return true;
-}
-
-
-template<typename T, typename MemorySpace>
-INLINE_FUNCTION_H
-bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
-(
-	const uint32IndexContainer indices, 
-	const std::vector<T>& vals
-)
-{
-
-	if(indices.size() == 0)return true;
-	if(indices.size() != vals.size())return false;
-
-	auto maxInd = indices.max(); 
-	
-	if(this->empty() || maxInd > size()-1 )
-	{
-		resize(maxInd+1);
-	} 
-	
-	using policy = Kokkos::RangePolicy<execution_space,Kokkos::IndexType<uint32>>;
-
-	hostViewType1D<const T> hVals( vals.data(), vals.size());
-
-	if constexpr( isDeviceAccessible_ )
-	{
-		deviceViewType1D<T> dVals("dVals", indices.size());
-		copy(dVals, hVals);
-		auto dVec = view_;
-		auto ind = indices.deviceView();
-
-		Kokkos::parallel_for(
-			"VectorSingle::insertSetElement",
-			policy(0,indices.size()), LAMBDA_HD(int32 i){	
-				dVec(ind(i))= dVals(i);}
-			);
-
-		Kokkos::fence();
-
-	}
-	else
-	{
-		auto dVec = view_;
-		auto ind = indices.hostView();
-
-		Kokkos::parallel_for(
-			"VectorSingle::insertSetElement",
-			policy(0,indices.size()), LAMBDA_HD(int32 i){	
-				dVec(ind(i))= hVals(i);}
-			);
-
-		Kokkos::fence();
-
-	}
-		
-	return true;
-}
-
-
-template<typename T, typename MemorySpace>
-INLINE_FUNCTION_H
-bool pFlow::VectorSingle<T,MemorySpace>::reorderItems(uint32IndexContainer indices)
-{
-	if(indices.size() == 0)
-	{
-		setSize(0);
-		return true;
-	}
-	
-	auto maxInd = indices.max();
-
-	if(maxInd >= this->size())
-	{
-		fatalErrorInFunction<<"In reordering the VectorSingle ("
-		<< this->name()<< ") maximum index ("<< maxInd << 
-		") exceeds the size of the vector ("	<< this->size()<<")"<<endl;
-		return false;
-	}
-
-	uint32 		newSize = indices.size();
-	
-	setSize(newSize);
-
-	viewType 	sortedView(this->name(), newSize);
-
-	using policy = Kokkos::RangePolicy< execution_space,Kokkos::IndexType<uint32>>;
-
-	if constexpr( isDeviceAccessible_)
-	{
-		auto d_indices = indices.deviceView();
-		auto d_view = view_;
-		
-		Kokkos::parallel_for
-		(
-			"VectorSingle::sortItems",
-			policy(0,newSize), 
-			LAMBDA_HD(uint32 i)
-			{	
-				sortedView(i) = d_view(d_indices(i));
-			}
-		);
-
-		Kokkos::fence();
-
-	}
-	else
-	{
-		auto h_indices = indices.hostView();
-		auto d_view = view_;
-		
-		Kokkos::parallel_for
-		(
-			"VectorSingle::sortItems",
-			policy(0,newSize), 
-			LAMBDA_HD(uint32 i)
-			{	
-				sortedView(i) = d_view(h_indices(i));
-			}
-		);
-		
-		Kokkos::fence();
-	}
-
-	copy(deviceVector(), sortedView);
-	
-	return true;
-}
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/boundaryField.cpp b/src/phasicFlow/containers/pointField/boundaryField.cpp
new file mode 100644
index 00000000..21db4031
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/boundaryField.cpp
@@ -0,0 +1,32 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+template<template<class, class> class VectorField, class T, class MemorySpace>
+pFlow::boundaryField<VectorField, T, MemorySpace>::boundaryField
+(
+	const boundaryBase& boundary,
+	FieldType &internal
+)
+:
+	observer(),
+	boundary_(boundary),
+	internal_(internal)
+{}
+
diff --git a/src/phasicFlow/containers/pointField/boundaryField.hpp b/src/phasicFlow/containers/pointField/boundaryField.hpp
new file mode 100644
index 00000000..fca7cd3f
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/boundaryField.hpp
@@ -0,0 +1,65 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __boundaryField_hpp__
+#define __boundaryField_hpp__
+
+#include "observer.hpp"
+#include "boundaryBase.hpp"
+#include "Field.hpp"
+
+namespace pFlow
+{
+
+template< template<class, class> class VectorField, class T, class MemorySpace = void>
+class boundaryField
+:
+    public observer 
+{
+public:
+	using FieldType = Field<VectorField, T, MemorySpace>;
+protected:
+
+    const boundaryBase&     boundary_;
+
+    /// @brief a ref to the internal field 
+    FieldType& internal_;
+
+public:
+
+   boundaryField(const boundaryBase& boundary, FieldType& internal);
+
+	bool update
+	(
+		const message& msg, 
+    	const anyList& varList
+	) override
+    {
+		notImplementedFunction;
+		return false;
+	}
+
+};
+
+}
+
+#include "boundaryField.cpp"
+
+#endif
+
diff --git a/src/phasicFlow/containers/pointField/boundaryFieldList.hpp b/src/phasicFlow/containers/pointField/boundaryFieldList.hpp
new file mode 100644
index 00000000..29f3c786
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/boundaryFieldList.hpp
@@ -0,0 +1,72 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __boundaryFieldList_hpp__
+#define __boundaryFieldList_hpp__
+
+#include "boundaryField.hpp"
+#include "boundaryList.hpp"
+#include "ListPtr.hpp"
+
+namespace pFlow
+{
+
+template< template<class, class> class VectorField, class T, class MemorySpace = void >
+class boundaryFieldList
+:
+    ListPtr<boundaryField<VectorField, T, MemorySpace>>
+{
+public:
+
+    using boundaryFieldType = boundaryField<VectorField, T, MemorySpace>;
+
+    using FieldType = typename boundaryFieldType::FieldType;
+
+protected:
+
+    const boundaryList&         boundaries_;
+
+public:
+
+    boundaryFieldList(const boundaryList& boundaries, FieldType& internal)
+    :
+        ListPtr<boundaryFieldType>(boundaries.size()),
+        boundaries_(boundaries)
+    {
+        for(auto i=0; i<boundaries.size(); i++)
+        {
+            this->set
+            (
+                i, 
+                makeUnique<boundaryFieldType>
+                (
+                    boundaries_[i], 
+                    internal
+                )
+            );
+        }
+    }
+
+
+
+};
+
+}
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/pointField.cpp b/src/phasicFlow/containers/pointField/pointField.cpp
index bc0a62e0..a8a0c6ff 100644
--- a/src/phasicFlow/containers/pointField/pointField.cpp
+++ b/src/phasicFlow/containers/pointField/pointField.cpp
@@ -18,8 +18,20 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-
 template<template<class, class> class VectorField, class T, class MemorySpace>
+pFlow::pointField<VectorField, T, MemorySpace>::pointField
+(
+    const pointStructure& pStruct, 
+    const T& defVal, 
+    message msg
+)
+:
+	boundaryFieldList_(pStruct.boundaries(), *this),
+	pStruct_(pStruct),
+	defaultValue_(defVal)
+{}
+
+/*template<template<class, class> class VectorField, class T, class MemorySpace>
 bool pFlow::pointField<VectorField, T, MemorySpace>::readPointField
 (
 	iIstream& is
@@ -113,9 +125,7 @@ bool pFlow::pointField<VectorField, T, MemorySpace>::update(const eventMessage&
  
 	if( msg.isDeleted() )
 	{
-		/*const auto& dp = pStruct_.markedDeletePoints();
-		return this->deleteElement(dp);
-		notImplementedFunction;*/
+		
 	}
 	else if( msg.isInsert())
 	{
@@ -132,5 +142,5 @@ bool pFlow::pointField<VectorField, T, MemorySpace>::update(const eventMessage&
 	}
 	
 	return true;
-}
+}*/
 
diff --git a/src/phasicFlow/containers/pointField/pointField.hpp b/src/phasicFlow/containers/pointField/pointField.hpp
index 5c074243..9dcace79 100644
--- a/src/phasicFlow/containers/pointField/pointField.hpp
+++ b/src/phasicFlow/containers/pointField/pointField.hpp
@@ -21,20 +21,18 @@ Licence:
 #ifndef __pointField_hpp__
 #define __pointField_hpp__
 
-
-#include "Field.hpp"
+#include "boundaryFieldList.hpp"
 #include "pointStructure.hpp"
-#include "error.hpp"
+#include "Field.hpp"
+#include "observer.hpp"
 
 namespace pFlow
 {
 
-
-
 template<template<class, class> class VectorField, class T, class MemorySpace=void>
 class pointField
 :
-	public eventObserver,
+	public observer,
 	public Field<VectorField, T, MemorySpace>
 {
 public:
@@ -42,29 +40,36 @@ public:
 	using pointFieldType 	= pointField<VectorField, T, MemorySpace>;
 	
 	using FieldType         = Field<VectorField, T, MemorySpace>;
+
+    using boundaryFieldListType = boundaryFieldList<VectorField, T, MemorySpace>;
   	
   	using VectorType  		= typename FieldType::VectorType;
 
 	using iterator        	= typename FieldType::iterator;
 
-  	using constIterator   	= typename FieldType::constIterator;
+  	using const_iterator   	= typename FieldType::const_iterator;
 
 	using reference       	= typename FieldType::reference;
   	
-  	using constReference  	= typename FieldType::constReference;
+  	using const_reference  	= typename FieldType::const_reference;
 
-	using valueType       	= typename FieldType::valueType;
+	using value_type       	= typename FieldType::value_type;
   	
   	using pointer         	= typename FieldType::pointer;
   	
-  	using constPointer    	= typename FieldType::constPointer;
+  	using const_pointer    	= typename FieldType::const_pointer;
 
 protected:
 
-	////- data members
-		const pointStructure& pStruct_;
+    //// - data members 
 
-		// - value when a new item is added to field
+        /// @brief list of boundaries
+        boundaryFieldListType       boundaryFieldList_;
+        
+		/// @brief  refrence to point structure 
+		const pointStructure&       pStruct_;
+
+		/// @brief value when a new item is added to field
 		T 	defaultValue_;
 
 
@@ -77,10 +82,13 @@ public:
 	//// - Constructors
 
 		// - construct a field from pointStructure and set defaultValue_ and field value to defVal
-		pointField( const pointStructure& pStruct, const T& defVal, bool subscribe = true);
+		pointField( 
+            const pointStructure& pStruct, 
+            const T& defVal, 
+            message msg);
 
 		// - construct from iIOEntity, pointStructure and a value
-		pointField( const pointStructure& pStruct, const T& val, const T& defVal, bool subscribe = true);
+		/*pointField( const pointStructure& pStruct, const T& val, const T& defVal, bool subscribe = true);
 
 		// - construct from another pointField
 		//   subscribe to events if true
@@ -159,10 +167,10 @@ public:
 		bool write(iOstream& os)const
 		{
 			return writePointField(os);
-		}
+		}*/
 };
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
+/*template<template<class, class> class VectorField, class T, class MemorySpace>
 iIstream& operator >> (iIstream & is, pointField<VectorField, T, MemorySpace> & pF )
 {
 	if( !pF.read(is))
@@ -186,11 +194,11 @@ iOstream& operator << (iOstream& os, const pointField<VectorField, T, MemorySpac
 	}
 
 	return os;
-}
+}*/
 
 }
 
 #include "pointField.cpp"
-#include "pointFieldAlgorithms.hpp"
+//#include "pointFieldAlgorithms.hpp"
 
 #endif //  __pointField_hpp__
diff --git a/src/phasicFlow/containers/pointField/pointField_old.hpp b/src/phasicFlow/containers/pointField/pointField_old.hpp
new file mode 100644
index 00000000..5c074243
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/pointField_old.hpp
@@ -0,0 +1,196 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __pointField_hpp__
+#define __pointField_hpp__
+
+
+#include "Field.hpp"
+#include "pointStructure.hpp"
+#include "error.hpp"
+
+namespace pFlow
+{
+
+
+
+template<template<class, class> class VectorField, class T, class MemorySpace=void>
+class pointField
+:
+	public eventObserver,
+	public Field<VectorField, T, MemorySpace>
+{
+public:
+	
+	using pointFieldType 	= pointField<VectorField, T, MemorySpace>;
+	
+	using FieldType         = Field<VectorField, T, MemorySpace>;
+  	
+  	using VectorType  		= typename FieldType::VectorType;
+
+	using iterator        	= typename FieldType::iterator;
+
+  	using constIterator   	= typename FieldType::constIterator;
+
+	using reference       	= typename FieldType::reference;
+  	
+  	using constReference  	= typename FieldType::constReference;
+
+	using valueType       	= typename FieldType::valueType;
+  	
+  	using pointer         	= typename FieldType::pointer;
+  	
+  	using constPointer    	= typename FieldType::constPointer;
+
+protected:
+
+	////- data members
+		const pointStructure& pStruct_;
+
+		// - value when a new item is added to field
+		T 	defaultValue_;
+
+
+public:
+ 
+	// - type info
+	TypeInfoTemplateNV2("pointField", T, VectorType::memoerySpaceName());
+
+	
+	//// - Constructors
+
+		// - construct a field from pointStructure and set defaultValue_ and field value to defVal
+		pointField( const pointStructure& pStruct, const T& defVal, bool subscribe = true);
+
+		// - construct from iIOEntity, pointStructure and a value
+		pointField( const pointStructure& pStruct, const T& val, const T& defVal, bool subscribe = true);
+
+		// - construct from another pointField
+		//   subscribe to events if true
+		pointField( const pointField& src, bool subscribe);
+
+
+		// - copy construct 
+		pointField(const pointField& src);
+
+		// - no move construct
+		pointField(pointField&& src) = delete;
+
+
+		// assignment, only assign the VectorField and preserve other parts of this 
+		pointField& operator = (const pointField& rhs);
+
+		// no move assignment 
+		pointField& operator = (pointField&&) = delete;		
+
+
+		inline uniquePtr<pointFieldType> clone() const
+		{
+			return makeUnique<pointFieldType>(*this);
+		}
+
+		inline pointFieldType* clonePtr()const
+		{
+			return new pointFieldType(*this);
+		}
+
+	//// - Methods
+
+		// - reference to pointStructure
+		inline const pointStructure& pStruct()const {
+			return pStruct_;
+		}
+
+		// if all points are active 
+		INLINE_FUNCTION_H
+		bool allActive()const {	
+			return pStruct_.allActive();
+		}
+		
+
+		INLINE_FUNCTION_H
+		bool isActive(label i)const {
+			return pStruct_.isActive(i);
+		}
+
+		const auto& pointFlag()const
+		{
+			return pStruct_.pointFlag();
+		}
+
+		range activeRange()const
+		{
+			return pStruct_.activeRange();
+		}
+
+		// - update the field if any changes occure in pStruct 
+		//   for now it checks for deleted points
+		bool update(const eventMessage& msg);
+
+
+	//// -  IO operations
+		bool readPointField(iIstream& is);
+
+		bool writePointField(iOstream& os)const;
+
+
+		bool read(iIstream& is)
+		{
+			return readPointField(is);
+		}
+
+		bool write(iOstream& os)const
+		{
+			return writePointField(os);
+		}
+};
+
+template<template<class, class> class VectorField, class T, class MemorySpace>
+iIstream& operator >> (iIstream & is, pointField<VectorField, T, MemorySpace> & pF )
+{
+	if( !pF.read(is))
+	{
+		ioErrorInFile( is.name(), is.lineNumber() ) <<
+		"error in reading pointField from file. \n";
+		fatalExit;
+	}
+
+	return is;
+}
+
+template<template<class, class> class VectorField, class T, class MemorySpace>
+iOstream& operator << (iOstream& os, const pointField<VectorField, T, MemorySpace>& pF )
+{
+	if(! pF.write(os) )
+	{
+		ioErrorInFile( os.name(), os.lineNumber() )<<
+		"error in writing pointField into file. \n";
+		fatalExit;
+	}
+
+	return os;
+}
+
+}
+
+#include "pointField.cpp"
+#include "pointFieldAlgorithms.hpp"
+
+#endif //  __pointField_hpp__
diff --git a/src/phasicFlow/containers/pointField/pointFields.cpp b/src/phasicFlow/containers/pointField/pointFields.cpp
index da0084b7..e503dd41 100644
--- a/src/phasicFlow/containers/pointField/pointFields.cpp
+++ b/src/phasicFlow/containers/pointField/pointFields.cpp
@@ -24,7 +24,7 @@ Licence:
 
 template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8>; 
 
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace>; 
+/*template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace>; 
 
 template class pFlow::pointField<pFlow::VectorSingle, pFlow::int16>; 
 
@@ -52,7 +52,7 @@ template class pFlow::pointField<pFlow::VectorSingle, pFlow::real, pFlow::HostSp
 
 template class pFlow::pointField<pFlow::VectorSingle, pFlow::realx3>; 
 
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::realx3, pFlow::HostSpace>;
+template class pFlow::pointField<pFlow::VectorSingle, pFlow::realx3, pFlow::HostSpace>;*/
 
 
 
diff --git a/src/phasicFlow/containers/pointField/pointFields.hpp b/src/phasicFlow/containers/pointField/pointFields.hpp
index a3183143..65dde6b1 100644
--- a/src/phasicFlow/containers/pointField/pointFields.hpp
+++ b/src/phasicFlow/containers/pointField/pointFields.hpp
@@ -35,21 +35,17 @@ template<typename T>
 template<typename T>
   using pointField_D = pointField<VectorSingle, T>;
 
-template<typename T>
-  using pointField_HD = pointField<VectorDual, T>;
+/*template<typename T>
+  using pointField_HD = pointField<VectorDual, T>;*/
 
 
 using int8PointField_D 		= pointField<VectorSingle, int8>;
 
 using int8PointField_H 		= pointField<VectorSingle, int8, HostSpace>;
 
-using int16PointField_D 	= pointField<VectorSingle, int16>;
-
-using int16PointField_H 	= pointField<VectorSingle, int16, HostSpace>;
-
 using int32PointField_D 	= pointField<VectorSingle, int32>;
 
-using int32PointField_H 	= pointField<VectorSingle, int32, HostSpace>;
+/*using int32PointField_H 	= pointField<VectorSingle, int32, HostSpace>;
 
 using int64PointField_D 	= pointField<VectorSingle, int64>;
 
@@ -89,7 +85,7 @@ using realPointField_HD 	= pointField<VectorDual, real>;
 
 using realx3PointField_HD 	= pointField<VectorDual, realx3>;
 
-using wordPointField 		= pointField<Vector, word, vecAllocator<word>>;
+using wordPointField 		= pointField<Vector, word, vecAllocator<word>>;*/
 
 }
 
diff --git a/src/phasicFlow/demComponent/demComponent.cpp b/src/phasicFlow/demComponent/demComponent.cpp
new file mode 100644
index 00000000..4b76b245
--- /dev/null
+++ b/src/phasicFlow/demComponent/demComponent.cpp
@@ -0,0 +1,31 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "demComponent.hpp"
+
+
+
+pFlow::demComponent::demComponent(const word& name, systemControl& control)
+:
+	componentName_(name),
+	control_(control),
+	time_(control.time()),
+	timers_(name, &control.timers())
+{}
\ No newline at end of file
diff --git a/src/demComponent/demComponent.hpp b/src/phasicFlow/demComponent/demComponent.hpp
similarity index 91%
rename from src/demComponent/demComponent.hpp
rename to src/phasicFlow/demComponent/demComponent.hpp
index d5ad1635..d6ca633c 100644
--- a/src/demComponent/demComponent.hpp
+++ b/src/phasicFlow/demComponent/demComponent.hpp
@@ -22,7 +22,7 @@ Licence:
 #define __demComponent_hpp__
 
 #include "systemControl.hpp"
-
+#include "Time.hpp"
 
 
 namespace pFlow
@@ -46,7 +46,9 @@ protected:
 		word 	componentName_;
 
 		/// Reference to systemControl 
-		systemControl& control_;
+		systemControl& 	control_;
+
+		Time& 			time_;
 
 		/// All timers (if any) of this component
 		Timers 	timers_;
@@ -59,13 +61,8 @@ public:
 	// - Constructors
 	
 		/// construct from components
-		demComponent(const word& name, systemControl& control)
-		:
-			componentName_(name),
-			control_(control),
-			timers_(name, &control.timers())
-		{}
-
+		demComponent(const word& name, systemControl& control);
+		
 		/// No copy constructor
 		demComponent(const demComponent&) = delete;
 
@@ -102,16 +99,29 @@ public:
 		inline
 		real dt()const
 		{
-			return control_.time().dt();
+			return time_.dt();
 		}
 
 		/// Current simulation time 
 		inline
 		real currentTime()const
 		{
-			return control_.time().currentTime();
+			return time_.currentTime();
 		}
 
+		inline
+		const auto& time()const
+		{
+			return time_;
+		}
+
+		inline 
+		auto& time()
+		{
+			return time_;
+		}
+
+
 		/// Const ref to timers
 		inline
 		const auto& timers() const
diff --git a/src/phasicFlow/dictionary/dictionary.hpp b/src/phasicFlow/dictionary/dictionary.hpp
index fcd55ba4..f6b75a55 100644
--- a/src/phasicFlow/dictionary/dictionary.hpp
+++ b/src/phasicFlow/dictionary/dictionary.hpp
@@ -84,7 +84,7 @@ protected:
 		/// ref to parrent dictionary
 		const dictionary& parDict_;
 
-		bool isGlobal_;
+		bool isGlobal_ = false;
 
 
 	///// protected methods 
@@ -106,6 +106,12 @@ protected:
 
 		/// write dictionary to stream - with keyword
 		bool writeDictionary(iOstream& os, bool withBlock = true)const;
+
+        /// construct an empty dictionary with keyword and make it global/fileDictionary (if true)
+		dictionary(const word& keyword, bool global);
+
+		/// construct a dictionary with name and read it from file 
+		dictionary(const word& keyword, const fileSystem& file);
 	
 
 public:
@@ -123,12 +129,6 @@ public:
 		/// construct an empty dictionary with keyword
 		dictionary(const word& keyword);
 
-		/// construct an empty dictionary with keyword and make it global/fileDictionary (if true)
-		dictionary(const word& keyword, bool global);
-
-		/// construct a dictionary with name and read it from file 
-		dictionary(const word& keyword, const fileSystem& file);
-
 		/// cunstruct an empty dictionary with keyword and parDict
 		dictionary(const word& keyword, const dictionary& parDict);
 
diff --git a/src/phasicFlow/dictionary/fileDictionary.cpp b/src/phasicFlow/dictionary/fileDictionary.cpp
new file mode 100644
index 00000000..e550311f
--- /dev/null
+++ b/src/phasicFlow/dictionary/fileDictionary.cpp
@@ -0,0 +1,26 @@
+#include "fileDictionary.hpp"
+#include "IOPattern.hpp"
+
+
+pFlow::fileDictionary::fileDictionary(const word &keyword)
+:
+    dictionary(keyword, true)
+{
+}
+
+pFlow::fileDictionary::fileDictionary(const word &keyword, const fileSystem &file)
+:
+    dictionary(keyword, file)
+{
+}
+
+bool pFlow::fileDictionary::read(iIstream &is, const IOPattern &iop)
+{
+    
+    return dictionary::read(is);
+}
+
+bool pFlow::fileDictionary::write(iOstream &os, const IOPattern &iop) const
+{
+    return dictionary::write(os);
+}
diff --git a/src/phasicFlow/dictionary/fileDictionary.hpp b/src/phasicFlow/dictionary/fileDictionary.hpp
new file mode 100644
index 00000000..b029f50b
--- /dev/null
+++ b/src/phasicFlow/dictionary/fileDictionary.hpp
@@ -0,0 +1,53 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "dictionary.hpp"
+
+
+namespace pFlow
+{
+
+class IOPattern;
+
+class fileDictionary
+:
+    public dictionary
+{
+public:
+
+    TypeInfo("fileDictionary");
+
+    /// construct an empty dictionary with keyword and make it global/fileDictionary
+	fileDictionary(const word& keyword);
+
+		/// construct a dictionary with name and read it from file 
+	fileDictionary(const word& keyword, const fileSystem& file);
+
+
+
+    /// read from stream
+	virtual bool read(iIstream& is, const IOPattern& iop);
+
+	/// write to stream
+	virtual bool write(iOstream& os, const IOPattern& iop) const;
+
+};
+
+}
diff --git a/src/phasicFlow/repository/IOobject/IOobject.cpp b/src/phasicFlow/repository/IOobject/IOobject.cpp
index e49d757c..02cd841d 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.cpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.cpp
@@ -123,7 +123,7 @@ bool pFlow::IOobject::read(iIstream& is, bool rdHdr)
 	{
 		if(!readHeader(is))return false;
 	}
-	return object_->read_object_t(is);
+	return object_->read_object_t(is, ioPattern_);
 }
 
 
@@ -132,5 +132,5 @@ bool pFlow::IOobject::write(iOstream& os) const
 	if(this->readWriteHeader())
 		writeHeader(os, typeName());
 	
-	return (object_->write_object_t(os) && writeSeparator(os));
+	return (object_->write_object_t(os, ioPattern_) && writeSeparator(os));
 }
\ No newline at end of file
diff --git a/src/phasicFlow/repository/IOobject/IOobject.hpp b/src/phasicFlow/repository/IOobject/IOobject.hpp
index 2b947946..d2ef1c18 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.hpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.hpp
@@ -50,9 +50,9 @@ private:
 
 		virtual word typeName()const = 0;
 
-		virtual bool read_object_t(iIstream& is) = 0;
+		virtual bool read_object_t(iIstream& is, IOPattern iop) = 0;
 
-		virtual bool write_object_t(iOstream& os)const = 0;
+		virtual bool write_object_t(iOstream& os, IOPattern iop)const = 0;
 
 	};
 
@@ -92,14 +92,14 @@ private:
 			return data_.typeName();
 		}
 
-		virtual bool read_object_t(iIstream& is)
+		bool read_object_t(iIstream& is, IOPattern iop) override
 		{
-			return data_.read(is);
+			return data_.read(is, iop);
 		}
 
-		virtual bool write_object_t(iOstream& os)const
+		bool write_object_t(iOstream& os, IOPattern iop)const override
 		{
-			return data_.write(os);
+			return data_.write(os, iop);
 		}
 
 		auto& data()
diff --git a/src/phasicFlow/repository/systemControl/systemControl.cpp b/src/phasicFlow/repository/systemControl/systemControl.cpp
index 974567fb..a9616a58 100644
--- a/src/phasicFlow/repository/systemControl/systemControl.cpp
+++ b/src/phasicFlow/repository/systemControl/systemControl.cpp
@@ -122,17 +122,17 @@ pFlow::systemControl::systemControl
 	),
 	settingsDict_
 	(
-		settings().emplaceObject<dictionary>
+		settings().emplaceObject<fileDictionary>
 		(
 			objectFile
 			(
 				settingsFile__,
 				"",
 				objectFile::READ_ALWAYS,
-				objectFile::WRITE_NEVER
+				objectFile::WRITE_NEVER,
+                IOPattern::AllProcessorsSimilar
 			),
-			settingsFile__,
-			true
+			settingsFile__
 		)
 	),
 	libs_(settingsDict_),
@@ -193,7 +193,7 @@ pFlow::systemControl::systemControl(
 	),
 	settingsDict_
 	(
-		settings().emplaceObject<dictionary>
+		settings().emplaceObject<fileDictionary>
 		(
 			objectFile
 			(
@@ -202,8 +202,7 @@ pFlow::systemControl::systemControl(
 				objectFile::READ_ALWAYS,
 				objectFile::WRITE_NEVER
 			),
-			settingsFile__,
-			true
+			settingsFile__
 		)
 	),
 	libs_(settingsDict_),
@@ -231,10 +230,10 @@ pFlow::systemControl::systemControl(
 	writeToFileTimer_("Write to file", &timers_)	
 {}
 
-pFlow::dictionary& pFlow::systemControl::domainDict()
+pFlow::fileDictionary& pFlow::systemControl::domainDict()
 {
 	return 
-	settings().emplaceObjectOrGet<dictionary>
+	settings().emplaceObjectOrGet<fileDictionary>
 	(
 		objectFile
 		(
@@ -243,8 +242,7 @@ pFlow::dictionary& pFlow::systemControl::domainDict()
 			objectFile::READ_ALWAYS,
 			objectFile::WRITE_NEVER
 		),
-		domainFile__,
-		true
+		domainFile__
 	);
 }
 
diff --git a/src/phasicFlow/repository/systemControl/systemControl.hpp b/src/phasicFlow/repository/systemControl/systemControl.hpp
index 8d6dfc3b..d79f157c 100644
--- a/src/phasicFlow/repository/systemControl/systemControl.hpp
+++ b/src/phasicFlow/repository/systemControl/systemControl.hpp
@@ -30,7 +30,7 @@ Licence:
 
 #include "types.hpp"
 #include "Time.hpp"
-#include "dictionary.hpp"
+#include "fileDictionary.hpp"
 #include "box.hpp"
 #include "Timers.hpp"
 #include "dynamicLinkLibs.hpp"
@@ -59,7 +59,7 @@ protected:
 	repository 			caseSetup_;
 
 	/// settingsDict fileDictionary
-	dictionary& 		settingsDict_;
+	fileDictionary& 		settingsDict_;
 
 	/// extra libs to be loaded
 	dynamicLinkLibs 	libs_;
@@ -155,15 +155,15 @@ public:
 		return timersReport_();
 	}
 
-	const dictionary& settingsDict()const{
+	const fileDictionary& settingsDict()const{
 		return settingsDict_;
 	}
 
-	dictionary& settingsDict(){
+	fileDictionary& settingsDict(){
 		return settingsDict_;
 	}
 
-	dictionary& domainDict();
+	fileDictionary& domainDict();
 	
 
 	virtual word runName() const
diff --git a/src/phasicFlow/setFieldList/setFieldEntryTemplates.cpp b/src/phasicFlow/setFieldList/setFieldEntryTemplates.cpp
index db9e4f28..83540daa 100644
--- a/src/phasicFlow/setFieldList/setFieldEntryTemplates.cpp
+++ b/src/phasicFlow/setFieldList/setFieldEntryTemplates.cpp
@@ -50,8 +50,8 @@ void* pFlow::setFieldEntry::setPointFieldDefaultValueNew
 	Type defValue = entry_.secondPartVal<Type>();
 	
 	if(verbose)
-		REPORT(2)<<"Creating pointField " << greenText(fieldName())<< " with default value " << cyanText(defValue)<<
-	             " in repository "<< owner.name() <<endREPORT;
+		REPORT(2)<<"Creating pointField " << Green_Text(fieldName())<< " with default value " << cyanText(defValue)<<
+	             " in repository "<< owner.name() <<END_REPORT;
 
 	
 	auto& field = 
@@ -85,8 +85,8 @@ void* pFlow::setFieldEntry::setPointFieldDefaultValueStdNew
 	Type defValue = entry_.secondPartVal<Type>();
 	
 	if(verbose)
-		REPORT(2)<<"Creating pointField " << greenText(fieldName())<< " with default value " << cyanText(defValue)<<
-	             " in repository "<< owner.name() <<endREPORT;
+		REPORT(2)<<"Creating pointField " << Green_Text(fieldName())<< " with default value " << cyanText(defValue)<<
+	             " in repository "<< owner.name() <<END_REPORT;
 
 	// by default we perform operations on host
 	auto& field = 
@@ -129,8 +129,8 @@ void* pFlow::setFieldEntry::setPointFieldSelected
 	Type value = entry_.secondPartVal<Type>();
 
 	if(verbose)
-		REPORT(2)<< "Setting selected points of " << greenText(fName)
-		 		 << " to value " << cyanText(value) <<endREPORT;
+		REPORT(2)<< "Setting selected points of " << Green_Text(fName)
+		 		 << " to value " << cyanText(value) <<END_REPORT;
 	
 	
 	auto fieldTypeName = owner.lookupObjectTypeName(fName);
@@ -155,7 +155,7 @@ void* pFlow::setFieldEntry::setPointFieldSelected
 			return nullptr;
 	}
 
-	if( pointField<VectorDual,Type>::TYPENAME() == fieldTypeName )
+	/*if( pointField<VectorDual,Type>::TYPENAME() == fieldTypeName )
 	{
 		
 		
@@ -164,7 +164,7 @@ void* pFlow::setFieldEntry::setPointFieldSelected
 			return &field;
 		else
 			return nullptr;
-	}
+	}*/
 
 	fatalErrorInFunction<<
 	fieldTypeName<< " is not a supported field type for setFieldEntry.\n";
@@ -197,8 +197,8 @@ void* pFlow::setFieldEntry::setPointFieldSelectedStd
 	Type value = entry_.secondPartVal<Type>();
 
 	if(verbose)
-		REPORT(2)<< "Setting selected points of " << greenText(fName)
-		 		 << " to value " << cyanText(value) <<endREPORT;
+		REPORT(2)<< "Setting selected points of " << Green_Text(fName)
+		 		 << " to value " << cyanText(value) <<END_REPORT;
 	
 	
 	auto fieldTypeName = owner.lookupObjectTypeName(fName);
diff --git a/src/phasicFlow/smartPointers/uniquePtr.hpp b/src/phasicFlow/smartPointers/uniquePtr.hpp
index 6789e027..373a043b 100644
--- a/src/phasicFlow/smartPointers/uniquePtr.hpp
+++ b/src/phasicFlow/smartPointers/uniquePtr.hpp
@@ -105,7 +105,4 @@ inline uniquePtr<T> makeUnique(Args&&... args)
 
 }
 
-
-
-
 #endif
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
index 353912d5..5f0923a2 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
@@ -20,6 +20,7 @@ Licence:
 
 #include "boundaryBase.hpp"
 #include "dictionary.hpp"
+#include "internalPoints.hpp"
 
 /*pFlow::boundaryBase::boundaryBase
 (
@@ -59,13 +60,30 @@ pFlow::boundaryBase::boundaryBase
 
 }
 
+typename pFlow::boundaryBase::pointFieldAccessType 
+    pFlow::boundaryBase::thisPoints()
+{
+    
+    return pointFieldAccessType
+    (
+        indexList_.size(),
+        indexList_.deviceVectorAll(),
+        internal_.pointPosition().deviceVectorAll()
+    );
+   
+}
 
-pFlow::uniquePtr<pFlow::boundaryBase> pFlow::boundaryBase::create
-(
-	const dictionary& 	dict,
-	const plane& 		bplane,
-	internalPoints& 	internal
-)
+typename pFlow::boundaryBase::pointFieldAccessType
+    pFlow::boundaryBase::neighborPoints()
+{
+    notImplementedFunction;
+    return pointFieldAccessType();
+}
+
+pFlow::uniquePtr<pFlow::boundaryBase> pFlow::boundaryBase::create(
+    const dictionary &dict,
+    const plane &bplane,
+    internalPoints &internal)
 {
 	word type = dict.getVal<word>("type");
 	word bType = angleBracketsNames("boundary", type);
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
index b66ebc47..ed242180 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
@@ -25,6 +25,7 @@ Licence:
 #include "subscriber.hpp"
 #include "VectorSingles.hpp"
 #include "plane.hpp"
+#include "scatterFieldAccess.hpp"
 
 #include "streams.hpp"
 
@@ -42,6 +43,9 @@ class boundaryBase
 {
 public:
 
+    using pointFieldAccessType = 
+        scatterFieldAccess<realx3,DefaultExecutionSpace>;
+
 	enum DIRECTION: int8
 	{
 		
@@ -106,11 +110,20 @@ public:
 		(dict, bplane, internal)
 	);
 
-	virtual bool beforeIteratoin(uint32 iterNum, real t) = 0 ;
+	virtual 
+    bool beforeIteratoin(uint32 iterNum, real t) = 0 ;
 
-	virtual bool iterate(uint32 iterNum, real t) = 0;
+	virtual 
+    bool iterate(uint32 iterNum, real t) = 0;
 
-	virtual bool afterIteration(uint32 iterNum, real t) = 0;
+	virtual 
+    bool afterIteration(uint32 iterNum, real t) = 0;
+
+    pointFieldAccessType thisPoints();
+
+    virtual
+    pointFieldAccessType neighborPoints();
+    
 
 	static
 	uniquePtr<boundaryBase> create
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/scatterFieldAccess.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/scatterFieldAccess.hpp
index b67ceb34..27c16f2a 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/scatterFieldAccess.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/scatterFieldAccess.hpp
@@ -9,14 +9,18 @@ namespace pFlow
 {
 
 
-template<typename T, typename ExecutionSpace>
+template<typename T, typename MemorySpace>
 class scatterFieldAccess
 {
 public:
 	
-	using execution_space 	= ExecutionSpace;
+	using viewType 			= ViewType1D<T, MemorySpace>;
 
-	using memory_space 		= typename execution_space::memory_space;
+    using device_type 		= typename viewType::device_type;
+
+    using memory_space 		= typename viewType::memory_space;
+
+    using execution_space 	= typename viewType::execution_space;
 
 protected:
 
@@ -24,12 +28,17 @@ protected:
 
 	ViewType1D<uint32, memory_space> 	indices_;
 
-	ViewType1D<T, memory_space> 		fieldVals_;
+	viewType 		fieldVals_;
 
 public:
 
+    scatterFieldAccess():
+        indices_(),
+        fieldVals_()    
+    {}
+
 	scatterFieldAccess(
-		uint32 	sz
+		uint32 	sz,
 		ViewType1D<uint32, memory_space> ind,
 		ViewType1D<T, memory_space> fVals)
 	:
@@ -50,31 +59,37 @@ public:
 
 	// - Methods
 
+    INLINE_FUNCTION_HD
 	T& operator()(uint32 i)
 	{
 		return fieldVals_(indices_(i));
 	}
 
+    INLINE_FUNCTION_HD
 	const T& operator()(uint32 i)const
 	{
 		return fieldVals_(indices_(i));
 	}
 
+    INLINE_FUNCTION_HD
 	T& operator[](uint32 i)
 	{
 		return fieldVals_(indices_(i));
 	}
 
+    INLINE_FUNCTION_HD
 	const T& operator[](uint32 i)const
 	{
 		return fieldVals_(indices_(i));
 	}
 
+    INLINE_FUNCTION_HD
 	uint32 	size()const
 	{
 		return size_;
 	}
 
+    INLINE_FUNCTION_HD
 	bool empty()const
 	{
 		return size_ == 0;
diff --git a/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp b/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp
index cd25a6b2..4914ddbc 100644
--- a/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp
@@ -27,9 +27,9 @@ pFlow::boundaryList::boundaryList
 	internalPoints& internal
 )
 :
+    ListPtr<boundaryBase>(simD.sizeOfBoundaries()),
 	simDomain_(simD),
-	internal_(internal),
-	boundaryList_(simD.sizeOfBoundaries())
+	internal_(internal)
 {}
 
 bool pFlow::boundaryList::updateLists()
@@ -37,7 +37,7 @@ bool pFlow::boundaryList::updateLists()
 
 	for(auto i=0; i<simDomain_.sizeOfBoundaries();i++)
 	{
-		boundaryList_.set
+		this->set
 		(
 			i,
 			boundaryBase::create
diff --git a/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp b/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp
index cb52807f..7a7a5f16 100644
--- a/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp
@@ -33,6 +33,8 @@ namespace pFlow
 class simulationDomain;
 
 class boundaryList
+:
+    public ListPtr<boundaryBase>
 {
 
 protected:
@@ -42,8 +44,6 @@ protected:
 		
         const simulationDomain& simDomain_;
 
-        ListPtr<boundaryBase> 	boundaryList_;
-
         bool                    listSet_ = false;
 
     
@@ -65,6 +65,16 @@ public:
   ~boundaryList() = default;
 
   bool updateLists();
+
+  auto& boundary(size_t i)
+  {
+    return ListPtr<boundaryBase>::operator[](i);
+  }
+
+  const auto& boundary(size_t i)const
+  {
+    return ListPtr<boundaryBase>::operator[](i);
+  }
 };
 
 } // pFlow
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
index d797993c..96b763e6 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
@@ -187,6 +187,12 @@ const pFlow::internalPoints::pFlagTypeHost&
 	return pFlagsH_;
 }
 
+FUNCTION_H
+pFlow::realx3Field_D &pFlow::internalPoints::pointPosition()
+{
+    return pointPosition_;
+}
+
 FUNCTION_H
 void pFlow::internalPoints::updateFlag
 (
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
index 095bdff1..743653ad 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
@@ -117,7 +117,8 @@ public:
 		FUNCTION_H
 		const realx3Field_D& pointPosition()const;
 		
-		
+		FUNCTION_H
+        realx3Field_D& pointPosition();
 
 		/*INLINE_FUNCTION_H
 		auto pointPositionHostAll()
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
index a2d4b690..30e2e187 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
@@ -23,23 +23,6 @@ Licence:
 
 #include "streams.hpp"
 
-pFlow::pointStructure::pointStructure
-(
-  const dictionary& domainDict
-)
-:
-  internalPoints(),
-  simulationDomain_
-  (
-    simulationDomain::create(domainDict)
-  ),
-  boundaries_
-  (
-    simulationDomain_(),
-    *this
-  )
-{}
-
 bool pFlow::pointStructure::distributePoints
 (
 	const realx3Vector &points
@@ -85,15 +68,36 @@ bool pFlow::pointStructure::distributePoints
 
 }
 
+pFlow::pointStructure::pointStructure
+(
+    systemControl& control
+)
+:
+	demComponent("particlesCM", control),
+  	internalPoints(),
+	simulationDomain_
+	(
+		simulationDomain::create(control.domainDict())
+	),
+	boundaries_
+	(
+		simulationDomain_(),
+		*this
+	)
+{}
+
+
 pFlow::pointStructure::pointStructure(
-    const dictionary &domainDict,
+    systemControl& control,
     const realx3Vector &posVec)
-    : internalPoints(),
-      simulationDomain_(
-          simulationDomain::create(domainDict)),
-      boundaries_(
-          simulationDomain_(),
-          *this)
+:
+	demComponent("particlesCM", control), 
+	internalPoints(),
+	simulationDomain_(
+		simulationDomain::create(control.domainDict())),
+	boundaries_(
+		simulationDomain_(),
+		*this)
 {
     if(!simulationDomain_->updateDomains(posVec) )
     {
@@ -113,12 +117,24 @@ pFlow::pointStructure::pointStructure(
     
 }
 
-FUNCTION_H
-bool pFlow::pointStructure::read
-(
-    iIstream& is, 
-    IOPattern::IOType iotype
-)
+bool pFlow::pointStructure::beforeIteration()
+{
+    return true;
+}
+
+bool pFlow::pointStructure::iterate()
+{
+    return true;
+}
+
+bool pFlow::pointStructure::afterIteration()
+{
+    return true;
+}
+
+bool pFlow::pointStructure::read(
+    iIstream &is,
+    IOPattern::IOType iotype)
 {
     Field<Vector, realx3 , vecAllocator<realx3>> fRead("file_internalPoints", "internalPoints");
     
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
index e66a3b61..b29fd705 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
@@ -17,25 +17,23 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
-
 #ifndef __pointStructure_hpp__
 #define __pointStructure_hpp__
 
+#include "demComponent.hpp"
 #include "internalPoints.hpp"
 #include "simulationDomain.hpp"
 #include "boundaryList.hpp"
-#include "uniquePtr.hpp"
+
 
 
 namespace pFlow
 {
 
-class simulationDomain;
-
 
 class pointStructure
 :
+    public demComponent,
 	public internalPoints
 {
 protected:
@@ -57,15 +55,12 @@ public:
 
 	//// - Constructors 
 
-		// - an empty pointStructure, good for reading from file 
-		pointStructure(const dictionary& domainDict);
-
-		// - construct from components
-		//pointStructure(const int8Vector& flgVec, const realx3Vector& posVec);
+		/// an empty pointStructure, good for reading from file 
+		pointStructure(systemControl& control);
 
 		/// construct from point positions, assume all points are active
 		pointStructure(
-			const dictionary& domainDict, 
+            systemControl& control,
 			const realx3Vector& posVec);
 
 		// - copy construct
@@ -88,9 +83,47 @@ public:
 
 		// - destructor 
 		virtual ~pointStructure() = default;
-		
 
-	/// Read 
+	// - Iteration methods
+
+		/// In the time loop before iterate
+		bool beforeIteration() override;
+
+		/// @brief This is called in time loop. Perform the main calculations 
+		/// when the component should evolve along time.
+		bool iterate() override;
+
+		/// This is called in time loop, after iterate.
+		bool afterIteration() override;
+
+    // - Access methods 
+
+        auto& boundaries()
+        {
+            return boundaries_;
+        }
+
+        const auto& boundaries()const
+        {
+            return boundaries_;
+        }
+
+        auto& boundary(size_t i )
+        {
+            return boundaries_[i];
+        }
+
+        auto& boundary(size_t i)const
+        {
+            return boundaries_[i];
+        }
+
+	// - IO methods 
+
+		/// @brief read the point structure from the input stream.
+		/// @param is: input stream
+		/// @param iotype: type of input pattern
+		/// @return true on success
 		FUNCTION_H
 		bool read(iIstream& is, IOPattern::IOType iotype);
 		
diff --git a/utilities/particlesPhasicFlow/CMakeLists.txt b/utilities/particlesPhasicFlow/CMakeLists.txt
index 4a46570a..c6766d21 100644
--- a/utilities/particlesPhasicFlow/CMakeLists.txt
+++ b/utilities/particlesPhasicFlow/CMakeLists.txt
@@ -3,7 +3,7 @@ set(source_files
 particlesPhasicFlow.cpp
 positionParticles/positionParticles.cpp 
 positionOrdered/positionOrdered.cpp 
-positionRandom/positionRandom.cpp
+#positionRandom/positionRandom.cpp
 empty/empty.cpp
 )
 set(link_lib phasicFlow Kokkos::kokkos Interaction Utilities)
diff --git a/utilities/particlesPhasicFlow/empty/empty.cpp b/utilities/particlesPhasicFlow/empty/empty.cpp
index 71bd478a..5ed799a2 100755
--- a/utilities/particlesPhasicFlow/empty/empty.cpp
+++ b/utilities/particlesPhasicFlow/empty/empty.cpp
@@ -30,7 +30,7 @@ pFlow::empty::empty(
 	positionParticles(control, dict),
 	position_
 	(
-		maxNumberOfParticles_, 0, RESERVE()
+		"empty",maxNumberOfParticles_, 0, RESERVE()
 	)
 {
 }
\ No newline at end of file
diff --git a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
index 173f09ce..a7102840 100755
--- a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
+++ b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
@@ -24,6 +24,8 @@ Licence:
 #include "setFields.hpp"
 #include "systemControl.hpp"
 #include "commandLine.hpp"
+#include "vocabs.hpp"
+
 //#include "readControlDict.hpp"
 
 using pFlow::output;
@@ -74,7 +76,7 @@ int main( int argc, char* argv[] )
 	if(setOnly && positionOnly)
 	{
 		ERR<<
-		"Options --positionParticles-only and --setFields-only cannot be used simeltanuously. \n"<<endERR;
+		"Options --positionParticles-only and --setFields-only cannot be used simeltanuously. \n"<<END_ERR;
 		return 1;
 	}	
 
@@ -103,8 +105,8 @@ int main( int argc, char* argv[] )
 	{
 
 		// position particles based on the dict content 
-		REPORT(0)<< "Positioning points . . . \n"<<endREPORT;
-		auto pointPosition = positionParticles::create(cpDict.subDict("positionParticles"));
+		REPORT(0)<< "Positioning points . . . \n"<<END_REPORT;
+		auto pointPosition = positionParticles::create(Control, cpDict.subDict("positionParticles"));
 
 		fileSystem pStructPath = Control.time().path()+pointStructureFile__;
 
@@ -120,16 +122,17 @@ int main( int argc, char* argv[] )
 				objectFile::READ_NEVER,
 				objectFile::WRITE_ALWAYS			
 			),
-			finalPos
+			Control,
+            finalPos
 		);
 
 		pStructPtr = &pStruct;
 
 
 		REPORT(1)<< "Created pStruct with "<< pStruct.size() << " points and capacity "<<
-		pStruct.capacity()<<" . . ."<< endREPORT;
+		pStruct.capacity()<<" . . ."<< END_REPORT;
 
-		REPORT(1)<< "Writing pStruct to " << Control.time().path()+ pointStructureFile__<< endREPORT<<endl<<endl;
+		REPORT(1)<< "Writing pStruct to " << Control.time().path()+ pointStructureFile__<< END_REPORT<<endl<<endl;
 
 		if( !Control.time().write())
 		{
@@ -148,7 +151,8 @@ int main( int argc, char* argv[] )
 				Control.time().path(),
 				objectFile::READ_NEVER,
 				objectFile::WRITE_ALWAYS			
-			)
+			),
+            Control
 		);
 
 		pStructPtr = &pStruct;
@@ -170,7 +174,7 @@ int main( int argc, char* argv[] )
 		{
 			if( !sfEntry.setPointFieldDefaultValueNewAll(Control.time(), pStruct, true))
 			{
-				ERR<< "\n error occured in setting default value fields.\n"<<endERR;
+				ERR<< "\n error occured in setting default value fields.\n"<<END_ERR;
 				return 1;
 			}
 		}
@@ -183,13 +187,13 @@ int main( int argc, char* argv[] )
 
 		for(auto name: selNames)
 		{
-			REPORT(1)<< "Applying selector " << greenText(name) <<endREPORT;
+			REPORT(1)<< "Applying selector " << Green_Text(name) <<END_REPORT;
 			
 			if(
 				!applySelector(Control, pStruct, selectorsDict.subDict(name))
 			 )
 			{
-				ERR<<"\n error occured in setting selector. \n"<<endERR;
+				ERR<<"\n error occured in setting selector. \n"<<END_ERR;
 				return 1;
 			}
 			output<<endl;
@@ -197,7 +201,7 @@ int main( int argc, char* argv[] )
 	}
 
 	Control.time().write(true);
-	REPORT(0)<< greenText("\nFinished successfully.\n")<<endREPORT;
+	REPORT(0)<< Green_Text("\nFinished successfully.\n")<<END_REPORT;
 
 
 // this should be palced in each main 
diff --git a/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.cpp b/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.cpp
index 45a1635f..77d624b4 100755
--- a/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.cpp
+++ b/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.cpp
@@ -127,7 +127,7 @@ pFlow::positionOrdered::positionOrdered
 	const dictionary& dict
 )
 :
-	positionParticles(dict),
+	positionParticles(control, dict),
 	poDict_
 	(  
 		dict.subDict("positionOrderedInfo")
@@ -138,7 +138,7 @@ pFlow::positionOrdered::positionOrdered
 	),
 	numPoints_
 	(
-		poDict_.getVal<size_t>("numPoints")
+		poDict_.getVal<uint64>("numPoints")
 	),
 	axisOrder_
 	(
@@ -146,7 +146,7 @@ pFlow::positionOrdered::positionOrdered
 	),
 	position_
 	(
-		maxNumberOfParticles_, RESERVE()
+		"positionOrdered", maxNumberOfParticles_, numPoints_ ,RESERVE()
 	)
 {
 	
diff --git a/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.hpp b/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.hpp
index aa5a3881..5d18ae57 100755
--- a/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.hpp
+++ b/utilities/particlesPhasicFlow/positionOrdered/positionOrdered.hpp
@@ -76,12 +76,12 @@ public:
 
 	//// - Methods 
 
-	virtual label numPoints()const
+	virtual uint64 numPoints()const
 	{
 		return position_.size();
 	}
 
-	virtual label size()const
+	virtual uint64 size()const
 	{
 		return position_.size();
 	}
diff --git a/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp b/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
index 632fceb7..ecd4e670 100755
--- a/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
+++ b/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
@@ -54,7 +54,7 @@ pFlow::realx3Vector pFlow::positionParticles::sortByMortonCode(realx3Vector& pos
 			ind++});
 	}
 
-	INFORMATION<<"Performing morton sorting."<<endINFO;
+	INFORMATION<<"Performing morton sorting."<<END_INFO;
 	std::sort(
 		indMor.begin(),
 		indMor.end(),
@@ -120,7 +120,11 @@ pFlow::realx3Vector pFlow::positionParticles::getFinalPosition()
 }
 
 pFlow::uniquePtr<pFlow::positionParticles> 
-	pFlow::positionParticles::create(const dictionary & dict)
+	pFlow::positionParticles::create
+(
+    systemControl& control,
+    const dictionary & dict
+)
 {
 
 	word method = dict.getVal<word>("method");
diff --git a/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp b/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp
index 37053a52..0cde29fb 100755
--- a/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp
+++ b/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp
@@ -127,8 +127,8 @@ public:
 	(
 		positionParticles,
 		dictionary,
-		(const dictionary& dict),
-		(dict)
+		(systemControl& control, const dictionary& dict),
+		(control, dict)
 	);
 
 	virtual ~positionParticles() = default;
@@ -151,7 +151,7 @@ public:
 	virtual realx3Vector getFinalPosition();
 
 	static
-	uniquePtr<positionParticles> create(const dictionary & dict);
+	uniquePtr<positionParticles> create(systemControl& control, const dictionary & dict);
 	
 };	
 

From f5d8daa6085ec47303fcd1a628c3d659c9af8ada Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sat, 13 Jan 2024 09:54:23 +0330
Subject: [PATCH 18/60] MPI-parallelization upto IO file

---
 CMakeLists.txt                                |   2 +-
 cmake/bashrc                                  |   2 +-
 src/phasicFlow/CMakeLists.txt                 |  60 ++-
 src/phasicFlow/commandLine/commandLine.cpp    |   8 +-
 src/phasicFlow/containers/Field/Field.cpp     |  17 +-
 src/phasicFlow/containers/Field/Field.hpp     |  10 +-
 src/phasicFlow/containers/Vector/Vector.cpp   |   8 +-
 src/phasicFlow/containers/Vector/Vector.hpp   |  14 +-
 .../containers/Vector/stdVectorHelper.hpp     |  25 +-
 .../containers/VectorHD/VectorSingle.cpp      |   2 +-
 .../containers/VectorHD/VectorSingle.hpp      |  12 +-
 src/phasicFlow/containers/span/span.hpp       |  36 ++
 src/phasicFlow/demComponent/demComponent.cpp  |  16 +-
 src/phasicFlow/demComponent/demComponent.hpp  |  24 +-
 src/phasicFlow/dictionary/dictionary.hpp      |  17 +-
 src/phasicFlow/dictionary/fileDictionary.cpp  |  42 +-
 src/phasicFlow/dictionary/fileDictionary.hpp  |  20 +-
 src/phasicFlow/fileSystem/fileSystem.cpp      |   5 +-
 src/phasicFlow/globals/error.cpp              |  10 +-
 src/phasicFlow/processors/localProcessors.cpp | 117 ++++++
 src/phasicFlow/processors/localProcessors.hpp | 152 +++++++
 src/phasicFlow/processors/pFlowProcessors.cpp |  18 +
 src/phasicFlow/processors/pFlowProcessors.hpp |  14 +
 src/phasicFlow/processors/processors.cpp      |  39 +-
 src/phasicFlow/processors/processors.hpp      |  41 +-
 .../repository/IOobject/IOPattern.cpp         |   9 +-
 .../repository/IOobject/IOPattern.hpp         |  14 +-
 .../repository/IOobject/IOfileHeader.cpp      |  43 +-
 .../repository/IOobject/IOfileHeader.hpp      |  24 +-
 .../repository/IOobject/IOobject.cpp          | 133 +++---
 .../repository/IOobject/IOobject.hpp          | 181 ++-------
 .../repository/IOobject/IOobjectTemplates.cpp |   4 +-
 .../repository/IOobject/objectFile.cpp        |   6 +-
 .../repository/IOobject/objectFile.hpp        |  18 +-
 src/phasicFlow/repository/Time/Time.cpp       |   5 +
 src/phasicFlow/repository/Time/Time.hpp       |   6 +-
 .../repository/repository/repository.cpp      |  66 ++-
 .../repository/repository/repository.hpp      |  61 +--
 .../repository/repositoryTemplates.cpp        |  41 +-
 .../repository/systemControl/Control.hpp      |  47 ---
 .../systemControl/systemControl.cpp           | 184 +++++----
 .../systemControl/systemControl.hpp           |  48 +--
 .../streams/dataIO/createDataIO.hpp           |  35 ++
 src/phasicFlow/streams/dataIO/dataIO.cpp      |  34 --
 src/phasicFlow/streams/dataIO/dataIO.hpp      | 213 +---------
 src/phasicFlow/streams/dataIO/dataIONoMPI.cpp |  20 -
 src/phasicFlow/streams/dataIO/dataIONoMPI.hpp |  48 ---
 .../streams/dataIO/dataIORegular.hpp          |  47 +++
 .../streams/dataIO/dataIOTemplate.cpp         | 381 ++----------------
 src/phasicFlow/structuredData/box/box.hpp     |  12 +
 .../structuredData/domain/domain.cpp          |  23 +-
 .../structuredData/domain/domain.hpp          |  11 +-
 .../domain/regularSimulationDomain.cpp        |  97 ++++-
 .../domain/regularSimulationDomain.hpp        |  42 +-
 .../domain/simulationDomain.cpp               |   8 +-
 .../domain/simulationDomain.hpp               |  82 +++-
 .../infinitePlane/infinitePlane.hpp           |  29 +-
 src/phasicFlow/structuredData/plane/plane.cpp |  12 +-
 src/phasicFlow/structuredData/plane/plane.hpp |   1 +
 .../pointStructure/internalPoints.cpp         |  42 +-
 .../pointStructure/internalPoints.hpp         |  27 +-
 .../pointStructure/pointFlag.hpp              |   3 +
 .../pointStructure/pointFlagKernels.hpp       |   2 -
 .../pointStructure/pointStructure.cpp         | 169 +++++---
 .../pointStructure/pointStructure.hpp         |  39 +-
 .../trisurfaceStructure/stlFile.hpp           |   4 +-
 src/phasicFlow/types/triple/triple.hpp        |   2 +
 src/setHelpers/finalize.hpp                   |   2 +-
 src/setHelpers/setProperty.hpp                |   2 +-
 src/setHelpers/setSurfaceGeometry.hpp         |   2 +-
 utilities/CMakeLists.txt                      |   4 +-
 utilities/Utilities/CMakeLists.txt            |  16 +-
 .../cylinderWall/cylinderWall.cpp             |   2 +-
 .../geometryPhasicFlow/stlWall/stlWall.cpp    |   2 +-
 utilities/Utilities/readFromTimeFolder.hpp    |   2 +-
 utilities/particlesPhasicFlow/CMakeLists.txt  |   4 +-
 .../particlesPhasicFlow.cpp                   |  48 +--
 .../positionParticles/positionParticles.cpp   |  29 +-
 78 files changed, 1594 insertions(+), 1503 deletions(-)
 create mode 100644 src/phasicFlow/processors/localProcessors.cpp
 create mode 100644 src/phasicFlow/processors/localProcessors.hpp
 create mode 100644 src/phasicFlow/processors/pFlowProcessors.cpp
 create mode 100644 src/phasicFlow/processors/pFlowProcessors.hpp
 delete mode 100644 src/phasicFlow/repository/systemControl/Control.hpp
 create mode 100644 src/phasicFlow/streams/dataIO/createDataIO.hpp
 delete mode 100644 src/phasicFlow/streams/dataIO/dataIO.cpp
 delete mode 100644 src/phasicFlow/streams/dataIO/dataIONoMPI.cpp
 delete mode 100644 src/phasicFlow/streams/dataIO/dataIONoMPI.hpp
 create mode 100644 src/phasicFlow/streams/dataIO/dataIORegular.hpp

diff --git a/CMakeLists.txt b/CMakeLists.txt
index e411fe79..3ce683a4 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -74,7 +74,7 @@ add_subdirectory(src)
 
 #add_subdirectory(solvers)
 
-add_subdirectory(utilities)
+#add_subdirectory(utilities)
 
 #add_subdirectory(DEMSystems)
 add_subdirectory(testIO)
diff --git a/cmake/bashrc b/cmake/bashrc
index 823f276d..32c92d87 100644
--- a/cmake/bashrc
+++ b/cmake/bashrc
@@ -29,7 +29,7 @@ export PATH="$pFlow_BIN_DIR:$PATH"
 
 export LD_LIBRARY_PATH="$pFlow_LIB_DIR:$LD_LIBRARY_PATH"
 
-export LD_LIBRARY_PATH="$Zoltan_DIR/build/lib:$LD_LIBRARY_PATH"
+export LD_LIBRARY_PATH="$Zoltan_DIR/lib:$LD_LIBRARY_PATH"
 
 
 #------------------------------------------------------------------------------
diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 021ad360..65c91b59 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -6,6 +6,10 @@ types/types.cpp
 
 globals/error.cpp
 
+processors/processors.cpp
+processors/localProcessors.cpp
+processors/pFlowProcessors.cpp
+
 streams/token/tokenIO.cpp
 streams/token/token.cpp
 streams/iStream/IOstream.cpp
@@ -20,14 +24,10 @@ streams/TStream/oTstream.cpp
 streams/Fstream/iFstream.cpp
 streams/Fstream/oFstream.cpp
 streams/Fstream/fileStream.cpp
-streams/dataIO/dataIO.cpp
-streams/dataIO/dataIONoMPI.cpp 
 streams/streams.cpp 
 
 fileSystem/fileSystem.cpp
 
-processors/processors.cpp
-
 dictionary/dictionary.cpp
 dictionary/fileDictionary.cpp
 dictionary/entry/iEntry.cpp
@@ -39,6 +39,9 @@ containers/Field/Fields.cpp
 containers/List/anyList/anyList.cpp
 containers/pointField/pointFields.cpp
 
+#setFieldList/setFieldList.cpp
+#setFieldList/setFieldEntry.cpp
+
 Timer/Timer.cpp
 Timer/Timers.cpp
 
@@ -64,21 +67,58 @@ structuredData/plane/plane.cpp
 structuredData/domain/domain.cpp
 structuredData/domain/simulationDomain.cpp
 structuredData/domain/regularSimulationDomain.cpp
-structuredData/pointStructure/boundaryList.cpp
 structuredData/pointStructure/internalPoints.cpp
 structuredData/pointStructure/pointStructure.cpp
 structuredData/boundaries/boundaryBase/boundaryBase.cpp
 structuredData/boundaries/boundaryExit/boundaryExit.cpp
+structuredData/pointStructure/boundaryList.cpp
+
+commandLine/commandLine.cpp
 
 
 )
 
 set(link_libs)
-if(MPI_FOUND)
-	set(link_libs Kokkos::kokkos tbb PRIVATE MPI::MPI_CXX)
+set(link_libs Kokkos::kokkos tbb)
+	
+
+
+if(pFlow_Build_MPI)
+
+	set(Zoltan_Install_DIR)
+	if(DEFINED ENV{Zoltan_DIR})
+	   set(Zoltan_Install_DIR $ENV{Zoltan_DIR})
+	else()
+	  set(Zoltan_Install_DIR $ENV{HOME}/PhasicFlow/Zoltan)
+	endif()
+	message(STATUS "Zoltan install directory is ${Zoltan_Install_DIR}")
+
+	set(ZOLTAN_PREFIX "${Zoltan_Install_DIR}" CACHE STRING "Zoltan install directory")
+
+	find_path(ZOLTAN_INCLUDE_DIR zoltan.h PATHS "${ZOLTAN_PREFIX}/include")
+
+	message(STATUS "Zoltan include path: ${ZOLTAN_INCLUDE_DIR}")
+
+	find_library(ZOLTAN_LIBRARY zoltan PATHS "${ZOLTAN_PREFIX}/lib")
+	message(STATUS "Zoltan lib path: ${ZOLTAN_LIBRARY}")
+	
+	list(APPEND SourceFiles
+	MPIParallelization/partitioning.cpp 
+	MPIParallelization/rcb1DPartitioning.cpp
+	MPIParallelization/domain/MPISimulationDomain.cpp
+    #MPIParallelization/dataIOMPI.cpp
+    MPIParallelization/procCommunication.cpp
+    MPIParallelization/boundaryProcessor.cpp
+    MPIParallelization/scatteredMasterDistributeChar.cpp
+	)
+	
+	list(APPEND link_libs MPI::MPI_CXX ${ZOLTAN_LIBRARY} -lm )
+	pFlow_add_library_install(phasicFlow SourceFiles link_libs)
+	target_include_directories(phasicFlow PUBLIC ./globals ${ZOLTAN_INCLUDE_DIR})
+
 else()
-	set(link_libs Kokkos::kokkos tbb)
+	pFlow_add_library_install(phasicFlow SourceFiles link_libs)
+	target_include_directories(phasicFlow PUBLIC ./globals)
 endif()
 
-pFlow_add_library_install(phasicFlow SourceFiles link_libs)
-target_include_directories(phasicFlow PUBLIC ./globals)
+
diff --git a/src/phasicFlow/commandLine/commandLine.cpp b/src/phasicFlow/commandLine/commandLine.cpp
index d2002570..f9d82161 100644
--- a/src/phasicFlow/commandLine/commandLine.cpp
+++ b/src/phasicFlow/commandLine/commandLine.cpp
@@ -38,10 +38,10 @@ pFlow::commandLine::commandLine(word appName, word disptn)
 	CLI::App::add_flag_callback(
 		"--description",
 		[disptn, appName]() {
-			output<<"\n"<<yellowText(versoinCopyright)<<endl;
-			output<<yellowText(floatingPointDescription())<<endl<<endl;
-			output<<"Description for "<< boldText(appName)<<":\n";
-			output<<"  "<<disptn<<endl;
+			mOutput<<"\n"<<Yellow_Text(versoinCopyright)<<endl;
+			mOutput<<Yellow_Text(floatingPointDescription())<<endl<<endl;
+			mOutput<<"Description for "<< Bold_Text(appName)<<":\n";
+			mOutput<<"  "<<disptn<<endl;
 		},
 		"What does this app do?"
 		)->configurable(false);
diff --git a/src/phasicFlow/containers/Field/Field.cpp b/src/phasicFlow/containers/Field/Field.cpp
index 4f895a98..93b72c20 100644
--- a/src/phasicFlow/containers/Field/Field.cpp
+++ b/src/phasicFlow/containers/Field/Field.cpp
@@ -185,12 +185,14 @@ template<template<class, class> class VectorField, class T, class PropType>
 bool pFlow::Field<VectorField, T, PropType>::read
 (
 	iIstream& is,
-	IOPattern::IOType iotype
+	const IOPattern& iop
 )
 {
 	
-	bool tokenFound;
-	tokenFound = is.findToken(fieldKey_);
+	bool tokenFound = true;
+	
+    if(iop.thisProcReadData())
+        tokenFound = is.findToken(fieldKey_);
 
 	if( !tokenFound )
 	{
@@ -199,12 +201,13 @@ bool pFlow::Field<VectorField, T, PropType>::read
 		return false;
 	}
 	
-	if( !VectorType::read(is, iotype) )
+	if( !VectorType::read(is, iop) )
 	{
 		ioErrorInFile(is.name(), is.lineNumber())<<
 		"error in reading field data from field "<< this->name()<<endl;
 	}
-	is.readEndStatement("Field::read");
+    if(iop.thisProcReadData())
+	    is.readEndStatement("Field::read");
 
 
 	return true;
@@ -213,14 +216,14 @@ bool pFlow::Field<VectorField, T, PropType>::read
 template<template<class, class> class VectorField, class T, class PropType>
 bool pFlow::Field<VectorField, T, PropType>::write(
 	iOstream& os, 
-	IOPattern::IOType iotype)const
+	const IOPattern& iop)const
 {
 
 	os.writeWordKeyword(fieldKey_)<<endl;
 
 	if(!os.check(FUNCTION_NAME))return false;
 
-	if(!VectorType::write(os, iotype)) return false;
+	if(!VectorType::write(os, iop)) return false;
 
 	os.endEntry();
 	if(!os.check(FUNCTION_NAME))return false;
diff --git a/src/phasicFlow/containers/Field/Field.hpp b/src/phasicFlow/containers/Field/Field.hpp
index aafbfbd2..113437f6 100644
--- a/src/phasicFlow/containers/Field/Field.hpp
+++ b/src/phasicFlow/containers/Field/Field.hpp
@@ -27,7 +27,7 @@ Licence:
 
 #include "types.hpp"
 #include "Vector.hpp"
-
+#include "streams.hpp"
 
 namespace pFlow
 {
@@ -193,15 +193,15 @@ public:
 		bool writeField(iOstream& os)const;*/
 
 		
-		bool read(iIstream& is, IOPattern::IOType iotype);
+		bool read(iIstream& is, const IOPattern& iop);
 		
 
-		bool write(iOstream& os, IOPattern::IOType iotype )const;
+		bool write(iOstream& os, const IOPattern& iop )const;
 
 		template<typename HostMask>
 		bool write(
 			iOstream& os, 
-			IOPattern::IOType iotype, 
+			const IOPattern& iop, 
 			const HostMask& mask)const
 		{
 			
@@ -209,7 +209,7 @@ public:
 
 			if(!os.check(FUNCTION_NAME))return false;
 
-			if(!VectorType::write(os, iotype)) return false;
+			if(!VectorType::write(os, iop)) return false;
 
 			os.endEntry();
 			if(!os.check(FUNCTION_NAME))return false;
diff --git a/src/phasicFlow/containers/Vector/Vector.cpp b/src/phasicFlow/containers/Vector/Vector.cpp
index 9904d4a3..e17ce7a8 100644
--- a/src/phasicFlow/containers/Vector/Vector.cpp
+++ b/src/phasicFlow/containers/Vector/Vector.cpp
@@ -23,10 +23,10 @@ template<typename T, typename Allocator>
 bool pFlow::Vector<T, Allocator>::readVector
 (
 	iIstream& is,
-	IOPattern::IOType iotype
+	const IOPattern& iop
 )
 {
-	return readStdVector(is, vectorField(), iotype);
+	return readStdVector(is, vectorField(), iop);
 }
 
 
@@ -34,10 +34,10 @@ template<typename T, typename Allocator>
 bool pFlow::Vector<T, Allocator>::writeVector
 (
 	iOstream& os,
-	IOPattern::IOType iotype
+	const IOPattern& iop
 ) const
 {
-	return writeStdVector(os, vectorField(), iotype);	
+	return writeStdVector(os, vectorField(), iop);	
 }
 
 /*template<typename T, typename Allocator>
diff --git a/src/phasicFlow/containers/Vector/Vector.hpp b/src/phasicFlow/containers/Vector/Vector.hpp
index 05275ce5..acdbee16 100644
--- a/src/phasicFlow/containers/Vector/Vector.hpp
+++ b/src/phasicFlow/containers/Vector/Vector.hpp
@@ -334,7 +334,7 @@ public:
 	inline 
 	auto getSpan()const
 	{
-		return span<const T>(this->data(), this->size());
+		return span<T>(const_cast<T*>(this->data()), this->size());
 	}
 
 	static constexpr bool isHostAccessible()
@@ -357,19 +357,19 @@ public:
 	inline VectorType operator -()const;
 
 	/// Read vector (assume ASCII in input)
-	bool readVector(iIstream& is, IOPattern::IOType iotype);
+	bool readVector(iIstream& is, const IOPattern& iop);
 
 	/// write vector 
-	bool writeVector(iOstream& os, IOPattern::IOType iotype) const;
+	bool writeVector(iOstream& os, const IOPattern& iop) const;
 
-	bool read(iIstream& is, IOPattern::IOType iotype)
+	bool read(iIstream& is, const IOPattern& iop)
 	{
-		return readVector(is, iotype);
+		return readVector(is, iop);
 	}
 
-	bool write(iOstream& os, IOPattern::IOType iotype)const
+	bool write(iOstream& os, const IOPattern& iop)const
 	{
-		return writeVector(os, iotype);
+		return writeVector(os, iop);
 	}
 
 };
diff --git a/src/phasicFlow/containers/Vector/stdVectorHelper.hpp b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
index 9c67a4ce..584d07c6 100644
--- a/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
+++ b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
@@ -28,8 +28,8 @@ Licence:
 #include "span.hpp"
 #include "iOstream.hpp"
 #include "iIstream.hpp"
-#include "dataIO.hpp"
-
+#include "createDataIO.hpp"
+#include "pFlowProcessors.hpp"
 
 namespace pFlow
 {
@@ -54,11 +54,11 @@ inline
 bool writeSpan(
     iOstream& os, 
     const span<T>& sp, 
-    IOPattern::IOType iotype)
+    const IOPattern& iop)
 {
    
-   auto ioPtr = dataIO::create(iotype, IOPattern::exeMode());
-
+   auto ioPtr = createDataIO<T>(pFlowProcessors().localRunTypeName(), iop);
+    
    if(!ioPtr)
 	{
 		fatalErrorInFunction;
@@ -73,32 +73,27 @@ bool writeSpan(
     return true; 
 }
 
-
 template<typename T, typename Allocator>
 bool writeStdVector
 (
 	iOstream& os, 
 	const std::vector<T,Allocator>& vec,
-	IOPattern::IOType iotype 
+	const IOPattern& iop 
 )
 {
-	span<T> sp( const_cast<T*>(vec.data()), vec.size());
-
-	return writeSpan(os, sp, iotype);
+	auto sp = makeSpan(vec);
+	return writeSpan(os, sp, iop);
 }
 
-	
-
-
 template<typename T, typename Allocator>
 bool readStdVector
 (
 	iIstream& is, 
 	std::vector<T,Allocator>& vec,
-	IOPattern::IOType iotype 
+	const IOPattern& iop 
 )
 {
-	auto ioPtr = dataIO::create(iotype, IOPattern::exeMode());
+	auto ioPtr = createDataIO<T>(pFlowProcessors().localRunTypeName(), iop);
 
 	if(!ioPtr)
 	{
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
index c2b85e79..18b053e6 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
@@ -415,7 +415,7 @@ template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H 
 auto pFlow::VectorSingle<T,MemorySpace>::getSpan()const
 {
-    return span<const T>(view_.data(), this->size());
+    return span<T>(const_cast<T*>(view_.data()), this->size());
 }
 
 template<typename T, typename MemorySpace>
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 7a2ea557..52f3e103 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -370,10 +370,10 @@ public:
 
 		/// Read vector from stream (ASCII)
 		FUNCTION_H
-		bool read(iIstream& is, IOPattern::IOType iotype)
+		bool read(iIstream& is, const IOPattern& iop)
 		{
 			std::vector<T> vecFromFile;
-			if(! readStdVector(is, vecFromFile, iotype)) return false;
+			if(! readStdVector(is, vecFromFile, iop)) return false;
 
 			this->assign(vecFromFile);
 
@@ -382,18 +382,18 @@ public:
 
 		/// Write the vector to os
 		FUNCTION_H
-		bool write(iOstream& os, IOPattern::IOType iotype)const
+		bool write(iOstream& os, const IOPattern& iop)const
 		{
 			auto hVec = hostVector();
 			auto sp = span<T>( const_cast<T*>(hVec.data()), hVec.size());
 			
-			return writeSpan(os, sp, iotype);
+			return writeSpan(os, sp, iop);
 			
 		}
 
 		template<typename HostMask>
 		FUNCTION_H
-		bool write(iOstream& os, IOPattern::IOType iotype, const HostMask& mask)const
+		bool write(iOstream& os, const IOPattern& iop, const HostMask& mask)const
 		{
 			auto hVec = hostVector();
 			
@@ -413,7 +413,7 @@ public:
 
 			auto sp = span<T>( finalField.data(), finalField.size());
 
-			return writeSpan(os, sp, iotype);
+			return writeSpan(os, sp, iop);
 
 		}
 
diff --git a/src/phasicFlow/containers/span/span.hpp b/src/phasicFlow/containers/span/span.hpp
index 8947c039..fc625d86 100644
--- a/src/phasicFlow/containers/span/span.hpp
+++ b/src/phasicFlow/containers/span/span.hpp
@@ -192,6 +192,42 @@ iOstream& operator<<(iOstream& os, const span<T>& s)
     return os;
 }
 
+template<typename T, template<class> class Container>
+span<T> makeSpan(Container<T>& container)
+{
+    return span<T>(container.data(), container.size());
+}
+
+template<typename T, template<class> class Container>
+span<T> makeSpan(const Container<T>& container)
+{
+    return span<T>(
+        const_cast<T*>(container.data()), 
+        container.size());
+}
+
+
+template<typename T>
+inline
+span<char> charSpan(span<T> s)
+{
+    auto el = sizeof(T);
+    return span<char>(
+        reinterpret_cast<char*>(s.data()),
+        s.size()*el);
+}
+
+template<typename T>
+inline
+span<const char> charSpan(span<const T> s)
+{
+    auto el = sizeof(T);
+    return span<const char>(
+        reinterpret_cast<const char*>(s.data()),
+        s.size()*el);
+}
+
+
 
 
 } // pFlow
diff --git a/src/phasicFlow/demComponent/demComponent.cpp b/src/phasicFlow/demComponent/demComponent.cpp
index 4b76b245..0307b333 100644
--- a/src/phasicFlow/demComponent/demComponent.cpp
+++ b/src/phasicFlow/demComponent/demComponent.cpp
@@ -19,8 +19,8 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "demComponent.hpp"
-
-
+#include "systemControl.hpp"
+#include "Time.hpp"
 
 pFlow::demComponent::demComponent(const word& name, systemControl& control)
 :
@@ -28,4 +28,14 @@ pFlow::demComponent::demComponent(const word& name, systemControl& control)
 	control_(control),
 	time_(control.time()),
 	timers_(name, &control.timers())
-{}
\ No newline at end of file
+{}
+
+pFlow::real pFlow::demComponent::dt()const
+{
+	return time_.dt();
+}
+
+pFlow::real pFlow::demComponent::currentTime()const
+{
+    return time_.currentTime();
+}
diff --git a/src/phasicFlow/demComponent/demComponent.hpp b/src/phasicFlow/demComponent/demComponent.hpp
index d6ca633c..fb229ae9 100644
--- a/src/phasicFlow/demComponent/demComponent.hpp
+++ b/src/phasicFlow/demComponent/demComponent.hpp
@@ -21,13 +21,15 @@ Licence:
 #ifndef __demComponent_hpp__ 
 #define __demComponent_hpp__
 
-#include "systemControl.hpp"
-#include "Time.hpp"
-
+#include "types.hpp"
+#include "typeInfo.hpp"
+#include "Timers.hpp"
 
 namespace pFlow
 {
 
+class systemControl;
+class Time;
 /**
  * A base class for every main component of DEM system.
  * 
@@ -96,19 +98,11 @@ public:
 		}
 
 		/// Time step of integration
-		inline
-		real dt()const
-		{
-			return time_.dt();
-		}
-
+		real dt()const;
+		
 		/// Current simulation time 
-		inline
-		real currentTime()const
-		{
-			return time_.currentTime();
-		}
-
+		real currentTime()const;
+		
 		inline
 		const auto& time()const
 		{
diff --git a/src/phasicFlow/dictionary/dictionary.hpp b/src/phasicFlow/dictionary/dictionary.hpp
index f6b75a55..db77733c 100644
--- a/src/phasicFlow/dictionary/dictionary.hpp
+++ b/src/phasicFlow/dictionary/dictionary.hpp
@@ -218,6 +218,9 @@ public:
 		template<typename T>
 		bool addOrKeep(const word& keyword, const T& v);
 
+        template<typename T>
+        bool addOrReplace(const word& keyword, const T& v);
+
 		void clear();
 
 		/// pointer to a subdictionary 
@@ -384,8 +387,20 @@ T dictionary::getValOrSet
 	}
 }
 
+template <typename T>
+inline bool dictionary::addOrReplace
+(
+    const word &keyword, 
+    const T &v
+)
+{
+    uniquePtr<iEntry> ptr = makeUnique<dataEntry>(keyword, *this ,v);
+    return addPtr(keyword, ptr, false);
+}
+
+
+
 
 } // pFlow
 
-
 #endif // __dictionary_hpp__
diff --git a/src/phasicFlow/dictionary/fileDictionary.cpp b/src/phasicFlow/dictionary/fileDictionary.cpp
index e550311f..a8abd443 100644
--- a/src/phasicFlow/dictionary/fileDictionary.cpp
+++ b/src/phasicFlow/dictionary/fileDictionary.cpp
@@ -1,22 +1,50 @@
 #include "fileDictionary.hpp"
-#include "IOPattern.hpp"
 
 
-pFlow::fileDictionary::fileDictionary(const word &keyword)
+pFlow::fileDictionary::fileDictionary
+(
+    const objectFile & of, 
+    repository* owner
+)
 :
-    dictionary(keyword, true)
+    IOobject
+    (
+        of, 
+        IOPattern::IOPattern::AllProcessorsSimilar, 
+        owner
+    ),
+    dictionary
+    (
+        of.name(), 
+        true
+    )
 {
+    dictionary::name_ = IOobject::path().wordPath();
+    if(!IOobject::read())
+    {
+        fatalErrorInFunction<<
+        "Error in reading from dictionary "<< globalName()<<endl;
+        fatalExit;
+    }
 }
 
 pFlow::fileDictionary::fileDictionary(const word &keyword, const fileSystem &file)
 :
-    dictionary(keyword, file)
-{
-}
+    fileDictionary
+    (
+        objectFile
+        (
+            keyword,
+            file,
+            objectFile::READ_ALWAYS,
+            objectFile::WRITE_NEVER
+        ),
+        nullptr
+    )
+{}
 
 bool pFlow::fileDictionary::read(iIstream &is, const IOPattern &iop)
 {
-    
     return dictionary::read(is);
 }
 
diff --git a/src/phasicFlow/dictionary/fileDictionary.hpp b/src/phasicFlow/dictionary/fileDictionary.hpp
index b029f50b..2fdc9fe2 100644
--- a/src/phasicFlow/dictionary/fileDictionary.hpp
+++ b/src/phasicFlow/dictionary/fileDictionary.hpp
@@ -17,17 +17,18 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
+#ifndef __fileDictionary_hpp__
+#define __fileDictionary_hpp__
 
 #include "dictionary.hpp"
-
+#include "IOobject.hpp"
 
 namespace pFlow
 {
 
-class IOPattern;
-
 class fileDictionary
 :
+    public IOobject,
     public dictionary
 {
 public:
@@ -35,19 +36,22 @@ public:
     TypeInfo("fileDictionary");
 
     /// construct an empty dictionary with keyword and make it global/fileDictionary
-	fileDictionary(const word& keyword);
+	fileDictionary(const objectFile & of, repository* owner = nullptr);
 
-		/// construct a dictionary with name and read it from file 
+	/// construct a dictionary with name and read it from file 
 	fileDictionary(const word& keyword, const fileSystem& file);
 
 
 
-    /// read from stream
-	virtual bool read(iIstream& is, const IOPattern& iop);
+    /// read from stream 
+    bool read(iIstream& is, const IOPattern& iop) override;
 
 	/// write to stream
-	virtual bool write(iOstream& os, const IOPattern& iop) const;
+	
+    bool write(iOstream& os, const IOPattern& iop) const override;
 
 };
 
 }
+
+#endif //__fileDictionary_hpp__
\ No newline at end of file
diff --git a/src/phasicFlow/fileSystem/fileSystem.cpp b/src/phasicFlow/fileSystem/fileSystem.cpp
index c5c5317b..c1abf154 100644
--- a/src/phasicFlow/fileSystem/fileSystem.cpp
+++ b/src/phasicFlow/fileSystem/fileSystem.cpp
@@ -21,7 +21,7 @@ Licence:
 
 #include "fileSystem.hpp"
 #include "error.hpp"
-#include "iOstream.hpp"
+#include "streams.hpp"
 
 
 bool pFlow::fileSystem::checkFileName(const word& name)
@@ -47,7 +47,6 @@ pFlow::fileSystem::fileSystem(const word & wPath)
 	path_(wPath),
 	isDir_(std::filesystem::is_directory(path_))
 {
-	std::cout<<"file name is " << fileName()<<std::endl;
 	if( !isDir_ && !checkFileName(fileName()))
 	{
 		fatalExit;
@@ -276,7 +275,7 @@ pFlow::fileSystem pFlow::operator /
 	const fileSystem& fs2 
 )
 {
-	fileSystem::pathType cmbPath(fs1.dirPath().path_ / fs2.dirPath().path_);
+	fileSystem::pathType cmbPath(fs1.dirPath().path_ / fs2.path_);
 
 	return fileSystem( cmbPath.c_str() );
 
diff --git a/src/phasicFlow/globals/error.cpp b/src/phasicFlow/globals/error.cpp
index c3b20b5a..1f4bd234 100644
--- a/src/phasicFlow/globals/error.cpp
+++ b/src/phasicFlow/globals/error.cpp
@@ -30,7 +30,9 @@ Licence:
 
 
 
-static pFlow::Ostream& errorStream   = pFlow::errReport;
+//static pFlow::Ostream& errorStream   = pFlow::errReport;
+
+static pFlow::Ostream& errorStream   = pFlow::pOutput;
 
 
 pFlow::iOstream& fatalErrorMessage(const char* fileName, int linNumber )
@@ -57,9 +59,9 @@ pFlow::iOstream& notImplementedErrorMessage(const char*fnName, const char* fileN
 {
 
 	errorStream<<"\n>>> Fatal error in phasicFlow\n";
-	errorStream<<" Function "<< Red_Text(fnName) << " has not implmented yet!\n" <<
-				 " Function definition is in source file "<< Red_Text(fileName) << 
-	             " at line "<< Red_Text(lineNumber) <<'\n';
+	errorStream<<" Function "<< Red_Text(fnName) << " has not been implemented yet!\n" <<
+				 " File "<< Yellow_Text(fileName) << 
+	             " at line "<< Yellow_Text(lineNumber) <<'\n';
 	return errorStream;
 }
 
diff --git a/src/phasicFlow/processors/localProcessors.cpp b/src/phasicFlow/processors/localProcessors.cpp
new file mode 100644
index 00000000..0dc7e658
--- /dev/null
+++ b/src/phasicFlow/processors/localProcessors.cpp
@@ -0,0 +1,117 @@
+#include "localProcessors.hpp"
+
+pFlow::localProcessors::localProcessors(const word &name)
+:
+    processors(),
+    localSize_(processors::globalSize()),
+    localRank_(processors::globalRank()),
+    name_(name)
+{
+#ifdef pFlow_Build_MPI
+    parrentCommunicator_ = pFlow::MPI::CommWorld;
+    localCommunicator_ = pFlow::MPI::CommWorld;
+#endif
+
+}
+
+pFlow::localProcessors::localProcessors
+(
+    const word &name, 
+    const std::vector<int> &ranks
+)
+:
+    processors(),
+    name_(name)
+{
+#ifdef pFlow_Build_MPI
+    parrentCommunicator_ = pFlow::MPI::CommWorld;
+    
+    if(ranks.size()> this->globalSize() )
+    {
+        fatalErrorInFunction<<
+        "the size of ranks is larger than parrent communicator size "<<endl;
+        fatalExit;
+    }
+
+    pFlow::MPI::Group globalGroup;
+    MPI_Comm_group(parrentCommunicator_, &globalGroup);
+
+    pFlow::MPI::Group localGroup;
+    MPI_Group_incl(globalGroup, ranks.size(), ranks.data(), &localGroup);
+ 
+    // Create the new communicator from that group of processes.
+    
+    CheckMPI( MPI_Comm_create(parrentCommunicator_, localGroup, &localCommunicator_), true);
+    
+    isPartOfLocal_ = localCommunicator_ != MPI::CommNull;
+    
+    if(isPartOfLocal_)
+    {
+        MPI_Comm_set_name(localCommunicator_, name.c_str());
+
+        MPI_Comm_size(localCommunicator_, &localSize_);
+        MPI_Comm_rank(localCommunicator_, &localRank_);
+    }
+
+#else
+
+    if(ranks.size()> 1 )
+    {
+        fatalErrorInFunction<< 
+        "rank size for processors should not be greater than 1.";
+        fatalExit;
+    }
+    localSize_ = processors::globalSize();
+    localRank_ = processors::globalRank();
+
+#endif
+}
+
+#ifdef pFlow_Build_MPI
+
+pFlow::localProcessors::localProcessors
+(
+    pFlow::MPI::Comm parrentComm, 
+    const word &name, 
+    const std::vector<int> &ranks
+)
+:
+    processors(),
+    name_(name)
+{
+    parrentCommunicator_ = parrentComm;
+    
+    int parSize;
+
+    MPI_Comm_size(parrentCommunicator_, &parSize);
+
+    if(ranks.size()> parSize )
+    {
+        fatalErrorInFunction<<
+        "the size of ranks is larger than parrent communicator size "<<endl;
+        fatalExit;
+    }
+
+    pFlow::MPI::Group parGroup;
+    MPI_Comm_group(parrentCommunicator_, &parGroup);
+
+    pFlow::MPI::Group localGroup;
+    MPI_Group_incl(parGroup, ranks.size(), ranks.data(), &localGroup);
+ 
+    // Create the new communicator from that group of processes.
+    
+    CheckMPI( MPI_Comm_create(parrentCommunicator_, localGroup, &localCommunicator_), true);
+    
+    isPartOfLocal_ = localCommunicator_ != MPI::CommNull;
+    
+    if(isPartOfLocal_)
+    {
+        MPI_Comm_set_name(localCommunicator_, name.c_str());
+
+        MPI_Comm_size(localCommunicator_, &localSize_);
+        MPI_Comm_rank(localCommunicator_, &localRank_);
+    }
+
+}
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/processors/localProcessors.hpp b/src/phasicFlow/processors/localProcessors.hpp
new file mode 100644
index 00000000..b773cd57
--- /dev/null
+++ b/src/phasicFlow/processors/localProcessors.hpp
@@ -0,0 +1,152 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __pFlowProcessors_hpp__
+#define __pFlowProcessors_hpp__
+
+
+#include "processors.hpp"
+#include "types.hpp"
+
+#ifdef pFlow_Build_MPI
+    #include "mpiTypes.hpp"
+#endif
+
+
+namespace pFlow
+{
+
+class localProcessors
+:
+    public processors
+{
+protected:
+
+#ifdef pFlow_Build_MPI
+    pFlow::MPI::Comm    parrentCommunicator_;
+
+    pFlow::MPI::Comm    localCommunicator_;
+#endif
+
+    int localSize_ = 0 ;
+
+    int localRank_ = -1;
+
+    bool isPartOfLocal_ = true;
+
+    word name_;
+
+public:
+
+        /// @brief Construct a local processor communication similar 
+        /// to global with specified name
+        /// @param name a given name to the local communicator 
+        localProcessors(const word& name);
+
+        
+        /// @brief Construct a local processor communication from global
+        /// communicator using a name and ranks 
+        /// @param name a given name to the local communicator 
+        /// @param ranks ranks to be included in the new communicator 
+        localProcessors(
+            const word& name, 
+            const std::vector<int>& ranks);
+
+    #ifdef pFlow_Build_MPI
+        localProcessors(
+            pFlow::MPI::Comm parrentComm, 
+            const word& name, 
+            const std::vector<int>& ranks);
+    #endif
+
+    // - Access 
+
+        /// @brief return name of the local communicator 
+        inline 
+        const auto& name()const
+        {
+            return name_;
+        }
+
+        inline
+        auto localRank()const
+        {
+            return localRank_;
+        }
+
+        inline 
+        auto localSize()const
+        {
+            return localSize_;
+        }
+
+    // - Methods 
+
+        inline
+        bool localMaster()const
+        {
+            return localRank_ == localMasterNo();
+        }
+
+        inline 
+        int localMasterNo()const
+        {
+            return 0;
+        }
+
+        inline 
+        bool localParallel()const
+        {
+            return localSize_>1;
+        }
+
+        inline
+        const char* localRunTypeName()
+        {
+            if(localParallel())
+                return "MPI";
+            else
+                return "regular";
+        }
+
+        inline
+        bool isThisActive()const
+        {
+            return isPartOfLocal_;
+        }
+
+    #ifdef pFlow_Build_MPI
+        inline 
+        auto parrentCommunicator()const
+        {
+            return parrentCommunicator_;
+        }
+
+        inline 
+        auto localCommunicator()const
+        {
+            return localCommunicator_;
+        }
+    #endif
+
+};
+
+}
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/processors/pFlowProcessors.cpp b/src/phasicFlow/processors/pFlowProcessors.cpp
new file mode 100644
index 00000000..73201b50
--- /dev/null
+++ b/src/phasicFlow/processors/pFlowProcessors.cpp
@@ -0,0 +1,18 @@
+#include "pFlowProcessors.hpp"
+
+static pFlow::localProcessors pFlowProcessors__{"pFlowProcessors"};
+
+pFlow::localProcessors& pFlow::pFlowProcessors()
+{
+    return pFlowProcessors__;
+}
+
+void pFlow::initialize_pFlowProcessors()
+{
+    pFlowProcessors__ = localProcessors("pFlowProcessors");
+}
+
+void pFlow::initialize_pFlowProcessors(const std::vector<int>& ranks)
+{
+    pFlowProcessors__ = localProcessors("pFlowProcessors", ranks);
+}
\ No newline at end of file
diff --git a/src/phasicFlow/processors/pFlowProcessors.hpp b/src/phasicFlow/processors/pFlowProcessors.hpp
new file mode 100644
index 00000000..12ae1942
--- /dev/null
+++ b/src/phasicFlow/processors/pFlowProcessors.hpp
@@ -0,0 +1,14 @@
+
+#include "localProcessors.hpp"
+
+
+namespace pFlow
+{
+
+localProcessors& pFlowProcessors();
+
+void initialize_pFlowProcessors();
+
+void initialize_pFlowProcessors(const std::vector<int>& ranks);
+
+}
\ No newline at end of file
diff --git a/src/phasicFlow/processors/processors.cpp b/src/phasicFlow/processors/processors.cpp
index c9d0d380..75780bc6 100644
--- a/src/phasicFlow/processors/processors.cpp
+++ b/src/phasicFlow/processors/processors.cpp
@@ -21,7 +21,7 @@ Licence:
 #include "phasicFlowConfig.H"
 
 #ifdef pFlow_Build_MPI
-	#include <mpi.h>
+	#include "mpiCommunication.hpp"
 #endif
 
 // from PhasicFlow
@@ -29,7 +29,15 @@ Licence:
 #include "processors.hpp"
 #include "streams.hpp"
 
+static int numVarsInitialized__ = 0;
 
+#ifdef pFlow_Build_MPI
+
+    pFlow::MPI::DataType pFlow::MPI::realx3Type__;
+    pFlow::MPI::DataType pFlow::MPI::realx4Type__;
+    pFlow::MPI::DataType pFlow::MPI::int32x3Type__;
+    
+#endif
 
 void pFlow::processors::initProcessors(int argc, char *argv[])
 {
@@ -40,17 +48,31 @@ void pFlow::processors::initProcessors(int argc, char *argv[])
 		CheckMPI(MPI_Init(&argc, &argv), true);
 		isSelfInitialized_ = true;
 
-		processors::globalSize_ = MPI::COMM_WORLD.Get_size();
-		processors::globalRank_ = MPI::COMM_WORLD.Get_rank();
+        argc_ = argc;
+        argv_ = argv;
+
+		MPI_Comm_rank(MPI_COMM_WORLD, &processors::globalRank_);
+        MPI_Comm_size(MPI_COMM_WORLD, &processors::globalSize_);
+        
 		
-		if(processors::isParallel())
+		if(processors::globalParallel())
 		{
 			pFlow::pOutput.activatePrefix();
 			pFlow::pOutput.setPrefixNum(processors::globalRank_);	
 		}
 		
-		pFlow::mOutput.setMasterSlave(processors::isMaster());
-		pFlow::errReport.setMasterSlave(processors::isMaster());
+		pFlow::mOutput.setMasterSlave(processors::globalMaster());
+		pFlow::errReport.setMasterSlave(processors::globalMaster());
+
+        MPI_Type_contiguous(3, pFlow::MPI::Type<real>(), &pFlow::MPI::realx3Type__);
+		MPI_Type_commit(&pFlow::MPI::realx3Type__);
+
+        MPI_Type_contiguous(4, pFlow::MPI::Type<real>(), &pFlow::MPI::realx4Type__);
+		MPI_Type_commit(&pFlow::MPI::realx3Type__);
+
+		MPI_Type_contiguous(3, pFlow::MPI::Type<int32>(), &pFlow::MPI::int32x3Type__);
+		MPI_Type_commit(&pFlow::MPI::int32x3Type__);
+
 	}
 #else
 
@@ -64,6 +86,9 @@ void pFlow::processors::finalizeProcessors()
 #ifdef pFlow_Build_MPI
 	if(isSelfInitialized_ && !isFinalized())
 	{
+        MPI::TypeFree(&pFlow::MPI::realx3Type__);
+        MPI::TypeFree(&pFlow::MPI::realx4Type__);
+		MPI::TypeFree(&pFlow::MPI::int32x3Type__);
 		CheckMPI(MPI_Finalize(), true);
 	}
 #else
@@ -75,7 +100,7 @@ pFlow::processors::processors()
 {
 
 #ifdef pFlow_Build_MPI	
-	if(isParallel() && !isInitialized())
+	if(globalParallel() && !isInitialized())
 	{
 		fatalErrorInFunction<<
 		"MPI communication is not initialized yet!"<<endl;
diff --git a/src/phasicFlow/processors/processors.hpp b/src/phasicFlow/processors/processors.hpp
index 98d9314c..6402385c 100644
--- a/src/phasicFlow/processors/processors.hpp
+++ b/src/phasicFlow/processors/processors.hpp
@@ -17,11 +17,11 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
 #ifndef __processors_H__
 #define __processors_H__ 
 
 
+
 namespace pFlow
 {
 	// - Forward
@@ -64,6 +64,12 @@ protected:
 	static inline
 	int globalSize_ = 1;
 
+    static inline
+    int argc_ = 0;
+
+    static inline 
+    char** argv_ = nullptr;
+
 public:
 
 	/// Initialize MPI processors
@@ -77,28 +83,27 @@ public:
 	/// Constructor 
 	processors();
 	
-
 	/// Destructor 
 	~processors();
 	
 	/// Master processors number (globaly in MPI).
 	static inline
-	int masterNo()
+	int globalMasterNo()
 	{
 		return 0;
 	}
 
 	/// Is this a parallel MPI run.
 	static inline
-	bool isParallel()
+	bool globalParallel()
 	{
 		return processors::globalSize()>1;
 	}
 	
 	static inline
-	const char* runTypeName()
+	const char* globalRunTypeName()
 	{
-		if(isParallel())
+		if(globalParallel())
 		{
 			return "MPI";
 		}
@@ -117,9 +122,9 @@ public:
 	
 	/// Is this processor the master processor?
 	static inline
-	bool isMaster()
+	bool globalMaster()
 	{
-		return processors::globalRank() == processors::masterNo();
+		return processors::globalRank() == processors::globalMasterNo();
 	}
 	
 	/// Global size of processors
@@ -136,10 +141,30 @@ public:
 		return globalRank_;
 	}
 
+    static inline
+    int argc()
+    {
+        return argc_;
+    }
+
+    static inline 
+    char** argv()
+    {
+        return argv_;
+    }
+
 	/// Abort MPI run or regular run
 	static
 	void abort(int error);
 
+/*#ifdef pFlow_Build_MPI
+    static inline 
+    auto worldCommunicator()
+    {
+      return pFlow::MPI::CommWorld;  
+    }
+#endif*/
+
 }; //processors
 
 
diff --git a/src/phasicFlow/repository/IOobject/IOPattern.cpp b/src/phasicFlow/repository/IOobject/IOPattern.cpp
index e5264175..bc240534 100644
--- a/src/phasicFlow/repository/IOobject/IOPattern.cpp
+++ b/src/phasicFlow/repository/IOobject/IOPattern.cpp
@@ -25,14 +25,11 @@ pFlow::IOPattern::IOPattern( IOType iotype)
 	ioType_(iotype),
 	globalSize_(processors::globalSize()),
 	globalRank_(processors::globalRank()),
-	isMaster_(processors::isMaster()),
-	isParallel_(processors::isParallel())
+	isMaster_(processors::globalMaster()),
+	isParallel_(processors::globalParallel())
 {}
 
 pFlow::word pFlow::IOPattern::exeMode()
 {
-    if(processors::isParallel())
-    	return word("MPI");
-    else
-    	return word("NoMPI");
+    return processors::globalRunTypeName();
 }
\ No newline at end of file
diff --git a/src/phasicFlow/repository/IOobject/IOPattern.hpp b/src/phasicFlow/repository/IOobject/IOPattern.hpp
index 092aae0f..9f8f3124 100644
--- a/src/phasicFlow/repository/IOobject/IOPattern.hpp
+++ b/src/phasicFlow/repository/IOobject/IOPattern.hpp
@@ -54,13 +54,13 @@ public:
 		MasterProcessorOnly			= 0,
 		AllProcessorsSimilar 		= 1,
 		MasterProcessorDistribute	= 4,
-		AllProcessorsDifferent  = 8 // this is used for << and >> operators for 
+		AllProcessorsDifferent      = 8 // this is used for << and >> operators for 
 									// standard input and output streams 
 	};
 
 protected:
 
-	IOType 		ioType_;
+	IOType 		    ioType_;
 
 	int  			globalSize_ = 1;
 
@@ -116,11 +116,18 @@ public:
 		return isParallel_;
 	}
 
+    inline
+    bool thisCallRead()const
+    {
+        if(isMasterProcessorOnly() && !isMaster())return false;
+        return true;
+    }
+
 	inline
 	bool thisProcReadData()const
 	{
 		if(isMasterProcessorOnly() && !isMaster())return false;
-		if(isMasterProcessorDistribute() && !isMaster()) return false;
+        if(isMasterProcessorDistribute()&& !isMaster())return false; 
 		return true;
 	}
 
@@ -128,6 +135,7 @@ public:
 	bool thisProcWriteData()const
 	{
 		if(isAllProcessorsDifferent()) return true;
+        if(isMasterProcessorDistribute())return true;
 		return isMaster();
 	}
 
diff --git a/src/phasicFlow/repository/IOobject/IOfileHeader.cpp b/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
index 3015dc2a..15fda4fb 100644
--- a/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
+++ b/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
@@ -17,7 +17,7 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-#include "processors.hpp"
+
 #include "IOfileHeader.hpp"
 #include "repository.hpp"
 
@@ -31,13 +31,11 @@ pFlow::uniquePtr<pFlow::iFstream> pFlow::IOfileHeader::inStream()const
 
 pFlow::uniquePtr<pFlow::oFstream> pFlow::IOfileHeader::outStream()const
 {
-
-	
 	auto osPtr = makeUnique<oFstream>(path(), outFileBinary());
 	
-	if(osPtr && owner_)
+	if(osPtr && owner())
 	{
-	 	auto outPrecision = owner_->outFilePrecision();
+	 	auto outPrecision = owner()->outFilePrecision();
 	 	osPtr->precision(outPrecision);
 	}
 
@@ -46,21 +44,19 @@ pFlow::uniquePtr<pFlow::oFstream> pFlow::IOfileHeader::outStream()const
 
 pFlow::IOfileHeader::IOfileHeader
 (
-	const objectFile& objf,
-	const repository* owner
+	const objectFile& objf
 )
 :
-	objectFile(objf),
-	owner_(owner)
+	objectFile(objf)
 {}
 
 pFlow::fileSystem pFlow::IOfileHeader::path() const
 {
 	fileSystem f;
 
-	if( owner_ )
+	if( owner() )
 	{
-		f = owner_->path()/localPath();	
+		f = owner()->path()/localPath();	
 
 	}else
 	{
@@ -72,8 +68,8 @@ pFlow::fileSystem pFlow::IOfileHeader::path() const
 
 bool pFlow::IOfileHeader::outFileBinary()const
 {
-	if(owner_)
-		return owner_->outFileBinary();
+	if(owner())
+		return owner()->outFileBinary();
 	else
 		return false;
 }
@@ -137,7 +133,6 @@ bool pFlow::IOfileHeader::writeHeader()const
 {
 
 	if( !this->readWriteHeader() ) return false;
-	if( !processors::isMaster() ) return false;
 	if( !implyWrite() ) return false;
 
 	return true;
@@ -185,15 +180,15 @@ bool pFlow::IOfileHeader::writeHeader(iOstream& os, bool forceWrite) const
 bool pFlow::IOfileHeader::readHeader()const
 {
 	if( !implyRead())return false;
-	if( !this->readWriteHeader() ) return false;  
-	return ioPattern().thisProcReadHeader();
+	if( !this->readWriteHeader() ) return false;
+    return true;
 }
 
 bool pFlow::IOfileHeader::readHeader(iIstream& is, bool silent)
 {
-	
-	if(!readHeader()) return true;
 
+	if(!readHeader()) return true;
+    
 	if( !is.findTokenAndNextSilent("objectName", objectName_) )
 	{
 		if(!silent)
@@ -231,18 +226,6 @@ bool pFlow::IOfileHeader::readHeader(iIstream& is, bool silent)
 	return true;
 } 
 
-bool pFlow::IOfileHeader::writeData()const
-{
-	if(!implyWrite())return false;
-	return ioPattern().thisProcWriteData();
-}
-
-bool pFlow::IOfileHeader::readData()const
-{
-	if(!implyRead())return false;
-	return ioPattern().thisProcReadData();
-}
-
 bool pFlow::IOfileHeader::writeBanner(iOstream& os)const
 {
 	os<< 
diff --git a/src/phasicFlow/repository/IOobject/IOfileHeader.hpp b/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
index 569e6ab6..4d9964f7 100644
--- a/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
+++ b/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
@@ -40,9 +40,7 @@ protected:
 	
 
 	//// - data members 
-		// owner repository
-		const repository* 	owner_ = nullptr;
-		
+
 		// object name read from file 
 		word objectName_;
 
@@ -63,7 +61,7 @@ protected:
 public:
 
 	// with owner 
-	IOfileHeader(const objectFile& objf, const repository* owner = nullptr);
+	IOfileHeader(const objectFile& objf);
 
 	// - object name
 	const word& objectName()const
@@ -78,11 +76,12 @@ public:
 	}
 
 	// - pointer to owner repository 
-	const repository* owner()const 
-	{
-		return owner_;
-	}
-
+	virtual 
+    const repository* owner()const
+    {
+        return nullptr;
+    }
+	
 	// - path to file name 
 	fileSystem path() const;
 
@@ -118,18 +117,13 @@ public:
 	/// Write the header to the file, typeName comes from the one read from file 
 	bool writeHeader(iOstream& os, bool forceWrite = false) const;
 
-	/// Check if the data should be written to file 
-	bool writeData()const;
-
 	/// Check if header should be read from file
 	bool readHeader()const;
 
 	/// Read the header in the file
 	bool readHeader(iIstream& is, bool silent=false);
 
-	/// Check if data should be read from file 
-	/// Always return true
-	bool readData()const;
+	
 	
 	/// write the banner 
 	bool writeBanner(iOstream& os)const;
diff --git a/src/phasicFlow/repository/IOobject/IOobject.cpp b/src/phasicFlow/repository/IOobject/IOobject.cpp
index 02cd841d..435f9033 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.cpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.cpp
@@ -24,53 +24,54 @@ Licence:
 
 pFlow::IOobject::IOobject
 (
-	const objectFile& objf,
-	const repository* owner,
-	uniquePtr<iObject>&& obj
+    const objectFile&   objf, 
+    const IOPattern&    iop, 
+    repository*   owner
 )
 :
-	IOfileHeader(objf, owner),
-	object_(obj.release())
+	IOfileHeader(objf),
+	ioPattern_(iop),
+    owner_(owner)
 {
-
-	if(!read(this->readWriteHeader()))
-	{
-		fatalErrorInFunction<<
-		"error in reading " << name() << " from path " << path()<<endl;
-		fatalExit;
-	}
+    
+    if(owner_&& !owner->addToRepository(this))
+    {
+        fatalExit;
+    }
 }
 
+pFlow::IOobject::~IOobject()
+{
+    if(owner_)
+    {
+        owner_->removeFromRepository(this);
+    }
+}
 
-pFlow::IOobject::IOobject
+pFlow::repository* pFlow::IOobject::releaseOwner
 (
-	const objectFile& objf,
-	const repository* owner,
-	uniquePtr<IOobject>&& obj
+    bool fromOwner
 )
-:
-	IOfileHeader(objf, owner),
-	object_( obj->object_.release())
-{
-}
-
-
-bool pFlow::IOobject::isObjectValid()const
-{
-	return object_.get() != nullptr;
+{   
+    auto* old = owner_;
+    if(old && !fromOwner)
+    {
+        old->removeFromRepository(this);
+    }
+    owner_ = nullptr;
+    return old;
 }
 
 bool pFlow::IOobject::read(bool rdHdr)
 {
-
+    
 	if( implyRead() )
 	{
-		if( rdHdr )
+		if( rdHdr & ioPattern().thisCallRead())
 		{	
 			if( auto ptrIS = inStream(); ptrIS )
 			{
 				if(!readHeader(ptrIS()))return false;
-				ptrIS.reset(nullptr);
 			}
 			else
 			{
@@ -80,17 +81,20 @@ bool pFlow::IOobject::read(bool rdHdr)
 			}
 		}
 
-		if( auto ptrIS = inStream(); ptrIS )
-		{
-			if(!read(ptrIS(), rdHdr))return false;
-			
-		}
-		else
-		{
-			warningInFunction<<
-			"could not open file " << path() <<endl;
-			return false;
-		}
+        if(ioPattern().thisCallRead())
+        {
+            if( auto ptrIS = inStream(); ptrIS )
+            {
+                if(!read(ptrIS(), rdHdr))return false;              
+            }
+            else
+            {
+                warningInFunction<<
+                "could not open file " << path() <<endl;
+                return false;
+            }    
+        }
+		
 	}	
 	
 	return true;
@@ -101,16 +105,19 @@ bool pFlow::IOobject::write() const
 {
 	if(implyWrite())
 	{
-		if(auto ptrOS = outStream(); ptrOS )
-		{
-			return write(ptrOS());
-		}
-		else
-		{
-			warningInFunction<< 
-			"error in opening file "<< path() <<endl;
-			return false;
-		}
+		if(ioPattern().thisProcWriteData())
+        {
+            if(auto ptrOS = outStream(); ptrOS )
+            {
+                return write(ptrOS());
+            }
+            else
+            {
+                warningInFunction<< 
+                "error in opening file "<< path() <<endl;
+                return false;
+            }
+        }
 	}
 
 	return true;
@@ -119,18 +126,34 @@ bool pFlow::IOobject::write() const
 
 bool pFlow::IOobject::read(iIstream& is, bool rdHdr)
 {
-	if(rdHdr)
+	if(rdHdr && ioPattern().thisCallRead() )
 	{
 		if(!readHeader(is))return false;
 	}
-	return object_->read_object_t(is, ioPattern_);
+
+    if(ioPattern().thisCallRead())
+    {
+        return read(is, ioPattern());
+    }
+    else
+    {
+        return true;
+    }
+	
 }
 
 
 bool pFlow::IOobject::write(iOstream& os) const
 {
-	if(this->readWriteHeader())
+	if(this->writeHeader() && ioPattern().thisProcWriteHeader())
 		writeHeader(os, typeName());
-	
-	return (object_->write_object_t(os, ioPattern_) && writeSeparator(os));
+    
+    if(ioPattern().thisProcWriteData())
+	 {   //return (object_->write_object_t(os, ioPattern_) && writeSeparator(os));
+        notImplementedFunction;
+        //return object_->read_object_t(is, ioPattern_);
+        return false;
+     }
+    else
+        return true;
 }
\ No newline at end of file
diff --git a/src/phasicFlow/repository/IOobject/IOobject.hpp b/src/phasicFlow/repository/IOobject/IOobject.hpp
index d2ef1c18..7e947192 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.hpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.hpp
@@ -25,7 +25,7 @@ Licence:
 
 
 #include "IOfileHeader.hpp"
-
+#include "IOPattern.hpp"
 
 namespace pFlow
 {
@@ -36,177 +36,49 @@ class IOobject
 :
 	public	IOfileHeader
 {
-
-private:
-
-	class iObject
-	{
-	public:
-
-		virtual ~iObject()=default;
-
-		// - clone 
-		virtual uniquePtr<iObject> clone() const = 0;
-
-		virtual word typeName()const = 0;
-
-		virtual bool read_object_t(iIstream& is, IOPattern iop) = 0;
-
-		virtual bool write_object_t(iOstream& os, IOPattern iop)const = 0;
-
-	};
-
-	template<typename dataType>
-	class object_t
-	:
-		public iObject
-	{
-	protected:
-		dataType 	data_;
-
-	public:
-
-		template<typename... Args,
-          		typename = std::enable_if_t<std::is_constructible<dataType, Args&&...>::value>>
-		object_t(Args&&... args)
-		:
-			data_(std::forward<Args>(args)...)
-		{
-			/*constexpr word msg(dataType::TYPENAME()+"input is not a member function.")
-			static_assert(std::is_member_function_pointer<decltype(&dataType::write)>::value,
-                  msg.c_str());*/
-		}
-
-		// cunstruct by copying data
-		object_t(const dataType& data): data_(data)
-		{}
-
-		
-		virtual uniquePtr<iObject> clone() const
-		{
-			return makeUnique<object_t>(*this);
-		}
-
-		virtual word typeName()const
-		{
-			return data_.typeName();
-		}
-
-		bool read_object_t(iIstream& is, IOPattern iop) override
-		{
-			return data_.read(is, iop);
-		}
-
-		bool write_object_t(iOstream& os, IOPattern iop)const override
-		{
-			return data_.write(os, iop);
-		}
-
-		auto& data()
-		{
-			return data_;
-		}
-
-		const auto& data()const
-		{
-			return data_;
-		}
-
-	};
-
 protected:
 
-	//// - data members
+    IOPattern       ioPattern_;
 
-		// underlaying data object 
-		uniquePtr<iObject> object_ = nullptr;
-
-		
+    mutable repository* owner_;	
 
 public:
 
 	// - typeinfo
-	word typeName()const
-	{
-		return object_->typeName();
-	}
+	virtual 
+    word typeName() const = 0;
 
 	//// - Constructors
 
 		// - construct from components, transfer the ownership of iObject (object_t) to the 
 		//   onwner and read the object from file 
-		IOobject(const objectFile& objf, const repository* owner, uniquePtr<iObject>&& obj );
-
-		// - construct from components, transfer the ownership of IOobject to the owner (no read happens)
-		IOobject(const objectFile& objf, const repository* owner, uniquePtr<IOobject>&& obj);
-		
-		
-		template<typename T, 
-			typename = std::enable_if_t<
-				!std::is_same<T, uniquePtr<IOobject::iObject>>::value && 
-				!std::is_same<T, uniquePtr<IOobject>>::value>>
-		IOobject(const objectFile& objf, const repository* owner, const T& data)
-		:
-			IOfileHeader(objf, owner),
-			object_(makeUnique<object_t<T>>(data))
-		{
-			if(!read(this->readWriteHeader()))
-			{
-				fatalErrorInFunction<<
-				"error in reading " << name() << " from path " << path()<<endl;
-				fatalExit;
-			}
-		}
-
-		
-		template<typename T, 
-			typename = std::enable_if_t<
-				!std::is_same<T, uniquePtr<IOobject::iObject>>::value && 
-				!std::is_same<T, uniquePtr<IOobject>>::value>>
-		IOobject(const objectFile& objf, const repository* owner,  T&& data)
-		:
-			IOfileHeader(objf, owner),
-			object_(makeUnique<object_t<T>>(data))
-		{
-			if(!read(this->readWriteHeader()))
-			{
-				fatalErrorInFunction<<
-				"error in reading " << name() << " from path " << path()<<endl;
-				fatalExit;
-			}
-		}		
+		IOobject(
+            const objectFile&   objf, 
+            const IOPattern&    iop, 
+            repository*   owner);
+        
+        ~IOobject();
 
 		// - copy construct 
 		IOobject(const IOobject& src)=delete;	
 
 		// - move construct
-		IOobject(IOobject&& src) = default;
-
-		
-		// - make object from components, considering no owner for this object, and 
-		//   read from file 
-		//   Args are the arguments of object constructor 
-		template<typename T, typename... Args>
-		static auto make(const objectFile& objf, Args&&... args);
-		
-		// - construct object_t with the Args as the arguments of object constructor 
-		template<typename T, typename... Args>
-		static uniquePtr<iObject> make_object_t(Args&&... args);
+		IOobject(IOobject&& src) = delete;
 		
 
-	//// - Access to data object 
+        inline
+        const IOPattern& ioPattern()const
+        {
+            return ioPattern_;
+        }
 
-		// - is object valid 
-		bool isObjectValid()const;
+        // - pointer to owner repository 
+        const repository* owner()const override
+        {
+            return owner_;
+        }
 
-		// - ref to data object
-		template<typename T>
-		auto& getObject();
-
-		// - const ref to data object 
-		template<typename T>
-		const auto& getObject()const;
-	
+        repository* releaseOwner(bool fromOwner = false);
 
 	//// - IO operations 
 
@@ -221,7 +93,12 @@ public:
 
 		// - write to istream 
 		bool write(iOstream& os) const;
-		
+
+        virtual 
+        bool write(iOstream& is, const IOPattern& iop)const = 0;
+
+        virtual 
+        bool read(iIstream& is, const IOPattern& iop) = 0;
 
 };
 
diff --git a/src/phasicFlow/repository/IOobject/IOobjectTemplates.cpp b/src/phasicFlow/repository/IOobject/IOobjectTemplates.cpp
index 706f5ced..cdaa3fc6 100644
--- a/src/phasicFlow/repository/IOobject/IOobjectTemplates.cpp
+++ b/src/phasicFlow/repository/IOobject/IOobjectTemplates.cpp
@@ -19,7 +19,7 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 
-template<typename T, typename... Args>
+/*template<typename T, typename... Args>
 auto pFlow::IOobject::make
 (
 	const objectFile& objf,
@@ -62,4 +62,4 @@ const auto& pFlow::IOobject::getObject()const
 		fatalExit;
 	}
 	return  static_cast<const object_t<T>&>(*object_).data();	
-}
\ No newline at end of file
+}*/
\ No newline at end of file
diff --git a/src/phasicFlow/repository/IOobject/objectFile.cpp b/src/phasicFlow/repository/IOobject/objectFile.cpp
index a0b41f0c..d761c1ea 100644
--- a/src/phasicFlow/repository/IOobject/objectFile.cpp
+++ b/src/phasicFlow/repository/IOobject/objectFile.cpp
@@ -34,15 +34,13 @@ pFlow::objectFile::objectFile
 	const fileSystem& 	localPath,
 	const readFlag&   	rf, 
 	const writeFlag&  	wf,
-	IOPattern::IOType	ioType,
-	bool  rwHdr
+	bool  rwHeader
 )
 :
 	name_(name),
 	rFlag_(rf),
 	wFlag_(wf),
 	localPath_(localPath),
-	ioPattern_(ioType),
-	readWriteHeader_(rwHdr)	
+	readWriteHeader_(rwHeader)	
 {
 }
\ No newline at end of file
diff --git a/src/phasicFlow/repository/IOobject/objectFile.hpp b/src/phasicFlow/repository/IOobject/objectFile.hpp
index d6a50eac..8bb5cb5f 100644
--- a/src/phasicFlow/repository/IOobject/objectFile.hpp
+++ b/src/phasicFlow/repository/IOobject/objectFile.hpp
@@ -23,14 +23,10 @@ Licence:
 
 #include "types.hpp"
 #include "fileSystem.hpp"
-#include "IOPattern.hpp"
-
 
 namespace pFlow
 {
 
-
-
 class objectFile
 {
 public:
@@ -66,10 +62,8 @@ protected:
 	/// Number of bytes used for writing/reading real variable (used for binray)
 	int 		numBytesForReal_ = numBytesForReal__;
 	
-	IOPattern 	ioPattern_ = {IOPattern::MasterProcessorOnly};
-
-	/// Does the objectFile write the header or not
-	bool readWriteHeader_ = true;
+	/// Does the objectFile read & write the header?
+	bool        readWriteHeader_ = true;
 
 public:
 
@@ -88,8 +82,7 @@ public:
 		const fileSystem& 	localPath,
 		const readFlag&   	rf = READ_NEVER,
 		const writeFlag&  	wf = WRITE_NEVER,
-		IOPattern::IOType	ioType = IOPattern::MasterProcessorOnly,
-		bool  rwHdr = true
+		bool  rwHeader = true
 	);
 
 	// copy construct 
@@ -156,11 +149,6 @@ public:
 		return wFlag_ == WRITE_NEVER;
 	}
 
-	const IOPattern& ioPattern()const
-	{
-		return ioPattern_;
-	}
-
 	inline 
 	bool readWriteHeader()const
 	{
diff --git a/src/phasicFlow/repository/Time/Time.cpp b/src/phasicFlow/repository/Time/Time.cpp
index e4367cee..693dcd85 100644
--- a/src/phasicFlow/repository/Time/Time.cpp
+++ b/src/phasicFlow/repository/Time/Time.cpp
@@ -104,6 +104,11 @@ pFlow::Time::Time(
 	}
 }
 
+pFlow::fileSystem pFlow::Time::localPath()const
+{
+    return fileSystem(timeName());
+}
+
 bool pFlow::Time::write
 (
 	bool verbose
diff --git a/src/phasicFlow/repository/Time/Time.hpp b/src/phasicFlow/repository/Time/Time.hpp
index f1887b38..7bdf7091 100644
--- a/src/phasicFlow/repository/Time/Time.hpp
+++ b/src/phasicFlow/repository/Time/Time.hpp
@@ -70,10 +70,8 @@ public:
 
 
 	//// -  Methods
-		virtual fileSystem localPath()const
-		{
-			return fileSystem(timeName());
-		}
+		fileSystem localPath()const override;
+		
 	
 		// - geometry repository 
 		const repository& geometry()const
diff --git a/src/phasicFlow/repository/repository/repository.cpp b/src/phasicFlow/repository/repository/repository.cpp
index edbf45ba..0702a9ce 100644
--- a/src/phasicFlow/repository/repository/repository.cpp
+++ b/src/phasicFlow/repository/repository/repository.cpp
@@ -18,7 +18,6 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-
 #include "repository.hpp"
 
 
@@ -33,7 +32,7 @@ pFlow::repository::repository
 	localPath_(localPath),
 	owner_(owner)
 {
-
+    
 	if(owner)
 	{
 		owner->addToRepository(this);
@@ -42,10 +41,20 @@ pFlow::repository::repository
 
 pFlow::repository::~repository()
 {
-	if(owner_)
+	for(auto& objcs: objects_)
+    {
+        objcs.second->releaseOwner(true);
+    }
+    for(auto& reps: repositories_)
+    {
+        reps.second->releaseOwner(true);
+    }
+
+    if(owner_)
 	{
-		owner_->removeRepository(this);
+		owner_->removeFromRepository(this);
 	}
+    
 }
 
 pFlow::word pFlow::repository::name()const
@@ -106,26 +115,57 @@ bool pFlow::repository::addToRepository(repository* rep)
 	return true;
 }	
 
-bool pFlow::repository::removeRepository(repository* rep)
+bool pFlow::repository::removeFromRepository(repository* rep)
 {
 	auto name = rep->name();
 	return repositories_.erase(name) == 1; 
 }
 
+bool pFlow::repository::removeFromRepository(IOobject *io)
+{
+    auto name = io->name();
+	return objects_.erase(name) == 1; 
+    
+}
 
+pFlow::repository *pFlow::repository::releaseOwner(bool fromOwner)
+{
+    auto* old = owner_;
+    if(old && !fromOwner)
+    {
+        old->removeFromRepository(this);
+    }
+    owner_ = nullptr;
+    return old;
+}
+
+bool pFlow::repository::addToRepository(IOobject* io)
+{
+    if( !objects_.insertIf(io->name(), io ) )
+	{
+		warningInFunction<<
+    	"Failed to add repository " << io->name() <<
+    	" to repository " << this->name() << 
+    	". It is already in this repository. \n";
+    	return false;
+	}
+
+	return true;
+}
 
 bool pFlow::repository::lookupObjectName(const word& nm)const
 {
 	return objects_.search(nm);
 }
 
-pFlow::word pFlow::repository::lookupObjectTypeName(
+pFlow::word pFlow::repository::lookupObjectTypeName
+(
 	const word& nm
-	)const
+)const
 {
 	if(auto [iter, found] = objects_.findIf(nm); found)
 	{
-		return iter->second.typeName();
+		return iter->second->typeName();
 	}
 	else
 	{
@@ -143,13 +183,11 @@ bool pFlow::repository::globalLookupObjectName
 )const
 {	
 
-	
-	
 	if(!downward)
 	{	
 		// the object to start search and its owner 
-		auto object = this;
-		auto owner = object->owner();
+		auto* object = this;
+		auto* owner = object->owner();
 
 		// get to the top-most repository 
 		while(!owner)
@@ -245,10 +283,10 @@ bool pFlow::repository::write
 	{
 		if(verbose)
 		{
-			REPORT(1)<< "Writing to " << obj.second.path()<<END_REPORT;
+			REPORT(1)<< "Writing to " << obj.second->path()<<END_REPORT;
 		}
 		
-		if(!obj.second.write())
+		if(!obj.second->write())
 		{
 			return false;
 		}
diff --git a/src/phasicFlow/repository/repository/repository.hpp b/src/phasicFlow/repository/repository/repository.hpp
index b257e692..cc5ec1c2 100644
--- a/src/phasicFlow/repository/repository/repository.hpp
+++ b/src/phasicFlow/repository/repository/repository.hpp
@@ -45,7 +45,7 @@ protected:
 	repository* 	 owner_;
 
 	// - sorted names of objects with object index in vector of objects
-	wordMap<IOobject>  	objects_;
+	wordMap<IOobject*>  	objects_;
 
 	// - list of repositories that this repository owns
 	// - it is not a managed list of pointers!
@@ -100,61 +100,20 @@ public:
 		// - ref to this repository 
 		repository& thisRepository();
 		
-		// - add rep to this repository 
-		//   return false if the name already exists 
+		/// @brief add repository to this repository 
+		///   return false if the name already exists 
 		bool addToRepository(repository* rep);
 		
-		// - remove rep from the list of repositories 
-		bool removeRepository(repository* rep);
-	
+		/// @brief remove rep from the list of repositories 
+		bool removeFromRepository(repository* rep);
 
-	//// - Add/remove objects 
-
-		// - insert the object into repository if it does not exist
-		//   return a refernce to underlying data object, this reference never invalidated 
-		//   until it is deleted from repository.
-		//   issue a fatal error if it is already exists
-		//   ** one time construction and no move/copy of object ** 
-		template<typename T, typename... Args>
-		T& emplaceObject(const objectFile& objf, Args&&... args);
-		
-		// - insert the object into repository if it does not exist
-		//   return a refernce to underlying data object, this reference never invalidated 
-		//   until it is deleted from repository.
-		// - if the object already exist, after type check(if consistent), return the 
-		//   reference of the existing object and create no new object. 
-		//   ** one time construction and no move/copy of object ** 
-		template<typename T, typename... Args>
-		T& emplaceObjectOrGet(const objectFile& objf, Args&&... args);
-
-		// - insert the object into repository and replace if it already exists (old object is destroyed) 
-		//   return a refernce to underlying data object, this reference never invalidated 
-		//   until it is deleted from repository.
-		//   ** one time construction and no move/copy of object ** 
-		template<typename T, typename... Args>
-		T& emplaceReplaceObject(const objectFile& objf, Args&&... args);
-		
-
-		// - Insert_or_replace the IOobejct into repository and change its ownership  
-		//   to this repository, take effect only if the object does not belong to 
-		//   any other repository
-		template<typename T>
-		T& insertReplaceObject(uniquePtr<IOobject>&& ptr );
-		
-
-		// - Insert_or_replace the IOobejct into repository with new objectFile and   
-		//   change the ownership to this repository, take effect only if the object
-		//   does not belong to any other repository
-		template<typename T>
-		T& insertReplaceObject(const objectFile& objf, uniquePtr<IOobject>&& ptr );
-		
-		// - rease an object from this repository
-		bool eraseObject(const word& name)
-		{
-			return objects_.erase(name) == 1;
-		}
+        /// @brief add IOobject to this repository
+        bool addToRepository(IOobject* io);
 
+    /// @brief remove rep from the list of repositories 
+		bool removeFromRepository(IOobject* io);
 
+        repository* releaseOwner(bool fromOwner = false);
 	//// - lookups and queries
 	
 		// - check if name of object exists
diff --git a/src/phasicFlow/repository/repository/repositoryTemplates.cpp b/src/phasicFlow/repository/repository/repositoryTemplates.cpp
index b7e514d7..52ec9b02 100644
--- a/src/phasicFlow/repository/repository/repositoryTemplates.cpp
+++ b/src/phasicFlow/repository/repository/repositoryTemplates.cpp
@@ -17,22 +17,7 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
-template <typename Type1>
-pFlow::word pFlow::repository::reportTypeError (IOobject& object)
-{
-	word err;
-	err = "The requested object " + object.name() + " with type " + Type1::TYPENAME() + ", while the type " +
-	  	object.typeName() + "is found in repository " + this->name();
-
-	return err;
-}
-
-template <typename Type>
-bool pFlow::repository::checkForObjectType(IOobject& object)
-{
-	return Type::TYPENAME() == object.typeName();
-}
+/*
 
 template<typename T, typename... Args>
 T& pFlow::repository::emplaceObject(const objectFile& objf, Args&&... args)
@@ -142,6 +127,25 @@ T& pFlow::repository::insertReplaceObject(const objectFile& objf, uniquePtr<IOob
 }
 
 
+*/
+
+template <typename Type1>
+pFlow::word pFlow::repository::reportTypeError(IOobject& object)
+{
+	word err;
+	err = "Object " + object.name() + " with type " + Type1::TYPENAME() + 
+    "is requested, while the type " +
+	  	object.typeName() + "is found in repository " + this->name()+".";
+
+	return err;
+}
+
+template <typename Type>
+bool pFlow::repository::checkForObjectType(IOobject& object)
+{
+	return Type::TYPENAME() == object.typeName();
+}
+
 template<typename T>
 T& pFlow::repository::lookupObject(const word& name)
 {
@@ -150,14 +154,15 @@ T& pFlow::repository::lookupObject(const word& name)
 
     	if( checkType<T>(iter->second) )
     	{
-    		return iter->second.template getObject<T>();
+    		return static_cast<T&>(iter->second);
+            
 
     	}else
     	{
     		fatalErrorInFunction << 
     		reportTypeError<T>(iter->second)<<endl;
     		fatalExit;
-    		return iter->second.template getObject<T>();
+    		return static_cast<T&>(iter->second);
     	}
         
     }
diff --git a/src/phasicFlow/repository/systemControl/Control.hpp b/src/phasicFlow/repository/systemControl/Control.hpp
deleted file mode 100644
index 58df40a4..00000000
--- a/src/phasicFlow/repository/systemControl/Control.hpp
+++ /dev/null
@@ -1,47 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-
-#ifndef __Control_hpp__
-#define __Control_hpp__
-
-
-// top-level entity repository for the whole application 
-// Each application that is executed in pFlow, should have 
-// settings/systemControl file in it. 
-// This  repository holds two main repositories: Time and settings 
-
-#include "systemControl.hpp"
-#include "timeFolder.hpp"
-
-namespace pFlow
-{
-
-
-inline systemControl& Control()
-{
-	static systemControl control_;
-	return control_;
-}
-
-} // pFlow
-
-
-#endif // __Control_hpp__
diff --git a/src/phasicFlow/repository/systemControl/systemControl.cpp b/src/phasicFlow/repository/systemControl/systemControl.cpp
index a9616a58..f57fd453 100644
--- a/src/phasicFlow/repository/systemControl/systemControl.cpp
+++ b/src/phasicFlow/repository/systemControl/systemControl.cpp
@@ -25,6 +25,24 @@ Licence:
 #include "systemControl.hpp"
 #include "vocabs.hpp"
 
+bool pFlow::systemControl::readDomainDict()
+{
+    if(!domainDict_)
+    {
+        domainDict_ = makeUnique<fileDictionary>
+        (
+            objectFile
+            (
+                domainFile__,
+                "",
+                objectFile::READ_ALWAYS,
+                objectFile::WRITE_NEVER
+            ),
+            &settings()
+        );
+    }
+    return true;
+}
 
 pFlow::word pFlow::systemControl::getRunName
 (
@@ -108,55 +126,58 @@ pFlow::systemControl::systemControl
 	(	
 		getTopFolder(path)
 	),
-	settings_
+    settingsDict_
 	(
-		settingsRepository__,
-		settingsFolder__,
-		this
-	),
-	caseSetup_
-	(
-		caseSetupRepository__,
-		caseSetupFolder__,
-		this
-	),
-	settingsDict_
-	(
-		settings().emplaceObject<fileDictionary>
-		(
-			objectFile
-			(
-				settingsFile__,
-				"",
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_NEVER,
-                IOPattern::AllProcessorsSimilar
-			),
-			settingsFile__
-		)
-	),
-	libs_(settingsDict_),
-	outFilePrecision_(
-		settingsDict_.getValOrSet("outFilePrecision", static_cast<uint64>(6))
-		),
-	Time_
+        makeUnique<fileDictionary>
+        (
+            objectFile
+            (
+                settingsFile__,
+                settingsFolder__,
+                objectFile::READ_ALWAYS,
+                objectFile::WRITE_NEVER
+            ),
+            this   
+        )
+    ),
+    Time_
 	(
 		this,
-		settingsDict_
+		settingsDict_()
 	),
-	g_(
-		settingsDict_.getVal<realx3>("g")
+	settings_
+    (
+        makeUnique<repository>
+        (
+            settingsRepository__,
+            settingsFolder__,
+            this
+        )
+    ),
+	caseSetup_
+	(
+        makeUnique<repository>
+        (
+            caseSetupRepository__,
+            caseSetupFolder__,
+            this
+        )
 	),
-	domain_(
-		settingsDict_.subDict("domain")
+	
+	libs_(settingsDict_()),
+	outFilePrecision_
+    (
+		settingsDict_().getValOrSet("outFilePrecision", static_cast<uint64>(6))
 	),
 	timers_(runName_),
 	timersReport_
 	(
-		settingsDict_.getValOrSet("timersReport", Logical("Yes"))
+		settingsDict_().getValOrSet("timersReport", Logical("Yes"))
 	),
 	writeToFileTimer_("Write to file", &timers_)	
-{}
+{
+    readDomainDict();
+}
 
 pFlow::systemControl::systemControl(
 		const real startTime, 
@@ -179,71 +200,62 @@ pFlow::systemControl::systemControl(
 	(	
 		getTopFolder(path)
 	),
-	settings_
+    settingsDict_
 	(
-		settingsRepository__,
-		settingsFolder__,
-		this
-	),
-	caseSetup_
-	(
-		caseSetupRepository__,
-		caseSetupFolder__,
-		this
-	),
-	settingsDict_
-	(
-		settings().emplaceObject<fileDictionary>
-		(
-			objectFile
-			(
-				settingsFile__,
-				"",
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_NEVER
-			),
-			settingsFile__
-		)
-	),
-	libs_(settingsDict_),
-	Time_
+        makeUnique<fileDictionary>
+        (
+            objectFile
+            (
+                settingsFile__,
+                settingsFolder__,
+                objectFile::READ_ALWAYS,
+                objectFile::WRITE_NEVER
+            ),
+            this   
+        )
+    ),
+    Time_
 	(
 		this,
-		settingsDict_,
+		settingsDict_(),
 		startTime, 
 		endTime, 
 		saveInterval, 
 		startTimeName
 	),
+	settings_
+    (
+        makeUnique<repository>
+        (
+            settingsRepository__,
+            settingsFolder__,
+            this
+        )
+    ),
+	caseSetup_
+	(
+        makeUnique<repository>
+        (
+            caseSetupRepository__,
+            caseSetupFolder__,
+            this
+        )
+	),
+	libs_(settingsDict_()),
 	externalTimeControl_(true),
-	g_(
-		settingsDict_.getVal<realx3>("g")
-	),
-	domain_(
-		settingsDict_.subDict("domain")
-	),
 	timers_(runName_),
 	timersReport_
 	(
-		settingsDict_.getValOrSet("timersReport", Logical("Yes"))
+		settingsDict_->getValOrSet("timersReport", Logical("Yes"))
 	),
 	writeToFileTimer_("Write to file", &timers_)	
-{}
+{
+    readDomainDict();
+}
 
 pFlow::fileDictionary& pFlow::systemControl::domainDict()
 {
-	return 
-	settings().emplaceObjectOrGet<fileDictionary>
-	(
-		objectFile
-		(
-			domainFile__,
-			"",
-			objectFile::READ_ALWAYS,
-			objectFile::WRITE_NEVER
-		),
-		domainFile__
-	);
+    return domainDict_();
 }
 
 bool pFlow::systemControl::operator ++(int)
diff --git a/src/phasicFlow/repository/systemControl/systemControl.hpp b/src/phasicFlow/repository/systemControl/systemControl.hpp
index d79f157c..f48c9db7 100644
--- a/src/phasicFlow/repository/systemControl/systemControl.hpp
+++ b/src/phasicFlow/repository/systemControl/systemControl.hpp
@@ -50,35 +50,29 @@ protected:
 	// - path to top-level folder 
 	const fileSystem 	topLevelFolder_;
 
+    /// settingsDict fileDictionary
+	uniquePtr<fileDictionary> 	settingsDict_;
 
+    /// time repository
+    Time 			            Time_;
 
 	/// settings folder repository
-	repository 			settings_;
+	uniquePtr<repository> 		settings_;
 
 	/// caseSetup folder repository
-	repository 			caseSetup_;
+	uniquePtr<repository>       caseSetup_;
 
-	/// settingsDict fileDictionary
-	fileDictionary& 		settingsDict_;
+    uniquePtr<fileDictionary>   domainDict_ = nullptr;
 
 	/// extra libs to be loaded
-	dynamicLinkLibs 	libs_;
+	dynamicLinkLibs 	        libs_;
 	
 	/// precision for writing to file 
 	size_t 			outFilePrecision_ = 6;
 
-	/// time repository
-	Time 			Time_;
 
 	/// if time control is managed externaly
-
-	bool 				externalTimeControl_ = false;
-
-	// - acceleration 
-	realx3 			g_;
-
-	// - domain for dem world
-	box  			domain_;
+	bool 			externalTimeControl_ = false;
 
 	// all timers
 	Timers 			timers_;
@@ -87,6 +81,8 @@ protected:
 
 	Timer 			writeToFileTimer_;
 
+    bool readDomainDict();
+
 	static word getRunName( const fileSystem& path);
 	
 	static word getTopFolder(const fileSystem& path);
@@ -104,25 +100,25 @@ public:
 		const fileSystem path = CWD() );
 
 	const repository& settings() const{
-		return settings_;
+		return settings_();
 	}
 
 	repository& settings(){
-		return settings_;
+		return settings_();
 	}
 
 	const repository& caseSetup()const{
-		return caseSetup_;
+		return caseSetup_();
 	}
 
 	repository& caseSetup(){
-		return caseSetup_;
+		return caseSetup_();
 	}
 
 	
 	const Time& time() const
 	{
-		return const_cast<Time&>(Time_);
+		return Time_;
 	}
 
 	Time& time()
@@ -156,11 +152,11 @@ public:
 	}
 
 	const fileDictionary& settingsDict()const{
-		return settingsDict_;
+		return settingsDict_();
 	}
 
 	fileDictionary& settingsDict(){
-		return settingsDict_;
+		return settingsDict_();
 	}
 
 	fileDictionary& domainDict();
@@ -171,14 +167,14 @@ public:
 		return runName_;
 	}
 
-	inline const realx3& g()const
+	inline const realx3 g()const
 	{
-		return g_;
+		return settingsDict_().getVal<realx3>("g");
 	}
 
-	inline const box& domain()const
+	inline box domain()
 	{
-		return domain_;
+		return box(domainDict().subDict("globalBox"));
 	}
 
 	bool operator ++(int);
diff --git a/src/phasicFlow/streams/dataIO/createDataIO.hpp b/src/phasicFlow/streams/dataIO/createDataIO.hpp
new file mode 100644
index 00000000..c15c43b7
--- /dev/null
+++ b/src/phasicFlow/streams/dataIO/createDataIO.hpp
@@ -0,0 +1,35 @@
+#ifndef __createDataIO_hpp__
+#define __createDataIO_hpp__
+
+#include "uniquePtr.hpp"
+#include "dataIO.hpp"
+#include "dataIORegular.hpp"
+#include "dataIOMPI.hpp"
+
+namespace pFlow
+{
+
+template<typename T>
+uniquePtr<dataIO<T>> createDataIO(
+    const word& runType, const IOPattern& iop)
+{
+    if(runType == "regular")
+    {
+        return makeUnique<dataIORegular<T>>(iop);
+    }
+    else if(runType == "MPI")
+    {
+        return makeUnique<dataIOMPI<T>>(iop);
+    }
+    else
+    {
+        fatalErrorInFunction<< "not dataIO pattern is specified for this "<<
+        runType<<endl;
+        fatalExit;
+    }
+    return nullptr;
+}
+
+}
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIO.cpp b/src/phasicFlow/streams/dataIO/dataIO.cpp
deleted file mode 100644
index d64fbe59..00000000
--- a/src/phasicFlow/streams/dataIO/dataIO.cpp
+++ /dev/null
@@ -1,34 +0,0 @@
-
-#include "dataIO.hpp"
-
-
-pFlow::uniquePtr<pFlow::dataIO> pFlow::dataIO::create
-(
-	IOPattern::IOType iotype, 
-	word exeMode
-)
-{
-	auto ioMode = angleBracketsNames("dataIO", exeMode);
-
-	if( wordvCtorSelector_.search(ioMode) )
-	{
-		auto objPtr = wordvCtorSelector_[ioMode] 
-			(
-				iotype,
-				exeMode
-			);
-		return objPtr;
-	}
-	else
-	{
-		printKeys
-		( 
-			fatalError << "Ctor Selector "<< Yellow_Text(ioMode) << " dose not exist. \n"
-			<<"Avaiable ones are: \n\n"
-			,
-			wordvCtorSelector_
-		);
-		fatalExit;
-	}
-	return nullptr;
-}
diff --git a/src/phasicFlow/streams/dataIO/dataIO.hpp b/src/phasicFlow/streams/dataIO/dataIO.hpp
index 1a11ac2c..21da63ab 100644
--- a/src/phasicFlow/streams/dataIO/dataIO.hpp
+++ b/src/phasicFlow/streams/dataIO/dataIO.hpp
@@ -9,49 +9,37 @@
 #include "IOPattern.hpp"
 #include "iOstream.hpp"
 #include "iIstream.hpp"
-#include "virtualConstructor.hpp"
+
 
 
 namespace pFlow
 {
 
-class fileSystem;
-
-
+template<typename T>
 class dataIO
 {
-
-public:
-
-
-	static inline const uint64 ErrorReturn = static_cast<uint64>(-1);
-	
 protected:
 
-	IOPattern 	ioPattern_;
+	IOPattern 	    ioPattern_;
 
-	word 		executionMode_;
+	std::vector<T> 	buffer_;
 
-	span<char> 			buffer_;
+    span<T>         bufferSpan_; 
 
-	template<typename T>
-	span<char> createSpan( span<T> sp )
-	{
-		return span<char>( reinterpret_cast<char*>(sp.data()), sp.size()*sizeof(T) );
-	}
+
+    /// gather data from all processors and put the results in buffer_
+	virtual bool gatherData(span<T> data) = 0;  
 
 public:
 
 	/// Type info
 	TypeInfo("dataIO");
 
-	dataIO(IOPattern::IOType iotype, word exeMode)
+	dataIO(const IOPattern& iop)
 	:
-	ioPattern_(iotype),
-	executionMode_(exeMode)
+	    ioPattern_(iop)
 	{}
 
-
 	dataIO(const dataIO&) = default;
 
 	dataIO(dataIO &&) = default;
@@ -62,199 +50,24 @@ public:
 
 	virtual ~dataIO() = default;
 
-	create_vCtor
-	(
-		dataIO,
-		word,
-		(
-			IOPattern::IOType iotype, 
-			word exeMode
-		),
-		(iotype, exeMode)
-	);
-
-	/// Gather data from all processors and put the results in 
-	/// buffer_
-	virtual bool gatherData(span<char> sp ) = 0;
-
 	/// Write data to the end of file from all processors.
 	/// This method should be called from all processors. 
-	template<typename T>
 	bool writeData(iOstream& os, span<T> data);
 
-	template<typename T>
-	bool readData(iIstream& is, std::vector<T>& data);
+	bool readData(
+        iIstream& is, 
+        std::vector<T>& data);
 
-	template<typename T>
 	bool readAscii(
 		iIstream& is,
 		std::vector<T>& vec	);
 
-	static
-	uniquePtr<dataIO> create(IOPattern::IOType iotype, word exeMode);
-
-
 };
 	
 
-template<>
-inline 
-bool dataIO::writeData<word>(iOstream& os, span<word> data)
-{
-	/*std::ostringstream ist();
-
-	for(auto i=0; i<data.size(); i++)
-	{
-		ist<< data[i]<<std::endl;
-	}
-
-	span<char> sp(ist.str().data(), ist.str().size());
-
-	if(!gatherData( sp) )
-	{
-		fatalErrorInFunction<<
-		"Error in gathering data for out stream "<< os.name()<<endl;
-		return false;
-	}
-
-	uint64 len = buffer_.size();
-	os<< len << endl;
-
-	if(!os.write(buffer_.data(), buffer_.size()))
-	{
-		fatalErrorInFunction<<
-    	"error in writing binary data to "<<os.name()<<endl;
-    	return false;
-	}*/
-
-	if( !data.writeASCII(os) )
-    {
-    	fatalErrorInFunction<<
-    	"error in writing ASCII data to "<<os.name()<<endl;
-    	return false;
-    }
-
-	return true;
-}
 
 }
 
 #include "dataIOTemplate.cpp"
 
 #endif
-
-
-
-/*bool writeDataToFileEndSTD(
-		const word& wordPath, 
-		const span<unsigned char>& data);
-
-	bool writeDataToFileEndMPI(
-		const word& wordPath, 
-		const span<unsigned char>& data);
-	
-	bool readDataSTD(
-		const word& wordPath,
-		const std::vector<uint64> chunkSizes,
-		span<unsigned char>& data,
-		uint64 binaryBlockStart);
-	
-	bool readDataMPI(
-		const word& wordPath, 
-		const std::vector<uint64> chunkSizes,
-		span<unsigned char>& data,
-		uint64 binaryBlockStart);
-
-	bool readMetaMPI(
-		const word& wordPath, 
-		std::vector<uint64>& chunkSizes,
-		uint64 startPosSearch,
-		uint64 &startPosBinaryBlock);
-
-	bool readMetaSTD(
-		const word& wordPath, 
-		std::vector<uint64>& chunkSizes,
-		uint64 startPosSearch,
-		uint64 &startPosBinaryBlock);
-
-	bool waitForAllMPI();
-
-	bool maxReduction( uint64& src, uint64& dst);
-
-	bool BcastPos(uint64 & pos);
-
-public:
-
-	dataIO(IOPattern::IOType iotype)
-	:
-		ioPattern_(iotype)
-	{}
-
-	~dataIO()=default;
-
-	template<typename T> 
-	bool writeDataEnd(
-		const word& wordPath,
-		const span<T>& data);
-
-	template<typename T>
-	bool writeAsciiEnd(
-		iOstream& os,
-		const span<T>& data);
-
-	template<typename T>
-	bool readDataBinary(
-		const word& wordPath, 
-		std::vector<T>& data,
-		uint64 startPos = 0);
-
-	template<typename T>
-	bool readAscii(
-		iIstream& is,
-		std::vector<T>& vec	);
-
-	template<typename T>
-	bool readData(
-		iIstream& is, 
-		std::vector<T>& vec,
-		bool resume = false); // resume only works for binary
-							  // for ascii, by default it starts from the current position
-
-
-	template<typename T>
-	bool writeData(iOstream& os,
-		const span<T>& data);
-
-	
-};
-
-template<>
-inline
-bool pFlow::dataIO::writeData<pFlow::word>
-(
-	iOstream& os,
-	const span<word>& data
-)
-{
-	if( !writeAsciiEnd(os, data) )
-    {
-        fatalErrorInFunction;
-        return false;
-    }
-	return true;	
-}
-
-template<>
-inline
-bool pFlow::dataIO::readData<pFlow::word>(
-	iIstream& is, 
-	std::vector<word>& vec,
-	bool resume)
-{
-	if(!readAscii(is, vec))
-	{
-		fatalErrorInFunction;
-		return false;
-	}
-	return true;
-}*/
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIONoMPI.cpp b/src/phasicFlow/streams/dataIO/dataIONoMPI.cpp
deleted file mode 100644
index a2dfd6be..00000000
--- a/src/phasicFlow/streams/dataIO/dataIONoMPI.cpp
+++ /dev/null
@@ -1,20 +0,0 @@
-
-#include "dataIONoMPI.hpp"
-
-
-pFlow::dataIONoMPI::dataIONoMPI
-(
-	IOPattern::IOType iotype,
-	word exeMode
-)
-:
-	dataIO(iotype, exeMode)
-{}
-
-
-bool pFlow::dataIONoMPI::gatherData( span<char> sp )
-{
-	/// in serial mode, no gathering is required. 
-	buffer_ = sp;
-	return true;
-}
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIONoMPI.hpp b/src/phasicFlow/streams/dataIO/dataIONoMPI.hpp
deleted file mode 100644
index 64878fe2..00000000
--- a/src/phasicFlow/streams/dataIO/dataIONoMPI.hpp
+++ /dev/null
@@ -1,48 +0,0 @@
-#ifndef __datIONoMPI_hpp__
-#define __datIONoMPI_hpp__
-
-#include "dataIO.hpp"
-
-namespace pFlow
-{
-
-
-class dataIONoMPI
-:
-	public dataIO
-{
-protected:
-
-public:
-
-	TypeInfo("dataIO<NoMPI>");
-
-	dataIONoMPI(IOPattern::IOType iotype, word exeMode);
-
-	dataIONoMPI(const dataIONoMPI&) = default;
-
-	dataIONoMPI(dataIONoMPI&&) = default;
-
-
-	dataIONoMPI& operator=(const dataIONoMPI&) = default;
-
-	dataIONoMPI& operator=(dataIONoMPI&&) = default;
-
-	~dataIONoMPI() = default;
-
-	add_vCtor
-	(
-		dataIO,
-		dataIONoMPI,
-		word
-	);
-
-	bool gatherData(span<char> sp ) override;
-	
-};
-
-
-}
-
-
-#endif
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIORegular.hpp b/src/phasicFlow/streams/dataIO/dataIORegular.hpp
new file mode 100644
index 00000000..08f66a2a
--- /dev/null
+++ b/src/phasicFlow/streams/dataIO/dataIORegular.hpp
@@ -0,0 +1,47 @@
+#ifndef __datIONoMPI_hpp__
+#define __datIONoMPI_hpp__
+
+#include "dataIO.hpp"
+
+namespace pFlow
+{
+template<typename T>
+class dataIORegular
+:
+	public dataIO<T>
+{
+protected:
+
+    bool gatherData(span<T> data ) override
+    {
+        /// in serial mode, no gathering is required. 
+        this->bufferSpan_ = data;
+        return true;
+    }
+
+public:
+
+	TypeInfo("dataIO<regular>");
+
+	dataIORegular(const IOPattern& iop)
+    :
+	    dataIO<T>(iop)
+    {}
+
+	dataIORegular(const dataIORegular&) = default;
+
+	dataIORegular(dataIORegular&&) = default;
+
+	dataIORegular& operator=(const dataIORegular&) = default;
+
+	dataIORegular& operator=(dataIORegular&&) = default;
+
+	~dataIORegular() = default;
+	
+};
+
+
+}
+
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
index a485d2b1..82478821 100644
--- a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
+++ b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
@@ -1,9 +1,9 @@
 
 template<typename T>
-bool pFlow::dataIO::writeData(iOstream& os, span<T> data)
+bool pFlow::dataIO<T>::writeData(iOstream& os, span<T> data)
 {
 	/// first gather data from all processors (if any)
-	if(!gatherData( createSpan(data) ) )
+	if(!gatherData( data ) )
 	{
 		fatalErrorInFunction<<
 		"Error in gathering data for out stream "<< os.name()<<endl;
@@ -14,11 +14,14 @@ bool pFlow::dataIO::writeData(iOstream& os, span<T> data)
 	{
 		if( os.isBinary() )
 		{
-			// first write the size of data 		    
-			uint64 len = buffer_.size()/sizeof(T);
-			os<< len << endl;
+			// first write the number of data
+			uint64 numData = bufferSpan_.size();
+			os<< numData << endl;
 
-			if(!os.write(buffer_.data(), buffer_.size()))
+            // write the bindary data
+            auto chBuffer = charSpan(bufferSpan_);
+
+			if(!os.write(chBuffer.data(), chBuffer.size()))
 			{
 				fatalErrorInFunction<<
 		    	"error in writing binary data to "<<os.name()<<endl;
@@ -28,13 +31,7 @@ bool pFlow::dataIO::writeData(iOstream& os, span<T> data)
 		}
 		else
 		{
-
-			/// cast the data into T
-			span<T> allData( 
-				reinterpret_cast<T*>(buffer_.data()), 
-				buffer_.size()/sizeof(T));
-		    
-		    if( !allData.writeASCII(os) )
+		    if( !bufferSpan_.writeASCII(os) )
 		    {
 		    	fatalErrorInFunction<<
 		    	"error in writing ASCII data to "<<os.name()<<endl;
@@ -50,20 +47,44 @@ bool pFlow::dataIO::writeData(iOstream& os, span<T> data)
 	}
 }
 
+template<>
+inline
+bool pFlow::dataIO<pFlow::word>::writeData(iOstream& os, span<word> data)
+{
+    notImplementedFunction;
+    fatalExit;
+    /// first gather data from all processors (if any)
+	if(!gatherData( data ) )
+	{
+		fatalErrorInFunction<<
+		"Error in gathering data for out stream "<< os.name()<<endl;
+		return false;
+	}
+
+	if( !bufferSpan_.writeASCII(os) )
+    {
+    	fatalErrorInFunction<<
+    	"error in writing ASCII data to "<<os.name()<<endl;
+    	return false;
+    }
+
+	return true;
+}
+
+
 template<typename T>
-bool pFlow::dataIO::readData
+bool pFlow::dataIO<T>::readData
 (
 	iIstream& is, 
 	std::vector<T>& data
 )
 {
-	
 	data.clear();
-
 	if(ioPattern_.thisProcReadData())
 	{
 		if(is.isBinary())
 		{
+            
 			// read length of data 			
 			token firstToken(is);
 			
@@ -98,7 +119,7 @@ bool pFlow::dataIO::readData
 }
 
 template<typename T>
-bool pFlow::dataIO::readAscii
+bool pFlow::dataIO<T>::readAscii
 (
 	iIstream& is,
 	std::vector<T>& vec
@@ -107,7 +128,6 @@ bool pFlow::dataIO::readAscii
 
 	if( !ioPattern_.thisProcReadData() ) return true;
 	
-
 	is.fatalCheck(FUNCTION_NAME);
 
 	vec.clear();
@@ -161,331 +181,10 @@ bool pFlow::dataIO::readAscii
 	
 	if(len>0&& len != vec.size())
 	{
-		warningInFunction<<"vector lendth specified "<< len << 
+		warningInFunction<<"vector length specified "<< len << 
 		" is different from number of elements "<< vec.size()<<endl;
 		return false;
 	}
 
 	return true;
-}
-
-/*template<typename T>
-bool pFlow::dataIO::writeDataEnd(
-	const word& wordPath,
-	const span<T>& data)
-{
-
-	if( ioPattern_.thisProcWriteData() )
-	{
-		span<unsigned char> charSpan(
-		reinterpret_cast<unsigned char*> (const_cast<T*>(data.data())),
-		data.size()*sizeof(T));
-
-		if( ioPattern_.isParallel() )
-		{
-			return writeDataToFileEndMPI(wordPath, charSpan);
-		}
-		else
-		{
-			return writeDataToFileEndSTD(wordPath, charSpan);
-		}
-	}
-	else
-	{
-		return true;
-	}
-
-	return false;
-}
-
-template<typename T>
-bool pFlow::dataIO::writeAsciiEnd
-(
-	iOstream& os,
-	const span<T>& data
-)
-{
-	if(ioPattern_.thisProcWriteData())
-	{
-		return data.writeASCII(os);
-	}
-	else
-		return true;
-}
-
-
-
-template<typename T>
-bool pFlow::dataIO::readDataBinary
-(
-	const word& wordPath, 
-	std::vector<T>& data,
-	uint64 startPos
-)
-{
-
-	std::vector<uint64> chunkSizes;
-	uint64 startPosBinaryBlock;
-
-	data.clear();
-	
-	if( ioPattern_.thisProcReadData())
-	{
-		
-		// read meta 
-		if(!readMetaSTD(
-				wordPath, 
-				chunkSizes, 
-				startPos,
-				startPosBinaryBlock))
-		{
-			fatalErrorInFunction;
-			return false;
-		}
-		
-		
-		if( ioPattern_.isMasterProcessor()  ||
-			ioPattern_.isAllProcessorSimilar()
-		)
-		{
-
-			auto sizeOfData = std::accumulate( 
-			chunkSizes.begin(), 
-			chunkSizes.end(),
-			static_cast<uint64>(0));
-			
-			
-			data.resize(sizeOfData/sizeof(T));
-
-			span<unsigned char> charSpan(
-				reinterpret_cast<unsigned char*>(data.data()),
-				data.size()*sizeof(T));
-
-			if(!readDataSTD(wordPath, chunkSizes, charSpan, startPosBinaryBlock))
-			{
-				fatalErrorInFunction;
-				return false;
-			}
-
-			return true;
-
-		}
-		else if( ioPattern_.isAllProcessorDifferent() )
-		{
-
-			if(chunkSizes.size() != ioPattern_.globalSize())
-			{
-				if( ioPattern_.isMaster())
-				{
-					auto sizeOfData = std::accumulate( 
-					chunkSizes.begin(), 
-					chunkSizes.end(),
-					static_cast<uint64>(0));
-					
-					
-					data.resize(sizeOfData/sizeof(T));
-
-					span<unsigned char> charSpan(
-						reinterpret_cast<unsigned char*>(data.data()),
-						data.size()*sizeof(T));
-
-					if(!readDataSTD(wordPath, chunkSizes, charSpan, startPosBinaryBlock))
-					{
-						fatalErrorInFunction;
-						return false;
-					}
-					return true;
-
-				}
-				else
-				{
-					return true;
-				}
-			}
-			else
-			{
-				auto thisProc = ioPattern_.globalRank();
-
-				data.resize(chunkSizes[thisProc]/sizeof(T));
-
-				span<unsigned char> charSpan(
-					reinterpret_cast<unsigned char*>(data.data()),
-					data.size()*sizeof(T));
-
-				
-				if( !readDataMPI(wordPath, chunkSizes, charSpan, startPosBinaryBlock) )
-				{
-					fatalErrorInFunction;
-					return false;
-				}
-				return true;	
-			}
-
-			
-		}
-		else
-		{
-			fatalErrorInFunction;
-			return false;	
-		}
-	}
-	else
-	{
-		return true;
-	}
-
-	return false;
-		
-	
-}
-
-template<typename T>
-bool pFlow::dataIO::readAscii
-(
-	iIstream& is,
-	std::vector<T>& vec
-)
-{
-
-	if( !ioPattern_.thisProcReadData() ) return true;
-	
-
-	is.fatalCheck(FUNCTION_NAME);
-
-	vec.clear();
-	
-	token firstToken(is);
-
-	size_t len = 0;
-	if( firstToken.isInt64())
-	{
-		len = firstToken.int64Token();
-		vec.reserve(len);
-		firstToken  = token(is);
-	}
-
-	T val{};
-	if( firstToken.isPunctuation() ) // start of vector 
-	{
-		if(firstToken != token::BEGIN_LIST)
-		{
-			warningInFunction
-			<< "expected token "<< token::BEGIN_LIST 
-			<< " but found "<< firstToken ;
-			return false;
-
-		}
-
-		token lastToken(is);
-		
-		is.fatalCheck(FUNCTION_NAME);
-		
-		while(!(lastToken.isPunctuation()
-             	&& lastToken == token::END_LIST ))
-		{
-
-			is.putBack(lastToken);
-			
-			is >> val;
-			vec.push_back(val);
-			
-			is >> lastToken;
-			is.fatalCheck(FUNCTION_NAME);
-		}
-
-	} else
-	{
-		warningInFunction
-		<< "expected token "<< token::BEGIN_LIST 
-		<< " but found "<< firstToken<<endl; ;
-		return false;
-	}
-	
-	if(len>0&& len != vec.size())
-	{
-		warningInFunction<<"vector lendth specified "<< len << 
-		" is different from number of elements "<< vec.size()<<endl;
-		return false;
-	}
-
-	return true;
-}
-
-template<typename T>
-bool pFlow::dataIO::readData
-(
-	iIstream& is, 
-	std::vector<T>& vec,
-	bool resume
-)
-{
-	if(is.isBinary())
-	{
-		uint64 currPos = 0;
-		if( resume )
-		{
-			currPos = is.tell();
-		}
-
-		if(! BcastPos(currPos) ) return false;
-		
-		if(!this->readDataBinary(is.name(), vec, currPos))
-		{
-			fatalErrorInFunction;
-			return false;
-		}
-
-		auto lastPos = lastPosRead_;
-		maxReduction( lastPos, lastPosRead_);
-		//std::cout<<"last post read "<< lastPosRead_<<std::endl;
-		
-		/// set the stream indicator to the last position 
-		is.seek(lastPosRead_);
-		
-		return true;
-	}
-	else
-	{
-		if(!readAscii(is, vec))
-		{
-			fatalErrorInFunction;
-			return false;
-		}
-		return true;
-	}
-}
-
-template<typename T>
-bool pFlow::dataIO::writeData
-(
-	iOstream& os,
-	const span<T>& sp
-)
-{
-	if( os.isBinary() )
-	{
-	    os.startOfBinaryStreaming();
-
-	    if(!writeDataEnd(os.name(), sp))
-	    {
-	        fatalErrorInFunction;
-	        return false;
-	    }
-
-	    os.endOfBinaryStreaming();
-
-	}
-	else
-	{
-	    if( !writeAsciiEnd(os, sp) )
-	    {
-	        fatalErrorInFunction;
-	        return false;
-	    }
-	}
-	return true; 
-
-}*/
-
-
-
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/box/box.hpp b/src/phasicFlow/structuredData/box/box.hpp
index 5ad65de9..4e78f2fc 100644
--- a/src/phasicFlow/structuredData/box/box.hpp
+++ b/src/phasicFlow/structuredData/box/box.hpp
@@ -97,6 +97,18 @@ public:
 			return max_;
 		}
 
+        INLINE_FUNCTION_HD
+        realx3& minPoint()
+        {
+            return min_;
+        }
+
+        INLINE_FUNCTION_HD
+        realx3& maxPoint()
+        {
+            return max_;
+        }
+
 	//// - IO operation 
 		FUNCTION_H
 		bool read(iIstream & is);
diff --git a/src/phasicFlow/structuredData/domain/domain.cpp b/src/phasicFlow/structuredData/domain/domain.cpp
index 8a6b9939..e81c0471 100644
--- a/src/phasicFlow/structuredData/domain/domain.cpp
+++ b/src/phasicFlow/structuredData/domain/domain.cpp
@@ -56,4 +56,25 @@ pFlow::domain::domain(const box& db)
 		realx3(db.minPoint().x(), db.maxPoint().y(), db.maxPoint().z()))
 {
 
-}
\ No newline at end of file
+}
+
+
+FUNCTION_H
+pFlow::iIstream& pFlow::operator >>(
+    pFlow::iIstream& is, 
+    pFlow::domain& d)
+{
+    box b;
+    is>>b; 
+    d = domain(b);
+    return is;
+}
+
+FUNCTION_H
+pFlow::iOstream& pFlow::operator << (
+    pFlow::iOstream& os, 
+    const pFlow::domain& d)
+{
+    os<< d.domainBox();
+    return os;
+}
diff --git a/src/phasicFlow/structuredData/domain/domain.hpp b/src/phasicFlow/structuredData/domain/domain.hpp
index 15f57090..f29b33ab 100644
--- a/src/phasicFlow/structuredData/domain/domain.hpp
+++ b/src/phasicFlow/structuredData/domain/domain.hpp
@@ -156,17 +156,12 @@ bool operator ==(const domain& d1, const domain& d2)
 	return equal(d1, d2);
 }
 
-/*FUNCTION_H
-iIstream& operator >>(iIstream& is, box& b);
+FUNCTION_H
+iIstream& operator >>(iIstream& is, domain& d);
 
 FUNCTION_H
-iOstream& operator << (iOstream& os, const box& b);
+iOstream& operator << (iOstream& os, const domain& d);
 
-INLINE_FUNCTION_HD
-box extendBox(const box& b, const realx3& dl)
-{
-	return box(b.minPoint()-dl , b.maxPoint()+dl);
-}*/
 
 }
 
diff --git a/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp b/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
index 74fd61da..999f6b0e 100644
--- a/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
+++ b/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
@@ -50,37 +50,52 @@ bool pFlow::regularSimulationDomain::setThisDomain()
     return true;
 }
 
-pFlow::regularSimulationDomain::regularSimulationDomain(
-    const dictionary &dict)
-    : simulationDomain(dict)
-{
-}
-
-bool pFlow::regularSimulationDomain::updateDomains
+pFlow::regularSimulationDomain::regularSimulationDomain
 (
-	const realx3Vector& pointPos
+    const dictionary &dict
 )
+:
+    simulationDomain(dict)
+{}
+
+bool pFlow::regularSimulationDomain::initialUpdateDomains(span<realx3> pointPos)
 {
-	thisNumPoints_ = pointPos.size();
-	if(!createBoundaryDicts()) return false;
-	if(!setThisDomain()) return false;
-	
+    initialNumPoints_ = pointPos.size();
+    if(!setThisDomain()) return false;
+    if(!createBoundaryDicts()) return false;
     return true;
 }
 
-pFlow::uint32 pFlow::regularSimulationDomain::thisNumPoints() const
+pFlow::uint32 pFlow::regularSimulationDomain::initialNumberInThis() const
 {
-	return thisNumPoints_;	
+    return initialNumPoints_;
 }
 
-bool pFlow::regularSimulationDomain::transferBlockData
+/*bool pFlow::regularSimulationDomain::updateDomains(
+    span<realx3> pointPos,
+    pFlagTypeHost flags)
+{	
+    return true;
+}*/
+
+pFlow::uint32 pFlow::regularSimulationDomain::numberToBeImported() const
+{
+	return 0;	
+}
+
+pFlow::uint32 pFlow::regularSimulationDomain::numberToBeExported() const
+{
+    return 0;
+}
+
+bool pFlow::regularSimulationDomain::initialTransferBlockData
 (
 	span<char> src, 
 	span<char> dst,
-	uint32 sizeOfBlock
+	size_t sizeOfElement
 )
 {
-	size_t requiredSize = sizeOfBlock*thisNumPoints();
+	size_t requiredSize = sizeOfElement*initialNumberInThis();
 	if(dst.size() < requiredSize)
 	{
 		fatalErrorInFunction<< 
@@ -103,6 +118,54 @@ bool pFlow::regularSimulationDomain::transferBlockData
     return true;
 }
 
+bool pFlow::regularSimulationDomain::initialTransferBlockData
+(
+    span<realx3> src, 
+    span<realx3> dst
+)
+{
+    return initialTransferBlockData(
+        charSpan(src), 
+        charSpan(dst), 
+        sizeof(realx3)); 
+}
+
+bool pFlow::regularSimulationDomain::initialTransferBlockData
+(
+    span<real> src, 
+    span<real> dst
+)
+{
+    return initialTransferBlockData(
+        charSpan(src), 
+        charSpan(dst), 
+        sizeof(real)); 
+}
+
+bool pFlow::regularSimulationDomain::initialTransferBlockData
+(
+    span<uint32> src, 
+    span<uint32> dst
+)
+{
+    return initialTransferBlockData(
+        charSpan(src), 
+        charSpan(dst), 
+        sizeof(uint32)); 
+}
+
+bool pFlow::regularSimulationDomain::initialTransferBlockData
+(
+    span<int32> src, 
+    span<int32> dst
+)
+{
+    return initialTransferBlockData(
+        charSpan(src), 
+        charSpan(dst), 
+        sizeof(int32)); 
+}
+
 const pFlow::dictionary &pFlow::regularSimulationDomain::thisBoundaryDict() const
 {
     return globalDomainDict_.subDict("regularSimulationDomainBoundaries");
diff --git a/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp b/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
index 011e8d2c..074ffc64 100644
--- a/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
+++ b/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
@@ -13,7 +13,7 @@ class regularSimulationDomain
 {
 protected:
 
-	uint32 		thisNumPoints_=0;
+	uint32 		initialNumPoints_=0;
 
 	bool createBoundaryDicts() override;
 
@@ -35,16 +35,44 @@ public:
 		dictionary
 	);
 
-	bool updateDomains( 
-		const realx3Vector& pointPos)override;
+    bool initialUpdateDomains(span<realx3> pointPos) override;
 
-	uint32 thisNumPoints()const override;
+    uint32 initialNumberInThis()const override;
 
-	 
-	bool transferBlockData(
+	/*bool updateDomains(
+		span<realx3> pointPos,
+        pFlagTypeHost flags) override;*/
+   
+	uint32 numberToBeImported()const override;
+
+	uint32 numberToBeExported()const override;
+
+	bool initialTransferBlockData(
 		span<char> src, 
 		span<char> dst,
-		uint32 sizeOfBlock) override;
+		size_t sizeOfElement) override;
+
+
+    /// @brief 
+    /// @param src 
+    /// @param dst 
+    /// @return 
+    bool initialTransferBlockData(
+        span<realx3> src,
+        span<realx3> dst) override;
+
+    bool initialTransferBlockData(
+        span<real> src,
+        span<real> dst) override;
+
+    bool initialTransferBlockData(
+        span<uint32> src,
+        span<uint32> dst) override;
+
+    bool initialTransferBlockData(
+        span<int32> src,
+        span<int32> dst) override;
+    
 	
 	const dictionary& thisBoundaryDict()const override;
 
diff --git a/src/phasicFlow/structuredData/domain/simulationDomain.cpp b/src/phasicFlow/structuredData/domain/simulationDomain.cpp
index 1fb0867d..b45758b5 100644
--- a/src/phasicFlow/structuredData/domain/simulationDomain.cpp
+++ b/src/phasicFlow/structuredData/domain/simulationDomain.cpp
@@ -19,23 +19,23 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "simulationDomain.hpp"
-#include "processors.hpp"
+#include "pFlowProcessors.hpp"
 
 pFlow::simulationDomain::simulationDomain(const dictionary& dict)
 :
     globalBox_(dict.subDict("globalBox")),
     globalDomainDict_(dict)
 {
-
+    
 }
 
 pFlow::uniquePtr<pFlow::simulationDomain> 
     pFlow::simulationDomain::create(const dictionary &dict)
 {
-    
 	word sType = angleBracketsNames(
         "simulationDomain", 
-        processors::runTypeName());
+        pFlowProcessors().localRunTypeName());
+
 
 	if( dictionaryvCtorSelector_.search(sType) )
 	{
diff --git a/src/phasicFlow/structuredData/domain/simulationDomain.hpp b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
index 5844f437..205762ba 100644
--- a/src/phasicFlow/structuredData/domain/simulationDomain.hpp
+++ b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
@@ -17,19 +17,22 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
 #ifndef __simulationDomain_hpp__
 #define __simulationDomain_hpp__
 
-#include "domain.hpp"
-#include "virtualConstructor.hpp"
-#include "Vectors.hpp"
+#include <array>
 
+#include "domain.hpp"
+#include "span.hpp"
 #include "streams.hpp"
+#include "virtualConstructor.hpp"
+#include "pointFlag.hpp"
 
 namespace pFlow
 {
 
+//class pFlagTypeHost;
+
 class simulationDomain
 {
 private:
@@ -56,9 +59,9 @@ protected:
 
 	bool 			boundariesSet_ = false;
 	
-	virtual bool createBoundaryDicts() = 0;
+	virtual bool    createBoundaryDicts() = 0;
 
-	virtual bool setThisDomain() = 0;
+	virtual bool    setThisDomain() = 0;
 
 public:
 
@@ -84,23 +87,64 @@ public:
 	virtual 
 	const dictionary& thisBoundaryDict()const = 0;
 	
+    virtual 
+    bool initialUpdateDomains(span<realx3> pointPos) = 0;
 
-	virtual 
-	bool updateDomains(
-		const realx3Vector& pointPos) = 0;
+    virtual
+    uint32 initialNumberInThis()const = 0;
 
-	//virtual getImportExportList() = 0;
-
-	//virtual getNumberInThisList() = 0;
-
-	virtual
-	uint32 thisNumPoints()const = 0;
-
-	virtual 
-	bool transferBlockData(
+    virtual 
+	bool initialTransferBlockData(
 		span<char> src, 
 		span<char> dst,
-		uint32 sizeOfBlock) = 0;
+		size_t sizeOfElement) = 0;
+    
+    virtual 
+    bool initialTransferBlockData(
+        span<realx3> src,
+        span<realx3> dst) = 0;
+    
+    virtual
+    bool initialTransferBlockData(
+        span<real> src,
+        span<real> dst) = 0;
+
+    virtual
+    bool initialTransferBlockData(
+        span<uint32> src,
+        span<uint32> dst) = 0;
+    
+    virtual 
+    bool initialTransferBlockData(
+        span<int32> src,
+        span<int32> dst) = 0;
+    
+    
+    /*template<typename T>
+    bool initialTransferBlockData(
+        span<T> src,
+        span<T> dst )
+    {
+        size_t el=sizeof(T);
+        return initialTransferBlockData
+        (
+            charSpan(src), 
+            charSpan(dst), 
+            el
+        );
+    }*/  
+
+
+
+    /// @brief Number of points to be imported after updating domains 
+	/// @return number of points
+	virtual
+	uint32 numberToBeImported()const = 0;
+
+    virtual 
+    uint32 numberToBeExported()const = 0;
+
+	
 
 	virtual 
 	bool requiresDataTransfer() const = 0;
diff --git a/src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp b/src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp
index 14aea880..28c548bc 100644
--- a/src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp
+++ b/src/phasicFlow/structuredData/infinitePlane/infinitePlane.hpp
@@ -29,7 +29,7 @@ Licence:
 namespace pFlow
 {
 
-class infinitePlane
+class  infinitePlane
 {
 protected:
 	
@@ -137,6 +137,33 @@ public:
 			return t*normal_ + p;
 		}
 
+        INLINE_FUNCTION_HD
+        bool parallel(const infinitePlane& pln)const
+        {
+            return  equal(normal_, pln.normal_) ||
+                    equal(normal_,-pln.normal_);
+        }
+
+        INLINE_FUNCTION_HD
+        bool parallelTouch(const infinitePlane& pln)const
+        {
+            if(equal(normal_, pln.normal_) && equal(d_, pln.d_))return true;
+            if(equal(normal_,-pln.normal_) && equal(d_,-pln.d_))return true;
+            return false;
+        }
+
+        INLINE_FUNCTION_HD
+        const auto& normal()const
+        {
+            return normal_;
+        }
+
+        INLINE_FUNCTION_HD
+        const auto& d()const
+        {
+            return d_;
+        }
+
 	//// - IO operation 
 
 		FUNCTION_H
diff --git a/src/phasicFlow/structuredData/plane/plane.cpp b/src/phasicFlow/structuredData/plane/plane.cpp
index fbac188c..547c9cc0 100644
--- a/src/phasicFlow/structuredData/plane/plane.cpp
+++ b/src/phasicFlow/structuredData/plane/plane.cpp
@@ -54,13 +54,11 @@ pFlow::plane pFlow::plane::parallelPlane(real distance)const
 	return plane(pp1, pp2, pp3, pp4);
 }
 
-bool pFlow::plane::validPlane4
-(
-	const realx3& p1, 
-	const realx3& p2, 
-	const realx3& p3, 
-	const realx3& p4
-)
+bool pFlow::plane::validPlane4(
+    const realx3 &p1,
+    const realx3 &p2,
+    const realx3 &p3,
+    const realx3 &p4)
 {
 	if( !validPlane3(p1,p2,p3)) return false;
 	if( !infinitePlane(p1,p2,p3).pointOnPlane(p4)) return false;
diff --git a/src/phasicFlow/structuredData/plane/plane.hpp b/src/phasicFlow/structuredData/plane/plane.hpp
index 7fbdea03..239b700b 100644
--- a/src/phasicFlow/structuredData/plane/plane.hpp
+++ b/src/phasicFlow/structuredData/plane/plane.hpp
@@ -122,6 +122,7 @@ public:
 	// return the parallel plane to this plane 
 	plane parallelPlane(real distance)const;
 
+
 	static 
 	bool validPlane4(
 		const realx3& p1, 
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
index 96b763e6..d64e35af 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
@@ -173,20 +173,48 @@ pFlow::internalPoints::internalPoints
 }
 
 
-const pFlow::internalPoints::pFlagTypeDevice& 
+const pFlow::pFlagTypeDevice& 
 	pFlow::internalPoints::activePointsMaskD() const 
 {
 	return pFlagsD_;
 }
 
 
-const pFlow::internalPoints::pFlagTypeHost&
+const pFlow::pFlagTypeHost&
 	pFlow::internalPoints::activePointsMaskH() const
 {
 	syncPFlag();
 	return pFlagsH_;
 }
 
+FUNCTION_H
+const pFlow::realx3Field_D& 
+    pFlow::internalPoints::pointPosition()const
+{
+    return pointPosition_;
+}
+
+pFlow::hostViewType1D<pFlow::realx3> 
+    pFlow::internalPoints::activePointsHost() const
+{
+    auto maskH = activePointsMaskH();
+    auto pointsH = pointPositionHost();
+
+    hostViewType1D<realx3> aPoints("Active pointst", maskH.numActive());
+    auto aRange = maskH.activeRange();
+    uint32 n = 0;
+    for(auto i=aRange.start(); i<aRange.end(); i++)
+    {
+        if( maskH.isActive(i) )
+        {
+            aPoints[n] = pointsH[i];
+            n++;
+        }
+    }
+
+    return aPoints;
+}
+
 FUNCTION_H
 pFlow::realx3Field_D &pFlow::internalPoints::pointPosition()
 {
@@ -218,13 +246,13 @@ FUNCTION_H
 bool pFlow::internalPoints::read
 (
 	iIstream& is, 
-	IOPattern::IOType iotype
+	const IOPattern& iop
 )
 {
 	
 	Field<Vector, realx3 , vecAllocator<realx3>> fRead("internalPoints", "internalPoints");
 
-	if( !fRead.read(is, iotype))
+	if( !fRead.read(is, iop))
 	{
 		fatalErrorInFunction<<
 		"Error in reading pointPosition from stream "<< is.name()<<endl;
@@ -249,16 +277,16 @@ FUNCTION_H
 bool pFlow::internalPoints::write
 (
 	iOstream& os, 
-	IOPattern::IOType iotype
+	const IOPattern& iop
 )const
 {
 	if( pFlagsD_.isAllActive())
 	{
-		return pointPosition_.write(os, iotype);
+		return pointPosition_.write(os, iop);
 	}
 	else
 	{
-		return pointPosition_.write(os, iotype, activePointsMaskH());
+		return pointPosition_.write(os, iop, activePointsMaskH());
 	}
 }
 
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
index 743653ad..f98c4208 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
@@ -47,11 +47,6 @@ public:
 
 	using execution_space 	= typename pointsType::execution_space;
 
-	using pFlagTypeDevice 	= pointFlag<execution_space>;
-
-	using pFlagTypeHost 	= pointFlag<DefaultHostExecutionSpace>;
-
-
 protected:
 
 	//// - data members
@@ -120,11 +115,19 @@ public:
 		FUNCTION_H
         realx3Field_D& pointPosition();
 
-		/*INLINE_FUNCTION_H
-		auto pointPositionHostAll()
-		{
-			return pointPosition_.hostVectorAll();
-		}*/
+        INLINE_FUNCTION_H
+        auto pointPositionHost()const
+        {
+            return pointPosition_.hostVector();
+        }
+
+        INLINE_FUNCTION_H
+        auto pointPositionDevice()const
+        {
+            return pointPosition_.deviceVector();
+        }
+
+		hostViewType1D<realx3> activePointsHost()const;
 
 		// - size of data structure
 		INLINE_FUNCTION_H
@@ -216,12 +219,12 @@ public:
 		
 		/// Read 
 		FUNCTION_H
-		bool read(iIstream& is, IOPattern::IOType iotype);
+		bool read(iIstream& is, const IOPattern& iop);
 		
 
 		/// Write 
 		FUNCTION_H
-		bool write(iOstream& os, IOPattern::IOType iotype)const;	
+		bool write(iOstream& os, const IOPattern& iop)const;	
 
 };
 
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
index 62861957..e863e583 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
@@ -244,6 +244,9 @@ public:
 
 };
 
+using pFlagTypeDevice 	= pointFlag<DefaultExecutionSpace>;
+
+using pFlagTypeHost 	= pointFlag<DefaultHostExecutionSpace>;
 
 }
 
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
index 95fcd517..f63efa00 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
@@ -258,8 +258,6 @@ void pFlow::pointFlag<ExecutionSpace>::fillNeighborsLists
 			});
 		Kokkos::fence();	
 	}
-	
-
 }
 
 template<typename ExecutionSpace>
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
index 30e2e187..173cdb43 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
@@ -1,3 +1,4 @@
+
 /*------------------------------- phasicFlow ---------------------------------
       O        C enter of
      O O       E ngineering and
@@ -19,53 +20,61 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "pointStructure.hpp"
-#include "simulationDomain.hpp"
+#include "systemControl.hpp"
+#include "vocabs.hpp"
 
-#include "streams.hpp"
 
-bool pFlow::pointStructure::distributePoints
-(
-	const realx3Vector &points
-)
+bool pFlow::pointStructure::setupPointStructure(const realx3Vector &points)
 {
-	uint32 thisN = simulationDomain_->thisNumPoints();
+    if(!simulationDomain_->initialUpdateDomains(points.getSpan()))
+    {
+        fatalErrorInFunction<<
+        "error in updating domains"<<endl;
+        return false;
+    }
+    
+    uint32 thisN = simulationDomain_->initialNumberInThis();
 
-    Field<Vector, realx3 , vecAllocator<realx3>> internal(
+    Field<Vector, realx3 , vecAllocator<realx3>> internal
+    (
         "internalPoints", 
         "internalPoints", 
         thisN, 
         thisN, 
-        RESERVE());
+        RESERVE()
+    );
     
+    auto pSpan  = makeSpan(points); 
+    auto iSpan  = internal.getSpan();
     
-    auto l = sizeof(realx3);
-    auto pointsSpan = span<char>(
-        reinterpret_cast<char*>
-		(
-			const_cast<realx3*>(points.data())
-		), 
-        points.size()*l );
-
-    auto internalSpan = span<char>(reinterpret_cast<char*>(internal.data()), internal.size()*l);
-
-    if(!simulationDomain_->transferBlockData(pointsSpan, internalSpan, l))
+    if(!simulationDomain_->initialTransferBlockData(pSpan, iSpan))
     {
         fatalErrorInFunction<<
         "Error in transfering the block data "<<endl;
         return false;
     }
     
-    pointPosition_.assign(internal.vectorField());
+    if( !initializePoints(internal) )
+    {
+        fatalErrorInFunction;
+        return false;
+    }
+
+    boundaries_.updateLists();
+
+    return false;
+}
+
+
+bool pFlow::pointStructure::initializePoints(const realx3Vector &points)
+{
+    pointPosition_.assign(points.vectorField());
 
-    
     pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
     pFlagSync_ = false;
     syncPFlag();
-    
-    
 
     return true;
-
 }
 
 pFlow::pointStructure::pointStructure
@@ -73,7 +82,19 @@ pFlow::pointStructure::pointStructure
     systemControl& control
 )
 :
-	demComponent("particlesCM", control),
+    IOobject
+    (
+        objectFile
+        (
+            pointStructureFile__,
+            "",
+            objectFile::READ_ALWAYS,
+            objectFile::WRITE_ALWAYS
+        ),
+        IOPattern::MasterProcessorDistribute,
+        &control.time()
+    ),
+	demComponent("particlesCenterMass", control),
   	internalPoints(),
 	simulationDomain_
 	(
@@ -84,37 +105,52 @@ pFlow::pointStructure::pointStructure
 		simulationDomain_(),
 		*this
 	)
-{}
+{
+    REPORT(0)<< "Reading point structure from file"<<
+    IOobject::localPath()<<END_REPORT;
+
+    if( !IOobject::read() )
+    {
+        fatalErrorInFunction<<
+        "Error in reading from file "<<IOobject::localPath()<<endl;
+    }
+}
 
 
 pFlow::pointStructure::pointStructure(
     systemControl& control,
     const realx3Vector &posVec)
 :
-	demComponent("particlesCM", control), 
-	internalPoints(),
-	simulationDomain_(
-		simulationDomain::create(control.domainDict())),
-	boundaries_(
+	IOobject
+    (
+        objectFile
+        (
+            pointStructureFile__,
+            "",
+            objectFile::READ_NEVER,
+            objectFile::WRITE_ALWAYS
+        ),
+        IOPattern::MasterProcessorDistribute,
+        &control.time()
+    ),
+	demComponent("particlesCenterMass", control),
+  	internalPoints(),
+	simulationDomain_
+	(
+		simulationDomain::create(control.domainDict())
+	),
+	boundaries_
+	(
 		simulationDomain_(),
-		*this)
+		*this
+	)
 {
-    if(!simulationDomain_->updateDomains(posVec) )
+    if(!setupPointStructure(posVec))
     {
         fatalErrorInFunction<<
-        "Failed to update domains."<<endl;
+        "Error in seting up pointStructure"<<endl;
         fatalExit;
     }
-
-    boundaries_.updateLists();
-
-    if( !distributePoints(posVec) )
-    {
-        fatalErrorInFunction<<"Faild to distributes poinst"<<endl;
-        fatalExit;
-    }
-
-    
 }
 
 bool pFlow::pointStructure::beforeIteration()
@@ -134,28 +170,49 @@ bool pFlow::pointStructure::afterIteration()
 
 bool pFlow::pointStructure::read(
     iIstream &is,
-    IOPattern::IOType iotype)
+    const IOPattern& iop)
 {
-    Field<Vector, realx3 , vecAllocator<realx3>> fRead("file_internalPoints", "internalPoints");
-    
     
+    Field<Vector, realx3 , vecAllocator<realx3>> 
+        fRead("file_internalPoints", "internalPoints");   
 
-	if( !fRead.read(is, iotype))
+	if( !fRead.read(is, iop))
 	{
 		fatalErrorInFunction<<
 		"Error in reading pointPosition from stream "<< is.name()<<endl;
 		return false;
 	}
 
-    if(!simulationDomain_->updateDomains(fRead))
+    return setupPointStructure(fRead);
+}
+
+bool pFlow::pointStructure::write
+(
+    iOstream& os, 
+    const IOPattern& iop
+)const
+{
+    
+    hostViewType1D<realx3> pointsH;
+
+    if(isAllActive())
+    {
+        pointsH = pointPositionHost();
+    }
+    else
+    {
+        pointsH = activePointsHost();
+    }
+
+    auto data = span<realx3>(pointsH.data(), pointsH.size());
+    
+    if( !writeSpan(os, data, iop) )
     {
         fatalErrorInFunction<<
-        "error in updating domains"<<endl;
+        "Error in writing pointStructure in stream "<<
+        os.name()<<endl;
         return false;
     }
 
-    boundaries_.updateLists();
-
-	return distributePoints(fRead);
-    
-}
\ No newline at end of file
+    return true;
+}
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
index b29fd705..37aa18af 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
@@ -20,10 +20,12 @@ Licence:
 #ifndef __pointStructure_hpp__
 #define __pointStructure_hpp__
 
+#include "IOobject.hpp"
 #include "demComponent.hpp"
 #include "internalPoints.hpp"
 #include "simulationDomain.hpp"
 #include "boundaryList.hpp"
+#include "streams.hpp"
 
 
 
@@ -33,6 +35,7 @@ namespace pFlow
 
 class pointStructure
 :
+    public IOobject,
     public demComponent,
 	public internalPoints
 {
@@ -42,9 +45,11 @@ protected:
 	uniquePtr<simulationDomain> simulationDomain_ = nullptr;
 
 	boundaryList 				boundaries_;
-		
-	
-	bool distributePoints(const realx3Vector& points);
+    
+
+    bool setupPointStructure(const realx3Vector& points);
+
+    bool initializePoints(const realx3Vector& points);
 
 public:
 
@@ -63,19 +68,12 @@ public:
             systemControl& control,
 			const realx3Vector& posVec);
 
-		// - copy construct
-		//
-		//   should be changed, may causs undefined behavior 
-		//////////////////////////////////////////////////////////////
 		pointStructure(const pointStructure&) = delete;
 
 		// - no move construct 
 		pointStructure(pointStructure&&) = delete;
 
-		// - copy assignment 
-		//
-		//   should be changed, may causs undefined behavior 
-		//////////////////////////////////////////////////////////////
+		
 		pointStructure& operator=(const pointStructure&) = delete;
 
 		// - no move assignment 
@@ -122,15 +120,14 @@ public:
 
 		/// @brief read the point structure from the input stream.
 		/// @param is: input stream
-		/// @param iotype: type of input pattern
+		/// @param iop: type of input pattern
 		/// @return true on success
-		FUNCTION_H
-		bool read(iIstream& is, IOPattern::IOType iotype);
+		bool read(iIstream& is, const IOPattern& iop) override;
 		
 
 		/// Write 
-		/*FUNCTION_H
-		bool write(iOstream& os, IOPattern::IOType iotype)const;	*/
+		bool write(iOstream& os, const IOPattern& iop)const override;
+        
 		
 		
 		
@@ -141,6 +138,16 @@ public:
 };
 
 
+/*inline iOstream& operator << (iOstream& os, const pointStructure& ps )
+{	
+	if( !ps.write(os, IOPattern::AllProcessorsDifferent) )
+	{
+		ioErrorInFile(os.name(), os.lineNumber());
+		fatalExit;
+	}
+	return os; 
+}*/
+
 } // pFlow
 
 
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/stlFile.hpp b/src/phasicFlow/structuredData/trisurfaceStructure/stlFile.hpp
index b072690f..6f47fbd5 100644
--- a/src/phasicFlow/structuredData/trisurfaceStructure/stlFile.hpp
+++ b/src/phasicFlow/structuredData/trisurfaceStructure/stlFile.hpp
@@ -106,10 +106,10 @@ public:
 		size_t size()const;
 		
 		// - vertecies of ith solid
-		const realx3x3Vector& solid(label i)const;
+		const realx3x3Vector& solid(uint64 i)const;
 
 		// - name of ith solid 
-		const word& name(label i)const;
+		const word& name(uint64 i)const;
 
 };
 
diff --git a/src/phasicFlow/types/triple/triple.hpp b/src/phasicFlow/types/triple/triple.hpp
index 356e5a00..34b12176 100644
--- a/src/phasicFlow/types/triple/triple.hpp
+++ b/src/phasicFlow/types/triple/triple.hpp
@@ -146,6 +146,8 @@ struct triple
 		/// access component
 		INLINE_FUNCTION_HD const T & z()const { return z_; }
 
+        INLINE_FUNCTION_HD const T& comp(uint32 i) const {return *(this+i);}
+
 	//// methods
 
 		/// Dot product of two vectors
diff --git a/src/setHelpers/finalize.hpp b/src/setHelpers/finalize.hpp
index f98c8069..cd4b1990 100644
--- a/src/setHelpers/finalize.hpp
+++ b/src/setHelpers/finalize.hpp
@@ -23,7 +23,7 @@ Licence:
 
 // initilized and finalize should be placed in onc scope 
 }
-pFlow::output<< "\nFinalizing host/device execution space ...."<<pFlow::endl;
+REPORT(0)<< "\nFinalizing host/device execution space ...."<<END_REPORT;
 Kokkos::finalize();
 
 
diff --git a/src/setHelpers/setProperty.hpp b/src/setHelpers/setProperty.hpp
index 1d09d6aa..ee2e1896 100644
--- a/src/setHelpers/setProperty.hpp
+++ b/src/setHelpers/setProperty.hpp
@@ -22,7 +22,7 @@ Licence:
 #ifndef __setProperty_hpp__
 #define __setProperty_hpp__
 
-REPORT(0)<<"\nReading proprties . . . "<<endREPORT;
+REPORT(0)<<"\nReading proprties . . . "<<END_REPORT;
 
 auto proprties = pFlow::property(Control.caseSetup().path()+pFlow::propertyFile__);
 
diff --git a/src/setHelpers/setSurfaceGeometry.hpp b/src/setHelpers/setSurfaceGeometry.hpp
index db6a0143..67e0f123 100644
--- a/src/setHelpers/setSurfaceGeometry.hpp
+++ b/src/setHelpers/setSurfaceGeometry.hpp
@@ -21,7 +21,7 @@ Licence:
 #ifndef __setSurfaceGeometry_hpp__
 #define __setSurfaceGeometry_hpp__
 
-REPORT(0)<< "\nCreating surface geometry . . . "<<endREPORT;
+REPORT(0)<< "\nCreating surface geometry . . . "<<END_REPORT;
 auto surfGeometryPtr = pFlow::geometry::create(Control, proprties);
 auto& surfGeometry = surfGeometryPtr();
 
diff --git a/utilities/CMakeLists.txt b/utilities/CMakeLists.txt
index 25d955d0..4216d45b 100644
--- a/utilities/CMakeLists.txt
+++ b/utilities/CMakeLists.txt
@@ -1,13 +1,13 @@
 
 #add_subdirectory(checkPhasicFlow)
 
-#add_subdirectory(particlesPhasicFlow)
+add_subdirectory(particlesPhasicFlow)
 
 #add_subdirectory(geometryPhasicFlow)
 
 #add_subdirectory(pFlowToVTK)
 
-#add_subdirectory(Utilities)
+add_subdirectory(Utilities)
 
 #add_subdirectory(postprocessPhasicFlow)
 
diff --git a/utilities/Utilities/CMakeLists.txt b/utilities/Utilities/CMakeLists.txt
index 8c5d4ff5..ddb55b6f 100644
--- a/utilities/Utilities/CMakeLists.txt
+++ b/utilities/Utilities/CMakeLists.txt
@@ -2,15 +2,17 @@
 set(SourceFiles 
 readFromTimeFolder.cpp
 readControlDict.cpp
-vtkFile/vtkFile.cpp
-geometryPhasicFlow/Wall/Wall.cpp 
-geometryPhasicFlow/planeWall/planeWall.cpp 
-geometryPhasicFlow/stlWall/stlWall.cpp
-geometryPhasicFlow/cylinderWall/cylinderWall.cpp
-geometryPhasicFlow/cuboidWall/cuboidWall.cpp
+#vtkFile/vtkFile.cpp
+#geometryPhasicFlow/Wall/Wall.cpp 
+#geometryPhasicFlow/planeWall/planeWall.cpp 
+#geometryPhasicFlow/stlWall/stlWall.cpp
+#geometryPhasicFlow/cylinderWall/cylinderWall.cpp
+#geometryPhasicFlow/cuboidWall/cuboidWall.cpp
 )
 
-set(link_libs Kokkos::kokkos phasicFlow Particles Geometry)
+#set(link_libs Kokkos::kokkos phasicFlow Particles Geometry)
+
+set(link_libs Kokkos::kokkos phasicFlow)
 
 pFlow_add_library_install(Utilities SourceFiles link_libs)
 
diff --git a/utilities/Utilities/geometryPhasicFlow/cylinderWall/cylinderWall.cpp b/utilities/Utilities/geometryPhasicFlow/cylinderWall/cylinderWall.cpp
index db0b7987..2ea0a3c1 100644
--- a/utilities/Utilities/geometryPhasicFlow/cylinderWall/cylinderWall.cpp
+++ b/utilities/Utilities/geometryPhasicFlow/cylinderWall/cylinderWall.cpp
@@ -49,7 +49,7 @@ bool pFlow::cylinderWall::createCylinder(
 	real L = zAx.length();
 
 	
-	realx3Vector r1P(numDiv + 1), r2P(numDiv + 1);
+	realx3Vector r1P("r1P",numDiv + 1), r2P("r1P",numDiv + 1);
 	real dTheta = 2 * Pi / numDiv;
 	real theta = 0;
 
diff --git a/utilities/Utilities/geometryPhasicFlow/stlWall/stlWall.cpp b/utilities/Utilities/geometryPhasicFlow/stlWall/stlWall.cpp
index f54cfc67..cc561f3f 100755
--- a/utilities/Utilities/geometryPhasicFlow/stlWall/stlWall.cpp
+++ b/utilities/Utilities/geometryPhasicFlow/stlWall/stlWall.cpp
@@ -42,7 +42,7 @@ bool pFlow::stlWall::readSTLWall
 		return false;
 	}
 
-	for(label i=0; i<stl.size(); i++)
+	for(uint64 i=0; i<stl.size(); i++)
 	{
 		auto it = triangles_.end();
 		triangles_.insert(it, stl.solid(i).begin(), stl.solid(i).end());
diff --git a/utilities/Utilities/readFromTimeFolder.hpp b/utilities/Utilities/readFromTimeFolder.hpp
index 9294929f..75559780 100644
--- a/utilities/Utilities/readFromTimeFolder.hpp
+++ b/utilities/Utilities/readFromTimeFolder.hpp
@@ -20,7 +20,7 @@ Licence:
 #ifndef __readFromTimeFolder_hpp__
 #define __readFromTimeFolder_hpp__
 
-
+#include "vocabs.hpp"
 #include "repository.hpp"
 #include "pointFields.hpp"
 #include "utilityFunctions.hpp"
diff --git a/utilities/particlesPhasicFlow/CMakeLists.txt b/utilities/particlesPhasicFlow/CMakeLists.txt
index c6766d21..03b0f1c6 100644
--- a/utilities/particlesPhasicFlow/CMakeLists.txt
+++ b/utilities/particlesPhasicFlow/CMakeLists.txt
@@ -6,6 +6,8 @@ positionOrdered/positionOrdered.cpp
 #positionRandom/positionRandom.cpp
 empty/empty.cpp
 )
-set(link_lib phasicFlow Kokkos::kokkos Interaction Utilities)
+#set(link_lib phasicFlow Kokkos::kokkos Interaction Utilities)
+
+set(link_lib phasicFlow Kokkos::kokkos Utilities)
 
 pFlow_make_executable_install(particlesPhasicFlow source_files link_lib)
diff --git a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
index a7102840..8d568a52 100755
--- a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
+++ b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
@@ -21,25 +21,14 @@ Licence:
 
 #include "positionParticles.hpp"
 #include "pointStructure.hpp"
-#include "setFields.hpp"
+//#include "setFields.hpp"
 #include "systemControl.hpp"
 #include "commandLine.hpp"
 #include "vocabs.hpp"
 
 //#include "readControlDict.hpp"
 
-using pFlow::output;
-using pFlow::endl;
-using pFlow::dictionary;
-using pFlow::uniquePtr;
-using pFlow::IOobject;
-using pFlow::objectFile;
-using pFlow::fileSystem;
-using pFlow::pointStructure;
-using pFlow::pointStructureFile__;
-using pFlow::positionParticles;
-using pFlow::commandLine;
-using pFlow::setFieldList;
+using namespace pFlow;
 
 int main( int argc, char* argv[] )
 {
@@ -83,7 +72,7 @@ int main( int argc, char* argv[] )
 // this should be palced in each main 
 #include "initialize_Control.hpp"
 
-	auto objCPDict = IOobject::make<dictionary>
+	auto objCPDict = IOobject::make<fileDictionary>
 	(
 		objectFile
 		(
@@ -92,11 +81,10 @@ int main( int argc, char* argv[] )
 			objectFile::READ_ALWAYS,
 			objectFile::WRITE_ALWAYS
 		),
-		"particlesDict",
-		true
+		"particlesDict"
 	);
 
-	auto& cpDict = objCPDict().getObject<dictionary>();
+	auto& cpDict = objCPDict().getObject<fileDictionary>();
 
 	pointStructure* pStructPtr = nullptr;
 
@@ -128,19 +116,19 @@ int main( int argc, char* argv[] )
 
 		pStructPtr = &pStruct;
 
-
 		REPORT(1)<< "Created pStruct with "<< pStruct.size() << " points and capacity "<<
 		pStruct.capacity()<<" . . ."<< END_REPORT;
 
-		REPORT(1)<< "Writing pStruct to " << Control.time().path()+ pointStructureFile__<< END_REPORT<<endl<<endl;
-
-		if( !Control.time().write())
+		//REPORT(1)<< "Writing pStruct to " << Control.time().path()+ pointStructureFile__<< END_REPORT<<endl<<endl;
+        
+		/*if( !Control.time().write())
 		{
 			fatalErrorInFunction<<
 			"ERRor in writing to file. \n ";
 			return 1; 
-		}
-	}else
+		}*/
+	}
+    else
 	{
 
 		auto& pStruct = Control.time().emplaceObject<pointStructure>
@@ -163,8 +151,8 @@ int main( int argc, char* argv[] )
 
 	if(!positionOnly)
 	{
-
-		auto& pStruct = *pStructPtr;
+        WARNING<< "setFields is not active "<<END_WARNING;
+	/*	auto& pStruct = *pStructPtr;
 
 		auto& sfDict = cpDict.subDict("setFields");
 
@@ -197,10 +185,16 @@ int main( int argc, char* argv[] )
 				return 1;
 			}
 			output<<endl;
-		}
+		}*/
 	}
 
-	Control.time().write(true);
+	
+    if( !Control.time().write(true))
+    {
+        fatalErrorInFunction<<
+        "ERRor in writing to file. \n ";
+        return 1; 
+    }
 	REPORT(0)<< Green_Text("\nFinished successfully.\n")<<END_REPORT;
 
 
diff --git a/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp b/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
index ecd4e670..7ad046f6 100755
--- a/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
+++ b/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
@@ -23,7 +23,7 @@ Licence:
 #include "cylinder.hpp"
 #include "sphere.hpp"
 #include "cells.hpp"
-#include "contactSearchFunctions.hpp"
+//#include "contactSearchFunctions.hpp"
 
 #include "streams.hpp"
 
@@ -32,20 +32,20 @@ pFlow::realx3Vector pFlow::positionParticles::sortByMortonCode(realx3Vector& pos
 {
 	struct indexMorton
 	{
-		size_t morton;
-		size_t index;
+		uint64 morton;
+		uint64 index;
 	};
 
-	realx3 minP = min(position);
+	/*realx3 minP = min(position);
 	realx3 maxP = max(position);
 	real cellsize = maxDiameter();
-	cells<size_t> allCells( box(minP, maxP), cellsize);
+	cells<uint64> allCells( box(minP, maxP), cellsize);
 
 	Vector<indexMorton> indMor(position.size(),RESERVE());
 
 	indMor.clear();
 
-	size_t ind=0;
+	uint64 ind=0;
 	for(const auto& p:position)
 	{
 		auto cellInd = allCells.pointIndex(p);
@@ -68,9 +68,10 @@ pFlow::realx3Vector pFlow::positionParticles::sortByMortonCode(realx3Vector& pos
 	for(auto& ind:indMor)
 	{
 		sortedPos.push_back( position[ind.index] );
-	}
+	}*/
 
-	return sortedPos;
+    WARNING<<"Morton sorting is inactive!"<<END_WARNING;
+	return position;
 }
 
 
@@ -80,7 +81,7 @@ pFlow::positionParticles::positionParticles
 	const dictionary& dict
 )
 {
-	maxNumberOfParticles_ = dict.getValOrSet("maxNumberOfParticles", static_cast<size_t>(10000));
+	maxNumberOfParticles_ = dict.getValOrSet("maxNumberOfParticles", static_cast<uint64>(10000));
 	
 	mortonSorting_ = dict.getValOrSet("mortonSorting", Logical("Yes"));
 
@@ -90,11 +91,13 @@ pFlow::positionParticles::positionParticles
 	}
 	else if(dict.containsDictionay("cylinder"))
 	{
-		region_ = makeUnique<region<cylinder>>(dict.subDict("cylinder"));
+        WARNING<<"cylinder region is not set!"<<END_WARNING;
+		//region_ = makeUnique<region<cylinder>>(dict.subDict("cylinder"));
 	}
 	else if(dict.containsDictionay("sphere"))
 	{
-		region_ = makeUnique<region<sphere>>(dict.subDict("sphere"));
+        WARNING<<"sphere region is not set!"<<END_WARNING;
+		//region_ = makeUnique<region<sphere>>(dict.subDict("sphere"));
 	}
 	else
 	{
@@ -112,7 +115,7 @@ pFlow::realx3Vector pFlow::positionParticles::getFinalPosition()
 	}
 	else
 	{
-		realx3Vector vec(position().capacity(), RESERVE());
+		realx3Vector vec("final position",position().capacity(), 0 , RESERVE());
 		vec.assign( position().begin(), position().end());
 		
 		return std::move(vec);
@@ -132,7 +135,7 @@ pFlow::uniquePtr<pFlow::positionParticles>
 
 	if( dictionaryvCtorSelector_.search(method) )
 	{
-		return dictionaryvCtorSelector_[method] (dict);
+		return dictionaryvCtorSelector_[method] (control, dict);
 	}
 	else
 	{

From 90a1ac8f16ee04663e06a2198af2044c0eb8ee6d Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Thu, 18 Jan 2024 04:51:06 -0800
Subject: [PATCH 19/60] refactor upto pointField read

---
 CMakeLists.txt                                |   3 +-
 src/phasicFlow/CMakeLists.txt                 |   1 +
 src/phasicFlow/Kokkos/KokkosUtilities.hpp     |  29 ++
 src/phasicFlow/Kokkos/Range.hpp               |   2 +-
 src/phasicFlow/Timer/Timer.cpp                |   2 +-
 src/phasicFlow/Timer/Timer.hpp                |   6 +-
 src/phasicFlow/containers/Field/Field.hpp     |  32 +-
 src/phasicFlow/containers/List/List/List.hpp  |   2 +-
 .../containers/List/ListPtr/ListPtr.hpp       |   2 +-
 src/phasicFlow/containers/Map/Map/Map.hpp     |   2 +-
 .../containers/Map/MapPtr/MapPtr.hpp          |   2 +-
 .../containers/Map/hashMap/hashMap.hpp        |   2 +-
 src/phasicFlow/containers/Vector/Vector.hpp   |  11 +-
 .../containers/VectorHD/VectorSingle.hpp      |  16 +-
 .../containers/pointField/boundaryField.cpp   |  34 +-
 .../containers/pointField/boundaryField.hpp   |  57 +++-
 .../pointField/boundaryFieldList.hpp          |  17 +-
 .../pointField/createBoundaryFields.hpp       |  36 ++
 .../pointField/exitBoundaryField.cpp          |  29 ++
 .../pointField/exitBoundaryField.hpp          |  81 +++++
 .../containers/pointField/internalField.cpp   |  86 +++++
 .../containers/pointField/internalField.hpp   | 135 ++++++++
 .../containers/pointField/pointField copy.hpp | 204 ++++++++++++
 .../containers/pointField/pointField.cpp      |  89 +++--
 .../containers/pointField/pointField.hpp      |  63 ++--
 .../containers/pointField/pointFields.cpp     |   8 +
 src/phasicFlow/containers/span/span.hpp       |   3 +-
 src/phasicFlow/demComponent/demComponent.hpp  |   4 +-
 src/phasicFlow/eventManagement/message.hpp    |  13 +-
 src/phasicFlow/eventManagement/observer.hpp   |   7 +-
 src/phasicFlow/eventManagement/subscriber.cpp |  16 +-
 src/phasicFlow/eventManagement/subscriber.hpp |   4 +-
 src/phasicFlow/ranges/intervalRange.hpp       |   2 +-
 src/phasicFlow/ranges/stridedRange.hpp        |  20 +-
 .../repository/IOobject/IOobject.hpp          |   5 +
 .../repository/Time/baseTimeControl.cpp       |  77 +++++
 .../repository/Time/baseTimeControl.hpp       |  52 +++
 .../systemControl/systemControl.cpp           |  12 +-
 .../systemControl/systemControl.hpp           |  10 +-
 .../boundaries/boundaryBase/boundaryBase.cpp  |  14 +-
 .../boundaries/boundaryBase/boundaryBase.hpp  |  41 ++-
 .../domain/regularSimulationDomain.cpp        |  22 +-
 .../domain/regularSimulationDomain.hpp        |  14 +-
 .../domain/simulationDomain.cpp               |  26 +-
 .../domain/simulationDomain.hpp               |  48 ++-
 .../pointStructure/boundaryList.cpp           |  80 ++++-
 .../pointStructure/boundaryList.hpp           |  39 ++-
 .../pointStructure/internalPoints.cpp         | 315 ++++++++++--------
 .../pointStructure/internalPoints.hpp         | 114 ++++---
 .../pointStructure/pointFlag.hpp              |  70 +++-
 .../pointStructure/pointFlagKernels.hpp       |  90 ++++-
 .../pointStructure/pointStructure.cpp         |  14 +-
 .../pointStructure/pointStructure.hpp         |   5 +
 src/phasicFlow/typeSelection/typeInfo.hpp     |  24 +-
 .../typeSelection/virtualConstructor.hpp      |   2 +-
 .../types/basicTypes/bTypesFunctions.cpp      |   9 +-
 .../types/basicTypes/bTypesFunctions.hpp      |   2 +
 57 files changed, 1644 insertions(+), 461 deletions(-)
 create mode 100644 src/phasicFlow/containers/pointField/createBoundaryFields.hpp
 create mode 100644 src/phasicFlow/containers/pointField/exitBoundaryField.cpp
 create mode 100644 src/phasicFlow/containers/pointField/exitBoundaryField.hpp
 create mode 100644 src/phasicFlow/containers/pointField/internalField.cpp
 create mode 100644 src/phasicFlow/containers/pointField/internalField.hpp
 create mode 100644 src/phasicFlow/containers/pointField/pointField copy.hpp
 create mode 100644 src/phasicFlow/repository/Time/baseTimeControl.cpp
 create mode 100644 src/phasicFlow/repository/Time/baseTimeControl.hpp

diff --git a/CMakeLists.txt b/CMakeLists.txt
index 3ce683a4..233e18aa 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -60,12 +60,11 @@ if(pFlow_Build_MPI)
 	find_package(MPI REQUIRED)
 endif()
 
-
 include(cmake/makeLibraryGlobals.cmake)
 include(cmake/makeExecutableGlobals.cmake)
 
 configure_file(phasicFlowConfig.H.in phasicFlowConfig.H)
-
+set(CMAKE_EXPORT_COMPILE_COMMANDS ON)
 #add a global include directory 
 include_directories(src/setHelpers src/demComponent "${PROJECT_BINARY_DIR}")
 
diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 65c91b59..5024be68 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -52,6 +52,7 @@ repository/IOobject/IOPattern.cpp
 repository/repository/repository.cpp
 repository/Time/Time.cpp
 repository/Time/timeControl.cpp
+repository/Time/baseTimeControl.cpp
 repository/systemControl/systemControl.cpp
 repository/systemControl/dynamicLinkLibs.cpp
 
diff --git a/src/phasicFlow/Kokkos/KokkosUtilities.hpp b/src/phasicFlow/Kokkos/KokkosUtilities.hpp
index 451920ab..b44a467d 100644
--- a/src/phasicFlow/Kokkos/KokkosUtilities.hpp
+++ b/src/phasicFlow/Kokkos/KokkosUtilities.hpp
@@ -178,6 +178,35 @@ iOstream& operator <<(iOstream& os, const Pair<T1,T2>& p)
 	return os;
 }
 
+template<typename T, typename... properties>
+INLINE_FUNCTION_H
+span<T> makeSpan(ViewType1D<T, properties...> & v)
+{
+	return span<T>(v.data(), v.size());
+}
+
+template<typename T, typename... properties>
+INLINE_FUNCTION_H
+span<T> makeSpan(ViewType1D<T, properties...> & v, uint32 size)
+{
+	return span<T>(v.data(), size);
+}
+
+template<typename T, typename... properties>
+INLINE_FUNCTION_H
+span<T> makeSpan(const ViewType1D<T, properties...> & v)
+{
+	return span<T>(const_cast<T*>(v.data()), v.size());
+}
+
+template<typename T, typename... properties>
+INLINE_FUNCTION_H
+span<T> makeSpan(const ViewType1D<T, properties...> & v, uint32 size)
+{
+	return span<T>(const_cast<T*>(v.data()), size);
+}
+
+
 template<typename T, typename... properties>
 INLINE_FUNCTION_H
 iOstream& operator <<(iOstream& os, const ViewType1D<T, properties...> & v)
diff --git a/src/phasicFlow/Kokkos/Range.hpp b/src/phasicFlow/Kokkos/Range.hpp
index 72ecd20b..a47e451c 100644
--- a/src/phasicFlow/Kokkos/Range.hpp
+++ b/src/phasicFlow/Kokkos/Range.hpp
@@ -46,7 +46,7 @@ public Kokkos::pair<T,T>
 {
 	using Pair = Kokkos::pair<T,T>;
 
-	TypeInfoTemplateNV("Range", T)
+	TypeInfoTemplateNV11("Range", T)
 
 	//// - Constructors
 
diff --git a/src/phasicFlow/Timer/Timer.cpp b/src/phasicFlow/Timer/Timer.cpp
index 9a4546e4..424addec 100644
--- a/src/phasicFlow/Timer/Timer.cpp
+++ b/src/phasicFlow/Timer/Timer.cpp
@@ -22,7 +22,7 @@ Licence:
 #include "Timers.hpp"
 #include "streams.hpp"
 
-pFlow::Timer::Timer(const word name, Timers* parrent)
+pFlow::Timer::Timer(const word& name, Timers* parrent)
 :
 	name_(name),
 	parrent_(parrent)
diff --git a/src/phasicFlow/Timer/Timer.hpp b/src/phasicFlow/Timer/Timer.hpp
index 4c731444..ac32ba35 100644
--- a/src/phasicFlow/Timer/Timer.hpp
+++ b/src/phasicFlow/Timer/Timer.hpp
@@ -63,15 +63,15 @@ public:
 
 	TypeInfo("Timer");
 
-	Timer(){}
+	Timer() = default;
 
-	Timer(const word name)
+	explicit Timer(const word& name)
 	:
 		name_(name)
 	{}
 
 	
-	Timer(const word name, Timers* parrent);
+	Timer(const word& name, Timers* parrent);
 	
 
 	const word& name()const
diff --git a/src/phasicFlow/containers/Field/Field.hpp b/src/phasicFlow/containers/Field/Field.hpp
index 113437f6..ae6d90da 100644
--- a/src/phasicFlow/containers/Field/Field.hpp
+++ b/src/phasicFlow/containers/Field/Field.hpp
@@ -74,7 +74,7 @@ protected:
 public:
 
 	/// type info
-	TypeInfoTemplateNV2("Field", T, VectorType::memoerySpaceName());
+	TypeInfoTemplateNV111("Field", T, VectorType::memoerySpaceName());
 
 	//// - Constructors
 
@@ -178,10 +178,15 @@ public:
 	//// - Methods
 
 		/// return field key
-		const word& fieldKey()const
+		word fieldKey()const
 		{
 			return fieldKey_;
 		}
+
+		word name()const
+		{
+			return VectorType::name();
+		}
 	
 	//// - IO operations 
 		/*bool readField(iIstream& is, const size_t len, bool resume, bool readLength = true);
@@ -196,28 +201,7 @@ public:
 		bool read(iIstream& is, const IOPattern& iop);
 		
 
-		bool write(iOstream& os, const IOPattern& iop )const;
-
-		template<typename HostMask>
-		bool write(
-			iOstream& os, 
-			const IOPattern& iop, 
-			const HostMask& mask)const
-		{
-			
-			os.writeWordKeyword(fieldKey_)<<endl;
-
-			if(!os.check(FUNCTION_NAME))return false;
-
-			if(!VectorType::write(os, iop)) return false;
-
-			os.endEntry();
-			if(!os.check(FUNCTION_NAME))return false;
-
-			return true;
-		}
-		
-			
+		bool write(iOstream& os, const IOPattern& iop )const;			
 
 };
 
diff --git a/src/phasicFlow/containers/List/List/List.hpp b/src/phasicFlow/containers/List/List/List.hpp
index a11d34fd..ca39e1e9 100644
--- a/src/phasicFlow/containers/List/List/List.hpp
+++ b/src/phasicFlow/containers/List/List/List.hpp
@@ -81,7 +81,7 @@ protected:
 public:
 
 	// - Type info
-	TypeInfoTemplateNV("List", T);
+	TypeInfoTemplateNV11("List", T);
 
 	//// - Constructors
 
diff --git a/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp b/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
index fe1f1850..649a77c0 100644
--- a/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
+++ b/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
@@ -77,7 +77,7 @@ protected:
 public:
 
 	// - Type info
-	TypeInfoTemplateNV("ListPtr", T);
+	TypeInfoTemplateNV11("ListPtr", T);
 	
 	//// - Contructors 
 
diff --git a/src/phasicFlow/containers/Map/Map/Map.hpp b/src/phasicFlow/containers/Map/Map/Map.hpp
index ffeef6b0..b417aa55 100644
--- a/src/phasicFlow/containers/Map/Map/Map.hpp
+++ b/src/phasicFlow/containers/Map/Map/Map.hpp
@@ -60,7 +60,7 @@ public:
 	using valueType 	= typename mapType::value_type;
 
 	// - type info 
-	TypeInfoTemplateNV("Map", Key);
+	TypeInfoTemplateNV11("Map", Key);
 
 	//// - Constructors
 
diff --git a/src/phasicFlow/containers/Map/MapPtr/MapPtr.hpp b/src/phasicFlow/containers/Map/MapPtr/MapPtr.hpp
index ad9dfed4..7bce67c7 100644
--- a/src/phasicFlow/containers/Map/MapPtr/MapPtr.hpp
+++ b/src/phasicFlow/containers/Map/MapPtr/MapPtr.hpp
@@ -84,7 +84,7 @@ protected:
 public:
 
 	// - type info
-	TypeInfoTemplateNV("MapPtr", Key);
+	TypeInfoTemplateNV11("MapPtr", Key);
 
 	//// Contructors 
 	
diff --git a/src/phasicFlow/containers/Map/hashMap/hashMap.hpp b/src/phasicFlow/containers/Map/hashMap/hashMap.hpp
index 676c7022..1761b552 100644
--- a/src/phasicFlow/containers/Map/hashMap/hashMap.hpp
+++ b/src/phasicFlow/containers/Map/hashMap/hashMap.hpp
@@ -60,7 +60,7 @@ public:
 	using valueType 	= typename hashmapType::value_type;
 
 	
-	TypeInfoTemplateNV("hashMap", Key);
+	TypeInfoTemplateNV11("hashMap", Key);
 
 	//// - Constructors
 
diff --git a/src/phasicFlow/containers/Vector/Vector.hpp b/src/phasicFlow/containers/Vector/Vector.hpp
index acdbee16..fa7cabb6 100644
--- a/src/phasicFlow/containers/Vector/Vector.hpp
+++ b/src/phasicFlow/containers/Vector/Vector.hpp
@@ -87,16 +87,13 @@ protected:
 
 	static constexpr bool  isHostAccessible_ = true;
 
-	constexpr static inline const char* memoerySpaceName()
-  	{
-  		return "std";
-  	}
+	
   	
 
 public:
 
 	// - Type info
-	TypeInfoTemplateNV2("Vector", T, memoerySpaceName());
+	TypeInfoTemplateNV111("Vector", T, memoerySpaceName());
 
 	//// - Constructors
 
@@ -372,6 +369,10 @@ public:
 		return writeVector(os, iop);
 	}
 
+	constexpr static inline const char* memoerySpaceName()
+  	{
+  		return "std";
+  	}
 };
 
 
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 52f3e103..1b34604b 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -101,14 +101,6 @@ protected:
 		static constexpr
 		bool isDeviceAccessible_ = isDeviceAccessible<execution_space>();
 
-
-		/// Name of the memory space
-	  	constexpr static inline 
-	  	const char* memoerySpaceName()
-	  	{
-	  		return memory_space::name();
-	  	}
-
 	  	/// Evaluate capacity based on the input size 
 		static INLINE_FUNCTION_H uint32 evalCapacity(uint32 n)
 		{
@@ -136,7 +128,7 @@ protected:
 public:
 
 	/// Type info
-	TypeInfoTemplateNV2("VectorSingle", T, memoerySpaceName());
+	TypeInfoTemplateNV111("VectorSingle", T, memoerySpaceName());
 
 	//// - Constructors
 
@@ -416,6 +408,12 @@ public:
 			return writeSpan(os, sp, iop);
 
 		}
+	/// Name of the memory space
+	constexpr static inline 
+	const char* memoerySpaceName()
+	{
+		return memory_space::name();
+	}
 
 }; // class VectorSingle
 
diff --git a/src/phasicFlow/containers/pointField/boundaryField.cpp b/src/phasicFlow/containers/pointField/boundaryField.cpp
index 21db4031..5ef89d88 100644
--- a/src/phasicFlow/containers/pointField/boundaryField.cpp
+++ b/src/phasicFlow/containers/pointField/boundaryField.cpp
@@ -21,8 +21,8 @@ Licence:
 template<template<class, class> class VectorField, class T, class MemorySpace>
 pFlow::boundaryField<VectorField, T, MemorySpace>::boundaryField
 (
-	const boundaryBase& boundary,
-	FieldType &internal
+	const boundaryBase& boundary, 
+	InternalFieldType& internal
 )
 :
 	observer(),
@@ -30,3 +30,33 @@ pFlow::boundaryField<VectorField, T, MemorySpace>::boundaryField
 	internal_(internal)
 {}
 
+
+template<template<class, class> class VectorField, class T, class MemorySpace>
+pFlow::uniquePtr<pFlow::boundaryField<VectorField, T, MemorySpace>>
+	pFlow::boundaryField<VectorField, T, MemorySpace>::create
+(
+	const boundaryBase& boundary, 
+	InternalFieldType& internal
+)
+{
+
+	word bType = angleBracketsNames("boundaryField", boundary.type());
+
+	if(boundaryBasevCtorSelector_.search(bType))
+	{
+		return boundaryBasevCtorSelector_[bType](boundary, internal);
+	}
+	else
+	{
+		printKeys
+		( 
+			fatalError << "Ctor Selector "<< bType << " dose not exist. \n"
+			<<"Avaiable ones are: \n\n"
+			,
+			boundaryBasevCtorSelector_
+		);
+		fatalExit;
+
+	}
+	return nullptr;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/boundaryField.hpp b/src/phasicFlow/containers/pointField/boundaryField.hpp
index fca7cd3f..eed029c9 100644
--- a/src/phasicFlow/containers/pointField/boundaryField.hpp
+++ b/src/phasicFlow/containers/pointField/boundaryField.hpp
@@ -22,7 +22,7 @@ Licence:
 
 #include "observer.hpp"
 #include "boundaryBase.hpp"
-#include "Field.hpp"
+#include "internalField.hpp"
 
 namespace pFlow
 {
@@ -33,19 +33,51 @@ class boundaryField
     public observer 
 {
 public:
-	using FieldType = Field<VectorField, T, MemorySpace>;
+	
+	using BoundaryFieldType = boundaryField<VectorField, T, MemorySpace>;
+
+	using InternalFieldType = internalField<VectorField, T, MemorySpace>;
+
+	using memory_space 		= typename InternalFieldType::memory_space;
+
+	using execution_space 	= typename InternalFieldType::execution_space;
+
 protected:
 
     const boundaryBase&     boundary_;
 
     /// @brief a ref to the internal field 
-    FieldType& internal_;
+    InternalFieldType& 			internal_;
 
 public:
 
-   boundaryField(const boundaryBase& boundary, FieldType& internal);
+	TypeInfo("boundaryField<none>");
 
-	bool update
+	boundaryField(
+		const boundaryBase& boundary, 
+		InternalFieldType& internal);
+	
+	create_vCtor
+	(
+		boundaryField,
+		boundaryBase,
+		(
+			const boundaryBase& boundary, 
+			InternalFieldType& internal
+		),
+		(boundary, internal)
+	);
+
+
+	add_vCtor
+	(
+		BoundaryFieldType,
+		BoundaryFieldType,
+		boundaryBase
+	);
+
+
+	bool hearChanges
 	(
 		const message& msg, 
     	const anyList& varList
@@ -55,6 +87,21 @@ public:
 		return false;
 	}
 
+	auto size()const
+	{
+		return boundary_.size();
+	}
+
+	auto capacity()const
+	{
+		return boundary_.capacity();
+	}
+
+	static
+	uniquePtr<boundaryField> create(
+		const boundaryBase& boundary, 
+		InternalFieldType& internal);
+
 };
 
 }
diff --git a/src/phasicFlow/containers/pointField/boundaryFieldList.hpp b/src/phasicFlow/containers/pointField/boundaryFieldList.hpp
index 29f3c786..c457d8ed 100644
--- a/src/phasicFlow/containers/pointField/boundaryFieldList.hpp
+++ b/src/phasicFlow/containers/pointField/boundaryFieldList.hpp
@@ -34,9 +34,10 @@ class boundaryFieldList
 {
 public:
 
-    using boundaryFieldType = boundaryField<VectorField, T, MemorySpace>;
+    using BoundaryFieldType = boundaryField<VectorField, T, MemorySpace>;
 
-    using FieldType = typename boundaryFieldType::FieldType;
+    using InternalFieldType = typename BoundaryFieldType::InternalFieldType;
+    
 
 protected:
 
@@ -44,9 +45,9 @@ protected:
 
 public:
 
-    boundaryFieldList(const boundaryList& boundaries, FieldType& internal)
+    boundaryFieldList(const boundaryList& boundaries, InternalFieldType& internal)
     :
-        ListPtr<boundaryFieldType>(boundaries.size()),
+        ListPtr<BoundaryFieldType>(boundaries.size()),
         boundaries_(boundaries)
     {
         for(auto i=0; i<boundaries.size(); i++)
@@ -54,17 +55,11 @@ public:
             this->set
             (
                 i, 
-                makeUnique<boundaryFieldType>
-                (
-                    boundaries_[i], 
-                    internal
-                )
+                BoundaryFieldType::create(boundaries_[i], internal)
             );
         }
     }
 
-
-
 };
 
 }
diff --git a/src/phasicFlow/containers/pointField/createBoundaryFields.hpp b/src/phasicFlow/containers/pointField/createBoundaryFields.hpp
new file mode 100644
index 00000000..5200c257
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/createBoundaryFields.hpp
@@ -0,0 +1,36 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __createBoundaryFields_hpp__
+#define __createBoundaryFields_hpp__
+
+#include "boundaryField.hpp"
+#include "exitBoundaryField.hpp"
+
+#define createBaseBoundary(VectorFieldType, DataType, MemorySpaceType)          \
+    template class pFlow::boundaryField<VectorFieldType, DataType, MemorySpaceType>;
+    
+
+#define createBoundary(VectorFieldType, DataType, MemorySpaceType, BoundaryType)    \
+    template class pFlow::BoundaryType##BoundaryField<VectorFieldType, DataType, MemorySpaceType>;
+
+
+#endif //__createBoundaryFields_hpp__
+    
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/exitBoundaryField.cpp b/src/phasicFlow/containers/pointField/exitBoundaryField.cpp
new file mode 100644
index 00000000..046a2bec
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/exitBoundaryField.cpp
@@ -0,0 +1,29 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+template<template<class, class> class VectorField, class T, class MemorySpace>
+    pFlow::exitBoundaryField<VectorField, T, MemorySpace>::exitBoundaryField
+(
+	const boundaryBase& boundary, 
+	InternalFieldType& internal
+)
+:
+    BoundaryFieldType(boundary, internal)
+{}
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/exitBoundaryField.hpp b/src/phasicFlow/containers/pointField/exitBoundaryField.hpp
new file mode 100644
index 00000000..104314c1
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/exitBoundaryField.hpp
@@ -0,0 +1,81 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __exitBoundaryField_hpp__
+#define __exitBoundaryField_hpp__
+
+#include "boundaryField.hpp"
+
+namespace pFlow
+{
+
+template< template<class, class> class VectorField, class T, class MemorySpace = void>
+class exitBoundaryField
+:
+    public boundaryField<VectorField, T, MemorySpace> 
+{
+public:
+	
+    using ExitBoundaryFieldType = exitBoundaryField<VectorField, T, MemorySpace>;
+
+	using BoundaryFieldType = boundaryField<VectorField, T, MemorySpace>;
+
+	using InternalFieldType = typename BoundaryFieldType::InternalFieldType;
+
+	using memory_space 		= typename BoundaryFieldType::memory_space;
+
+	using execution_space 	= typename BoundaryFieldType::execution_space;
+
+   
+
+public:
+
+	TypeInfo("boundaryField<exit>");
+
+	exitBoundaryField(
+		const boundaryBase& boundary, 
+		InternalFieldType& internal);
+	
+	
+
+	add_vCtor
+	(
+		BoundaryFieldType,
+		ExitBoundaryFieldType,
+		boundaryBase
+	);
+
+
+	bool hearChanges
+	(
+		const message& msg, 
+    	const anyList& varList
+	) override
+    {
+		notImplementedFunction;
+		return false;
+	}
+
+};
+
+}
+
+#include "exitBoundaryField.cpp"
+
+#endif
diff --git a/src/phasicFlow/containers/pointField/internalField.cpp b/src/phasicFlow/containers/pointField/internalField.cpp
new file mode 100644
index 00000000..6759e38e
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/internalField.cpp
@@ -0,0 +1,86 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+template<template<class, class> class VectorField, class T, class MemorySpace>
+pFlow::internalField<VectorField, T, MemorySpace>::internalField
+(
+	const word& name, 
+	const internalPoints& internal
+)
+:
+    observer
+    (
+		&internal, 
+		message::CAP_CHANGED+message::ITEM_INSERT+message::ITEM_REARRANGE+message::ITEM_DELETE
+    ),
+	field_
+	(
+		name,
+		"ineternalField",
+		internal.capacity(),
+		internal.size(),
+		RESERVE()
+	),
+	internalPoints_(internal)
+{}
+
+
+template<template<class, class> class VectorField, class T, class MemorySpace>
+pFlow::hostViewType1D<T> 
+	pFlow::internalField<VectorField, T, MemorySpace>::activeValuesHost()const
+{
+	auto maskH = internalPoints_.activePointsMaskHost();
+    auto fieldH = field_.hostVector();
+
+	hostViewType1D<T> aField("Active field", maskH.numActive());
+    auto aRange = maskH.activeRange();
+
+	uint32 n = 0;
+    for(auto i=aRange.start(); i<aRange.end(); i++)
+    {
+        if( maskH.isActive(i) )
+        {
+            aField[n] = fieldH[i];
+            n++;
+        }
+    }
+
+    return aField;
+}
+
+template<template<class, class> class VectorField, class T, class MemorySpace>
+bool pFlow::internalField<VectorField, T, MemorySpace>::write
+(
+	iOstream& os, 
+	const IOPattern& iop
+)const
+{
+	if( internalPoints_.isAllActive() )
+	{
+		return field_.write(os, iop);
+	}
+	else
+	{
+		auto aValues = activeValuesHost();
+		auto spanValues = makeSpan(aValues);
+		return writeSpan(os, spanValues, iop);
+	}
+}
+
diff --git a/src/phasicFlow/containers/pointField/internalField.hpp b/src/phasicFlow/containers/pointField/internalField.hpp
new file mode 100644
index 00000000..d8731fb8
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/internalField.hpp
@@ -0,0 +1,135 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __internalField_hpp__
+#define __internalField_hpp__
+
+#include "internalPoints.hpp"
+#include "Field.hpp"
+#include "observer.hpp"
+
+
+namespace pFlow
+{
+
+template<template<class, class> class VectorField, class T, class MemorySpace=void>
+class internalField
+:
+    public observer
+{
+
+public:
+
+	using FieldType         = Field<VectorField, T, MemorySpace>;
+  	
+	using VectorType  		= typename FieldType::VectorType;
+
+	using memory_space 		= typename FieldType::memory_space;
+
+	using execution_space 	= typename FieldType::execution_space;
+
+protected:
+
+    FieldType           	field_;
+
+    const internalPoints&   internalPoints_;
+
+public:
+
+	internalField(
+		const word& name, 
+		const internalPoints& internal);
+	
+
+	auto fieldDevice()const
+	{
+		return field_.deviceVector();
+	}
+
+	auto fieldHost()const
+	{
+		return field_.hostVector();
+	}
+
+	hostViewType1D<T> activeValuesHost()const;
+
+	inline
+	auto size()const
+	{
+		return field_.size();
+	}
+
+	inline
+	auto capacity()const
+	{
+		return field_.capacity();
+	}
+
+	inline 
+	word name()const
+	{
+		return field_.name();
+	}
+
+	inline 
+	word fieldKey()const
+	{
+		return field_.fieldKey();
+	}
+
+	inline
+	auto activeRange()const
+	{
+		return internalPoints_.activeRange();
+	}
+
+	inline
+	auto isAllActive()const
+	{
+		return internalPoints_.isAllActive();
+	}
+
+	//// - IO
+
+	bool write(iOstream& os, const IOPattern& iop)const;
+
+};
+
+/*template<template<class, class> class VectorField, class T, class MemorySpace>
+inline
+iOstream& operator<<
+(
+	iOstream& os, 
+	const internalField<VectorField, T, MemorySpace>& if
+)
+{
+	if( !if.write(os, IOPattern::AllProcessorsDifferent) )
+	{
+		ioErrorInFile(os.name(), os.lineNumber());
+		fatalExit;
+	}
+
+	return os;
+}*/
+
+} // pFlow
+
+#include "internalField.cpp"
+
+#endif // __internalField_hpp__
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/pointField copy.hpp b/src/phasicFlow/containers/pointField/pointField copy.hpp
new file mode 100644
index 00000000..791b5b32
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/pointField copy.hpp	
@@ -0,0 +1,204 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __internalField_hpp__
+#define __internalField_hpp__
+
+#include "pointStructure.hpp"
+#include "Field.hpp"
+#include "observer.hpp"
+
+
+namespace pFlow
+{
+
+template<template<class, class> class VectorField, class T, class MemorySpace=void>
+class internalField
+:
+	public observer,
+	public Field<VectorField, T, MemorySpace>
+{
+public:
+	
+	using pointFieldType 	= pointField<VectorField, T, MemorySpace>;
+	
+	using FieldType         = Field<VectorField, T, MemorySpace>;
+
+    using boundaryFieldListType = boundaryFieldList<VectorField, T, MemorySpace>;
+  	
+  	using VectorType  		= typename FieldType::VectorType;
+
+	using iterator        	= typename FieldType::iterator;
+
+  	using const_iterator   	= typename FieldType::const_iterator;
+
+	using reference       	= typename FieldType::reference;
+  	
+  	using const_reference  	= typename FieldType::const_reference;
+
+	using value_type       	= typename FieldType::value_type;
+  	
+  	using pointer         	= typename FieldType::pointer;
+  	
+  	using const_pointer    	= typename FieldType::const_pointer;
+
+protected:
+
+    //// - data members 
+
+        /// @brief list of boundaries
+        boundaryFieldListType       boundaryFieldList_;
+        
+		/// @brief  refrence to point structure 
+		const pointStructure&       pStruct_;
+
+		/// @brief value when a new item is added to field
+		T 	defaultValue_;
+
+
+public:
+ 
+	// - type info
+	TypeInfoTemplateNV2("pointField", T, VectorType::memoerySpaceName());
+
+	
+	//// - Constructors
+
+		// - construct a field from pointStructure and set defaultValue_ and field value to defVal
+		pointField(
+			const objectFile& objf, 
+            pointStructure& pStruct, 
+            const T& defVal);
+
+		// - construct from iIOEntity, pointStructure and a value
+		/*pointField( const pointStructure& pStruct, const T& val, const T& defVal, bool subscribe = true);
+
+		// - construct from another pointField
+		//   subscribe to events if true
+		pointField( const pointField& src, bool subscribe);
+
+
+		// - copy construct 
+		pointField(const pointField& src);
+
+		// - no move construct
+		pointField(pointField&& src) = delete;
+
+
+		// assignment, only assign the VectorField and preserve other parts of this 
+		pointField& operator = (const pointField& rhs);
+
+		// no move assignment 
+		pointField& operator = (pointField&&) = delete;		
+
+
+		inline uniquePtr<pointFieldType> clone() const
+		{
+			return makeUnique<pointFieldType>(*this);
+		}
+
+		inline pointFieldType* clonePtr()const
+		{
+			return new pointFieldType(*this);
+		}
+
+	//// - Methods
+
+		// - reference to pointStructure
+		inline const pointStructure& pStruct()const {
+			return pStruct_;
+		}
+
+		// if all points are active 
+		INLINE_FUNCTION_H
+		bool allActive()const {	
+			return pStruct_.allActive();
+		}
+		
+
+		INLINE_FUNCTION_H
+		bool isActive(label i)const {
+			return pStruct_.isActive(i);
+		}
+
+		const auto& pointFlag()const
+		{
+			return pStruct_.pointFlag();
+		}
+
+		range activeRange()const
+		{
+			return pStruct_.activeRange();
+		}
+
+		// - update the field if any changes occure in pStruct 
+		//   for now it checks for deleted points
+		bool update(const eventMessage& msg);
+
+
+	//// -  IO operations
+		bool readPointField(iIstream& is);
+
+		bool writePointField(iOstream& os)const;
+
+
+		bool read(iIstream& is)
+		{
+			return readPointField(is);
+		}
+
+		bool write(iOstream& os)const
+		{
+			return writePointField(os);
+		}*/
+};
+
+/*template<template<class, class> class VectorField, class T, class MemorySpace>
+iIstream& operator >> (iIstream & is, pointField<VectorField, T, MemorySpace> & pF )
+{
+	if( !pF.read(is))
+	{
+		ioErrorInFile( is.name(), is.lineNumber() ) <<
+		"error in reading pointField from file. \n";
+		fatalExit;
+	}
+
+	return is;
+}
+
+template<template<class, class> class VectorField, class T, class MemorySpace>
+iOstream& operator << (iOstream& os, const pointField<VectorField, T, MemorySpace>& pF )
+{
+	if(! pF.write(os) )
+	{
+		ioErrorInFile( os.name(), os.lineNumber() )<<
+		"error in writing pointField into file. \n";
+		fatalExit;
+	}
+
+	return os;
+}*/
+
+}
+
+#include "pointField.cpp"
+//#include "pointFieldAlgorithms.hpp"
+
+#endif //  __pointField_hpp__
diff --git a/src/phasicFlow/containers/pointField/pointField.cpp b/src/phasicFlow/containers/pointField/pointField.cpp
index a8a0c6ff..6696d856 100644
--- a/src/phasicFlow/containers/pointField/pointField.cpp
+++ b/src/phasicFlow/containers/pointField/pointField.cpp
@@ -21,34 +21,30 @@ Licence:
 template<template<class, class> class VectorField, class T, class MemorySpace>
 pFlow::pointField<VectorField, T, MemorySpace>::pointField
 (
-    const pointStructure& pStruct, 
-    const T& defVal, 
-    message msg
+    const objectFile& objf, 
+	pointStructure& pStruct, 
+	const T& defVal
 )
 :
+	IOobject
+	(
+		objf,
+		pStruct.ioPattern(),
+		pStruct.owner()
+	),
+	InternalFieldType
+	(
+		objf.name(),
+		pStruct
+	),
 	boundaryFieldList_(pStruct.boundaries(), *this),
 	pStruct_(pStruct),
 	defaultValue_(defVal)
-{}
-
-/*template<template<class, class> class VectorField, class T, class MemorySpace>
-bool pFlow::pointField<VectorField, T, MemorySpace>::readPointField
-(
-	iIstream& is
-)
 {
 	
-	return FieldType::readField(is, pStruct_.size(), false);
 }
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-bool pFlow::pointField<VectorField, T, MemorySpace>::writePointField
-(
-	iOstream& os
-)const
-{
-	return FieldType::write(os);
-}
+/*
 
 
 
@@ -144,3 +140,58 @@ bool pFlow::pointField<VectorField, T, MemorySpace>::update(const eventMessage&
 	return true;
 }*/
 
+
+template<template<class, class> class VectorField, class T, class MemorySpace>
+bool pFlow::pointField<VectorField, T, MemorySpace>::readPointField
+(
+	iIstream& is,
+	const IOPattern& iop
+)
+{
+	Field<Vector, T , vecAllocator<T>> 
+        fRead("file_read"+InternalFieldType::name(), InternalFieldType::fieldKey());   
+
+	if( !fRead.read(is, iop))
+	{
+		fatalErrorInFunction<<
+		"Error in reading pointPosition from stream "<< is.name()<<endl;
+		return false;
+	}
+
+	auto thisN = pStruct_.simDomain().initialNumberInThis();
+
+	Field<Vector, T , vecAllocator<T>> internal
+    (
+        "internalField"+InternalFieldType::name(), 
+        InternalFieldType::fieldKey(), 
+        thisN, 
+        thisN, 
+        RESERVE()
+    );
+
+	auto pSpan  = fRead.getSpan(); 
+    auto iSpan  = internal.getSpan();
+    
+    if(!pStruct_.simDomain().initialTransferBlockData(pSpan, iSpan))
+    {
+        fatalErrorInFunction<<
+        "Error in transfering the block data for field "<<
+		InternalFieldType::name()<<endl;
+        return false;
+    }
+
+	this->field_.assign(internal);
+
+	return true;
+}
+
+template<template<class, class> class VectorField, class T, class MemorySpace>
+bool pFlow::pointField<VectorField, T, MemorySpace>::writePointField
+(
+	iOstream& os,
+	const IOPattern& iop
+)const
+{
+	notImplementedFunction;
+	return false;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/pointField.hpp b/src/phasicFlow/containers/pointField/pointField.hpp
index 9dcace79..083f8242 100644
--- a/src/phasicFlow/containers/pointField/pointField.hpp
+++ b/src/phasicFlow/containers/pointField/pointField.hpp
@@ -21,10 +21,10 @@ Licence:
 #ifndef __pointField_hpp__
 #define __pointField_hpp__
 
-#include "boundaryFieldList.hpp"
+
 #include "pointStructure.hpp"
-#include "Field.hpp"
-#include "observer.hpp"
+#include "internalField.hpp"
+#include "boundaryFieldList.hpp"
 
 namespace pFlow
 {
@@ -32,32 +32,24 @@ namespace pFlow
 template<template<class, class> class VectorField, class T, class MemorySpace=void>
 class pointField
 :
-	public observer,
-	public Field<VectorField, T, MemorySpace>
+	public IOobject,
+	public internalField<VectorField, T, MemorySpace>
 {
 public:
 	
-	using pointFieldType 	= pointField<VectorField, T, MemorySpace>;
-	
-	using FieldType         = Field<VectorField, T, MemorySpace>;
+	using PointFieldType 	= pointField<VectorField, T, MemorySpace>;
+
+	using InternalFieldType = internalField<VectorField, T, MemorySpace>;
+
+	using FieldType 		= typename InternalFieldType::FieldType;
 
     using boundaryFieldListType = boundaryFieldList<VectorField, T, MemorySpace>;
-  	
-  	using VectorType  		= typename FieldType::VectorType;
 
-	using iterator        	= typename FieldType::iterator;
+	using VectorType  		= typename InternalFieldType::VectorType;
 
-  	using const_iterator   	= typename FieldType::const_iterator;
+	using memory_space 		= typename InternalFieldType::memory_space;
 
-	using reference       	= typename FieldType::reference;
-  	
-  	using const_reference  	= typename FieldType::const_reference;
-
-	using value_type       	= typename FieldType::value_type;
-  	
-  	using pointer         	= typename FieldType::pointer;
-  	
-  	using const_pointer    	= typename FieldType::const_pointer;
+	using execution_space 	= typename InternalFieldType::execution_space;
 
 protected:
 
@@ -74,18 +66,19 @@ protected:
 
 
 public:
- 
+	
+	
 	// - type info
-	TypeInfoTemplateNV2("pointField", T, VectorType::memoerySpaceName());
+	TypeInfoTemplate111("pointField", T, VectorType::memoerySpaceName());
 
 	
 	//// - Constructors
 
 		// - construct a field from pointStructure and set defaultValue_ and field value to defVal
-		pointField( 
-            const pointStructure& pStruct, 
-            const T& defVal, 
-            message msg);
+		pointField(
+			const objectFile& objf, 
+            pointStructure& pStruct, 
+            const T& defVal);
 
 		// - construct from iIOEntity, pointStructure and a value
 		/*pointField( const pointStructure& pStruct, const T& val, const T& defVal, bool subscribe = true);
@@ -150,24 +143,24 @@ public:
 
 		// - update the field if any changes occure in pStruct 
 		//   for now it checks for deleted points
-		bool update(const eventMessage& msg);
+		bool update(const eventMessage& msg);*/
 
 
 	//// -  IO operations
-		bool readPointField(iIstream& is);
+		bool readPointField(iIstream& is, const IOPattern& iop);
 
-		bool writePointField(iOstream& os)const;
+		bool writePointField(iOstream& os, const IOPattern& iop)const;
 
 
-		bool read(iIstream& is)
+		bool read(iIstream& is, const IOPattern& iop)override
 		{
-			return readPointField(is);
+			return readPointField(is, iop);
 		}
 
-		bool write(iOstream& os)const
+		bool write(iOstream& os, const IOPattern& iop)const override
 		{
-			return writePointField(os);
-		}*/
+			return writePointField(os, iop);
+		}
 };
 
 /*template<template<class, class> class VectorField, class T, class MemorySpace>
diff --git a/src/phasicFlow/containers/pointField/pointFields.cpp b/src/phasicFlow/containers/pointField/pointFields.cpp
index e503dd41..6ef70444 100644
--- a/src/phasicFlow/containers/pointField/pointFields.cpp
+++ b/src/phasicFlow/containers/pointField/pointFields.cpp
@@ -20,9 +20,17 @@ Licence:
 
 
 #include "pointFields.hpp"
+#include "createBoundaryFields.hpp"
 
 
 template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8>; 
+createBaseBoundary(pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace);
+createBoundary(pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace, exit);
+
+template class pFlow::pointField<pFlow::VectorSingle, pFlow::real>; 
+createBaseBoundary(pFlow::VectorSingle, pFlow::real, pFlow::HostSpace);
+createBoundary(pFlow::VectorSingle, pFlow::real, pFlow::HostSpace, exit);
+
 
 /*template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace>; 
 
diff --git a/src/phasicFlow/containers/span/span.hpp b/src/phasicFlow/containers/span/span.hpp
index fc625d86..c9ee5093 100644
--- a/src/phasicFlow/containers/span/span.hpp
+++ b/src/phasicFlow/containers/span/span.hpp
@@ -55,7 +55,7 @@ protected:
 
 public:
     
-    TypeInfoTemplateNV("span", T);
+    TypeInfoTemplateNV11("span", T);
 
     /// Constructor
     INLINE_FUNCTION_HD
@@ -229,7 +229,6 @@ span<const char> charSpan(span<const T> s)
 
 
 
-
 } // pFlow
 
 #endif //__span_hpp__
diff --git a/src/phasicFlow/demComponent/demComponent.hpp b/src/phasicFlow/demComponent/demComponent.hpp
index fb229ae9..35d6dc67 100644
--- a/src/phasicFlow/demComponent/demComponent.hpp
+++ b/src/phasicFlow/demComponent/demComponent.hpp
@@ -134,7 +134,7 @@ public:
 		virtual
 		bool beforeTimeLoop()
 		{
-			notImplementedFunction;
+			notImplementedFunction
 			return false;
 		}
 
@@ -155,7 +155,7 @@ public:
 		virtual
 		bool afterTimeLoop()
 		{
-			notImplementedFunction;
+			notImplementedFunction
 			return false;
 		}
 
diff --git a/src/phasicFlow/eventManagement/message.hpp b/src/phasicFlow/eventManagement/message.hpp
index bf2d2f9a..05a9de37 100644
--- a/src/phasicFlow/eventManagement/message.hpp
+++ b/src/phasicFlow/eventManagement/message.hpp
@@ -45,7 +45,9 @@ public:
 
 protected:
 
-	std::bitset<16> events_{0x0000};
+	static constexpr size_t numberOfEvents_ = 8;
+
+	std::bitset<numberOfEvents_> events_{0x0000};
 	
 
 public:
@@ -59,7 +61,7 @@ public:
 
 	message(size_t i )
 	{
-		if(i<16)
+		if(i<numberOfEvents_)
 		{
 			events_.set(i);
 		}
@@ -118,7 +120,12 @@ public:
 	{
 		return remove(evnt);
 	}
-
+	
+	static
+	auto constexpr numEvents()
+	{
+		return numberOfEvents_;
+	}
 	static 
 	message Default()
 	{
diff --git a/src/phasicFlow/eventManagement/observer.hpp b/src/phasicFlow/eventManagement/observer.hpp
index c5433f3b..7990cd32 100644
--- a/src/phasicFlow/eventManagement/observer.hpp
+++ b/src/phasicFlow/eventManagement/observer.hpp
@@ -66,8 +66,13 @@ public:
 		subscriber_ = nullptr;
 	}
 
+	static
+	constexpr auto numEvents()
+	{
+		return message::numEvents();
+	} 
 
-	virtual bool update(const message& msg, const anyList& varList)=0;
+	virtual bool hearChanges(const message& msg, const anyList& varList)=0;
 };
 
 } // pFlow
diff --git a/src/phasicFlow/eventManagement/subscriber.cpp b/src/phasicFlow/eventManagement/subscriber.cpp
index 9cb2dfcc..ea8319ee 100644
--- a/src/phasicFlow/eventManagement/subscriber.cpp
+++ b/src/phasicFlow/eventManagement/subscriber.cpp
@@ -45,12 +45,6 @@ bool pFlow::subscriber::subscribe
 	observer* 	obsevr
 )const
 {
-	if( msg.size()>16 )
-	{
-		fatalErrorInFunction<<
-		"message size is greater than 16!"<<endl;
-		return false;
-	}
 	// do not subscribe nullptr 
 	if(!obsevr)return false;
 
@@ -92,20 +86,14 @@ bool pFlow::subscriber::notify
 	const anyList& varList
 )
 {
-	if( msg.size()>16 )
-	{
-		fatalErrorInFunction<<
-		"message size is greater than 16!"<<endl;
-		return false;
-	}
-
+	
 	for(size_t i=0; i<msg.size(); i++)
 	{
 		if(msg.equivalentTo(i))
 		{
 			for( auto obsvr: observerList_[i] )
 			{
-				obsvr->update(message(i), varList);
+				obsvr->hearChanges(message(i), varList);
 			}
 		}
 	}
diff --git a/src/phasicFlow/eventManagement/subscriber.hpp b/src/phasicFlow/eventManagement/subscriber.hpp
index 48090597..23570485 100644
--- a/src/phasicFlow/eventManagement/subscriber.hpp
+++ b/src/phasicFlow/eventManagement/subscriber.hpp
@@ -25,12 +25,12 @@ Licence:
 #include <array>
 
 #include "List.hpp"
+#include "message.hpp"
 
 namespace pFlow
 {
 
 class observer;
-class message;
 class anyList;
 
 class subscriber
@@ -38,7 +38,7 @@ class subscriber
 protected:
 
 	// - list of subsribed objectd that recieve updage messages 
-	mutable std::array<List<observer*>,16> observerList_;
+	mutable std::array<List<observer*>,message::numEvents()> observerList_;
 
 	word subName_;
 
diff --git a/src/phasicFlow/ranges/intervalRange.hpp b/src/phasicFlow/ranges/intervalRange.hpp
index ca40826f..0108713d 100644
--- a/src/phasicFlow/ranges/intervalRange.hpp
+++ b/src/phasicFlow/ranges/intervalRange.hpp
@@ -43,7 +43,7 @@ protected:
 	static inline const T minVal = largestNegative<T>();
 public:
 
-	TypeInfoTemplateNV("intervalRange",T);
+	TypeInfoTemplateNV11("intervalRange",T);
 
 	intervalRange(T begin, T end)
 	:
diff --git a/src/phasicFlow/ranges/stridedRange.hpp b/src/phasicFlow/ranges/stridedRange.hpp
index ca1cf7ba..0f7eb10f 100644
--- a/src/phasicFlow/ranges/stridedRange.hpp
+++ b/src/phasicFlow/ranges/stridedRange.hpp
@@ -35,18 +35,20 @@ stridedRange
 {
 protected:
 
-	T 		begin_;
+	T 		begin_ = 0;
 
-	T 		end_;
+	T 		end_ = 1;
 
-	T 		stride_;
+	T 		stride_ = 1;
 
 	static inline const T maxVal = largestPositive<T>();
 	static inline const T minVal = largestNegative<T>();
 
 public:
 
-	TypeInfoTemplateNV("stridedRange",T);
+	TypeInfoTemplateNV11("stridedRange",T);
+
+	stridedRange()=default;
 
 	stridedRange(T begin, T end, T stride)
 	:
@@ -96,12 +98,20 @@ public:
 	{
 		return stride_;
 	}
+	
+	inline
+	bool isInRange(T val)const
+	{
+		return val>= begin_ && val<= end_;
+	}
+
 	inline
 	bool isMember(T val, T epsilon = 0)const
 	{
+		if(!isInRange(val)) return false;
+		if(abs(mod(val-begin_,stride_))<= epsilon) return true;
 		if(equal(val,begin_))return true;
 		if(equal(val,end_))return true;
-		if(abs(mod(val-begin_,stride_))<= epsilon) return true;
 		return false;
 	}
 
diff --git a/src/phasicFlow/repository/IOobject/IOobject.hpp b/src/phasicFlow/repository/IOobject/IOobject.hpp
index 7e947192..71acbc50 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.hpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.hpp
@@ -78,6 +78,11 @@ public:
             return owner_;
         }
 
+        repository* owner()
+        {
+            return owner_;
+        }
+
         repository* releaseOwner(bool fromOwner = false);
 
 	//// - IO operations 
diff --git a/src/phasicFlow/repository/Time/baseTimeControl.cpp b/src/phasicFlow/repository/Time/baseTimeControl.cpp
new file mode 100644
index 00000000..642af864
--- /dev/null
+++ b/src/phasicFlow/repository/Time/baseTimeControl.cpp
@@ -0,0 +1,77 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "baseTimeControl.hpp"
+
+
+
+pFlow::baseTimeControl::baseTimeControl
+(
+    const dictionary &dict,
+    const word& intervalPrefix
+)
+{
+	auto tControl = dict.getVal<word>("timeControl");
+	if(tControl == "timeStep")
+		isTimeStep_ = true;
+	else if( tControl == "runTime" || 
+			 tControl == "simulationTime")
+		isTimeStep_ = false;
+	else
+	{
+		fatalErrorInFunction<<
+		"bad input for intervalControl in dictionary "<< dict.globalName()<<endl<<
+		"valid inputs are "<< 
+		wordList({"timeStep", "runTime", "simulationTime"})<<endl;
+		fatalExit;
+	}
+
+	word intervalWord = intervalPrefix.size()==0? word("interval"): intervalPrefix+"Interval";
+
+	if(isTimeStep_)
+	{
+		auto startTime = (dict.getValOrSet<real>("startTime", 0.0));
+    	auto endTime = (dict.getValOrSet<real>("endTime", largeValue));
+		auto interval = dict.getVal<real>(intervalWord);
+		rRange_ = realStridedRange(startTime, endTime, interval);
+
+	}
+	else
+	{
+		auto startTime = (dict.getValOrSet<int32>("startTime", 0.0));
+    	auto endTime = (dict.getValOrSet<int32>("endTime", largestPosInt32));
+		auto interval = dict.getVal<int32>(intervalWord);
+		iRange_ = int32StridedRagne(startTime, endTime, interval);
+	}
+    
+}
+
+bool pFlow::baseTimeControl::timeEvent(uint32 iter, real t, real dt) const
+{
+	if(isTimeStep_)
+	{	
+		return iRange_.isMember(iter);
+	}
+	else
+	{
+		return rRange_.isMember(t, 0.51*dt);
+	}
+    return false;
+}
diff --git a/src/phasicFlow/repository/Time/baseTimeControl.hpp b/src/phasicFlow/repository/Time/baseTimeControl.hpp
new file mode 100644
index 00000000..f82fda5f
--- /dev/null
+++ b/src/phasicFlow/repository/Time/baseTimeControl.hpp
@@ -0,0 +1,52 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __baseTimeControl_hpp__
+#define __baseTimeControl_hpp__
+
+#include "dictionary.hpp"
+#include "ranges.hpp"
+
+
+namespace pFlow
+{
+
+class baseTimeControl
+{
+private:
+   
+    bool 	isTimeStep_;
+
+	int32StridedRagne iRange_;
+
+	realStridedRange  rRange_;
+	
+
+public:
+
+	baseTimeControl(const dictionary& dict, const word& intervalPrefix = "");
+
+
+	bool timeEvent(uint32 iter, real t, real dt)const;
+
+};
+
+}
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/repository/systemControl/systemControl.cpp b/src/phasicFlow/repository/systemControl/systemControl.cpp
index f57fd453..77a7b684 100644
--- a/src/phasicFlow/repository/systemControl/systemControl.cpp
+++ b/src/phasicFlow/repository/systemControl/systemControl.cpp
@@ -25,7 +25,7 @@ Licence:
 #include "systemControl.hpp"
 #include "vocabs.hpp"
 
-bool pFlow::systemControl::readDomainDict()
+/*bool pFlow::systemControl::readDomainDict()
 {
     if(!domainDict_)
     {
@@ -42,7 +42,7 @@ bool pFlow::systemControl::readDomainDict()
         );
     }
     return true;
-}
+}*/
 
 pFlow::word pFlow::systemControl::getRunName
 (
@@ -176,7 +176,7 @@ pFlow::systemControl::systemControl
 	),
 	writeToFileTimer_("Write to file", &timers_)	
 {
-    readDomainDict();
+    //readDomainDict();
 }
 
 pFlow::systemControl::systemControl(
@@ -250,13 +250,13 @@ pFlow::systemControl::systemControl(
 	),
 	writeToFileTimer_("Write to file", &timers_)	
 {
-    readDomainDict();
+    //readDomainDict();
 }
 
-pFlow::fileDictionary& pFlow::systemControl::domainDict()
+/*pFlow::fileDictionary& pFlow::systemControl::domainDict()
 {
     return domainDict_();
-}
+}*/
 
 bool pFlow::systemControl::operator ++(int)
 {
diff --git a/src/phasicFlow/repository/systemControl/systemControl.hpp b/src/phasicFlow/repository/systemControl/systemControl.hpp
index f48c9db7..3cf1317c 100644
--- a/src/phasicFlow/repository/systemControl/systemControl.hpp
+++ b/src/phasicFlow/repository/systemControl/systemControl.hpp
@@ -62,8 +62,6 @@ protected:
 	/// caseSetup folder repository
 	uniquePtr<repository>       caseSetup_;
 
-    uniquePtr<fileDictionary>   domainDict_ = nullptr;
-
 	/// extra libs to be loaded
 	dynamicLinkLibs 	        libs_;
 	
@@ -81,7 +79,7 @@ protected:
 
 	Timer 			writeToFileTimer_;
 
-    bool readDomainDict();
+    //bool readDomainDict();
 
 	static word getRunName( const fileSystem& path);
 	
@@ -159,7 +157,7 @@ public:
 		return settingsDict_();
 	}
 
-	fileDictionary& domainDict();
+	//fileDictionary& domainDict();
 	
 
 	virtual word runName() const
@@ -172,10 +170,10 @@ public:
 		return settingsDict_().getVal<realx3>("g");
 	}
 
-	inline box domain()
+	/*inline box domain()
 	{
 		return box(domainDict().subDict("globalBox"));
-	}
+	}*/
 
 	bool operator ++(int);
 
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
index 5f0923a2..10decdd5 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
@@ -60,8 +60,18 @@ pFlow::boundaryBase::boundaryBase
 
 }
 
-typename pFlow::boundaryBase::pointFieldAccessType 
-    pFlow::boundaryBase::thisPoints()
+void pFlow::boundaryBase::setSize(uint32 newSize)
+{
+	indexList_.resize(newSize);
+
+	if( indexList_.capacity() <= newSize+1 )
+	{
+		indexList_.reserve(newSize+1);
+	}
+}	
+
+typename pFlow::boundaryBase::pointFieldAccessType
+pFlow::boundaryBase::thisPoints()
 {
     
     return pointFieldAccessType
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
index ed242180..db537d1d 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
@@ -46,10 +46,6 @@ public:
     using pointFieldAccessType = 
         scatterFieldAccess<realx3,DefaultExecutionSpace>;
 
-	enum DIRECTION: int8
-	{
-		
-	};
 
 protected:
 
@@ -110,6 +106,37 @@ public:
 		(dict, bplane, internal)
 	);
 
+	inline 
+	auto neighborLength()const
+	{
+		return neighborLength_;
+	}
+
+
+	const word& type()const
+	{
+		return type_;
+	}
+
+	const word& name()const
+	{
+		return name_;
+	}
+
+	auto size()const
+	{
+		return indexList_.size();
+	}
+
+	auto capacity()const
+	{
+		return indexList_.capacity();
+	}
+
+	/// @brief set the size of indexList 
+	/// Always make sure that size+1 <= capacity
+	void setSize(uint32 newSize);
+
 	virtual 
     bool beforeIteratoin(uint32 iterNum, real t) = 0 ;
 
@@ -119,6 +146,12 @@ public:
 	virtual 
     bool afterIteration(uint32 iterNum, real t) = 0;
 
+	
+	const auto& indexList()const
+	{
+		return indexList_;
+	}
+
     pointFieldAccessType thisPoints();
 
     virtual
diff --git a/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp b/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
index 999f6b0e..5cc3c6fb 100644
--- a/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
+++ b/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
@@ -6,10 +6,10 @@
 
 bool pFlow::regularSimulationDomain::createBoundaryDicts()
 {
-    auto& boundaries = globalDomainDict_.subDict("boundaries");
+    auto& boundaries = this->subDict("boundaries");
     
-    globalDomainDict_.addDict("regularSimulationDomainBoundaries", boundaries);
-    auto& rbBoundaries = globalDomainDict_.subDict("regularSimulationDomainBoundaries");
+    this->addDict("regularSimulationDomainBoundaries", boundaries);
+    auto& rbBoundaries = this->subDict("regularSimulationDomainBoundaries");
     
 	real neighborLength = boundaries.getVal<real>("neighborLength");
 
@@ -52,10 +52,10 @@ bool pFlow::regularSimulationDomain::setThisDomain()
 
 pFlow::regularSimulationDomain::regularSimulationDomain
 (
-    const dictionary &dict
+    systemControl& control
 )
 :
-    simulationDomain(dict)
+    simulationDomain(control)
 {}
 
 bool pFlow::regularSimulationDomain::initialUpdateDomains(span<realx3> pointPos)
@@ -93,7 +93,7 @@ bool pFlow::regularSimulationDomain::initialTransferBlockData
 	span<char> src, 
 	span<char> dst,
 	size_t sizeOfElement
-)
+) const
 {
 	size_t requiredSize = sizeOfElement*initialNumberInThis();
 	if(dst.size() < requiredSize)
@@ -122,7 +122,7 @@ bool pFlow::regularSimulationDomain::initialTransferBlockData
 (
     span<realx3> src, 
     span<realx3> dst
-)
+) const
 {
     return initialTransferBlockData(
         charSpan(src), 
@@ -134,7 +134,7 @@ bool pFlow::regularSimulationDomain::initialTransferBlockData
 (
     span<real> src, 
     span<real> dst
-)
+) const
 {
     return initialTransferBlockData(
         charSpan(src), 
@@ -146,7 +146,7 @@ bool pFlow::regularSimulationDomain::initialTransferBlockData
 (
     span<uint32> src, 
     span<uint32> dst
-)
+) const
 {
     return initialTransferBlockData(
         charSpan(src), 
@@ -158,7 +158,7 @@ bool pFlow::regularSimulationDomain::initialTransferBlockData
 (
     span<int32> src, 
     span<int32> dst
-)
+) const
 {
     return initialTransferBlockData(
         charSpan(src), 
@@ -168,7 +168,7 @@ bool pFlow::regularSimulationDomain::initialTransferBlockData
 
 const pFlow::dictionary &pFlow::regularSimulationDomain::thisBoundaryDict() const
 {
-    return globalDomainDict_.subDict("regularSimulationDomainBoundaries");
+    return this->subDict("regularSimulationDomainBoundaries");
 }
 
 bool pFlow::regularSimulationDomain::requiresDataTransfer()const
diff --git a/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp b/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
index 074ffc64..86fdf02e 100644
--- a/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
+++ b/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
@@ -23,7 +23,7 @@ public:
 
 	TypeInfo("simulationDomain<regular>");
 
-	regularSimulationDomain(const dictionary& dict);
+	regularSimulationDomain(systemControl& control);
 
 	virtual
 	~regularSimulationDomain()=default;
@@ -32,7 +32,7 @@ public:
 	(
 		simulationDomain,
 		regularSimulationDomain,
-		dictionary
+		systemControl
 	);
 
     bool initialUpdateDomains(span<realx3> pointPos) override;
@@ -50,7 +50,7 @@ public:
 	bool initialTransferBlockData(
 		span<char> src, 
 		span<char> dst,
-		size_t sizeOfElement) override;
+		size_t sizeOfElement) const override;
 
 
     /// @brief 
@@ -59,19 +59,19 @@ public:
     /// @return 
     bool initialTransferBlockData(
         span<realx3> src,
-        span<realx3> dst) override;
+        span<realx3> dst) const override;
 
     bool initialTransferBlockData(
         span<real> src,
-        span<real> dst) override;
+        span<real> dst) const override;
 
     bool initialTransferBlockData(
         span<uint32> src,
-        span<uint32> dst) override;
+        span<uint32> dst) const override;
 
     bool initialTransferBlockData(
         span<int32> src,
-        span<int32> dst) override;
+        span<int32> dst) const override;
     
 	
 	const dictionary& thisBoundaryDict()const override;
diff --git a/src/phasicFlow/structuredData/domain/simulationDomain.cpp b/src/phasicFlow/structuredData/domain/simulationDomain.cpp
index b45758b5..232706c8 100644
--- a/src/phasicFlow/structuredData/domain/simulationDomain.cpp
+++ b/src/phasicFlow/structuredData/domain/simulationDomain.cpp
@@ -20,26 +20,38 @@ Licence:
 
 #include "simulationDomain.hpp"
 #include "pFlowProcessors.hpp"
+#include "systemControl.hpp"
+#include "vocabs.hpp"
 
-pFlow::simulationDomain::simulationDomain(const dictionary& dict)
+pFlow::simulationDomain::simulationDomain(systemControl& control)
 :
-    globalBox_(dict.subDict("globalBox")),
-    globalDomainDict_(dict)
+	fileDictionary
+	(
+		objectFile
+		(
+			domainFile__,
+			"",
+			objectFile::READ_ALWAYS,
+			objectFile::WRITE_NEVER
+		),
+		&control.settings()
+	),
+    globalBox_(subDict("globalBox"))
 {
     
 }
 
 pFlow::uniquePtr<pFlow::simulationDomain> 
-    pFlow::simulationDomain::create(const dictionary &dict)
+    pFlow::simulationDomain::create(systemControl& control)
 {
 	word sType = angleBracketsNames(
         "simulationDomain", 
         pFlowProcessors().localRunTypeName());
 
 
-	if( dictionaryvCtorSelector_.search(sType) )
+	if( systemControlvCtorSelector_.search(sType) )
 	{
-		return dictionaryvCtorSelector_[sType] (dict);
+		return systemControlvCtorSelector_[sType] (control);
 	}
 	else
 	{
@@ -48,7 +60,7 @@ pFlow::uniquePtr<pFlow::simulationDomain>
 			fatalError << "Ctor Selector "<< sType << " dose not exist. \n"
 			<<"Avaiable ones are: \n\n"
 			,
-			dictionaryvCtorSelector_
+			systemControlvCtorSelector_
 		);
 		fatalExit;
 	}
diff --git a/src/phasicFlow/structuredData/domain/simulationDomain.hpp b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
index 205762ba..10307887 100644
--- a/src/phasicFlow/structuredData/domain/simulationDomain.hpp
+++ b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
@@ -23,6 +23,7 @@ Licence:
 #include <array>
 
 #include "domain.hpp"
+#include "fileDictionary.hpp"
 #include "span.hpp"
 #include "streams.hpp"
 #include "virtualConstructor.hpp"
@@ -31,9 +32,12 @@ Licence:
 namespace pFlow
 {
 
+class systemControl;
 //class pFlagTypeHost;
 
 class simulationDomain
+:
+	public fileDictionary
 {
 private:
 
@@ -43,20 +47,20 @@ static
 inline const std::array<word,6>  boundaryNames_ = 
 {
 	"left", "right", 
-	"top", "bottom",
+	"bottom", "top",
 	"rear", "front"
 };
 
 protected:	
 
+	//fileDictionary 	globalDomainDict_ ;
+
 	/// @brief acutal limits of the simulation domain
 	box 			globalBox_;
 
 	/// @brief the actual limits of this processor domain 
 	domain 			thisDomain_;
 
-	dictionary 		globalDomainDict_ ;
-
 	bool 			boundariesSet_ = false;
 	
 	virtual bool    createBoundaryDicts() = 0;
@@ -69,7 +73,7 @@ public:
 	TypeInfo("simulationDomain");
 
 	/// Constrcut from components 
-	simulationDomain(const dictionary& dict);
+	simulationDomain(systemControl& control);
 	
 	/// Destructor 
 	virtual 
@@ -79,9 +83,9 @@ public:
 	create_vCtor
 	(
 		simulationDomain,
-		dictionary,
-		(const dictionary& dict),
-		(dict)	
+		systemControl,
+		(systemControl& control),
+		(control)	
 	);
 
 	virtual 
@@ -97,33 +101,33 @@ public:
 	bool initialTransferBlockData(
 		span<char> src, 
 		span<char> dst,
-		size_t sizeOfElement) = 0;
+		size_t sizeOfElement) const = 0;
     
     virtual 
     bool initialTransferBlockData(
         span<realx3> src,
-        span<realx3> dst) = 0;
+        span<realx3> dst) const = 0;
     
     virtual
     bool initialTransferBlockData(
         span<real> src,
-        span<real> dst) = 0;
+        span<real> dst) const = 0;
 
     virtual
     bool initialTransferBlockData(
         span<uint32> src,
-        span<uint32> dst) = 0;
+        span<uint32> dst) const = 0;
     
     virtual 
     bool initialTransferBlockData(
         span<int32> src,
-        span<int32> dst) = 0;
+        span<int32> dst) const = 0;
     
     
-    /*template<typename T>
+    template<typename T>
     bool initialTransferBlockData(
         span<T> src,
-        span<T> dst )
+        span<T> dst )const
     {
         size_t el=sizeof(T);
         return initialTransferBlockData
@@ -132,7 +136,7 @@ public:
             charSpan(dst), 
             el
         );
-    }*/  
+    } 
 
 
 
@@ -149,6 +153,18 @@ public:
 	virtual 
 	bool requiresDataTransfer() const = 0;
 
+	inline 
+	const auto& thisDomain()const
+	{
+		return thisDomain_;
+	}
+
+	inline 
+	const auto& globalBoundaryDict()const
+	{
+		return static_cast<const fileDictionary&>(*this);
+	}
+
 	inline
 	const dictionary& boundaryDict(uint32 i)const
 	{
@@ -174,7 +190,7 @@ public:
 	}
 	
 	static
-	uniquePtr<simulationDomain> create(const dictionary& dict);
+	uniquePtr<simulationDomain> create(systemControl& control);
 
 }; // simulationDomain
 
diff --git a/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp b/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp
index 4914ddbc..e4f14e22 100644
--- a/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp
@@ -19,21 +19,78 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "boundaryList.hpp"
+#include "internalPoints.hpp"
 #include "simulationDomain.hpp"
 
-pFlow::boundaryList::boundaryList
-(
-	const simulationDomain& simD,
-	internalPoints& internal
-)
-:
-    ListPtr<boundaryBase>(simD.sizeOfBoundaries()),
-	simDomain_(simD),
-	internal_(internal)
-{}
+bool pFlow::boundaryList::resetLists()
+{
+	clear();
+	listSet_ = false;
+    return true;
+}
 
 bool pFlow::boundaryList::updateLists()
 {
+    
+	std::array<real,6> dist;
+	dist[0] = boundary(0).neighborLength();
+	dist[1] = boundary(1).neighborLength();
+	dist[2] = boundary(2).neighborLength();
+	dist[3] = boundary(3).neighborLength();
+	dist[4] = boundary(4).neighborLength();
+	dist[5] = boundary(5).neighborLength();
+
+	
+	internal_.updateFlag(
+			simDomain_.thisDomain(),
+			dist);
+	const auto& maskD = internal_.activePointsMaskDevice();
+	boundary(0).setSize( maskD.leftSize() );
+	boundary(1).setSize( maskD.rightSize() );
+	boundary(2).setSize( maskD.bottomSize() );
+	boundary(3).setSize( maskD.topSize() );
+	boundary(4).setSize( maskD.rearSize() );
+	boundary(5).setSize( maskD.frontSize() );
+
+	internal_.fillNeighborsLists(
+		boundary(0).indexList().deviceVectorAll(),
+		boundary(1).indexList().deviceVectorAll(),
+		boundary(2).indexList().deviceVectorAll(),
+		boundary(3).indexList().deviceVectorAll(),
+		boundary(4).indexList().deviceVectorAll(),
+		boundary(5).indexList().deviceVectorAll());
+
+	return true;	
+}
+
+pFlow::boundaryList::boundaryList
+(
+    const simulationDomain &simD,
+    internalPoints &internal
+)
+: 
+	ListPtr<boundaryBase>(simD.sizeOfBoundaries()),
+	internal_(internal),
+	simDomain_(simD),
+	timeControl_
+	(
+		simDomain_.subDict("boundaries"), 
+		"update"
+	)
+{}
+
+bool pFlow::boundaryList::updateLists(uint32 iter, real t, real dt)
+{
+	if( timeControl_.timeEvent(iter, t, dt))
+	{
+		return updateLists();
+	}
+	return true;
+}
+
+bool pFlow::boundaryList::setLists()
+{
+	if(listSet_)return true;
 
 	for(auto i=0; i<simDomain_.sizeOfBoundaries();i++)
 	{
@@ -49,5 +106,6 @@ bool pFlow::boundaryList::updateLists()
 		);
 	}
 	listSet_ = true;
+
 	return true;
-}
\ No newline at end of file
+}
diff --git a/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp b/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp
index 7a7a5f16..526eb761 100644
--- a/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp
@@ -24,13 +24,14 @@ Licence:
 
 #include "boundaryBase.hpp"
 #include "ListPtr.hpp"
+#include "baseTimeControl.hpp"
 
-#include "streams.hpp"
 
 namespace pFlow
 {
 
 class simulationDomain;
+class internalPoints;
 
 class boundaryList
 :
@@ -44,9 +45,15 @@ protected:
 		
         const simulationDomain& simDomain_;
 
+		baseTimeControl 		timeControl_;
+
         bool                    listSet_ = false;
 
-    
+		bool resetLists();
+
+		/// @brief update neighbor list of boundaries regardless
+		/// of the time intervals 
+		bool updateLists();
 
 public:
 	
@@ -55,26 +62,30 @@ public:
 	
 
 	//// - Constructors
-
 	boundaryList(
 		const simulationDomain& simD, 
 		internalPoints& internal);
 
-	//~boundaryList() = default;
 
-  ~boundaryList() = default;
+  	~boundaryList() = default;
 
-  bool updateLists();
+	/// @brief update neighbor list of boundaries based on 
+	/// the time intervals
+	bool updateLists(uint32 iter, real t, real dt);
 
-  auto& boundary(size_t i)
-  {
-    return ListPtr<boundaryBase>::operator[](i);
-  }
+	
 
-  const auto& boundary(size_t i)const
-  {
-    return ListPtr<boundaryBase>::operator[](i);
-  }
+	bool setLists();
+
+	auto& boundary(size_t i)
+	{
+		return ListPtr<boundaryBase>::operator[](i);
+	}
+
+	const auto& boundary(size_t i)const
+	{
+	return ListPtr<boundaryBase>::operator[](i);
+	}
 };
 
 } // pFlow
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
index d64e35af..d0d9de79 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
@@ -20,7 +20,8 @@ Licence:
 
 
 #include "internalPoints.hpp"
-#include "Vector.hpp"
+#include "domain.hpp"
+#include "Vectors.hpp"
 
 void pFlow::internalPoints::syncPFlag()const
 {
@@ -31,6 +32,170 @@ void pFlow::internalPoints::syncPFlag()const
 	}
 }
 
+pFlow::internalPoints::internalPoints()
+:
+	subscriber("internalPoints"),
+	pointPosition_("internalPoints", "internalPoints", initialCapacity_, 0, RESERVE()),
+	pFlagsD_(initialCapacity_, 0 , 0)
+{}
+
+
+pFlow::internalPoints::internalPoints
+(
+	const realx3Vector& posVec
+)
+:
+	subscriber("internalPoints"),
+	pointPosition_("internalPoints", "internalPoints", posVec.capacity(), 0, RESERVE()),
+	pFlagsD_(posVec.capacity(), 0, posVec.size())
+{
+
+	pointPosition_.assign(posVec);
+
+}
+
+
+const pFlow::pFlagTypeDevice& 
+	pFlow::internalPoints::activePointsMaskDevice() const 
+{
+	return pFlagsD_;
+}
+
+
+const pFlow::pFlagTypeHost&
+	pFlow::internalPoints::activePointsMaskHost() const
+{
+	syncPFlag();
+	return pFlagsH_;
+}
+
+FUNCTION_H
+const pFlow::realx3Field_D& 
+    pFlow::internalPoints::pointPosition()const
+{
+    return pointPosition_;
+}
+
+pFlow::hostViewType1D<pFlow::realx3> 
+    pFlow::internalPoints::activePointsHost() const
+{
+    auto maskH = activePointsMaskHost();
+    auto pointsH = pointPositionHost();
+
+    hostViewType1D<realx3> aPoints("Active pointst", maskH.numActive());
+    auto aRange = maskH.activeRange();
+    uint32 n = 0;
+    for(auto i=aRange.start(); i<aRange.end(); i++)
+    {
+        if( maskH.isActive(i) )
+        {
+            aPoints[n] = pointsH[i];
+            n++;
+        }
+    }
+
+    return aPoints;
+}
+
+FUNCTION_H
+pFlow::realx3Field_D &pFlow::internalPoints::pointPosition()
+{
+    return pointPosition_;
+}
+
+FUNCTION_H
+pFlow::uint32 pFlow::internalPoints::updateFlag
+(
+	const domain& dm, 
+	const std::array<real,6>& dist
+)
+{
+	return pFlagsD_.markPointRegions
+	(
+		dm,
+		pointPosition_.deviceVectorAll(),
+		dist[0],
+		dist[1],
+		dist[2],
+		dist[3],
+		dist[4],
+		dist[5]
+	);
+
+	pFlagSync_ = false;
+}
+
+void pFlow::internalPoints::fillNeighborsLists
+(
+	ViewType1D<uint32, memory_space> leftList, 
+	ViewType1D<uint32, memory_space> rightList, 
+	ViewType1D<uint32, memory_space> bottomList, 
+	ViewType1D<uint32, memory_space> topList, 
+	ViewType1D<uint32, memory_space> rearList, 
+	ViewType1D<uint32, memory_space> frontList
+)
+{
+	pFlagsD_.fillNeighborsLists(
+		leftList,
+		rightList,
+		bottomList,
+		topList,
+		rearList,
+		frontList);
+		
+	pFlagSync_ = false;
+}
+
+FUNCTION_H
+bool pFlow::internalPoints::read
+(
+	iIstream& is, 
+	const IOPattern& iop
+)
+{
+	
+	Field<Vector, realx3 , vecAllocator<realx3>> fRead("internalPoints", "internalPoints");
+
+	if( !fRead.read(is, iop))
+	{
+		fatalErrorInFunction<<
+		"Error in reading pointPosition from stream "<< is.name()<<endl;
+		return false;
+	}
+
+	/// here there should be some mechanism for field distribution between procesors
+	
+
+	pointPosition_.assign(fRead.vectorField());
+
+	pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
+	pFlagSync_ = false;
+	syncPFlag();
+
+	return true;
+}
+		
+
+
+FUNCTION_H
+bool pFlow::internalPoints::write
+(
+	iOstream& os, 
+	const IOPattern& iop
+)const
+{
+	if( pFlagsD_.isAllActive())
+	{
+		return pointPosition_.write(os, iop);
+	}
+	else
+	{
+		auto aPoints = this->activePointsHost();
+		auto spanPoints = makeSpan(aPoints); //span<realx3>(aPoints.data(), aPoints.size());
+		return writeSpan(os, spanPoints, iop);
+	}
+}
+
 
 /*FUNCTION_H
 bool pFlow::internalPoints::evaluateinternalPoints()
@@ -144,150 +309,4 @@ pFlow::uniquePtr<pFlow::int32IndexContainer>
 	}
 
 	return nullptr;
-}*/
-
-pFlow::internalPoints::internalPoints()
-:
-	subscriber("internalPoints"),
-	pointPosition_("internalPoints", "internalPoints", initialCapacity_, 0, RESERVE()),
-	pFlagsD_(initialCapacity_, 0 , 0)
-{
-	syncPFlag();
-}
-
-
-pFlow::internalPoints::internalPoints
-(
-	const realx3Vector& posVec
-)
-:
-	subscriber("internalPoints"),
-	pointPosition_("internalPoints", "internalPoints", posVec.capacity(), 0, RESERVE()),
-	pFlagsD_(posVec.capacity(), 0, posVec.size())
-{
-
-	pointPosition_.assign(posVec);
-
-	syncPFlag();
-
-}
-
-
-const pFlow::pFlagTypeDevice& 
-	pFlow::internalPoints::activePointsMaskD() const 
-{
-	return pFlagsD_;
-}
-
-
-const pFlow::pFlagTypeHost&
-	pFlow::internalPoints::activePointsMaskH() const
-{
-	syncPFlag();
-	return pFlagsH_;
-}
-
-FUNCTION_H
-const pFlow::realx3Field_D& 
-    pFlow::internalPoints::pointPosition()const
-{
-    return pointPosition_;
-}
-
-pFlow::hostViewType1D<pFlow::realx3> 
-    pFlow::internalPoints::activePointsHost() const
-{
-    auto maskH = activePointsMaskH();
-    auto pointsH = pointPositionHost();
-
-    hostViewType1D<realx3> aPoints("Active pointst", maskH.numActive());
-    auto aRange = maskH.activeRange();
-    uint32 n = 0;
-    for(auto i=aRange.start(); i<aRange.end(); i++)
-    {
-        if( maskH.isActive(i) )
-        {
-            aPoints[n] = pointsH[i];
-            n++;
-        }
-    }
-
-    return aPoints;
-}
-
-FUNCTION_H
-pFlow::realx3Field_D &pFlow::internalPoints::pointPosition()
-{
-    return pointPosition_;
-}
-
-FUNCTION_H
-void pFlow::internalPoints::updateFlag
-(
-	const domain& dm, 
-	const std::array<real,6>& dist
-)
-{
-	pFlagsD_.markPointRegions
-	(
-		dm,
-		pointPosition_.deviceVectorAll(),
-		dist[0],
-		dist[1],
-		dist[2],
-		dist[3],
-		dist[4],
-		dist[5]
-	);
-}
-
-
-FUNCTION_H
-bool pFlow::internalPoints::read
-(
-	iIstream& is, 
-	const IOPattern& iop
-)
-{
-	
-	Field<Vector, realx3 , vecAllocator<realx3>> fRead("internalPoints", "internalPoints");
-
-	if( !fRead.read(is, iop))
-	{
-		fatalErrorInFunction<<
-		"Error in reading pointPosition from stream "<< is.name()<<endl;
-		return false;
-	}
-
-	/// here there should be some mechanism for field distribution between procesors
-	
-
-	pointPosition_.assign(fRead.vectorField());
-
-	pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
-	pFlagSync_ = false;
-	syncPFlag();
-
-	return true;
-}
-		
-
-
-FUNCTION_H
-bool pFlow::internalPoints::write
-(
-	iOstream& os, 
-	const IOPattern& iop
-)const
-{
-	if( pFlagsD_.isAllActive())
-	{
-		return pointPosition_.write(os, iop);
-	}
-	else
-	{
-		return pointPosition_.write(os, iop, activePointsMaskH());
-	}
-}
-
-
+}*/
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
index f98c4208..e6603d73 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
@@ -31,6 +31,8 @@ Licence:
 namespace pFlow
 {
 
+class domain;
+
 class internalPoints
 :
 	public subscriber
@@ -97,16 +99,16 @@ public:
 		internalPoints& operator=(internalPoints&&) = default;
 
 		/// Destructor 
-		virtual ~internalPoints() = default;
+		~internalPoints()override = default;
 
 
 	//// - Methods
 		FUNCTION_H
-		const pFlagTypeDevice& activePointsMaskD()const;
+		const pFlagTypeDevice& activePointsMaskDevice()const;
 
 
 		FUNCTION_H
-		const pFlagTypeHost& activePointsMaskH()const;
+		const pFlagTypeHost& activePointsMaskHost()const;
 
 		// - Const access pointPosition
 		FUNCTION_H
@@ -133,7 +135,7 @@ public:
 		INLINE_FUNCTION_H
 		uint32 size()const
 		{
-			return pointPosition_.size();
+			return pFlagsD_.activeRange_.end();
 		}
 		
 		// - maximum capacity of data structure 
@@ -165,55 +167,21 @@ public:
 
 		
 		FUNCTION_H
-		void updateFlag(
+		uint32 updateFlag(
 			const domain& dm, 
 			const std::array<real,6>& dist);
-
-		/*FUNCTION_H
-		size_t markDeleteOutOfBox(const box& domain);*/
-
 		
-		///////////////////////////////////////////////////////////////////////////////////////////////////
-		
-		// - const access to points to be newly inserted
-		/*FUNCTION_H 
-		auto insertedPointIndex()const
-		{
-			return tobeInsertedIndex_;
-		}
-
-		FUNCTION_H 
-		auto insertedPointIndexH()const
-		{
-			return tobeInsertedIndex_.hostView();
-		}
-
-		FUNCTION_H 
-		auto insertedPointIndexD()const
-		{
-			return tobeInsertedIndex_.deviceView();
-		}
-
-
 		FUNCTION_H
-		auto mortonSortedIndex()const
-		{
-			return mortonSortedIndex_;
-		}
-
-
-		// - update data structure by inserting/setting new points 
-		//   Notifies all the fields in the registered list of data structure
-		//   and exclude the fields that re in the exclusionList
-		//   retrun nullptr if it fails 
-		/*FUNCTION_H
-		virtual uniquePtr<int32IndexContainer> insertPoints(
-			const realx3Vector& pos,
-			const setFieldList& setField,
-			repository& owner,
-			const List<eventObserver*>& exclusionList={nullptr}
-		);*/
+		void fillNeighborsLists(
+			ViewType1D<uint32, memory_space> leftList,
+			ViewType1D<uint32, memory_space> rightList,
+			ViewType1D<uint32, memory_space> bottomList,
+			ViewType1D<uint32, memory_space> topList,
+			ViewType1D<uint32, memory_space> rearList,
+			ViewType1D<uint32, memory_space> frontList);
+		
 
+		
 	
 	//// - IO operations 
 		
@@ -243,8 +211,6 @@ iOstream& operator<<(iOstream& os, const internalPoints& ip)
 } // pFlow
 
 
-
-
 #endif //__internalPoints_hpp__
 
 
@@ -331,4 +297,50 @@ iOstream& operator<<(iOstream& os, const internalPoints& ip)
 		bool allActive()const {
 			return allActive_;
 		}
-	};*/
\ No newline at end of file
+	};*/
+
+
+	/*FUNCTION_H`
+		size_t markDeleteOutOfBox(const box& domain);*/
+
+		
+		///////////////////////////////////////////////////////////////////////////////////////////////////
+		
+		// - const access to points to be newly inserted
+		/*FUNCTION_H 
+		auto insertedPointIndex()const
+		{
+			return tobeInsertedIndex_;
+		}
+
+		FUNCTION_H 
+		auto insertedPointIndexH()const
+		{
+			return tobeInsertedIndex_.hostView();
+		}
+
+		FUNCTION_H 
+		auto insertedPointIndexD()const
+		{
+			return tobeInsertedIndex_.deviceView();
+		}
+
+
+		FUNCTION_H
+		auto mortonSortedIndex()const
+		{
+			return mortonSortedIndex_;
+		}
+
+
+		// - update data structure by inserting/setting new points 
+		//   Notifies all the fields in the registered list of data structure
+		//   and exclude the fields that re in the exclusionList
+		//   retrun nullptr if it fails 
+		/*FUNCTION_H
+		virtual uniquePtr<int32IndexContainer> insertPoints(
+			const realx3Vector& pos,
+			const setFieldList& setField,
+			repository& owner,
+			const List<eventObserver*>& exclusionList={nullptr}
+		);*/
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
index e863e583..cbf1f539 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
@@ -134,6 +134,43 @@ public:
 		return numActive_;
 	}
 
+	INLINE_FUNCTION_HD
+	auto leftSize()const
+	{
+		return nLeft_;
+	}
+
+	INLINE_FUNCTION_HD
+	auto rightSize()const
+	{
+		return nRight_;
+	}
+
+	INLINE_FUNCTION_HD
+	auto bottomSize()const
+	{
+		return nBottom_;
+	}
+
+	INLINE_FUNCTION_HD
+	auto topSize()const
+	{
+		return nTop_;
+	}
+
+	INLINE_FUNCTION_HD
+	auto rearSize()const
+	{
+		return nRear_;
+	}
+
+	INLINE_FUNCTION_HD
+	auto frontSize()const
+	{
+		return nFront_;
+	}
+
+
 	INLINE_FUNCTION_HD
 	bool operator()(uint32 i)
 	{
@@ -213,9 +250,28 @@ public:
 			isAllActive_);
 	}
 
-	
-	uint32 scanPointFlag();
+	/// @brief Loop over the active points and mark those out of the box
+	/// and return number of deleted points 
+	/// @param validBox the box whose inside is valid 
+	/// @param points list of all points 
+	/// @return number of deleted points 
+	uint32 markOutOfBoxDelete(
+		const box& validBox,
+		ViewType1D<realx3, memory_space> points);
 
+	
+	/// @brief mark points based on their position in the domain.
+	/// This should be the first method to be called when updating
+	/// boundaries (step 1 of 2).
+	/// @param dm the domain for which particles are tested 
+	/// @param points list of points 
+	/// @param leftLength neighbor length of the left face 
+	/// @param rightLength neighbor length of the right face 
+	/// @param bottomLength neighbor length of the bottom face 
+	/// @param topLength neighbor length of the top face 
+	/// @param rearLength neighbor length of the rear face 
+	/// @param frontLength neighbor length of the front face 
+	/// @return number of deleted points 
 	uint32 markPointRegions(
 		domain 								dm,
 		ViewType1D<realx3, memory_space> 	points,
@@ -226,6 +282,16 @@ public:
 		real rearLength,
 		real frontLength);
 
+	
+	/// @brief fill the lists for boundary faces. Lists keep the index 
+	/// of particles in the neighborhood of the faces. This mehtod is 
+	/// called after markPointRegions (step 2 of 2).
+	/// @param leftList neighbor list of the left face 
+	/// @param rightList neighbor list of the right face 
+	/// @param bottomList neighbor list of the bottom face 
+	/// @param topList neighbor list of the top face 
+	/// @param rearList neighbor list of the rear face 
+	/// @param frontList neighbor list of the front face 
 	void fillNeighborsLists(
 		ViewType1D<uint32, memory_space> leftList,
 		ViewType1D<uint32, memory_space> rightList,
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
index f63efa00..c5eaa78c 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
@@ -20,9 +20,78 @@ Licence:
 #ifndef __pointFlagKernels_hpp__
 #define __pointFlagKernels_hpp__
 
-
-
 template<typename ExecutionSpace>
+pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markOutOfBoxDelete
+(
+	const box& validBox,
+	ViewType1D<realx3, memory_space> points
+)
+{
+	using rpScanFlag = Kokkos::RangePolicy<execution_space,  
+			Kokkos::IndexType<uint32>>;
+
+	uint32 numDeleted = 0;
+	
+	uint32 start = activeRange().start();
+	uint32 end   = activeRange().end();
+
+	uint32 minRange = end;
+	uint32 maxRange = start;
+
+	if(start<end)
+	{
+		Kokkos::parallel_reduce(
+			"pointFlagKernels::markOutOfBox",
+			rpScanFlag(start, end),
+			CLASS_LAMBDA_HD(
+				uint32 i, 
+				uint32& minUpdate, 
+				uint32& maxUpdate, 
+				uint32& delToUpdate)
+			{
+				if(isActive(i))
+				{
+					if(validBox.isInside(points[i]))
+					{
+						
+						minUpdate = min(minUpdate,i);
+						maxUpdate = max(maxUpdate,i);
+					}
+					else
+					{
+						flags_[i] = DELETED;
+						delToUpdate++;
+					}
+
+				}
+				
+			},
+			Kokkos::Min<uint32>(minRange), 
+			Kokkos::Max<uint32>(maxRange),
+			numDeleted);	
+	}
+	
+	if(numDeleted >= numActive_)
+	{
+		minRange = 0;
+		maxRange = 0;
+		numDeleted == numActive_;
+	}
+	else
+	{
+		// add one to maxRange to make it half-open
+		maxRange ++;
+	}
+
+	activeRange_ = {minRange, maxRange};
+	numActive_ 	= numActive_ - numDeleted;
+	isAllActive_ = 
+		(activeRange_.numElements() == numActive_)&& numActive_>0;
+	
+	return numDeleted;
+}
+
+/*template<typename ExecutionSpace>
 pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::scanPointFlag()
 {
 		
@@ -77,7 +146,7 @@ pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::scanPointFlag()
 	isAllActive_ = activeRange_.numElements() == numActive_;
 
 	return numActive;
-}
+}*/
 
 
 template<typename ExecutionSpace>
@@ -102,7 +171,7 @@ pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markPointRegions
 	uint32 minRange = end;
 	uint32 maxRange = start;
 
-	uint32 numMarked = 0;
+	uint32 numMarkedDelete = 0;
 	uint32 nLeft = 0, nRight = 0;
 	uint32 nBottom = 0, nTop = 0;
 	uint32 nRear = 0, nFront = 0;
@@ -181,7 +250,7 @@ pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markPointRegions
 			},
 			Kokkos::Min<uint32>(minRange), 
 			Kokkos::Max<uint32>(maxRange),
-			numMarked,
+			numMarkedDelete,
 			nLeft,
 			nRight,
 			nBottom,
@@ -192,10 +261,11 @@ pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markPointRegions
 	}
 	
 	// means either range was empty or all points have been deleted.
-	if(minRange<start || maxRange>end)
+	if(numMarkedDelete>= numActive_)
 	{
 		minRange = 0;
 		maxRange = 0;
+		numMarkedDelete =  numActive_;
 	}
 	else
 	{
@@ -203,8 +273,8 @@ pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markPointRegions
 	}
 
 	activeRange_ = {minRange, maxRange};
-	isAllActive_ = isAllActive_ && numMarked == 0; 
-	numActive_ 	-= numMarked;
+	numActive_ 	-= numMarkedDelete;
+	isAllActive_ = (activeRange_.numElements() == numActive_)&& numActive_>0;
 
 	nLeft_ 	= nLeft;
 	nRight_	= nRight;
@@ -213,7 +283,7 @@ pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markPointRegions
 	nRear_	= nRear;
 	nFront_ = nFront;
 
-	return numMarked;
+	return numMarkedDelete;
 }
 
 template<typename ExecutionSpace>
@@ -235,7 +305,7 @@ void pFlow::pointFlag<ExecutionSpace>::fillNeighborsLists
 
 	ViewType1D<uint32, memory_space> nElems("nElems",6);
 
-	fill(nElems, 0, 6, 0);
+	fill(nElems, 0, 6, static_cast<uint32>(0));
 
 	if(start<end)
 	{
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
index 173cdb43..9eab6a47 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
@@ -60,9 +60,9 @@ bool pFlow::pointStructure::setupPointStructure(const realx3Vector &points)
         return false;
     }
 
-    boundaries_.updateLists();
+    boundaries_.setLists();
 
-    return false;
+    return true;
 }
 
 
@@ -98,7 +98,7 @@ pFlow::pointStructure::pointStructure
   	internalPoints(),
 	simulationDomain_
 	(
-		simulationDomain::create(control.domainDict())
+		simulationDomain::create(control)
 	),
 	boundaries_
 	(
@@ -106,13 +106,13 @@ pFlow::pointStructure::pointStructure
 		*this
 	)
 {
-    REPORT(0)<< "Reading point structure from file"<<
-    IOobject::localPath()<<END_REPORT;
+    REPORT(0)<< "Reading point structure from "<<
+    IOobject::path()<<END_REPORT;
 
     if( !IOobject::read() )
     {
         fatalErrorInFunction<<
-        "Error in reading from file "<<IOobject::localPath()<<endl;
+        "Error in reading from file "<<IOobject::path()<<endl;
     }
 }
 
@@ -137,7 +137,7 @@ pFlow::pointStructure::pointStructure(
   	internalPoints(),
 	simulationDomain_
 	(
-		simulationDomain::create(control.domainDict())
+		simulationDomain::create(control)
 	),
 	boundaries_
 	(
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
index 37aa18af..dc1d3342 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
@@ -116,6 +116,11 @@ public:
             return boundaries_[i];
         }
 
+		const auto& simDomain()const
+		{
+			return simulationDomain_();
+		}
+
 	// - IO methods 
 
 		/// @brief read the point structure from the input stream.
diff --git a/src/phasicFlow/typeSelection/typeInfo.hpp b/src/phasicFlow/typeSelection/typeInfo.hpp
index 3aefa7e3..8eec379d 100644
--- a/src/phasicFlow/typeSelection/typeInfo.hpp
+++ b/src/phasicFlow/typeSelection/typeInfo.hpp
@@ -54,7 +54,7 @@ Licence:
 	word typeName() const {return TYPENAME();} 
 
 
-#define TypeInfoTemplate(tName, Type)										\
+#define TypeInfoTemplate11(tName, Type)										\
 	has_static_member(TYPENAME);											\
 	inline static word TYPENAME()											\
 	{ 																		\
@@ -66,7 +66,7 @@ Licence:
 	}																		\
 	virtual word typeName() const { return TYPENAME();}
 
-#define TypeInfoTemplate2(tName, Type1, Type2)								\
+#define TypeInfoTemplate12(tName, Type1, Type2)								\
 	has_static_member(TYPENAME);											\
 	inline static word TYPENAME()											\
 	{ 																		\
@@ -78,7 +78,7 @@ Licence:
 	}																		\
 	virtual word typeName() const { return TYPENAME();}
 
-#define TypeInfoTemplate3(tName, Type1, Type2, Type3)						\
+#define TypeInfoTemplate13(tName, Type1, Type2, Type3)						\
 	inline static word TYPENAME()											\
 	{ 																		\
 		return word(tName)+"<"+Type1::TYPENAME()+","+Type2::TYPENAME()+","+Type3::TYPENAME()+">";\
@@ -86,7 +86,7 @@ Licence:
 	virtual word typeName() const { return TYPENAME();}
 
 // this is the non-virtual version
-#define TypeInfoTemplateNV(tName, Type)										\
+#define TypeInfoTemplateNV11(tName, Type)										\
 	has_static_member(TYPENAME);											\
 	inline static word TYPENAME()											\
 	{ 																		\
@@ -99,7 +99,7 @@ Licence:
 	inline word typeName() const { return TYPENAME();}
 
 
-#define TypeInfoTemplateNV2(tName, Type, tName2)							\
+#define TypeInfoTemplateNV111(tName, Type, tName2)							\
 	has_static_member(TYPENAME);											\
 	inline static word TYPENAME()											\
 	{ 																		\
@@ -111,6 +111,20 @@ Licence:
 	}																		\
 	inline word typeName() const { return TYPENAME();}
 
+#define TypeInfoTemplate111(tName, Type, tName2)							\
+	has_static_member(TYPENAME);											\
+	inline static word TYPENAME()											\
+	{ 																		\
+	if constexpr ( has_static_member_TYPENAME<Type,word(void)>::value) 		\
+		{ return word(tName)+"<"+Type::TYPENAME()+","+word(tName2)+">";} 	\
+	else																	\
+		return word(tName)+"<"+basicTypeName<Type>()+","+word(tName2)+">";	\
+	return "noTYPE"; 														\
+	}																		\
+	virtual word typeName() const { return TYPENAME();}
+
+
+
 
 
 
diff --git a/src/phasicFlow/typeSelection/virtualConstructor.hpp b/src/phasicFlow/typeSelection/virtualConstructor.hpp
index 573f7d31..0d7f64ff 100644
--- a/src/phasicFlow/typeSelection/virtualConstructor.hpp
+++ b/src/phasicFlow/typeSelection/virtualConstructor.hpp
@@ -75,7 +75,7 @@ public: 																				\
 
 #define add_vCtor(baseClass, derivedClass, selectorName) 	\
 															\
-inline static baseClass::create##selectorName##Callback<derivedClass> baseClass##derivedClass##selectorName##_;
+inline static typename baseClass::template create##selectorName##Callback<derivedClass> baseClass##derivedClass##selectorName##_;
 
 
 
diff --git a/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp b/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp
index 0e29b280..6db66184 100755
--- a/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp
+++ b/src/phasicFlow/types/basicTypes/bTypesFunctions.cpp
@@ -44,7 +44,14 @@ pFlow::int32 pFlow::countChar( const char* s, const char c)
 pFlow::word pFlow::toUpper(const word & inStr)
 {
     word oStr(inStr);
-    transform(inStr.begin(), inStr.end(), oStr.begin(), ::toupper);
+    std::transform(inStr.begin(), inStr.end(), oStr.begin(), ::toupper);
+    return oStr;
+}
+
+pFlow::word pFlow::firstCapital(const word& inStr)
+{
+    word oStr(inStr);
+    oStr[0] = std::toupper(oStr[0]);
     return oStr;
 }
 
diff --git a/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp b/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp
index 77cd983a..8c9ce820 100755
--- a/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp
+++ b/src/phasicFlow/types/basicTypes/bTypesFunctions.hpp
@@ -62,6 +62,8 @@ int32 countChar(const char* s, const char c);
 /// convert a word to all caps
 word toUpper(const word & inStr);
 
+word firstCapital(const word& inStr);
+
 /// Check if str equals "Yes", "Y", "True", "Ok", "ON", or "T"
 bool isYes(const word & str);
 

From 0096856c982e4254b8d7a7857b0eaabfa0bb5279 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Fri, 19 Jan 2024 22:31:08 -0800
Subject: [PATCH 20/60] Field class and pointStructure modified and tested

---
 src/phasicFlow/CMakeLists.txt                 |   3 +-
 src/phasicFlow/Kokkos/KokkosUtilities.hpp     |   1 +
 src/phasicFlow/containers/Field/Field.cpp     | 162 ++++++++----
 src/phasicFlow/containers/Field/Field.hpp     |  56 ++---
 src/phasicFlow/containers/Field/Fields.cpp    |  56 +----
 src/phasicFlow/containers/Field/Fields.hpp    |  43 ++--
 src/phasicFlow/containers/Vector/Vector.cpp   |   4 +-
 src/phasicFlow/containers/Vector/Vector.hpp   | 234 +++++++++---------
 src/phasicFlow/containers/Vector/Vectors.cpp  |  18 --
 .../containers/Vector/stdVectorHelper.hpp     |  37 ++-
 .../containers/VectorHD/VectorSingle.cpp      |  17 ++
 .../containers/VectorHD/VectorSingle.hpp      |  61 +++--
 .../containers/VectorHD/VectorSingles.cpp     |  38 +++
 .../containers/pointField/internalField.cpp   |  34 ++-
 .../containers/pointField/internalField.hpp   |  28 ++-
 .../containers/pointField/pointField.cpp      | 230 ++++++++++-------
 .../containers/pointField/pointField.hpp      |  17 +-
 .../containers/pointField/pointFields.cpp     |  13 +-
 .../containers/pointField/pointFields.hpp     |   9 +-
 src/phasicFlow/containers/span/span.hpp       |  60 ++---
 src/phasicFlow/dictionary/fileDictionary.cpp  |   2 +-
 .../repository/IOobject/IOobject.cpp          |  12 +-
 .../repository/IOobject/IOobject.hpp          |   8 +-
 .../repository/repository/repository.cpp      |   2 +-
 .../streams/dataIO/createDataIO.hpp           |  20 ++
 src/phasicFlow/streams/dataIO/dataIO.hpp      |  67 ++++-
 src/phasicFlow/streams/dataIO/dataIOMPI.hpp   |  97 ++++++++
 .../streams/dataIO/dataIORegular.hpp          |  20 ++
 .../streams/dataIO/dataIOTemplate.cpp         | 225 ++++++++++-------
 .../boundaries/boundaryBase/boundaryBase.hpp  |   8 +-
 .../domain/simulationDomain.hpp               |   2 +-
 .../pointStructure/internalPoints.cpp         |  98 ++++++--
 .../pointStructure/internalPoints.hpp         |  30 ++-
 .../pointStructure/pointStructure.cpp         |  63 +++--
 .../pointStructure/pointStructure.hpp         |  27 +-
 35 files changed, 1162 insertions(+), 640 deletions(-)
 create mode 100644 src/phasicFlow/containers/VectorHD/VectorSingles.cpp
 create mode 100644 src/phasicFlow/streams/dataIO/dataIOMPI.hpp

diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 5024be68..952be63b 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -35,9 +35,10 @@ dictionary/entry/dataEntry.cpp
 dictionary/twoPartEntry/twoPartEntry.cpp
 
 containers/Vector/Vectors.cpp
+containers/VectorHD/VectorSingles.cpp
 containers/Field/Fields.cpp
 containers/List/anyList/anyList.cpp
-containers/pointField/pointFields.cpp
+#containers/pointField/pointFields.cpp
 
 #setFieldList/setFieldList.cpp
 #setFieldList/setFieldEntry.cpp
diff --git a/src/phasicFlow/Kokkos/KokkosUtilities.hpp b/src/phasicFlow/Kokkos/KokkosUtilities.hpp
index b44a467d..6d1c7f46 100644
--- a/src/phasicFlow/Kokkos/KokkosUtilities.hpp
+++ b/src/phasicFlow/Kokkos/KokkosUtilities.hpp
@@ -26,6 +26,7 @@ Licence:
 #include "pFlowMacros.hpp"
 #include "types.hpp"
 #include "span.hpp"
+#include "dataIO.hpp"
 #include "iOstream.hpp"
 
 namespace pFlow
diff --git a/src/phasicFlow/containers/Field/Field.cpp b/src/phasicFlow/containers/Field/Field.cpp
index 93b72c20..dd4506e4 100644
--- a/src/phasicFlow/containers/Field/Field.cpp
+++ b/src/phasicFlow/containers/Field/Field.cpp
@@ -18,6 +18,116 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
+template<class T, class MemorySpace>
+bool pFlow::Field<T, MemorySpace>::read
+(
+	iIstream& is
+)
+{
+	
+	bool tokenFound = true;
+	
+    tokenFound = is.findToken(fieldKey_);
+
+	if( !tokenFound )
+	{
+		ioErrorInFile( is.name(), is.lineNumber() ) <<
+		" error in searching for filedkey " << fieldKey_<<endl;
+		return false;
+	}
+	
+	if( !VectorType::read(is) )
+	{
+		ioErrorInFile(is.name(), is.lineNumber())<<
+		"error in reading field data from field "<< this->name()<<endl;
+		return false;
+	}
+    
+	is.readEndStatement("Field::read");
+
+	return true;
+}
+
+
+template<class T, class MemorySpace>
+bool pFlow::Field<T, MemorySpace>::read
+(
+	iIstream& is,
+	const IOPattern& iop
+)
+{
+	
+	bool tokenFound = true;
+	
+    if(iop.thisProcReadData())
+        tokenFound = is.findToken(fieldKey_);
+
+	if( !tokenFound )
+	{
+		ioErrorInFile( is.name(), is.lineNumber() ) <<
+		" error in searching for filedkey " << fieldKey_<<endl;
+		return false;
+	}
+	
+	if( !VectorType::read(is, iop) )
+	{
+		ioErrorInFile(is.name(), is.lineNumber())<<
+		"error in reading field data from field "<< this->name()<<endl;
+		return false;
+	}
+    if(iop.thisProcReadData())
+	    is.readEndStatement("Field::read");
+
+	return true;
+}
+
+template<class T, class MemorySpace>
+bool pFlow::Field<T, MemorySpace>::write
+(
+	iOstream& os
+)const
+{
+
+	os.writeWordKeyword(fieldKey_)<<endl;
+
+	if(!os.check(FUNCTION_NAME))return false;
+
+	if(!VectorType::write(os)) return false;
+
+	os.endEntry();
+	if(!os.check(FUNCTION_NAME))return false;
+
+	return true;
+}
+
+
+
+template<class T, class MemorySpace>
+bool pFlow::Field<T, MemorySpace>::write
+(
+	iOstream& os, 
+	const IOPattern& iop
+)const
+{
+
+	if(iop.thisProcWriteData())
+		os.writeWordKeyword(fieldKey_)<<endl;
+
+	if(!os.check(FUNCTION_NAME))return false;
+
+	if(!VectorType::write(os, iop)) return false;
+
+	if(iop.thisProcWriteData())
+		os.endEntry();
+
+	if(!os.check(FUNCTION_NAME))return false;
+
+	return true;
+}
+
+
+
+
 /*template<template<class, class> class VectorField, class T, class PropType>
 bool pFlow::Field<VectorField, T, PropType>::readUniform
 ( 
@@ -179,55 +289,3 @@ bool pFlow::Field<VectorField, T, PropType>::writeField(iOstream& os)const
 
 	return true;
 }*/
-
-
-template<template<class, class> class VectorField, class T, class PropType>
-bool pFlow::Field<VectorField, T, PropType>::read
-(
-	iIstream& is,
-	const IOPattern& iop
-)
-{
-	
-	bool tokenFound = true;
-	
-    if(iop.thisProcReadData())
-        tokenFound = is.findToken(fieldKey_);
-
-	if( !tokenFound )
-	{
-		ioErrorInFile( is.name(), is.lineNumber() ) <<
-		" error in searching for filedkey " << fieldKey_<<endl;
-		return false;
-	}
-	
-	if( !VectorType::read(is, iop) )
-	{
-		ioErrorInFile(is.name(), is.lineNumber())<<
-		"error in reading field data from field "<< this->name()<<endl;
-	}
-    if(iop.thisProcReadData())
-	    is.readEndStatement("Field::read");
-
-
-	return true;
-}
-
-template<template<class, class> class VectorField, class T, class PropType>
-bool pFlow::Field<VectorField, T, PropType>::write(
-	iOstream& os, 
-	const IOPattern& iop)const
-{
-
-	os.writeWordKeyword(fieldKey_)<<endl;
-
-	if(!os.check(FUNCTION_NAME))return false;
-
-	if(!VectorType::write(os, iop)) return false;
-
-	os.endEntry();
-	if(!os.check(FUNCTION_NAME))return false;
-
-	return true;
-}
-
diff --git a/src/phasicFlow/containers/Field/Field.hpp b/src/phasicFlow/containers/Field/Field.hpp
index ae6d90da..2312309c 100644
--- a/src/phasicFlow/containers/Field/Field.hpp
+++ b/src/phasicFlow/containers/Field/Field.hpp
@@ -21,11 +21,9 @@ Licence:
 #ifndef __Field_hpp__
 #define __Field_hpp__
 
-//#include "VectorSingle.hpp"
-//#include "vocabs.hpp"
-
 
 #include "types.hpp"
+#include "VectorSingle.hpp"
 #include "Vector.hpp"
 #include "streams.hpp"
 
@@ -33,44 +31,44 @@ namespace pFlow
 {
 
 
-
-template<template<class, class> class VectorField, class T, class PropType=void>
+template<class T, class MemorySpace = void>
 class Field
 :
-	public VectorField<T, PropType>
+	public VectorSingle<T, MemorySpace>
 {
 public:
-	
 
-	using VectorType  		= VectorField<T,PropType>;
+	using VectorType  		= VectorSingle<T,MemorySpace>;
 
-	using FieldType         = Field<VectorField, T, PropType>;
+	using FieldType         = Field<T, MemorySpace>;
 
-	using iterator        = typename VectorType::iterator;
+	using FieldTypeHost 	= Field<T, HostSpace>;
 
-	using const_iterator   = typename VectorType::const_iterator;
+	using memory_space 		= typename VectorType::memory_space;
 
-	using reference       = typename VectorType::reference;
+	using execution_space 	= typename VectorType::execution_space;
+
+	using iterator        	= typename VectorType::iterator;
+
+	using const_iterator   	= typename VectorType::const_iterator;
+
+	using reference       	= typename VectorType::reference;
   	
-	using const_reference  = typename VectorType::const_reference;
+	using const_reference  	= typename VectorType::const_reference;
 
-	using value_type       = typename VectorType::value_type;
+	using value_type       	= typename VectorType::value_type;
   	
-	using pointer         = typename VectorType::pointer;
+	using pointer         	= typename VectorType::pointer;
   	
-	using const_pointer    = typename VectorType::const_pointer;
+	using const_pointer    	= typename VectorType::const_pointer;
   	
 
-protected:
+private:
 	
 	static const inline word FKey = "value";
 
 	const word fieldKey_ = FKey;
 
-	/*bool readUniform( iIstream& is, size_t len, bool readLength = true);
-
-	bool readNonUniform( iIstream& is, size_t len);*/
-
 public:
 
 	/// type info
@@ -91,7 +89,6 @@ public:
 			VectorType(name),
 			fieldKey_(fieldKey)
 		{}
-
 		
 		/// Construct a field with name and fieldKey and specified len
 		Field(const word& name, const word& fieldKey, size_t len)
@@ -189,15 +186,12 @@ public:
 		}
 	
 	//// - IO operations 
-		/*bool readField(iIstream& is, const size_t len, bool resume, bool readLength = true);
 		
+		bool read(iIstream& is);
 		
-		bool readField(iIstream& is, bool resume );
+		bool write(iOstream& os)const;			
 
-		
-		bool writeField(iOstream& os)const;*/
 
-		
 		bool read(iIstream& is, const IOPattern& iop);
 		
 
@@ -206,8 +200,8 @@ public:
 };
 
 
-template<template<class, class> class VectorField, class T, class PropType>
-inline iIstream& operator >> (iIstream & is, Field<VectorField, T, PropType> & ifld )
+template<class T, class MemorySpace>
+inline iIstream& operator >> (iIstream & is, Field<T, MemorySpace> & ifld )
 {
 	if( !ifld.read(is, IOPattern::MasterProcessorOnly) )
 	{
@@ -217,8 +211,8 @@ inline iIstream& operator >> (iIstream & is, Field<VectorField, T, PropType> & i
 	return is;
 }
 
-template<template<class, class> class VectorField, class T, class PropType>
-inline iOstream& operator << (iOstream& os, const Field<VectorField, T, PropType>& ofld )
+template<typename T, typename MemorySpace>
+inline iOstream& operator << (iOstream& os, const Field<T, MemorySpace>& ofld )
 {
 	
 	if( !ofld.write(os, IOPattern::AllProcessorsDifferent) )
diff --git a/src/phasicFlow/containers/Field/Fields.cpp b/src/phasicFlow/containers/Field/Fields.cpp
index e43c4330..55337632 100644
--- a/src/phasicFlow/containers/Field/Fields.cpp
+++ b/src/phasicFlow/containers/Field/Fields.cpp
@@ -21,61 +21,17 @@ Licence:
 #include "Fields.hpp"
 
 
-template class pFlow::Field<pFlow::VectorSingle, pFlow::int8>;
+template class pFlow::Field<pFlow::int8>;
 
-/*template class pFlow::Field<pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace>;
+template class pFlow::Field<pFlow::uint8>;
 
-template class pFlow::Field<pFlow::VectorSingle, pFlow::int16>;
+template class pFlow::Field<pFlow::int32>;
 
-template class pFlow::Field<pFlow::VectorSingle, pFlow::int16, pFlow::HostSpace>;
+template class pFlow::Field<pFlow::uint32>;
 
-template class pFlow::Field<pFlow::VectorSingle, pFlow::int32>;
+template class pFlow::Field<pFlow::real>;
 
-template class pFlow::Field<pFlow::VectorSingle, pFlow::int32, pFlow::HostSpace>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::int64>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::int64, pFlow::HostSpace>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::uint32>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::uint32, pFlow::HostSpace>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::label>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::label, pFlow::HostSpace>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::real>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::real, pFlow::HostSpace>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::realx3>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::realx3, pFlow::HostSpace>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::realx3x3>;
-
-template class pFlow::Field<pFlow::VectorSingle, pFlow::realx3x3, pFlow::HostSpace>;
-
-template class pFlow::Field<pFlow::VectorDual, pFlow::int8>;
-
-template class pFlow::Field<pFlow::VectorDual, pFlow::int16>;
-
-template class pFlow::Field<pFlow::VectorDual, pFlow::int32>;
-
-template class pFlow::Field<pFlow::VectorDual, pFlow::int64>;
-
-template class pFlow::Field<pFlow::VectorDual, pFlow::uint32>;
-
-template class pFlow::Field<pFlow::VectorDual, pFlow::label>;
-
-template class pFlow::Field<pFlow::VectorDual, pFlow::real>;
-
-template class pFlow::Field<pFlow::VectorDual, pFlow::realx3>;
-
-template class pFlow::Field<pFlow::VectorDual, pFlow::realx3x3>;
+template class pFlow::Field<pFlow::realx3>;
 
 
-template class pFlow::Field<pFlow::Vector, pFlow::word, pFlow::vecAllocator<pFlow::word>>;*/
-
 
diff --git a/src/phasicFlow/containers/Field/Fields.hpp b/src/phasicFlow/containers/Field/Fields.hpp
index 411bedf7..abe589fe 100644
--- a/src/phasicFlow/containers/Field/Fields.hpp
+++ b/src/phasicFlow/containers/Field/Fields.hpp
@@ -30,44 +30,44 @@ Licence:
 namespace pFlow
 {
 
-using int8Field_D 		= Field<VectorSingle, int8>;
+using int8Field_D 		= Field<int8>;
 
-using int8Field_H 		= Field<VectorSingle, int8, HostSpace>;
+using int8Field_H 		= Field<int8, HostSpace>;
 
-using int32Field_D 		= Field<VectorSingle, int32>;
+using int32Field_D 		= Field<int32>;
 
-using int32Field_H 		= Field<VectorSingle, int32, HostSpace>;
+using int32Field_H 		= Field<int32, HostSpace>;
 
-using int64Field_D 		= Field<VectorSingle, int64>;
+using int64Field_D 		= Field<int64>;
 
-using int64Field_H 		= Field<VectorSingle, int64, HostSpace>;
+using int64Field_H 		= Field<int64, HostSpace>;
 
-using uint8Field_D     = Field<VectorSingle, uint8>;
+using uint8Field_D     = Field<uint8>;
 
-using uint8Field_H     = Field<VectorSingle, uint8, HostSpace>;
+using uint8Field_H     = Field<uint8, HostSpace>;
 
-using uint32Field_D 	= Field<VectorSingle, uint32>;
+using uint32Field_D 	= Field<uint32>;
 
-using uint32Field_H 	= Field<VectorSingle, uint32, HostSpace>;
+using uint32Field_H 	= Field<uint32, HostSpace>;
 
-using uint64Field_D 		= Field<VectorSingle, uint64>;
+using uint64Field_D 		= Field<uint64>;
 
-using uint64Field_H 		= Field<VectorSingle, uint64, HostSpace> ;
+using uint64Field_H 		= Field<uint64, HostSpace> ;
 
-using realField_D 		= Field<VectorSingle, real>;
+using realField_D 		= Field<real>;
 
-using realField_H 		= Field<VectorSingle, real, HostSpace> ;
+using realField_H 		= Field<real, HostSpace> ;
 
-using realx3Field_D 	= Field<VectorSingle, realx3>;
+using realx3Field_D 	= Field<realx3>;
 
-using realx3Field_H 	= Field<VectorSingle, realx3, HostSpace>;
+using realx3Field_H 	= Field<realx3, HostSpace>;
 
-using realx3x3Field_D 	= Field<VectorSingle, realx3x3>;
+using realx3x3Field_D 	= Field<realx3x3>;
 
-using realx3x3Field_H 	= Field<VectorSingle, realx3x3, HostSpace>;
+using realx3x3Field_H 	= Field<realx3x3, HostSpace>;
 
 // - no typedef on device (since word does not compile on CUDA)
-using wordField_H 		= Field<VectorSingle, word, HostSpace>;
+using wordField_H 		= Field<word, HostSpace>;
 
 
 // host device fields
@@ -93,11 +93,6 @@ using int64x3Field_HD 	= Field<VectorDual, int64x3>;
 
 using realx3x3Field_HD 	= Field<VectorDual, realx3x3>;*/
 
-
-using wordField 		= Field<Vector, word , vecAllocator<word>>; 
-
-
-
 }
 
 
diff --git a/src/phasicFlow/containers/Vector/Vector.cpp b/src/phasicFlow/containers/Vector/Vector.cpp
index e17ce7a8..ec729fc2 100644
--- a/src/phasicFlow/containers/Vector/Vector.cpp
+++ b/src/phasicFlow/containers/Vector/Vector.cpp
@@ -19,7 +19,7 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 
-template<typename T, typename Allocator>
+/*template<typename T, typename Allocator>
 bool pFlow::Vector<T, Allocator>::readVector
 (
 	iIstream& is,
@@ -38,7 +38,7 @@ bool pFlow::Vector<T, Allocator>::writeVector
 ) const
 {
 	return writeStdVector(os, vectorField(), iop);	
-}
+}*/
 
 /*template<typename T, typename Allocator>
 bool pFlow::Vector<T, Allocator>::deleteElement_sorted
diff --git a/src/phasicFlow/containers/Vector/Vector.hpp b/src/phasicFlow/containers/Vector/Vector.hpp
index fa7cabb6..32d2f115 100644
--- a/src/phasicFlow/containers/Vector/Vector.hpp
+++ b/src/phasicFlow/containers/Vector/Vector.hpp
@@ -59,27 +59,27 @@ class Vector
 {
 public:
 	
-	typedef Vector<T, Allocator>					VectorType;
+	using VectorType 		= Vector<T, Allocator>;
 
-	typedef typename std::vector<T, Allocator>		vectorType;
+	using vectorType 		= typename std::vector<T, Allocator>;
 
-	typedef typename vectorType::iterator 			iterator;
+	using iterator 			= typename vectorType::iterator;
 	
-	typedef typename vectorType::const_iterator 	const_iterator;
+	using const_iterator 	= typename vectorType::const_iterator;
 	
-	typedef typename vectorType::reference 			reference;
+	using reference 		= typename vectorType::reference;
 	
-	typedef typename vectorType::const_reference 	const_reference;
+	using const_reference 	= typename vectorType::const_reference;
 	
-	typedef  T 										value_type; 		
+	using value_type 		= T; 		
 
-	typedef  T* 									pointer;
+	using pointer 			= T *;
 
-	typedef const T*  								const_pointer;
+	using const_pointer 	= const T *;
 
-	typedef typename std::initializer_list<T> 		init_list;
+	using init_list 		= typename std::initializer_list<T>;
 
-protected:
+private:
 
 	// - name of the vector  
 	word name_;
@@ -105,21 +105,24 @@ public:
 
 
 		/// Empty Vector with a name 
-		inline Vector(const word& name)
+		inline 
+		explicit Vector(const word& name)
 		:
 			name_(name)
 		{}
 
 		
 		/// Vector with specified length and name
-		inline Vector(const word& name, size_t len)
+		inline 
+		Vector(const word& name, size_t len)
 		:
 			vectorType(len),
 			name_(name)
 		{}
 
 		/// Vector with name, length and value
-		inline Vector(const word& name, size_t len, const T& val)
+		inline 
+		Vector(const word& name, size_t len, const T& val)
 		:
 			Vector(name, len)
 		{
@@ -136,7 +139,8 @@ public:
 
 
 		/// Vector from name and initializer list 
-		inline Vector(const word& name, const init_list &l)
+		inline 
+		Vector(const word& name, const init_list &l)
 		:
 			vectorType(l),
 			name_(name)
@@ -162,7 +166,7 @@ public:
 		inline Vector(const VectorType& src) = default;
 
 		/// Copy from src with a new name 
-		inline Vector(const word name, const Vector<T>& src):
+		inline Vector(const word& name, const Vector<T>& src):
 			vectorType(src),
 			name_(name)
 		{}
@@ -178,10 +182,10 @@ public:
 		}
 
 		/// Move construct 
-		inline Vector( VectorType && mv) = default;
+		Vector( VectorType && mv) noexcept= default;
 	
 		/// Move assignment 
-		inline VectorType& operator=( VectorType && mv) = default;
+		VectorType& operator=( VectorType && mv)noexcept = default;
 	
 		/// Scalar assignment 
 		inline void operator=(const T& val)
@@ -190,10 +194,8 @@ public:
 		}
 
 		/// Destructor 
-		inline ~Vector()
-		{
-			vectorType::clear();
-		}
+		~Vector() = default;
+		
 
 		/// Clone as a uniquePtr
 		inline uniquePtr<VectorType> clone() const
@@ -204,7 +206,8 @@ public:
 		/// Clone as a pointer 
 		inline VectorType* clonePtr()const
 		{
-			return new VectorType(*this);
+			uniquePtr<VectorType> Ptr = makeUnique<VectorType>(*this);
+			return Ptr.release();
 		}
 
 	
@@ -283,6 +286,99 @@ public:
 			vectorType::reserve(cap);
 		}
 
+		// - fill the whole content of vector, [begin, end), with val 
+		void fill( const T& val);
+
+		inline
+		auto getSpan()
+		{
+			return span<T>(this->data(), this->size());
+		}
+		
+		inline 
+		auto getSpan()const
+		{
+			return span<T>(const_cast<T*>(this->data()), this->size());
+		}
+
+		static constexpr bool isHostAccessible()
+		{
+			return isHostAccessible_;
+		}
+
+	void operator +=( const T& val);
+	void operator -=( const T& val);
+	void operator *=( const T& val);
+	void operator /=( const T& val);
+
+	void operator +=( const VectorType& v );
+	void operator -=( const VectorType& v );
+	void operator /=( const VectorType& v );
+	void operator *=( const VectorType& v );
+
+	VectorType operator -()const;
+
+	bool read(iIstream& is)
+	{
+		return readStdVector(is, vectorField());
+	}
+	bool write(iOstream& os)
+	{
+		return writeStdVector(os, vectorField());
+	}
+
+	bool read(iIstream& is, const IOPattern& iop)
+	{
+		return readStdVector(is, vectorField(), iop);
+	}
+
+	bool write(iOstream& os, const IOPattern& iop)const
+	{
+		return writeStdVector(os, vectorField(), iop);
+	}
+
+	static
+	constexpr const char* memoerySpaceName()
+  	{
+  		return "std";
+  	}
+};
+
+
+template<typename T, typename Allocator>
+inline iIstream& operator >> (iIstream & is, Vector<T, Allocator> & ivec )
+{
+	if( !ivec.read(is) )
+	{
+		ioErrorInFile (is.name(), is.lineNumber());
+		fatalExit;
+	}
+	return is;
+}
+
+template<typename T, typename Allocator> 
+inline iOstream& operator << (iOstream& os, const Vector<T, Allocator>& ovec )
+{	
+	if( !ovec.write(os) )
+	{
+		ioErrorInFile(os.name(), os.lineNumber());
+		fatalExit;
+	}
+	return os; 
+}
+
+
+} // pFlow
+
+
+#include "VectorI.hpp"
+#include "Vector.cpp"
+#include "VectorMath.hpp"
+#include "VectorAlgorithm.hpp"
+
+#endif
+
+
 
 	/*// - delete elemens of vector based on sorted indices 
 	//   return false if out of range
@@ -317,94 +413,4 @@ public:
 
 	// - set or insert a new element into the vecor 
 	//   return false if it fails 
-	inline bool insertSetElement(int32 idx, const T& val);*/
-
-	// - fill the whole content of vector, [begin, end), with val 
-	inline void fill( const T& val);
-
-	inline
-	auto getSpan()
-	{
-		return span<T>(this->data(), this->size());
-	}
-	
-	inline 
-	auto getSpan()const
-	{
-		return span<T>(const_cast<T*>(this->data()), this->size());
-	}
-
-	static constexpr bool isHostAccessible()
-	{
-		return isHostAccessible_;
-	}
-
-	
-
-	inline void operator +=( const T& val);
-	inline void operator -=( const T& val);
-	inline void operator *=( const T& val);
-	inline void operator /=( const T& val);
-
-	inline void operator +=( const VectorType& v );
-	inline void operator -=( const VectorType& v );
-	inline void operator /=( const VectorType& v );
-	inline void operator *=( const VectorType& v );
-
-	inline VectorType operator -()const;
-
-	/// Read vector (assume ASCII in input)
-	bool readVector(iIstream& is, const IOPattern& iop);
-
-	/// write vector 
-	bool writeVector(iOstream& os, const IOPattern& iop) const;
-
-	bool read(iIstream& is, const IOPattern& iop)
-	{
-		return readVector(is, iop);
-	}
-
-	bool write(iOstream& os, const IOPattern& iop)const
-	{
-		return writeVector(os, iop);
-	}
-
-	constexpr static inline const char* memoerySpaceName()
-  	{
-  		return "std";
-  	}
-};
-
-
-template<typename T, typename Allocator>
-inline iIstream& operator >> (iIstream & is, Vector<T, Allocator> & ivec )
-{
-	if( !ivec.readVector(is, IOPattern::MasterProcessorOnly) )
-	{
-		ioErrorInFile (is.name(), is.lineNumber());
-		fatalExit;
-	}
-	return is;
-}
-
-template<typename T, typename Allocator> 
-inline iOstream& operator << (iOstream& os, const Vector<T, Allocator>& ovec )
-{	
-	if( !ovec.writeVector(os, IOPattern::AllProcessorsDifferent) )
-	{
-		ioErrorInFile(os.name(), os.lineNumber());
-		fatalExit;
-	}
-	return os; 
-}
-
-
-} // pFlow
-
-
-#include "VectorI.hpp"
-#include "Vector.cpp"
-#include "VectorMath.hpp"
-#include "VectorAlgorithm.hpp"
-
-#endif
+	inline bool insertSetElement(int32 idx, const T& val);*/
\ No newline at end of file
diff --git a/src/phasicFlow/containers/Vector/Vectors.cpp b/src/phasicFlow/containers/Vector/Vectors.cpp
index 8db0fb40..d8f2dc05 100644
--- a/src/phasicFlow/containers/Vector/Vectors.cpp
+++ b/src/phasicFlow/containers/Vector/Vectors.cpp
@@ -20,22 +20,4 @@ Licence:
 
 #include "Vectors.hpp"
 
-// instantiation just for numeral types 
-
-/*template class pFlow::Vector<pFlow::int8>;
-
-template class pFlow::Vector<pFlow::int32>;
-
-template class pFlow::Vector<pFlow::uint32>;
-
-template class pFlow::Vector<pFlow::real>;
-
-template class pFlow::Vector<pFlow::realx3>;
-
-template class pFlow::Vector<pFlow::realx3x3>;*/
-
-
-
- 
-
 
diff --git a/src/phasicFlow/containers/Vector/stdVectorHelper.hpp b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
index 584d07c6..60a71873 100644
--- a/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
+++ b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
@@ -48,12 +48,20 @@ public:
 template<typename T>
 using vecAllocator = std::allocator<T>;
 
+template<typename T>
+inline
+bool writeSpan(
+    iOstream& os, 
+    span<T> sp)
+{
+	return writeDataAsciiBinary(os, sp);
+}
 
 template<typename T>
 inline
 bool writeSpan(
     iOstream& os, 
-    const span<T>& sp, 
+    span<T> sp, 
     const IOPattern& iop)
 {
    
@@ -73,6 +81,17 @@ bool writeSpan(
     return true; 
 }
 
+template<typename T, typename Allocator>
+bool writeStdVector
+(
+	iOstream& os, 
+	const std::vector<T,Allocator>& vec
+)
+{
+	auto sp = makeSpan(vec);
+	return writeSpan(os, sp);
+}
+
 template<typename T, typename Allocator>
 bool writeStdVector
 (
@@ -85,6 +104,18 @@ bool writeStdVector
 	return writeSpan(os, sp, iop);
 }
 
+template<typename T, typename Allocator>
+bool readStdVector
+(
+	iIstream& is, 
+	std::vector<T,Allocator>& vec
+)
+{
+	
+	return readDataAsciiBinary(is, vec);
+	
+}
+
 template<typename T, typename Allocator>
 bool readStdVector
 (
@@ -113,7 +144,7 @@ bool readStdVector
 template<typename T, typename Allocator>
 iOstream& operator<<( iOstream& os, const std::vector<T,Allocator>& vec)
 {
-	if(!writeStdVector(os, vec, IOPattern::AllProcessorsDifferent))
+	if(!writeStdVector(os, vec))
 	{
 		fatalErrorInFunction;
 		fatalExit;
@@ -125,7 +156,7 @@ iOstream& operator<<( iOstream& os, const std::vector<T,Allocator>& vec)
 template<typename T, typename Allocator>
 iIstream& operator>>(iIstream& is, std::vector<T,Allocator>& vec)
 {
-	if( !readStdVector(is,vec, IOPattern::MasterProcessorOnly))
+	if( !readStdVector(is,vec))
 	{
 		fatalErrorInFunction;
 		fatalExit;
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
index 18b053e6..6b0789b1 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
@@ -403,6 +403,23 @@ void pFlow::VectorSingle<T,MemorySpace>::assign
 {
     assign(src, src.capacity());
 }
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+void pFlow::VectorSingle<T,MemorySpace>::assign(const VectorTypeHost& src)
+{
+	uint32 srcSize = src.size();
+	uint32 srcCap = src.capacity();
+
+    if(srcCap != capacity())
+    {
+        reallocateCapacitySize(srcCap, srcSize);
+    }
+    else
+    {
+        setSize(srcSize);
+    }
+	copy(deviceVector(), src.hostVector());
+}
 
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 1b34604b..0876e6e5 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -24,12 +24,11 @@ Licence:
 
 #include "globalSettings.hpp"
 #include "phasicFlowKokkos.hpp"
-#include "types.hpp"
+#include "stdVectorHelper.hpp"
 #include "error.hpp"
 #include "indexContainer.hpp"
 #include "streams.hpp"
-#include "span.hpp"
-#include "dataIO.hpp"
+
 
 
 #ifndef __RESERVE__
@@ -53,6 +52,8 @@ public:
 
 		using VectorType		= VectorSingle<T, MemorySpace>;
 
+		using VectorTypeHost 	= VectorSingle<T, HostSpace>; 		
+
 		using iterator        = T*;
 
 		using const_iterator   = const T*;
@@ -77,7 +78,7 @@ public:
 
 		using execution_space 	= typename viewType::execution_space;
 
-protected:
+private:
 	
 	// - Data members
 
@@ -136,7 +137,7 @@ public:
 		VectorSingle();
 		
 		/// Empty vector with a name (capacity = 2) 
-		VectorSingle(const word& name);
+		explicit VectorSingle(const word& name);
 		
 		/// Vector with name and size n
 		VectorSingle(const word& name, uint32 n);
@@ -271,6 +272,12 @@ public:
 		/// The capacity of *this becomes the capacity of src.
 		INLINE_FUNCTION_H 
 		void assign(const std::vector<T>& src);
+
+		/// Assign source vector from host side.
+		/// The size of *this becomes the size of src. 
+		/// The capacity of *this becomes the capacity of src.
+		INLINE_FUNCTION_H
+		void assign(const VectorTypeHost& src);
 		
 		INLINE_FUNCTION_H
 		auto getSpan();
@@ -291,7 +298,7 @@ public:
 		///  resize if necessary and works on host accessible vector.
 		template<bool Enable = true>
 		INLINE_FUNCTION_H
-		typename std::enable_if<isHostAccessible_ && Enable, void>::type
+		typename std::enable_if_t<isHostAccessible_ && Enable, void>
 		push_back(const T& val)
 		{
 			auto n = changeSize(size_+1);
@@ -360,7 +367,19 @@ public:
 
 	//// - IO operations
 
-		/// Read vector from stream (ASCII)
+		/// Read vector from stream
+		FUNCTION_H
+		bool read(iIstream& is)
+		{
+			std::vector<T> vecFromFile;
+			if(! readStdVector(is, vecFromFile)) return false;
+
+			this->assign(vecFromFile);
+
+			return true;
+		}
+
+		/// Read vector from stream
 		FUNCTION_H
 		bool read(iIstream& is, const IOPattern& iop)
 		{
@@ -383,6 +402,16 @@ public:
 			
 		}
 
+		FUNCTION_H
+		bool write(iOstream& os)const
+		{
+			auto hVec = hostVector();
+			auto sp = span<T>( const_cast<T*>(hVec.data()), hVec.size());
+			
+			return writeSpan(os, sp);
+			
+		}
+
 		template<typename HostMask>
 		FUNCTION_H
 		bool write(iOstream& os, const IOPattern& iop, const HostMask& mask)const
@@ -408,19 +437,21 @@ public:
 			return writeSpan(os, sp, iop);
 
 		}
-	/// Name of the memory space
-	constexpr static inline 
-	const char* memoerySpaceName()
-	{
-		return memory_space::name();
-	}
+
+
+		/// Name of the memory space
+		static  
+		constexpr const char* memoerySpaceName()
+		{
+			return memory_space::name();
+		}
 
 }; // class VectorSingle
 
 template<typename T, typename MemorySpace>
 inline iIstream& operator >> (iIstream & is, VectorSingle<T, MemorySpace> & ivec )
 {
-	if( !ivec.read(is, IOPattern::MasterProcessorOnly ) )
+	if( !ivec.read(is) )
 	{
 		ioErrorInFile (is.name(), is.lineNumber());
 		fatalExit;
@@ -432,7 +463,7 @@ template<typename T, typename MemorySpace>
 inline iOstream& operator << (iOstream& os, const VectorSingle<T, MemorySpace>& ovec )
 {
 	
-	if( !ovec.write(os, IOPattern::AllProcessorsDifferent) )
+	if( !ovec.write(os) )
 	{
 		ioErrorInFile(os.name(), os.lineNumber());
 		fatalExit;
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingles.cpp b/src/phasicFlow/containers/VectorHD/VectorSingles.cpp
new file mode 100644
index 00000000..c856b7c1
--- /dev/null
+++ b/src/phasicFlow/containers/VectorHD/VectorSingles.cpp
@@ -0,0 +1,38 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "VectorSingles.hpp" 
+
+
+template class Kokkos::View<pFlow::uint8*>;
+template class pFlow::VectorSingle<pFlow::uint8>;
+
+template class Kokkos::View<pFlow::int32*>;
+template class pFlow::VectorSingle<pFlow::int32>;
+
+template class Kokkos::View<pFlow::uint32*>;
+template class pFlow::VectorSingle<pFlow::uint32>;
+
+template class Kokkos::View<pFlow::real*>;
+template class pFlow::VectorSingle<pFlow::real>;
+
+template class Kokkos::View<pFlow::realx3*>;
+template class pFlow::VectorSingle<pFlow::realx3>;
+
diff --git a/src/phasicFlow/containers/pointField/internalField.cpp b/src/phasicFlow/containers/pointField/internalField.cpp
index 6759e38e..b3c23431 100644
--- a/src/phasicFlow/containers/pointField/internalField.cpp
+++ b/src/phasicFlow/containers/pointField/internalField.cpp
@@ -28,7 +28,7 @@ pFlow::internalField<VectorField, T, MemorySpace>::internalField
     observer
     (
 		&internal, 
-		message::CAP_CHANGED+message::ITEM_INSERT+message::ITEM_REARRANGE+message::ITEM_DELETE
+		defaultMessage_
     ),
 	field_
 	(
@@ -41,10 +41,36 @@ pFlow::internalField<VectorField, T, MemorySpace>::internalField
 	internalPoints_(internal)
 {}
 
-
 template<template<class, class> class VectorField, class T, class MemorySpace>
-pFlow::hostViewType1D<T> 
-	pFlow::internalField<VectorField, T, MemorySpace>::activeValuesHost()const
+pFlow::internalField<VectorField, T, MemorySpace>::internalField
+(
+	const word &name, 
+	const internalPoints &internal, 
+	const T &val
+)
+:
+	observer
+    (
+		&internal, 
+		defaultMessage_
+    ),
+	field_
+	(
+		name,
+		"ineternalField",
+		internal.capacity(),
+		internal.size(),
+		RESERVE()
+	),
+	internalPoints_(internal)
+{
+	field_.fill(val);
+} 
+
+
+template <template <class, class> class VectorField, class T, class MemorySpace>
+pFlow::hostViewType1D<T>
+pFlow::internalField<VectorField, T, MemorySpace>::activeValuesHost() const
 {
 	auto maskH = internalPoints_.activePointsMaskHost();
     auto fieldH = field_.hostVector();
diff --git a/src/phasicFlow/containers/pointField/internalField.hpp b/src/phasicFlow/containers/pointField/internalField.hpp
index d8731fb8..a1ff6b4c 100644
--- a/src/phasicFlow/containers/pointField/internalField.hpp
+++ b/src/phasicFlow/containers/pointField/internalField.hpp
@@ -50,12 +50,26 @@ protected:
 
     const internalPoints&   internalPoints_;
 
+	static inline
+	const message defaultMessage_ = 
+	(
+		message::CAP_CHANGED+
+		message::ITEM_INSERT+
+		message::ITEM_REARRANGE+
+		message::ITEM_DELETE
+	);
+
 public:
 
 	internalField(
 		const word& name, 
 		const internalPoints& internal);
 	
+	internalField(
+		const word& name, 
+		const internalPoints& internal,
+		const T& val);
+	
 
 	auto fieldDevice()const
 	{
@@ -105,28 +119,34 @@ public:
 		return internalPoints_.isAllActive();
 	}
 
+	bool hearChanges(const message& msg, const anyList& varList) override
+	{
+		notImplementedFunction;
+		return false;
+	}
+
 	//// - IO
 
 	bool write(iOstream& os, const IOPattern& iop)const;
 
 };
 
-/*template<template<class, class> class VectorField, class T, class MemorySpace>
+template<template<class, class> class VectorField, class T, class MemorySpace>
 inline
 iOstream& operator<<
 (
 	iOstream& os, 
-	const internalField<VectorField, T, MemorySpace>& if
+	const internalField<VectorField, T, MemorySpace>& ifeild
 )
 {
-	if( !if.write(os, IOPattern::AllProcessorsDifferent) )
+	if( !ifeild.write(os, IOPattern::AllProcessorsDifferent) )
 	{
 		ioErrorInFile(os.name(), os.lineNumber());
 		fatalExit;
 	}
 
 	return os;
-}*/
+}
 
 } // pFlow
 
diff --git a/src/phasicFlow/containers/pointField/pointField.cpp b/src/phasicFlow/containers/pointField/pointField.cpp
index 6696d856..ec84246f 100644
--- a/src/phasicFlow/containers/pointField/pointField.cpp
+++ b/src/phasicFlow/containers/pointField/pointField.cpp
@@ -44,109 +44,139 @@ pFlow::pointField<VectorField, T, MemorySpace>::pointField
 	
 }
 
-/*
-
-
-
 template<template<class, class> class VectorField, class T, class MemorySpace>
 pFlow::pointField<VectorField, T, MemorySpace>::pointField
 (
-	const pointStructure& pStruct,
+	const objectFile &objf, 
+	pointStructure &pStruct, 
 	const T& defVal,
-	bool subscribe
+	const T& val
 )
 :
-	eventObserver(pStruct, subscribe),
-	FieldType(pStruct.capacity(), pStruct.size(), RESERVE()),
+	IOobject
+	(
+		objectFile
+		(
+			objf.name(),
+			objf.localPath(),
+			objectFile::READ_NEVER,
+			objf.wFlag()
+		),
+		pStruct.ioPattern(),
+		pStruct.owner()
+	),
+	InternalFieldType
+	(
+		objf.name(),
+		pStruct,
+		val
+	),
+	boundaryFieldList_(pStruct.boundaries(), *this),
 	pStruct_(pStruct),
 	defaultValue_(defVal)
-{
-	// set value 
-	this->fill(defVal);
-}
-
-template<template<class, class> class VectorField, class T, class MemorySpace>
-pFlow::pointField<VectorField, T, MemorySpace>::pointField
-(
-	const pointStructure& pStruct,
-	const T& val,
-	const T& defVal,
-	bool subscribe
-)
-:
-	eventObserver(pStruct, subscribe),
-	FieldType(pStruct.capacity(), pStruct.size(), RESERVE()),
-	pStruct_(pStruct),
-	defaultValue_(defVal)
-{
-	this->fill(val);
-}
-
-template<template<class, class> class VectorField, class T, class MemorySpace>
-pFlow::pointField<VectorField, T, MemorySpace>::pointField
-(
-	const pointField& src,
-	bool subscribe
-)
-:
-	eventObserver(src.pStruct(), subscribe),
-	FieldType(src),
-	pStruct_(src.pStruct()),
-	defaultValue_(src.defaultValue_)
-{}
-
-template<template<class, class> class VectorField, class T, class MemorySpace>
-pFlow::pointField<VectorField, T, MemorySpace>::pointField(const pointField& src)
-:
-	pointField<VectorField, T, MemorySpace>(src, src.subscribed())
 {}
 
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-pFlow::pointField<VectorField, T, MemorySpace>& pFlow::pointField<VectorField, T, MemorySpace>::operator = 
-(
-	const pointField& rhs
-)
-{
-	if(this == &rhs) return *this;
-	
-	this->VectorField() = rhs.VectorField();
-	return *this;
-}
+ /*
 
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-bool pFlow::pointField<VectorField, T, MemorySpace>::update(const eventMessage& msg)
-{
- 
-	if( msg.isDeleted() )
-	{
-		
-	}
-	else if( msg.isInsert())
-	{
-		const auto newElems = pStruct().insertedPointIndex();
-		//Vector<T> vals( newElems.size(), defaultValue_);
-		return this->insertSetElement(newElems, defaultValue_);
-	}
 
-	if(msg.isRearranged())
-	{
-		auto sortedIndex = pStruct().mortonSortedIndex();
-		this->sortItems(sortedIndex);
-		return true;
-	}
-	
-	return true;
-}*/
+ template<template<class, class> class VectorField, class T, class MemorySpace>
+ pFlow::pointField<VectorField, T, MemorySpace>::pointField
+ (
+     const pointStructure& pStruct,
+     const T& defVal,
+     bool subscribe
+ )
+ :
+     eventObserver(pStruct, subscribe),
+     FieldType(pStruct.capacity(), pStruct.size(), RESERVE()),
+     pStruct_(pStruct),
+     defaultValue_(defVal)
+ {
+     // set value
+     this->fill(defVal);
+ }
+
+ template<template<class, class> class VectorField, class T, class MemorySpace>
+ pFlow::pointField<VectorField, T, MemorySpace>::pointField
+ (
+     const pointStructure& pStruct,
+     const T& val,
+     const T& defVal,
+     bool subscribe
+ )
+ :
+     eventObserver(pStruct, subscribe),
+     FieldType(pStruct.capacity(), pStruct.size(), RESERVE()),
+     pStruct_(pStruct),
+     defaultValue_(defVal)
+ {
+     this->fill(val);
+ }
+
+ template<template<class, class> class VectorField, class T, class MemorySpace>
+ pFlow::pointField<VectorField, T, MemorySpace>::pointField
+ (
+     const pointField& src,
+     bool subscribe
+ )
+ :
+     eventObserver(src.pStruct(), subscribe),
+     FieldType(src),
+     pStruct_(src.pStruct()),
+     defaultValue_(src.defaultValue_)
+ {}
+
+ template<template<class, class> class VectorField, class T, class MemorySpace>
+ pFlow::pointField<VectorField, T, MemorySpace>::pointField(const pointField& src)
+ :
+     pointField<VectorField, T, MemorySpace>(src, src.subscribed())
+ {}
 
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-bool pFlow::pointField<VectorField, T, MemorySpace>::readPointField
-(
-	iIstream& is,
-	const IOPattern& iop
-)
+ template<template<class, class> class VectorField, class T, class MemorySpace>
+ pFlow::pointField<VectorField, T, MemorySpace>& pFlow::pointField<VectorField, T, MemorySpace>::operator =
+ (
+     const pointField& rhs
+ )
+ {
+     if(this == &rhs) return *this;
+
+     this->VectorField() = rhs.VectorField();
+     return *this;
+ }
+
+
+ template<template<class, class> class VectorField, class T, class MemorySpace>
+ bool pFlow::pointField<VectorField, T, MemorySpace>::update(const eventMessage& msg)
+ {
+
+     if( msg.isDeleted() )
+     {
+
+     }
+     else if( msg.isInsert())
+     {
+         const auto newElems = pStruct().insertedPointIndex();
+         //Vector<T> vals( newElems.size(), defaultValue_);
+         return this->insertSetElement(newElems, defaultValue_);
+     }
+
+     if(msg.isRearranged())
+     {
+         auto sortedIndex = pStruct().mortonSortedIndex();
+         this->sortItems(sortedIndex);
+         return true;
+     }
+
+     return true;
+ }*/
+
+template <template <class, class> class VectorField, class T, class MemorySpace>
+bool pFlow::pointField<VectorField, T, MemorySpace>::readPointField(
+    iIstream &is,
+    const IOPattern &iop)
 {
 	Field<Vector, T , vecAllocator<T>> 
         fRead("file_read"+InternalFieldType::name(), InternalFieldType::fieldKey());   
@@ -192,6 +222,28 @@ bool pFlow::pointField<VectorField, T, MemorySpace>::writePointField
 	const IOPattern& iop
 )const
 {
-	notImplementedFunction;
-	return false;
+	
+    hostViewType1D<T> valuesH;
+
+    if(this->isAllActive())
+    {
+        valuesH = this->fieldHost();
+    }
+    else
+    {
+        valuesH = this->activeValuesHost();
+    }
+
+    auto data = span<T>(valuesH.data(), valuesH.size());
+    
+    if( !writeSpan(os, data, iop) )
+    {
+        fatalErrorInFunction<<
+        "Error in writing pointStructure in stream "<<
+        os.name()<<endl;
+        return false;
+    }
+
+    return true;
+	
 }
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/pointField.hpp b/src/phasicFlow/containers/pointField/pointField.hpp
index 083f8242..03633c61 100644
--- a/src/phasicFlow/containers/pointField/pointField.hpp
+++ b/src/phasicFlow/containers/pointField/pointField.hpp
@@ -79,6 +79,17 @@ public:
 			const objectFile& objf, 
             pointStructure& pStruct, 
             const T& defVal);
+		
+		pointField(
+			const objectFile& objf,
+			pointStructure& pStruct,
+			const T& defVal,
+			const T& val);
+		
+		const auto& internal()const
+		{
+			return static_cast<const InternalFieldType&>(*this);
+		}
 
 		// - construct from iIOEntity, pointStructure and a value
 		/*pointField( const pointStructure& pStruct, const T& val, const T& defVal, bool subscribe = true);
@@ -174,12 +185,12 @@ iIstream& operator >> (iIstream & is, pointField<VectorField, T, MemorySpace> &
 	}
 
 	return is;
-}
+}*/
 
 template<template<class, class> class VectorField, class T, class MemorySpace>
 iOstream& operator << (iOstream& os, const pointField<VectorField, T, MemorySpace>& pF )
 {
-	if(! pF.write(os) )
+	if(! pF.write(os, IOPattern::AllProcessorsDifferent) )
 	{
 		ioErrorInFile( os.name(), os.lineNumber() )<<
 		"error in writing pointField into file. \n";
@@ -187,7 +198,7 @@ iOstream& operator << (iOstream& os, const pointField<VectorField, T, MemorySpac
 	}
 
 	return os;
-}*/
+}
 
 }
 
diff --git a/src/phasicFlow/containers/pointField/pointFields.cpp b/src/phasicFlow/containers/pointField/pointFields.cpp
index 6ef70444..20c65cf0 100644
--- a/src/phasicFlow/containers/pointField/pointFields.cpp
+++ b/src/phasicFlow/containers/pointField/pointFields.cpp
@@ -23,15 +23,24 @@ Licence:
 #include "createBoundaryFields.hpp"
 
 
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8>; 
+template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace);
 createBoundary(pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace, exit);
 
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::real>; 
+template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8>; 
+createBaseBoundary(pFlow::VectorSingle, pFlow::int8, void);
+createBoundary(pFlow::VectorSingle, pFlow::int8, void, exit);
+
+template class pFlow::pointField<pFlow::VectorSingle, pFlow::real, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::VectorSingle, pFlow::real, pFlow::HostSpace);
 createBoundary(pFlow::VectorSingle, pFlow::real, pFlow::HostSpace, exit);
 
 
+template class pFlow::pointField<pFlow::VectorSingle, pFlow::real>; 
+createBaseBoundary(pFlow::VectorSingle, pFlow::real, void);
+createBoundary(pFlow::VectorSingle, pFlow::real, void, exit);
+
+
 /*template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace>; 
 
 template class pFlow::pointField<pFlow::VectorSingle, pFlow::int16>; 
diff --git a/src/phasicFlow/containers/pointField/pointFields.hpp b/src/phasicFlow/containers/pointField/pointFields.hpp
index 65dde6b1..9e33cbcf 100644
--- a/src/phasicFlow/containers/pointField/pointFields.hpp
+++ b/src/phasicFlow/containers/pointField/pointFields.hpp
@@ -35,15 +35,16 @@ template<typename T>
 template<typename T>
   using pointField_D = pointField<VectorSingle, T>;
 
-/*template<typename T>
-  using pointField_HD = pointField<VectorDual, T>;*/
-
 
 using int8PointField_D 		= pointField<VectorSingle, int8>;
 
 using int8PointField_H 		= pointField<VectorSingle, int8, HostSpace>;
 
-using int32PointField_D 	= pointField<VectorSingle, int32>;
+using realPointField_D 		= pointField<VectorSingle, real>;
+
+using realPointField_H 		= pointField<VectorSingle, real, HostSpace>;
+
+//using int32PointField_D 	= pointField<VectorSingle, int32>;
 
 /*using int32PointField_H 	= pointField<VectorSingle, int32, HostSpace>;
 
diff --git a/src/phasicFlow/containers/span/span.hpp b/src/phasicFlow/containers/span/span.hpp
index c9ee5093..902ad990 100644
--- a/src/phasicFlow/containers/span/span.hpp
+++ b/src/phasicFlow/containers/span/span.hpp
@@ -155,51 +155,16 @@ public:
     	return data_[i];
     }
 
-    /// Write in ASCII format, can be sued for all variable types
-    INLINE_FUNCTION_H
-    bool writeASCII(iOstream& os) const
-    {
-        os<< size()<<endl;
-        os << token::BEGIN_LIST;
-        if(size()>0)
-        {
-            for(uint32 i=0; i<size()-1; i++)
-            {
-                os << data_[i]<<token::NL;
-            }
-            os << data_[size()-1] << token::END_LIST;
-        }
-        else
-        {
-            os<< token::END_LIST;
-        }
-        
-        os.check(FUNCTION_NAME);
-        return true;
-    }
-
-
 };
 
-
-template<typename T>
-inline 
-iOstream& operator<<(iOstream& os, const span<T>& s)
-{
-
-    s.writeASCII(os);
-
-    return os;
-}
-
-template<typename T, template<class> class Container>
-span<T> makeSpan(Container<T>& container)
+template<typename T, typename... properties, template<class, class...> class Container>
+size_t makeSpan(Container<T, properties...>& container)
 {
     return span<T>(container.data(), container.size());
 }
 
-template<typename T, template<class> class Container>
-span<T> makeSpan(const Container<T>& container)
+template<typename T, typename... properties, template<class, class...> class Container>
+size_t makeSpan(const Container<T, properties...>& container)
 {
     return span<T>(
         const_cast<T*>(container.data()), 
@@ -227,6 +192,23 @@ span<const char> charSpan(span<const T> s)
         s.size()*el);
 }
 
+template<typename T, template<class> class Container>
+span<T> makeSpan(Container<T>& container)
+{
+    return span<T>(container.data(), container.size());
+}
+
+template<typename T, template<class> class Container>
+span<T> makeSpan(const Container<T>& container)
+{
+    return span<T>(
+        const_cast<T*>(container.data()), 
+        container.size());
+}
+
+
+
+
 
 
 } // pFlow
diff --git a/src/phasicFlow/dictionary/fileDictionary.cpp b/src/phasicFlow/dictionary/fileDictionary.cpp
index a8abd443..14012165 100644
--- a/src/phasicFlow/dictionary/fileDictionary.cpp
+++ b/src/phasicFlow/dictionary/fileDictionary.cpp
@@ -20,7 +20,7 @@ pFlow::fileDictionary::fileDictionary
     )
 {
     dictionary::name_ = IOobject::path().wordPath();
-    if(!IOobject::read())
+    if(!IOobject::readObject())
     {
         fatalErrorInFunction<<
         "Error in reading from dictionary "<< globalName()<<endl;
diff --git a/src/phasicFlow/repository/IOobject/IOobject.cpp b/src/phasicFlow/repository/IOobject/IOobject.cpp
index 435f9033..39e3090c 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.cpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.cpp
@@ -62,7 +62,7 @@ pFlow::repository* pFlow::IOobject::releaseOwner
     return old;
 }
 
-bool pFlow::IOobject::read(bool rdHdr)
+bool pFlow::IOobject::readObject(bool rdHdr)
 {
     
 	if( implyRead() )
@@ -85,7 +85,7 @@ bool pFlow::IOobject::read(bool rdHdr)
         {
             if( auto ptrIS = inStream(); ptrIS )
             {
-                if(!read(ptrIS(), rdHdr))return false;              
+                if(!readObject(ptrIS(), rdHdr))return false;              
             }
             else
             {
@@ -101,7 +101,7 @@ bool pFlow::IOobject::read(bool rdHdr)
 }
 
 
-bool pFlow::IOobject::write() const
+bool pFlow::IOobject::writeObject() const
 {
 	if(implyWrite())
 	{
@@ -109,7 +109,7 @@ bool pFlow::IOobject::write() const
         {
             if(auto ptrOS = outStream(); ptrOS )
             {
-                return write(ptrOS());
+                return writeObject(ptrOS());
             }
             else
             {
@@ -124,7 +124,7 @@ bool pFlow::IOobject::write() const
 }
 
 
-bool pFlow::IOobject::read(iIstream& is, bool rdHdr)
+bool pFlow::IOobject::readObject(iIstream& is, bool rdHdr)
 {
 	if(rdHdr && ioPattern().thisCallRead() )
 	{
@@ -143,7 +143,7 @@ bool pFlow::IOobject::read(iIstream& is, bool rdHdr)
 }
 
 
-bool pFlow::IOobject::write(iOstream& os) const
+bool pFlow::IOobject::writeObject(iOstream& os) const
 {
 	if(this->writeHeader() && ioPattern().thisProcWriteHeader())
 		writeHeader(os, typeName());
diff --git a/src/phasicFlow/repository/IOobject/IOobject.hpp b/src/phasicFlow/repository/IOobject/IOobject.hpp
index 71acbc50..952498c5 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.hpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.hpp
@@ -88,16 +88,16 @@ public:
 	//// - IO operations 
 
 		// - read from file 
-		bool read(bool rdHdr = true);
+		bool readObject(bool rdHdr = true);
 
 		// - write to file 
-		bool write() const;
+		bool writeObject() const;
 
 		// - read from istream 
-		bool read(iIstream& is, bool rdHdr = true);
+		bool readObject(iIstream& is, bool rdHdr = true);
 
 		// - write to istream 
-		bool write(iOstream& os) const;
+		bool writeObject(iOstream& os) const;
 
         virtual 
         bool write(iOstream& is, const IOPattern& iop)const = 0;
diff --git a/src/phasicFlow/repository/repository/repository.cpp b/src/phasicFlow/repository/repository/repository.cpp
index 0702a9ce..d3e268ea 100644
--- a/src/phasicFlow/repository/repository/repository.cpp
+++ b/src/phasicFlow/repository/repository/repository.cpp
@@ -286,7 +286,7 @@ bool pFlow::repository::write
 			REPORT(1)<< "Writing to " << obj.second->path()<<END_REPORT;
 		}
 		
-		if(!obj.second->write())
+		if(!obj.second->writeObject())
 		{
 			return false;
 		}
diff --git a/src/phasicFlow/streams/dataIO/createDataIO.hpp b/src/phasicFlow/streams/dataIO/createDataIO.hpp
index c15c43b7..539ec35a 100644
--- a/src/phasicFlow/streams/dataIO/createDataIO.hpp
+++ b/src/phasicFlow/streams/dataIO/createDataIO.hpp
@@ -1,3 +1,23 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
 #ifndef __createDataIO_hpp__
 #define __createDataIO_hpp__
 
diff --git a/src/phasicFlow/streams/dataIO/dataIO.hpp b/src/phasicFlow/streams/dataIO/dataIO.hpp
index 21da63ab..5f378953 100644
--- a/src/phasicFlow/streams/dataIO/dataIO.hpp
+++ b/src/phasicFlow/streams/dataIO/dataIO.hpp
@@ -1,10 +1,29 @@
 
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
 #ifndef __dataIO_hpp__
 #define __dataIO_hpp__
 
 #include <vector>
 
-#include "types.hpp"
 #include "span.hpp"
 #include "IOPattern.hpp"
 #include "iOstream.hpp"
@@ -15,6 +34,35 @@
 namespace pFlow
 {
 
+// - Forward 
+template<typename T>
+bool writeDataAsciiBinary
+(
+	iOstream& os, 
+	span<T> data
+);
+
+template<typename T>
+bool writeDataASCII
+(
+	iOstream& os, 
+	span<T> data
+);
+
+template<typename T>
+bool readDataAscii
+(
+	iIstream& is,
+	std::vector<T>& vec
+);
+
+template<typename T>
+bool readDataAsciiBinary
+(
+	iIstream& is, 
+	std::vector<T>& data
+);
+
 template<typename T>
 class dataIO
 {
@@ -58,12 +106,19 @@ public:
         iIstream& is, 
         std::vector<T>& data);
 
-	bool readAscii(
-		iIstream& is,
-		std::vector<T>& vec	);
-
 };
-	
+
+template<typename T>
+inline 
+iOstream& operator<<(iOstream& os, const span<T>& s)
+{
+	if(!writeDataAsciiBinary(os, s))
+	{
+		ioErrorInFile(os.name(), os.lineNumber());
+		fatalExit;
+	}
+    return os;
+}
 
 
 }
diff --git a/src/phasicFlow/streams/dataIO/dataIOMPI.hpp b/src/phasicFlow/streams/dataIO/dataIOMPI.hpp
new file mode 100644
index 00000000..850cf69b
--- /dev/null
+++ b/src/phasicFlow/streams/dataIO/dataIOMPI.hpp
@@ -0,0 +1,97 @@
+#ifndef __datIOMPI_hpp__
+#define __datIOMPI_hpp__
+
+#include "dataIO.hpp"
+#include "pFlowProcessors.hpp"
+
+#ifdef pFlow_Build_MPI
+    #include "gatherMaster.hpp"
+#endif
+
+namespace pFlow
+{
+
+template<typename T>
+class dataIOMPI
+:
+	public dataIO<T>
+{
+protected:
+    
+    bool gatherData(span<T> data ) override
+    {
+        
+        if(this->ioPattern_.isAllProcessorsDifferent())
+        {
+            this->bufferSpan_ = data;
+            return true;
+        }
+        
+        if( this->ioPattern_.isMasterProcessorDistribute())
+        {
+
+#ifdef pFlow_Build_MPI
+            
+            auto gatherT = pFlow::MPI::gatherMaster<T>(pFlowProcessors());
+            
+            if(!gatherT.gatherData(data))
+            {
+                fatalErrorInFunction<<"Error in gathering data to master"<<endl;
+                return false;
+            }
+
+            this->buffer_ = gatherT.moveData();
+
+            this->bufferSpan_ = makeSpan(this->buffer_);
+
+            return true;
+#else
+            notImplementedFunction;
+            fatalExit;
+            return false;
+#endif //pFlow_Build_MPI
+        
+        }
+
+        if( this->ioPattern_.isMasterProcessorOnly() || this->ioPattern_.isAllProcessorSimilar() )
+        {
+            if( this->ioPattern_.isMaster() )
+            {
+                this->bufferSpan_ = data;
+            }
+            else
+            {
+                this->bufferSpan_ = span<T>(nullptr, 0);
+                return true;
+            }
+        }
+
+        return false;
+    }
+public:
+
+	TypeInfo("dataIO<MPI>");
+
+	dataIOMPI(const IOPattern& iop)
+    :
+        dataIO<T>(iop)
+    {}
+
+	dataIOMPI(const dataIOMPI&) = default;
+
+	dataIOMPI(dataIOMPI&&) = default;
+
+
+	dataIOMPI& operator=(const dataIOMPI&) = default;
+
+	dataIOMPI& operator=(dataIOMPI&&) = default;
+
+	~dataIOMPI() = default;
+
+};
+
+
+}
+
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIORegular.hpp b/src/phasicFlow/streams/dataIO/dataIORegular.hpp
index 08f66a2a..faebc715 100644
--- a/src/phasicFlow/streams/dataIO/dataIORegular.hpp
+++ b/src/phasicFlow/streams/dataIO/dataIORegular.hpp
@@ -1,3 +1,23 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
 #ifndef __datIONoMPI_hpp__
 #define __datIONoMPI_hpp__
 
diff --git a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
index 82478821..58b811ac 100644
--- a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
+++ b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
@@ -1,132 +1,127 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
 
 template<typename T>
-bool pFlow::dataIO<T>::writeData(iOstream& os, span<T> data)
+bool pFlow::writeDataAsciiBinary(iOstream& os, span<T> data)
 {
-	/// first gather data from all processors (if any)
-	if(!gatherData( data ) )
+
+	if( os.isBinary() )
 	{
-		fatalErrorInFunction<<
-		"Error in gathering data for out stream "<< os.name()<<endl;
-		return false;
-	}
+		// first write the number of data
+		uint64 numData = data.size();
+		os<< numData << endl;
 
-	if( ioPattern_.thisProcWriteData())
-	{
-		if( os.isBinary() )
+		// write the bindary data
+		auto chBuffer = charSpan(data);
+
+		if(!os.write(chBuffer.data(), chBuffer.size()))
 		{
-			// first write the number of data
-			uint64 numData = bufferSpan_.size();
-			os<< numData << endl;
-
-            // write the bindary data
-            auto chBuffer = charSpan(bufferSpan_);
-
-			if(!os.write(chBuffer.data(), chBuffer.size()))
-			{
-				fatalErrorInFunction<<
-		    	"error in writing binary data to "<<os.name()<<endl;
-		    	return false;
-			}
-
-		}
-		else
-		{
-		    if( !bufferSpan_.writeASCII(os) )
-		    {
-		    	fatalErrorInFunction<<
-		    	"error in writing ASCII data to "<<os.name()<<endl;
-		    	return false;
-		    }
+			fatalErrorInFunction<<
+			"error in writing binary data to "<<os.name()<<endl;
+			return false;
 		}
 
-		return os.check(FUNCTION_NAME);
 	}
 	else
 	{
-		return true;
+		if( !writeDataASCII(os, data) )
+		{
+			fatalErrorInFunction<<
+			"error in writing ASCII data to "<<os.name()<<endl;
+			return false;
+		}
 	}
+
+	return os.check(FUNCTION_NAME);
+	
 }
 
-template<>
-inline
-bool pFlow::dataIO<pFlow::word>::writeData(iOstream& os, span<word> data)
+template<typename T>
+bool pFlow::writeDataASCII(iOstream& os, span<T> data)
 {
-    notImplementedFunction;
-    fatalExit;
-    /// first gather data from all processors (if any)
-	if(!gatherData( data ) )
+	os<< data.size()<<endl;
+	os << token::BEGIN_LIST;
+	if(data.size()>0)
 	{
-		fatalErrorInFunction<<
-		"Error in gathering data for out stream "<< os.name()<<endl;
-		return false;
+		for(uint32 i=0; i<data.size()-1; i++)
+		{
+			os << data[i]<<token::NL;
+		}
+		os << data[data.size()-1] << token::END_LIST;
 	}
-
-	if( !bufferSpan_.writeASCII(os) )
-    {
-    	fatalErrorInFunction<<
-    	"error in writing ASCII data to "<<os.name()<<endl;
-    	return false;
-    }
-
+	else
+	{
+		os<< token::END_LIST;
+	}
+	
+	os.check(FUNCTION_NAME);
 	return true;
 }
 
-
 template<typename T>
-bool pFlow::dataIO<T>::readData
+bool pFlow::readDataAsciiBinary
 (
 	iIstream& is, 
 	std::vector<T>& data
 )
 {
-	data.clear();
-	if(ioPattern_.thisProcReadData())
+	
+	if(is.isBinary())
 	{
-		if(is.isBinary())
+		data.clear();
+		// read length of data 			
+		token firstToken(is);
+		
+		size_t len = 0;
+		if( firstToken.isInt64())
 		{
-            
-			// read length of data 			
-			token firstToken(is);
-			
-			size_t len = 0;
-			if( firstToken.isInt64())
-			{
-				len = firstToken.int64Token();
-				data.resize(len);	
-			}
-			else
-			{
-				fatalErrorInFunction<<
-				"expected length of vector in the stream "<<is.name()<<
-				"but found this "<< firstToken<<endl;
-				return false;
-			}
-
-			is.read(reinterpret_cast<char*>(data.data()), len*sizeof(T));	
-			
-			return is.check(FUNCTION_NAME);
+			len = firstToken.int64Token();
+			data.resize(len);	
 		}
 		else
 		{
-			
-			return readAscii(is, data);
+			fatalErrorInFunction<<
+			"expected length of vector in the stream "<<is.name()<<
+			"but found this "<< firstToken<<endl;
+			return false;
 		}
+
+		is.read(reinterpret_cast<char*>(data.data()), len*sizeof(T));	
+		
+		return is.check(FUNCTION_NAME);
 	}
 	else
 	{
-		return true;
+		
+		return readDataAscii(is, data);
 	}
+	
 }
 
 template<typename T>
-bool pFlow::dataIO<T>::readAscii
+bool pFlow::readDataAscii
 (
 	iIstream& is,
 	std::vector<T>& vec
 )
 {
-
-	if( !ioPattern_.thisProcReadData() ) return true;
 	
 	is.fatalCheck(FUNCTION_NAME);
 
@@ -187,4 +182,62 @@ bool pFlow::dataIO<T>::readAscii
 	}
 
 	return true;
-}
\ No newline at end of file
+}
+
+
+template<typename T>
+bool pFlow::dataIO<T>::writeData(iOstream& os, span<T> data)
+{
+	/// first gather data from all processors (if any)
+	if(!gatherData( data ) )
+	{
+		fatalErrorInFunction<<
+		"Error in gathering data for out stream "<< os.name()<<endl;
+		return false;
+	}
+
+	if( ioPattern_.thisProcWriteData())
+	{
+		return writeDataAsciiBinary(os, data);
+	}
+	else
+	{
+		return true;
+	}
+}
+
+template<>
+inline
+bool pFlow::dataIO<pFlow::word>::writeData(iOstream& os, span<word> data)
+{
+    notImplementedFunction;
+    fatalExit;
+    /// first gather data from all processors (if any)
+	if(!gatherData( data ) )
+	{
+		fatalErrorInFunction<<
+		"Error in gathering data for out stream "<< os.name()<<endl;
+		return false;
+	}
+	
+	return false;
+}
+
+template<typename T>
+bool pFlow::dataIO<T>::readData
+(
+	iIstream& is, 
+	std::vector<T>& data
+)
+{
+	data.clear();
+	if(ioPattern_.thisProcReadData())
+	{
+		return readDataAsciiBinary(is, data);
+	}
+	else
+	{
+		return true;
+	}
+}
+
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
index db537d1d..7f21e18e 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
@@ -71,13 +71,7 @@ public:
 
 	TypeInfo("boundaryBase");
 
-	/*boundaryBase(
-		const plane& 		bplane,
-		uint32 				mirrorProc, 
-		const word& 		name,
-		const word& 		type,
-		internalPoints& 	internal);*/
-
+	
 	boundaryBase(
 		const dictionary& 	dict,
 		const plane& 		bplane,
diff --git a/src/phasicFlow/structuredData/domain/simulationDomain.hpp b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
index 10307887..205f1c75 100644
--- a/src/phasicFlow/structuredData/domain/simulationDomain.hpp
+++ b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
@@ -33,7 +33,7 @@ namespace pFlow
 {
 
 class systemControl;
-//class pFlagTypeHost;
+
 
 class simulationDomain
 :
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
index d0d9de79..2b092e94 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
@@ -46,8 +46,20 @@ pFlow::internalPoints::internalPoints
 )
 :
 	subscriber("internalPoints"),
-	pointPosition_("internalPoints", "internalPoints", posVec.capacity(), 0, RESERVE()),
-	pFlagsD_(posVec.capacity(), 0, posVec.size())
+	pointPosition_
+	(
+		"internalPoints", 
+		"internalPoints", 
+		posVec.capacity(), 
+		0, 
+		RESERVE()
+	),
+	pFlagsD_
+	(
+		static_cast<uint32>(posVec.capacity()), 
+		static_cast<uint32>(0),
+		static_cast<uint32>(posVec.size())
+	)
 {
 
 	pointPosition_.assign(posVec);
@@ -70,19 +82,34 @@ const pFlow::pFlagTypeHost&
 }
 
 FUNCTION_H
-const pFlow::realx3Field_D& 
+const typename pFlow::internalPoints::PointsType& 
     pFlow::internalPoints::pointPosition()const
 {
     return pointPosition_;
 }
 
-pFlow::hostViewType1D<pFlow::realx3> 
+FUNCTION_H
+typename pFlow::internalPoints::PointsType&
+	pFlow::internalPoints::pointPosition()
+{
+    return pointPosition_;
+}
+
+typename pFlow::internalPoints::PointsTypeHost
     pFlow::internalPoints::activePointsHost() const
 {
     auto maskH = activePointsMaskHost();
     auto pointsH = pointPositionHost();
 
-    hostViewType1D<realx3> aPoints("Active pointst", maskH.numActive());
+	PointsTypeHost aPoints
+	(
+		pointPosition_.name(),
+		pointPosition_.fieldKey(),
+		maskH.numActive(), 
+		maskH.numActive(),
+		RESERVE()
+	);
+
     auto aRange = maskH.activeRange();
     uint32 n = 0;
     for(auto i=aRange.start(); i<aRange.end(); i++)
@@ -97,11 +124,7 @@ pFlow::hostViewType1D<pFlow::realx3>
     return aPoints;
 }
 
-FUNCTION_H
-pFlow::realx3Field_D &pFlow::internalPoints::pointPosition()
-{
-    return pointPosition_;
-}
+
 
 FUNCTION_H
 pFlow::uint32 pFlow::internalPoints::updateFlag
@@ -146,6 +169,49 @@ void pFlow::internalPoints::fillNeighborsLists
 	pFlagSync_ = false;
 }
 
+FUNCTION_H
+bool pFlow::internalPoints::read
+(
+	iIstream& is
+)
+{
+	
+	PointsTypeHost fRead(pointPosition_.name(), pointPosition_.fieldKey());
+
+	if( !fRead.read(is))
+	{
+		fatalErrorInFunction<<
+		"Error in reading pointPosition from stream "<< is.name()<<endl;
+		return false;
+	}
+
+	pointPosition_.assign(fRead);
+
+	pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
+	pFlagSync_ = false;
+	syncPFlag();
+
+	return true;
+}
+
+
+FUNCTION_H
+bool pFlow::internalPoints::write
+(
+	iOstream& os
+)const
+{
+	if( pFlagsD_.isAllActive())
+	{
+		return pointPosition_.write(os);
+	}
+	else
+	{
+		auto aPoints = this->activePointsHost();
+		return aPoints.write(os);
+	}
+}
+
 FUNCTION_H
 bool pFlow::internalPoints::read
 (
@@ -154,7 +220,7 @@ bool pFlow::internalPoints::read
 )
 {
 	
-	Field<Vector, realx3 , vecAllocator<realx3>> fRead("internalPoints", "internalPoints");
+	PointsTypeHost fRead(pointPosition_.name(), pointPosition_.fieldKey());
 
 	if( !fRead.read(is, iop))
 	{
@@ -163,10 +229,7 @@ bool pFlow::internalPoints::read
 		return false;
 	}
 
-	/// here there should be some mechanism for field distribution between procesors
-	
-
-	pointPosition_.assign(fRead.vectorField());
+	pointPosition_.assign(fRead);
 
 	pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
 	pFlagSync_ = false;
@@ -190,9 +253,8 @@ bool pFlow::internalPoints::write
 	}
 	else
 	{
-		auto aPoints = this->activePointsHost();
-		auto spanPoints = makeSpan(aPoints); //span<realx3>(aPoints.data(), aPoints.size());
-		return writeSpan(os, spanPoints, iop);
+		auto aPoints = activePointsHost();
+		return aPoints.write(os,iop);
 	}
 }
 
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
index e6603d73..91ed9de3 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
@@ -26,7 +26,6 @@ Licence:
 #include "pointFlag.hpp"
 
 
-//#include "indexContainer.hpp"
 
 namespace pFlow
 {
@@ -41,20 +40,22 @@ public:
 	
 	inline static const uint32 initialCapacity_ = 10000;
 
-	using pointsType 		= realx3Field_D;
+	using PointsType 		= realx3Field_D;
 
-	using device_type 		= typename pointsType::device_type;
+	using PointsTypeHost 	= typename PointsType::FieldTypeHost;
 
-	using memory_space 		= typename pointsType::memory_space;
+	using device_type 		= typename PointsType::device_type;
 
-	using execution_space 	= typename pointsType::execution_space;
+	using memory_space 		= typename PointsType::memory_space;
+
+	using execution_space 	= typename PointsType::execution_space;
 
 protected:
 
 	//// - data members
 
 		/// Position of points on device
-		realx3Field_D 				pointPosition_;
+		PointsType 					pointPosition_;
 
 		/// flag of points on device
 		mutable pFlagTypeDevice 	pFlagsD_;
@@ -112,10 +113,10 @@ public:
 
 		// - Const access pointPosition
 		FUNCTION_H
-		const realx3Field_D& pointPosition()const;
+		const PointsType& pointPosition()const;
 		
 		FUNCTION_H
-        realx3Field_D& pointPosition();
+        PointsType& pointPosition();
 
         INLINE_FUNCTION_H
         auto pointPositionHost()const
@@ -129,7 +130,7 @@ public:
             return pointPosition_.deviceVector();
         }
 
-		hostViewType1D<realx3> activePointsHost()const;
+		PointsTypeHost activePointsHost()const;
 
 		// - size of data structure
 		INLINE_FUNCTION_H
@@ -185,6 +186,15 @@ public:
 	
 	//// - IO operations 
 		
+		/// Read 
+		FUNCTION_H
+		bool read(iIstream& is);
+		
+
+		/// Write 
+		FUNCTION_H
+		bool write(iOstream& os)const;
+
 		/// Read 
 		FUNCTION_H
 		bool read(iIstream& is, const IOPattern& iop);
@@ -199,7 +209,7 @@ public:
 inline
 iOstream& operator<<(iOstream& os, const internalPoints& ip)
 {
-	if( !ip.write(os, IOPattern::AllProcessorsDifferent) )
+	if( !ip.write(os) )
 	{
 		ioErrorInFile(os.name(), os.lineNumber());
 		fatalExit;
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
index 9eab6a47..54214a92 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
@@ -23,8 +23,20 @@ Licence:
 #include "systemControl.hpp"
 #include "vocabs.hpp"
 
+bool pFlow::pointStructure::setupPointStructure(const realx3Vector& points)
+{
+    PointsTypeHost hPoints
+    (
+        pointPosition_.name(), 
+        pointPosition_.fieldKey()
+    );
 
-bool pFlow::pointStructure::setupPointStructure(const realx3Vector &points)
+    hPoints.assign(points);
+    
+    return setupPointStructure(hPoints);
+}
+
+bool pFlow::pointStructure::setupPointStructure(const PointsTypeHost &points)
 {
     if(!simulationDomain_->initialUpdateDomains(points.getSpan()))
     {
@@ -35,19 +47,19 @@ bool pFlow::pointStructure::setupPointStructure(const realx3Vector &points)
     
     uint32 thisN = simulationDomain_->initialNumberInThis();
 
-    Field<Vector, realx3 , vecAllocator<realx3>> internal
+    PointsTypeHost internal
     (
-        "internalPoints", 
-        "internalPoints", 
+        pointPosition_.name(), 
+        pointPosition_.fieldKey(), 
         thisN, 
         thisN, 
         RESERVE()
     );
     
-    auto pSpan  = makeSpan(points); 
-    auto iSpan  = internal.getSpan();
+    auto pSpan  = points.getSpan();
     
-    if(!simulationDomain_->initialTransferBlockData(pSpan, iSpan))
+    if(auto iSpan  = internal.getSpan(); 
+        !simulationDomain_->initialTransferBlockData(pSpan, iSpan))
     {
         fatalErrorInFunction<<
         "Error in transfering the block data "<<endl;
@@ -66,9 +78,9 @@ bool pFlow::pointStructure::setupPointStructure(const realx3Vector &points)
 }
 
 
-bool pFlow::pointStructure::initializePoints(const realx3Vector &points)
+bool pFlow::pointStructure::initializePoints(const PointsTypeHost &points)
 {
-    pointPosition_.assign(points.vectorField());
+    pointPosition_.assign(points);
 
     pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
     pFlagSync_ = false;
@@ -109,7 +121,7 @@ pFlow::pointStructure::pointStructure
     REPORT(0)<< "Reading point structure from "<<
     IOobject::path()<<END_REPORT;
 
-    if( !IOobject::read() )
+    if( !IOobject::readObject() )
     {
         fatalErrorInFunction<<
         "Error in reading from file "<<IOobject::path()<<endl;
@@ -173,8 +185,11 @@ bool pFlow::pointStructure::read(
     const IOPattern& iop)
 {
     
-    Field<Vector, realx3 , vecAllocator<realx3>> 
-        fRead("file_internalPoints", "internalPoints");   
+    PointsTypeHost fRead
+    (
+        this->pointPosition_.name(),
+        this->pointPosition_.fieldKey()
+    );
 
 	if( !fRead.read(is, iop))
 	{
@@ -192,27 +207,5 @@ bool pFlow::pointStructure::write
     const IOPattern& iop
 )const
 {
-    
-    hostViewType1D<realx3> pointsH;
-
-    if(isAllActive())
-    {
-        pointsH = pointPositionHost();
-    }
-    else
-    {
-        pointsH = activePointsHost();
-    }
-
-    auto data = span<realx3>(pointsH.data(), pointsH.size());
-    
-    if( !writeSpan(os, data, iop) )
-    {
-        fatalErrorInFunction<<
-        "Error in writing pointStructure in stream "<<
-        os.name()<<endl;
-        return false;
-    }
-
-    return true;
+    return internalPoints::write(os, iop);
 }
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
index dc1d3342..216d5585 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
@@ -39,17 +39,30 @@ class pointStructure
     public demComponent,
 	public internalPoints
 {
-protected:
+public:
+	
+	using PointsType 		= typename internalPoints::PointsType;
+
+	using PointsTypeHost 	= typename PointsType::FieldTypeHost;
+
+	using device_type 		= typename PointsType::device_type;
+
+	using memory_space 		= typename PointsType::memory_space;
+
+	using execution_space 	= typename PointsType::execution_space;
+
+private:
 
 	//// - data members 
 	uniquePtr<simulationDomain> simulationDomain_ = nullptr;
 
 	boundaryList 				boundaries_;
     
+	bool setupPointStructure(const realx3Vector& points);
 
-    bool setupPointStructure(const realx3Vector& points);
+    bool setupPointStructure(const PointsTypeHost& points);
 
-    bool initializePoints(const realx3Vector& points);
+    bool initializePoints(const PointsTypeHost& points);
 
 public:
 
@@ -80,7 +93,7 @@ public:
 		pointStructure& operator=(pointStructure&&) = delete;
 
 		// - destructor 
-		virtual ~pointStructure() = default;
+		~pointStructure() override = default;
 
 	// - Iteration methods
 
@@ -133,12 +146,6 @@ public:
 		/// Write 
 		bool write(iOstream& os, const IOPattern& iop)const override;
         
-		
-		
-		
-		
-
-
 
 };
 

From 6bc180275ef4cfacfe90e1082ac7a92980ae643e Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sat, 20 Jan 2024 06:05:05 -0800
Subject: [PATCH 21/60] pointFieild

---
 src/phasicFlow/CMakeLists.txt                 |  3 +-
 .../containers/pointField/boundaryField.cpp   | 10 +--
 .../containers/pointField/boundaryField.hpp   |  6 +-
 .../pointField/boundaryFieldList.hpp          |  6 +-
 .../pointField/createBoundaryFields.hpp       |  8 +-
 .../pointField/exitBoundaryField.cpp          |  4 +-
 .../pointField/exitBoundaryField.hpp          | 11 ++-
 .../containers/pointField/internalField.cpp   | 37 ++++----
 .../containers/pointField/internalField.hpp   | 15 ++--
 .../containers/pointField/pointField.cpp      | 87 ++++++++-----------
 .../containers/pointField/pointField.hpp      | 17 ++--
 .../containers/pointField/pointFields.cpp     | 24 ++---
 .../containers/pointField/pointFields.hpp     | 12 +--
 13 files changed, 117 insertions(+), 123 deletions(-)

diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 952be63b..805a55d0 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -38,7 +38,7 @@ containers/Vector/Vectors.cpp
 containers/VectorHD/VectorSingles.cpp
 containers/Field/Fields.cpp
 containers/List/anyList/anyList.cpp
-#containers/pointField/pointFields.cpp
+containers/pointField/pointFields.cpp
 
 #setFieldList/setFieldList.cpp
 #setFieldList/setFieldEntry.cpp
@@ -112,6 +112,7 @@ if(pFlow_Build_MPI)
     MPIParallelization/procCommunication.cpp
     MPIParallelization/boundaryProcessor.cpp
     MPIParallelization/scatteredMasterDistributeChar.cpp
+	MPIParallelization/processorBoundaryFields.cpp
 	)
 	
 	list(APPEND link_libs MPI::MPI_CXX ${ZOLTAN_LIBRARY} -lm )
diff --git a/src/phasicFlow/containers/pointField/boundaryField.cpp b/src/phasicFlow/containers/pointField/boundaryField.cpp
index 5ef89d88..230be98b 100644
--- a/src/phasicFlow/containers/pointField/boundaryField.cpp
+++ b/src/phasicFlow/containers/pointField/boundaryField.cpp
@@ -18,8 +18,8 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-pFlow::boundaryField<VectorField, T, MemorySpace>::boundaryField
+template<class T, class MemorySpace>
+pFlow::boundaryField<T, MemorySpace>::boundaryField
 (
 	const boundaryBase& boundary, 
 	InternalFieldType& internal
@@ -31,9 +31,9 @@ pFlow::boundaryField<VectorField, T, MemorySpace>::boundaryField
 {}
 
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-pFlow::uniquePtr<pFlow::boundaryField<VectorField, T, MemorySpace>>
-	pFlow::boundaryField<VectorField, T, MemorySpace>::create
+template<class T, class MemorySpace>
+pFlow::uniquePtr<pFlow::boundaryField<T, MemorySpace>>
+	pFlow::boundaryField<T, MemorySpace>::create
 (
 	const boundaryBase& boundary, 
 	InternalFieldType& internal
diff --git a/src/phasicFlow/containers/pointField/boundaryField.hpp b/src/phasicFlow/containers/pointField/boundaryField.hpp
index eed029c9..90786cbc 100644
--- a/src/phasicFlow/containers/pointField/boundaryField.hpp
+++ b/src/phasicFlow/containers/pointField/boundaryField.hpp
@@ -27,16 +27,16 @@ Licence:
 namespace pFlow
 {
 
-template< template<class, class> class VectorField, class T, class MemorySpace = void>
+template< class T, class MemorySpace = void>
 class boundaryField
 :
     public observer 
 {
 public:
 	
-	using BoundaryFieldType = boundaryField<VectorField, T, MemorySpace>;
+	using BoundaryFieldType = boundaryField<T, MemorySpace>;
 
-	using InternalFieldType = internalField<VectorField, T, MemorySpace>;
+	using InternalFieldType = internalField<T, MemorySpace>;
 
 	using memory_space 		= typename InternalFieldType::memory_space;
 
diff --git a/src/phasicFlow/containers/pointField/boundaryFieldList.hpp b/src/phasicFlow/containers/pointField/boundaryFieldList.hpp
index c457d8ed..8bdf9840 100644
--- a/src/phasicFlow/containers/pointField/boundaryFieldList.hpp
+++ b/src/phasicFlow/containers/pointField/boundaryFieldList.hpp
@@ -27,14 +27,14 @@ Licence:
 namespace pFlow
 {
 
-template< template<class, class> class VectorField, class T, class MemorySpace = void >
+template< class T, class MemorySpace = void >
 class boundaryFieldList
 :
-    ListPtr<boundaryField<VectorField, T, MemorySpace>>
+    public ListPtr< boundaryField<T, MemorySpace> >
 {
 public:
 
-    using BoundaryFieldType = boundaryField<VectorField, T, MemorySpace>;
+    using BoundaryFieldType = boundaryField<T, MemorySpace>;
 
     using InternalFieldType = typename BoundaryFieldType::InternalFieldType;
     
diff --git a/src/phasicFlow/containers/pointField/createBoundaryFields.hpp b/src/phasicFlow/containers/pointField/createBoundaryFields.hpp
index 5200c257..3403149d 100644
--- a/src/phasicFlow/containers/pointField/createBoundaryFields.hpp
+++ b/src/phasicFlow/containers/pointField/createBoundaryFields.hpp
@@ -24,12 +24,12 @@ Licence:
 #include "boundaryField.hpp"
 #include "exitBoundaryField.hpp"
 
-#define createBaseBoundary(VectorFieldType, DataType, MemorySpaceType)          \
-    template class pFlow::boundaryField<VectorFieldType, DataType, MemorySpaceType>;
+#define createBaseBoundary(DataType, MemorySpaceType)          \
+    template class pFlow::boundaryField<DataType, MemorySpaceType>;
     
 
-#define createBoundary(VectorFieldType, DataType, MemorySpaceType, BoundaryType)    \
-    template class pFlow::BoundaryType##BoundaryField<VectorFieldType, DataType, MemorySpaceType>;
+#define createBoundary(DataType, MemorySpaceType, BoundaryType)    \
+    template class pFlow::BoundaryType##BoundaryField<DataType, MemorySpaceType>;
 
 
 #endif //__createBoundaryFields_hpp__
diff --git a/src/phasicFlow/containers/pointField/exitBoundaryField.cpp b/src/phasicFlow/containers/pointField/exitBoundaryField.cpp
index 046a2bec..42f534a5 100644
--- a/src/phasicFlow/containers/pointField/exitBoundaryField.cpp
+++ b/src/phasicFlow/containers/pointField/exitBoundaryField.cpp
@@ -18,8 +18,8 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-    pFlow::exitBoundaryField<VectorField, T, MemorySpace>::exitBoundaryField
+template<class T, class MemorySpace>
+    pFlow::exitBoundaryField<T, MemorySpace>::exitBoundaryField
 (
 	const boundaryBase& boundary, 
 	InternalFieldType& internal
diff --git a/src/phasicFlow/containers/pointField/exitBoundaryField.hpp b/src/phasicFlow/containers/pointField/exitBoundaryField.hpp
index 104314c1..bcf168d7 100644
--- a/src/phasicFlow/containers/pointField/exitBoundaryField.hpp
+++ b/src/phasicFlow/containers/pointField/exitBoundaryField.hpp
@@ -25,16 +25,16 @@ Licence:
 namespace pFlow
 {
 
-template< template<class, class> class VectorField, class T, class MemorySpace = void>
+template< class T, class MemorySpace = void>
 class exitBoundaryField
 :
-    public boundaryField<VectorField, T, MemorySpace> 
+    public boundaryField<T, MemorySpace> 
 {
 public:
 	
-    using ExitBoundaryFieldType = exitBoundaryField<VectorField, T, MemorySpace>;
+    using ExitBoundaryFieldType = exitBoundaryField<T, MemorySpace>;
 
-	using BoundaryFieldType = boundaryField<VectorField, T, MemorySpace>;
+	using BoundaryFieldType = boundaryField<T, MemorySpace>;
 
 	using InternalFieldType = typename BoundaryFieldType::InternalFieldType;
 
@@ -51,8 +51,7 @@ public:
 	exitBoundaryField(
 		const boundaryBase& boundary, 
 		InternalFieldType& internal);
-	
-	
+		
 
 	add_vCtor
 	(
diff --git a/src/phasicFlow/containers/pointField/internalField.cpp b/src/phasicFlow/containers/pointField/internalField.cpp
index b3c23431..c568589e 100644
--- a/src/phasicFlow/containers/pointField/internalField.cpp
+++ b/src/phasicFlow/containers/pointField/internalField.cpp
@@ -18,8 +18,8 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-pFlow::internalField<VectorField, T, MemorySpace>::internalField
+template<class T, class MemorySpace>
+pFlow::internalField<T, MemorySpace>::internalField
 (
 	const word& name, 
 	const internalPoints& internal
@@ -41,8 +41,8 @@ pFlow::internalField<VectorField, T, MemorySpace>::internalField
 	internalPoints_(internal)
 {}
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-pFlow::internalField<VectorField, T, MemorySpace>::internalField
+template<class T, class MemorySpace>
+pFlow::internalField<T, MemorySpace>::internalField
 (
 	const word &name, 
 	const internalPoints &internal, 
@@ -68,14 +68,22 @@ pFlow::internalField<VectorField, T, MemorySpace>::internalField
 } 
 
 
-template <template <class, class> class VectorField, class T, class MemorySpace>
-pFlow::hostViewType1D<T>
-pFlow::internalField<VectorField, T, MemorySpace>::activeValuesHost() const
+template <class T, class MemorySpace>
+typename pFlow::internalField<T, MemorySpace>::FieldTypeHost 
+	pFlow::internalField<T, MemorySpace>::activeValuesHost() const
 {
 	auto maskH = internalPoints_.activePointsMaskHost();
     auto fieldH = field_.hostVector();
 
-	hostViewType1D<T> aField("Active field", maskH.numActive());
+	FieldTypeHost aField
+	(
+		field_.name(), 
+		field_.fieldKey(),
+		maskH.numActive(),
+		maskH.numActive(),
+		RESERVE()
+	);
+
     auto aRange = maskH.activeRange();
 
 	uint32 n = 0;
@@ -87,12 +95,11 @@ pFlow::internalField<VectorField, T, MemorySpace>::activeValuesHost() const
             n++;
         }
     }
-
     return aField;
 }
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-bool pFlow::internalField<VectorField, T, MemorySpace>::write
+template<class T, class MemorySpace>
+bool pFlow::internalField<T, MemorySpace>::write
 (
 	iOstream& os, 
 	const IOPattern& iop
@@ -104,9 +111,7 @@ bool pFlow::internalField<VectorField, T, MemorySpace>::write
 	}
 	else
 	{
-		auto aValues = activeValuesHost();
-		auto spanValues = makeSpan(aValues);
-		return writeSpan(os, spanValues, iop);
+		auto aField = activeValuesHost();
+		return aField.write(os, iop);
 	}
-}
-
+}
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/internalField.hpp b/src/phasicFlow/containers/pointField/internalField.hpp
index a1ff6b4c..9783fdbc 100644
--- a/src/phasicFlow/containers/pointField/internalField.hpp
+++ b/src/phasicFlow/containers/pointField/internalField.hpp
@@ -23,20 +23,25 @@ Licence:
 #include "internalPoints.hpp"
 #include "Field.hpp"
 #include "observer.hpp"
+#include "dataIO.hpp"
 
 
 namespace pFlow
 {
 
-template<template<class, class> class VectorField, class T, class MemorySpace=void>
+template<class T, class MemorySpace=void>
 class internalField
 :
     public observer
 {
 
 public:
+	
+	using InternalFieldType = internalField<T, MemorySpace>;
 
-	using FieldType         = Field<VectorField, T, MemorySpace>;
+	using FieldType         = Field<T, MemorySpace>;
+
+	using FieldTypeHost 	= Field<T, HostSpace>;
   	
 	using VectorType  		= typename FieldType::VectorType;
 
@@ -81,7 +86,7 @@ public:
 		return field_.hostVector();
 	}
 
-	hostViewType1D<T> activeValuesHost()const;
+	FieldTypeHost activeValuesHost()const;
 
 	inline
 	auto size()const
@@ -131,12 +136,12 @@ public:
 
 };
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
+template<class T, class MemorySpace>
 inline
 iOstream& operator<<
 (
 	iOstream& os, 
-	const internalField<VectorField, T, MemorySpace>& ifeild
+	const internalField<T,  MemorySpace>& ifeild
 )
 {
 	if( !ifeild.write(os, IOPattern::AllProcessorsDifferent) )
diff --git a/src/phasicFlow/containers/pointField/pointField.cpp b/src/phasicFlow/containers/pointField/pointField.cpp
index ec84246f..28bc8c73 100644
--- a/src/phasicFlow/containers/pointField/pointField.cpp
+++ b/src/phasicFlow/containers/pointField/pointField.cpp
@@ -1,3 +1,4 @@
+#include "pointField.hpp"
 /*------------------------------- phasicFlow ---------------------------------
       O        C enter of
      O O       E ngineering and
@@ -18,8 +19,8 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-pFlow::pointField<VectorField, T, MemorySpace>::pointField
+template<class T, class MemorySpace>
+pFlow::pointField<T, MemorySpace>::pointField
 (
     const objectFile& objf, 
 	pointStructure& pStruct, 
@@ -44,8 +45,8 @@ pFlow::pointField<VectorField, T, MemorySpace>::pointField
 	
 }
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-pFlow::pointField<VectorField, T, MemorySpace>::pointField
+template<class T, class MemorySpace>
+pFlow::pointField<T, MemorySpace>::pointField
 (
 	const objectFile &objf, 
 	pointStructure &pStruct, 
@@ -81,8 +82,8 @@ pFlow::pointField<VectorField, T, MemorySpace>::pointField
 
 
 
- template<template<class, class> class VectorField, class T, class MemorySpace>
- pFlow::pointField<VectorField, T, MemorySpace>::pointField
+ template<class T, class MemorySpace>
+ pFlow::pointField<T, MemorySpace>::pointField
  (
      const pointStructure& pStruct,
      const T& defVal,
@@ -98,8 +99,8 @@ pFlow::pointField<VectorField, T, MemorySpace>::pointField
      this->fill(defVal);
  }
 
- template<template<class, class> class VectorField, class T, class MemorySpace>
- pFlow::pointField<VectorField, T, MemorySpace>::pointField
+ template<class T, class MemorySpace>
+ pFlow::pointField<T, MemorySpace>::pointField
  (
      const pointStructure& pStruct,
      const T& val,
@@ -115,8 +116,8 @@ pFlow::pointField<VectorField, T, MemorySpace>::pointField
      this->fill(val);
  }
 
- template<template<class, class> class VectorField, class T, class MemorySpace>
- pFlow::pointField<VectorField, T, MemorySpace>::pointField
+ template<class T, class MemorySpace>
+ pFlow::pointField<T, MemorySpace>::pointField
  (
      const pointField& src,
      bool subscribe
@@ -128,15 +129,15 @@ pFlow::pointField<VectorField, T, MemorySpace>::pointField
      defaultValue_(src.defaultValue_)
  {}
 
- template<template<class, class> class VectorField, class T, class MemorySpace>
- pFlow::pointField<VectorField, T, MemorySpace>::pointField(const pointField& src)
+ template<class T, class MemorySpace>
+ pFlow::pointField<T, MemorySpace>::pointField(const pointField& src)
  :
-     pointField<VectorField, T, MemorySpace>(src, src.subscribed())
+     pointField<T, MemorySpace>(src, src.subscribed())
  {}
 
 
- template<template<class, class> class VectorField, class T, class MemorySpace>
- pFlow::pointField<VectorField, T, MemorySpace>& pFlow::pointField<VectorField, T, MemorySpace>::operator =
+ template<class T, class MemorySpace>
+ pFlow::pointField<T, MemorySpace>& pFlow::pointField<T, MemorySpace>::operator =
  (
      const pointField& rhs
  )
@@ -148,8 +149,8 @@ pFlow::pointField<VectorField, T, MemorySpace>::pointField
  }
 
 
- template<template<class, class> class VectorField, class T, class MemorySpace>
- bool pFlow::pointField<VectorField, T, MemorySpace>::update(const eventMessage& msg)
+ template<class T, class MemorySpace>
+ bool pFlow::pointField<T, MemorySpace>::update(const eventMessage& msg)
  {
 
      if( msg.isDeleted() )
@@ -173,14 +174,19 @@ pFlow::pointField<VectorField, T, MemorySpace>::pointField
      return true;
  }*/
 
-template <template <class, class> class VectorField, class T, class MemorySpace>
-bool pFlow::pointField<VectorField, T, MemorySpace>::readPointField(
+template <class T, class MemorySpace>
+bool pFlow::pointField<T, MemorySpace>::readPointField
+(
     iIstream &is,
-    const IOPattern &iop)
+    const IOPattern &iop
+)
 {
-	Field<Vector, T , vecAllocator<T>> 
-        fRead("file_read"+InternalFieldType::name(), InternalFieldType::fieldKey());   
-
+	typename InternalFieldType::FieldTypeHost fRead
+    (
+        InternalFieldType::name(),
+        InternalFieldType::fieldKey()
+    );
+    
 	if( !fRead.read(is, iop))
 	{
 		fatalErrorInFunction<<
@@ -190,10 +196,10 @@ bool pFlow::pointField<VectorField, T, MemorySpace>::readPointField(
 
 	auto thisN = pStruct_.simDomain().initialNumberInThis();
 
-	Field<Vector, T , vecAllocator<T>> internal
+	typename InternalFieldType::FieldTypeHost internal
     (
-        "internalField"+InternalFieldType::name(), 
-        InternalFieldType::fieldKey(), 
+        InternalFieldType::name(),
+        InternalFieldType::fieldKey(),
         thisN, 
         thisN, 
         RESERVE()
@@ -215,35 +221,12 @@ bool pFlow::pointField<VectorField, T, MemorySpace>::readPointField(
 	return true;
 }
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-bool pFlow::pointField<VectorField, T, MemorySpace>::writePointField
+template<class T, class MemorySpace>
+bool pFlow::pointField<T, MemorySpace>::writePointField
 (
 	iOstream& os,
 	const IOPattern& iop
 )const
 {
-	
-    hostViewType1D<T> valuesH;
-
-    if(this->isAllActive())
-    {
-        valuesH = this->fieldHost();
-    }
-    else
-    {
-        valuesH = this->activeValuesHost();
-    }
-
-    auto data = span<T>(valuesH.data(), valuesH.size());
-    
-    if( !writeSpan(os, data, iop) )
-    {
-        fatalErrorInFunction<<
-        "Error in writing pointStructure in stream "<<
-        os.name()<<endl;
-        return false;
-    }
-
-    return true;
-	
+    return InternalFieldType::write(os, iop);
 }
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/pointField.hpp b/src/phasicFlow/containers/pointField/pointField.hpp
index 03633c61..5ebb015d 100644
--- a/src/phasicFlow/containers/pointField/pointField.hpp
+++ b/src/phasicFlow/containers/pointField/pointField.hpp
@@ -26,25 +26,26 @@ Licence:
 #include "internalField.hpp"
 #include "boundaryFieldList.hpp"
 
+
 namespace pFlow
 {
 
-template<template<class, class> class VectorField, class T, class MemorySpace=void>
+template<class T, class MemorySpace=void>
 class pointField
 :
 	public IOobject,
-	public internalField<VectorField, T, MemorySpace>
+	public internalField<T, MemorySpace>
 {
 public:
 	
-	using PointFieldType 	= pointField<VectorField, T, MemorySpace>;
+	using PointFieldType 	= pointField<T, MemorySpace>;
 
-	using InternalFieldType = internalField<VectorField, T, MemorySpace>;
+	using InternalFieldType = internalField<T, MemorySpace>;
+
+	using boundaryFieldListType = boundaryFieldList<T, MemorySpace>;
 
 	using FieldType 		= typename InternalFieldType::FieldType;
 
-    using boundaryFieldListType = boundaryFieldList<VectorField, T, MemorySpace>;
-
 	using VectorType  		= typename InternalFieldType::VectorType;
 
 	using memory_space 		= typename InternalFieldType::memory_space;
@@ -187,8 +188,8 @@ iIstream& operator >> (iIstream & is, pointField<VectorField, T, MemorySpace> &
 	return is;
 }*/
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
-iOstream& operator << (iOstream& os, const pointField<VectorField, T, MemorySpace>& pF )
+template<class T, class MemorySpace>
+iOstream& operator << (iOstream& os, const pointField<T, MemorySpace>& pF )
 {
 	if(! pF.write(os, IOPattern::AllProcessorsDifferent) )
 	{
diff --git a/src/phasicFlow/containers/pointField/pointFields.cpp b/src/phasicFlow/containers/pointField/pointFields.cpp
index 20c65cf0..cb1c8584 100644
--- a/src/phasicFlow/containers/pointField/pointFields.cpp
+++ b/src/phasicFlow/containers/pointField/pointFields.cpp
@@ -23,22 +23,22 @@ Licence:
 #include "createBoundaryFields.hpp"
 
 
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace>; 
-createBaseBoundary(pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace);
-createBoundary(pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace, exit);
+template class pFlow::pointField<pFlow::int8, pFlow::HostSpace>; 
+createBaseBoundary(pFlow::int8, pFlow::HostSpace);
+createBoundary(pFlow::int8, pFlow::HostSpace, exit);
 
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8>; 
-createBaseBoundary(pFlow::VectorSingle, pFlow::int8, void);
-createBoundary(pFlow::VectorSingle, pFlow::int8, void, exit);
+template class pFlow::pointField<pFlow::int8>; 
+createBaseBoundary(pFlow::int8, void);
+createBoundary(pFlow::int8, void, exit);
 
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::real, pFlow::HostSpace>; 
-createBaseBoundary(pFlow::VectorSingle, pFlow::real, pFlow::HostSpace);
-createBoundary(pFlow::VectorSingle, pFlow::real, pFlow::HostSpace, exit);
+template class pFlow::pointField<pFlow::real, pFlow::HostSpace>; 
+createBaseBoundary(pFlow::real, pFlow::HostSpace);
+createBoundary(pFlow::real, pFlow::HostSpace, exit);
 
 
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::real>; 
-createBaseBoundary(pFlow::VectorSingle, pFlow::real, void);
-createBoundary(pFlow::VectorSingle, pFlow::real, void, exit);
+template class pFlow::pointField<pFlow::real>; 
+createBaseBoundary(pFlow::real, void);
+createBoundary(pFlow::real, void, exit);
 
 
 /*template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace>; 
diff --git a/src/phasicFlow/containers/pointField/pointFields.hpp b/src/phasicFlow/containers/pointField/pointFields.hpp
index 9e33cbcf..2dc5242a 100644
--- a/src/phasicFlow/containers/pointField/pointFields.hpp
+++ b/src/phasicFlow/containers/pointField/pointFields.hpp
@@ -30,19 +30,19 @@ namespace pFlow
 {
 
 template<typename T>
-  using pointField_H = pointField<VectorSingle, T, HostSpace>;
+  using pointField_H = pointField<T, HostSpace>;
 
 template<typename T>
-  using pointField_D = pointField<VectorSingle, T>;
+  using pointField_D = pointField<T>;
 
 
-using int8PointField_D 		= pointField<VectorSingle, int8>;
+using int8PointField_D 		= pointField<int8>;
 
-using int8PointField_H 		= pointField<VectorSingle, int8, HostSpace>;
+using int8PointField_H 		= pointField<int8, HostSpace>;
 
-using realPointField_D 		= pointField<VectorSingle, real>;
+using realPointField_D 		= pointField<real>;
 
-using realPointField_H 		= pointField<VectorSingle, real, HostSpace>;
+using realPointField_H 		= pointField<real, HostSpace>;
 
 //using int32PointField_D 	= pointField<VectorSingle, int32>;
 

From 46bf08fa9152e59e374b486eda198a74644e0b32 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sat, 20 Jan 2024 12:33:13 -0800
Subject: [PATCH 22/60] typeInfo.hpp updated

---
 .../containers/pointField/boundaryField.cpp   |   3 +-
 src/phasicFlow/typeSelection/typeInfo.hpp     | 188 +++++++++++++-----
 2 files changed, 140 insertions(+), 51 deletions(-)

diff --git a/src/phasicFlow/containers/pointField/boundaryField.cpp b/src/phasicFlow/containers/pointField/boundaryField.cpp
index 230be98b..1b6ba9c1 100644
--- a/src/phasicFlow/containers/pointField/boundaryField.cpp
+++ b/src/phasicFlow/containers/pointField/boundaryField.cpp
@@ -50,7 +50,8 @@ pFlow::uniquePtr<pFlow::boundaryField<T, MemorySpace>>
 	{
 		printKeys
 		( 
-			fatalError << "Ctor Selector "<< bType << " dose not exist. \n"
+			fatalError << "Ctor Selector "<< bType << "for type "<< 
+			Yellow_Text(getTypeName<T>())	<< " dose not exist.\n"
 			<<"Avaiable ones are: \n\n"
 			,
 			boundaryBasevCtorSelector_
diff --git a/src/phasicFlow/typeSelection/typeInfo.hpp b/src/phasicFlow/typeSelection/typeInfo.hpp
index 8eec379d..74794729 100644
--- a/src/phasicFlow/typeSelection/typeInfo.hpp
+++ b/src/phasicFlow/typeSelection/typeInfo.hpp
@@ -44,6 +44,96 @@ Licence:
 };
 
 
+namespace pFlow
+{
+	//
+	template<typename T>
+	struct checkStatic
+	{
+		has_static_member(TYPENAME);	
+		
+		static constexpr
+		bool hasMember()
+		{
+			return has_static_member_TYPENAME<T,word(void)>::value;
+		}
+	};
+
+	template <typename T>
+	inline word basicTypeName()
+	{
+		int status;
+		auto& ti = typeid(T);
+		char* realname = abi::__cxa_demangle(ti.name(), 0, 0, &status);
+	  	word name(realname);
+	  	free(realname);
+	  	return name;
+	}
+
+	template<>
+	inline word basicTypeName<word>(){ return "word"; }
+
+	template<>
+	inline word basicTypeName<int64>(){ return "int64"; }
+
+	template<>
+	inline word basicTypeName<int32>(){ return "int32"; }
+
+		template<>
+	inline word basicTypeName<int8>(){ return "int8"; }
+
+	template<>
+	inline word basicTypeName<uint64>(){ return "uint64"; }
+
+	template<>
+	inline word basicTypeName<uint32>(){ return "uint32"; }
+
+	template<>
+	inline word basicTypeName<uint8>(){ return "uint8"; }
+
+	template<>
+	inline word basicTypeName<real>(){ return "real"; }
+
+	
+	template<typename T>
+	word constexpr getTypeName()
+	{
+		
+		if constexpr ( checkStatic<T>::hasMember() )
+		{
+			return T::TYPENAME();
+		}else
+		{
+			return basicTypeName<T>();
+		}
+	}
+	template<typename T>
+	word constexpr getTypeName(const T&)
+	{
+		if constexpr ( checkStatic<T>::hasMember() )
+		{
+			return T::TYPENAME();
+		}else
+		{
+			return basicTypeName<T>();
+		}
+	}
+
+	// compare the overriden typeName of object with concrete TYPENAME 
+	// of Type1
+	template <typename Type1, typename Type2>
+	bool checkType(Type2* object)
+	{
+		return getTypeName<Type1>() == object->typeName();
+	}
+
+	template <typename Type1, typename Type2>
+	bool checkType(Type2& object)
+	{
+		return getTypeName<Type1>() == object.typeName();
+	}
+}
+
 
 #define TypeInfo(tName)  \
 	inline static word TYPENAME() {return tName; } \
@@ -55,6 +145,52 @@ Licence:
 
 
 #define TypeInfoTemplate11(tName, Type)										\
+	has_static_member(TYPENAME);											\
+	inline static word TYPENAME()											\
+	{ 																		\
+		return word(tName)+"<"+getTypeName<Type1>()+">";					\
+	}																		\
+	virtual word typeName() const { return TYPENAME();}
+
+#define TypeInfoTemplate12(tName, Type1, Type2)								\
+	inline static word TYPENAME()											\
+	{ 																		\
+		return word(tName)+"<"+getTypeName<Type1>()+","+getTypeName<Type2>()+">";}	\
+	}																		\
+	virtual word typeName() const { return TYPENAME();}
+
+#define TypeInfoTemplate13(tName, Type1, Type2, Type3)						\
+	inline static word TYPENAME()											\
+	{ 																		\
+		return word(tName)+"<"+getTypeName<Type1>()+","+getTypeName<Type2>()+","+getTypeName<Type3>()+">";\
+	}																		\
+	virtual word typeName() const { return TYPENAME();}
+
+// this is the non-virtual version
+#define TypeInfoTemplateNV11(tName, Type)									\
+	inline static word TYPENAME()											\
+	{ 																		\
+		return word(tName)+"<"+getTypeName<Type>()+">"; 					\
+	}																		\
+	inline word typeName() const { return TYPENAME();}
+
+
+#define TypeInfoTemplateNV111(tName, Type, tName2)							\
+	inline static word TYPENAME()											\
+	{ 																		\
+		return word(tName)+"<"+getTypeName<Type>()+","+word(tName2)+">";	\
+	}																		\
+	inline word typeName() const { return TYPENAME();}
+
+#define TypeInfoTemplate111(tName, Type, tName2)							\
+	inline static word TYPENAME()											\
+	{ 																		\
+		return word(tName)+"<"+getTypeName<Type>()+","+word(tName2)+">"; 	\
+	}																		\
+	virtual word typeName() const { return TYPENAME();}
+
+
+/*#define TypeInfoTemplate11(tName, Type)										\
 	has_static_member(TYPENAME);											\
 	inline static word TYPENAME()											\
 	{ 																		\
@@ -121,7 +257,7 @@ Licence:
 		return word(tName)+"<"+basicTypeName<Type>()+","+word(tName2)+">";	\
 	return "noTYPE"; 														\
 	}																		\
-	virtual word typeName() const { return TYPENAME();}
+	virtual word typeName() const { return TYPENAME();}*/
 
 
 
@@ -131,55 +267,7 @@ Licence:
 namespace pFlow
 {
 
-	template <typename T>
-	inline word basicTypeName()
-	{
-		int status;
-		auto& ti = typeid(T);
-		char* realname = abi::__cxa_demangle(ti.name(), 0, 0, &status);
-	  	word name(realname);
-	  	free(realname);
-	  	return name;
-	}
-
-	template<>
-	inline word basicTypeName<word>(){ return "word"; }
-
-	template<>
-	inline word basicTypeName<int64>(){ return "int64"; }
-
-	template<>
-	inline word basicTypeName<int32>(){ return "int32"; }
-
-		template<>
-	inline word basicTypeName<int8>(){ return "int8"; }
-
-	template<>
-	inline word basicTypeName<uint64>(){ return "uint64"; }
-
-	template<>
-	inline word basicTypeName<uint32>(){ return "uint32"; }
-
-	template<>
-	inline word basicTypeName<uint8>(){ return "uint8"; }
-
-	template<>
-	inline word basicTypeName<real>(){ return "real"; }
-
-		
-	// compare the overriden typeName of object with concrete TYPENAME 
-	// of Type1
-	template <typename Type1, typename Type2>
-	bool checkType(Type2* object)
-	{
-		return word(Type1::TYPENAME()) == object->typeName();
-	}
-
-	template <typename Type1, typename Type2>
-	bool checkType(Type2& object)
-	{
-		return word(Type1::TYPENAME()) == object.typeName();
-	}
+	
 
 
 

From 9c86fe8f31b45744fef9e1149ba2ed4b39d4110d Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 21 Jan 2024 13:26:23 -0800
Subject: [PATCH 23/60] refactor up to particles.hpp

---
 .gitignore                                    |   1 -
 CMakeLists.txt                                |   2 +-
 src/CMakeLists.txt                            |   6 +-
 .../AdamsBashforth2/AdamsBashforth2.cpp       | 143 ++++++++----
 .../AdamsBashforth2/AdamsBashforth2.hpp       |  91 ++------
 src/Integration/CMakeLists.txt                |  12 +-
 src/Integration/integration/integration.cpp   |  30 +--
 src/Integration/integration/integration.hpp   |  56 +++--
 src/Particles/CMakeLists.txt                  |  16 +-
 .../dynamicPointStructure.cpp                 | 100 ++++----
 .../dynamicPointStructure.hpp                 |  83 ++-----
 src/Particles/particles/particles.cpp         | 206 +++++++----------
 src/Particles/particles/particles.hpp         | 217 ++++++++----------
 src/Property/property.cpp                     | 108 +++++----
 src/Property/property.hpp                     |  58 ++---
 src/phasicFlow/CMakeLists.txt                 |  31 ++-
 src/phasicFlow/containers/Vector/Vector.hpp   |   2 +-
 .../containers/pointField/internalField.hpp   |  15 ++
 .../containers/pointField/pointField.cpp      |  29 ++-
 .../containers/pointField/pointField.hpp      |   6 +
 .../containers/pointField/pointFields.hpp     |  58 ++---
 src/phasicFlow/dictionary/fileDictionary.cpp  |   2 +-
 .../repository/IOobject/IOPattern.hpp         |  15 +-
 .../repository/IOobject/IOfileHeader.cpp      |  11 +-
 .../repository/IOobject/IOobject.cpp          | 101 ++++----
 .../repository/IOobject/IOobject.hpp          |   4 +-
 .../repository/IOobject/objectFile.hpp        |  22 +-
 src/phasicFlow/repository/Time/Time.cpp       |  17 +-
 src/phasicFlow/repository/Time/Time.hpp       |  16 +-
 src/phasicFlow/smartPointers/uniquePtr.hpp    |   3 +-
 .../boundaries/boundaryNone/boundaryNone.cpp  |  58 +++++
 .../boundaries/boundaryNone/boundaryNone.hpp  |  64 ++++++
 .../domain/regularSimulationDomain.hpp        |   5 +
 .../domain/simulationDomain.hpp               |   3 +
 .../pointStructure/pointFlag.hpp              |   2 +-
 utilities/Utilities/readFromTimeFolder.hpp    |  64 +++---
 .../particlesPhasicFlow.cpp                   |  52 +----
 .../positionParticles/positionParticles.cpp   |  14 +-
 38 files changed, 868 insertions(+), 855 deletions(-)
 create mode 100644 src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
 create mode 100644 src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp

diff --git a/.gitignore b/.gitignore
index 54081c4f..d18b66f0 100644
--- a/.gitignore
+++ b/.gitignore
@@ -38,7 +38,6 @@ bin/**
 lib/**
 test*/**
 **/**notnow
-**/MPIParallel*/**
 doc/code-documentation/
 doc/DTAGS
 # all possible time folders
diff --git a/CMakeLists.txt b/CMakeLists.txt
index 233e18aa..8cd85bfa 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -73,7 +73,7 @@ add_subdirectory(src)
 
 #add_subdirectory(solvers)
 
-#add_subdirectory(utilities)
+add_subdirectory(utilities)
 
 #add_subdirectory(DEMSystems)
 add_subdirectory(testIO)
diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt
index 31049334..235f17a2 100644
--- a/src/CMakeLists.txt
+++ b/src/CMakeLists.txt
@@ -1,11 +1,11 @@
 
 add_subdirectory(phasicFlow)
 
-#add_subdirectory(Integration)
+add_subdirectory(Integration)
 
-#add_subdirectory(Property)
+add_subdirectory(Property)
 
-#add_subdirectory(Particles)
+add_subdirectory(Particles)
 
 #add_subdirectory(Interaction)
 
diff --git a/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp b/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp
index 09a4eaa0..4c6a05cc 100644
--- a/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp
+++ b/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp
@@ -19,36 +19,107 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "AdamsBashforth2.hpp"
+#include "pointStructure.hpp"
+#include "Time.hpp"
+#include "vocabs.hpp"
+
+namespace pFlow
+{
+
+/// Range policy for integration kernel (alias)
+using rpIntegration = Kokkos::RangePolicy<
+		DefaultExecutionSpace,
+		Kokkos::Schedule<Kokkos::Static>,
+		Kokkos::IndexType<uint32>
+		>;
+
+bool intAllActive(
+	real dt, 
+	realx3PointField_D& y, 
+	realx3PointField_D& dy,
+	realx3PointField_D& dy1)
+{
+
+	auto d_dy = dy.fieldDevice();
+	auto d_y  = y.fieldDevice();
+	auto d_dy1= dy1.fieldDevice();
+	auto activeRng = dy1.activeRange();
+
+	Kokkos::parallel_for(
+		"AdamsBashforth2::correct",
+		rpIntegration (activeRng.start(), activeRng.end()),
+		LAMBDA_HD(int32 i){
+			d_y[i] +=  dt*(static_cast<real>(1.5) * d_dy[i] - static_cast<real>(0.5) * d_dy1[i]);
+			d_dy1[i] = d_dy[i];
+		});
+	Kokkos::fence();
+
+	return true;	
+}
+
+bool intScattered
+(
+	real dt, 
+	realx3PointField_D& y,
+	realx3PointField_D& dy,
+	realx3PointField_D& dy1
+)
+{
+
+	auto d_dy 		= dy.fieldDevice();
+	auto d_y  		= y.fieldDevice();
+	auto d_dy1		= dy1.fieldDevice();
+	auto activeRng 	= dy1.activeRange();
+	const auto& activeP = dy1.activePointsMaskDevice();
+
+	Kokkos::parallel_for(
+		"AdamsBashforth2::correct",
+		rpIntegration (activeRng.start(), activeRng.end()),
+		LAMBDA_HD(int32 i){
+			if( activeP(i))
+			{
+				d_y[i] +=  dt*(static_cast<real>(1.5) * d_dy[i] - static_cast<real>(0.5) * d_dy1[i]);
+				d_dy1[i] = d_dy[i];
+			}
+		});
+	Kokkos::fence();
+
+
+	return true;
+}
+
+}
+
 
-//const real AB2_coef[] = { 3.0 / 2.0, 1.0 / 2.0};
 
 pFlow::AdamsBashforth2::AdamsBashforth2
 (
 	const word& baseName,
-	repository& owner,
-	const pointStructure& pStruct,
-	const word& method
+	pointStructure& pStruct,
+	const word& method,
+	const realx3Field_D& initialValField
 )
 :
-	integration(baseName, owner, pStruct, method),
-	dy1_(
-		owner.emplaceObject<realx3PointField_D>(
-			objectFile(
-				groupNames(baseName,"dy1"),
-				"",
-				objectFile::READ_IF_PRESENT,
-				objectFile::WRITE_ALWAYS),
-			pStruct,
-			zero3))
-{
-
-}
+	integration(baseName, pStruct, method, initialValField),
+	realx3PointField_D
+	(
+		objectFile
+		(
+			groupNames(baseName,"dy1"),
+			pStruct.time().integrationFolder(),
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_ALWAYS
+		),
+		pStruct,
+		zero3
+	)
+{}
 
 bool pFlow::AdamsBashforth2::predict
 (
 	real UNUSED(dt),
-	realx3Vector_D& UNUSED(y),
-	realx3Vector_D& UNUSED(dy)
+	realx3PointField_D& UNUSED(y),
+	realx3PointField_D& UNUSED(dy)
 )
 {
 
@@ -58,17 +129,19 @@ bool pFlow::AdamsBashforth2::predict
 bool pFlow::AdamsBashforth2::correct
 (
 	real dt,
-	realx3Vector_D& y,
-	realx3Vector_D& dy
+	realx3PointField_D& y,
+	realx3PointField_D& dy
 )
 {
-	if(this->pStruct().allActive())
+	auto& dy1l = dy1();
+
+	if(dy1l.isAllActive())
 	{
-		return intAll(dt, y, dy, this->pStruct().activeRange());
+		return intAllActive(dt, y, dy, dy1l);
 	}
 	else
 	{
-		return intRange(dt, y, dy, this->pStruct().activePointsMaskD());
+		return intScattered(dt, y, dy, dy1l);
 	}
 
 	return true;
@@ -81,25 +154,3 @@ bool pFlow::AdamsBashforth2::setInitialVals(
 	return true;
 }
 
-bool pFlow::AdamsBashforth2::intAll(
-	real dt, 
-	realx3Vector_D& y, 
-	realx3Vector_D& dy, 
-	range activeRng)
-{
-
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
-	auto d_dy1= dy1_.deviceVectorAll();
-
-	Kokkos::parallel_for(
-		"AdamsBashforth2::correct",
-		rpIntegration (activeRng.first, activeRng.second),
-		LAMBDA_HD(int32 i){
-			d_y[i] +=  dt*(static_cast<real>(3.0 / 2.0) * d_dy[i] - static_cast<real>(1.0 / 2.0) * d_dy1[i]);
-			d_dy1[i] = d_dy[i];
-		});
-	Kokkos::fence();
-
-	return true;	
-}
\ No newline at end of file
diff --git a/src/Integration/AdamsBashforth2/AdamsBashforth2.hpp b/src/Integration/AdamsBashforth2/AdamsBashforth2.hpp
index 6e2a8892..54e1c421 100644
--- a/src/Integration/AdamsBashforth2/AdamsBashforth2.hpp
+++ b/src/Integration/AdamsBashforth2/AdamsBashforth2.hpp
@@ -36,20 +36,16 @@ namespace pFlow
  */
 class AdamsBashforth2
 :
-	public integration
+	public integration,
+	public realx3PointField_D
 {
-protected:
+private:
 
-	/// dy at t-dt
-	realx3PointField_D& dy1_;
-
-	/// Range policy for integration kernel (alias)
-	using rpIntegration = Kokkos::RangePolicy<
-			DefaultExecutionSpace,
-			Kokkos::Schedule<Kokkos::Static>,
-			Kokkos::IndexType<int32>
-			>;
 
+	auto& dy1()
+	{
+		return static_cast<realx3PointField_D&>(*this);
+	}
 public:
 
 	/// Type info
@@ -60,17 +56,12 @@ public:
 		/// Construct from components
 		AdamsBashforth2(
 			const word& baseName,
-			repository& owner,
-			const pointStructure& pStruct,
-			const word& method);
-
-		uniquePtr<integration> clone()const override
-		{
-			return makeUnique<AdamsBashforth2>(*this);
-		}
+			pointStructure& pStruct,
+			const word& method,
+			const realx3Field_D& initialValField);
 
 		/// Destructor 
-		virtual ~AdamsBashforth2()=default;
+		~AdamsBashforth2()final = default;
 
 		/// Add this to the virtual constructor table 
 		add_vCtor(
@@ -80,71 +71,33 @@ public:
 
 
 	// - Methods
+		/// return integration method 
+		word method()const override
+		{
+			return "AdamsBashforth2";
+		}
 
 		bool predict(
 			real UNUSED(dt), 
-			realx3Vector_D& UNUSED(y), 
-			realx3Vector_D& UNUSED(dy)) override;
+			realx3PointField_D& UNUSED(y), 
+			realx3PointField_D& UNUSED(dy)) final;
 
 		bool correct(
 			real dt, 
-			realx3Vector_D& y, 
-			realx3Vector_D& dy) override;
+			realx3PointField_D& y, 
+			realx3PointField_D& dy) final;
 
 		bool setInitialVals(
 			const int32IndexContainer& newIndices,
-			const realx3Vector& y) override;
+			const realx3Vector& y) final;
 
-		bool needSetInitialVals()const override
+		bool needSetInitialVals()const final
 		{
 			return false;
 		}
-		
-		/// Integrate on all points in the active range 
-		bool intAll(
-			real dt, 
-			realx3Vector_D& y, 
-			realx3Vector_D& dy, 
-			range activeRng);
-
-		/// Integrate on active points in the active range 
-		template<typename activeFunctor>
-		bool intRange(
-			real dt, 
-			realx3Vector_D& y, 
-			realx3Vector_D& dy, 
-			activeFunctor activeP );
 
 };
 
-template<typename activeFunctor>
-bool pFlow::AdamsBashforth2::intRange(
-	real dt, 
-	realx3Vector_D& y,
-	realx3Vector_D& dy,
-	activeFunctor activeP )
-{
-
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
-	auto d_dy1= dy1_.deviceVectorAll();
-	auto activeRng = activeP.activeRange();
-
-	Kokkos::parallel_for(
-		"AdamsBashforth2::correct",
-		rpIntegration (activeRng.first, activeRng.second),
-		LAMBDA_HD(int32 i){
-			if( activeP(i))
-			{
-				d_y[i] +=  dt*(static_cast<real>(3.0 / 2.0) * d_dy[i] - static_cast<real>(1.0 / 2.0) * d_dy1[i]);
-				d_dy1[i] = d_dy[i];
-			}
-		});
-	Kokkos::fence();
-
-
-	return true;
-}
 
 } // pFlow
 
diff --git a/src/Integration/CMakeLists.txt b/src/Integration/CMakeLists.txt
index f3a03112..fca650cd 100644
--- a/src/Integration/CMakeLists.txt
+++ b/src/Integration/CMakeLists.txt
@@ -1,13 +1,13 @@
 
 list(APPEND SourceFiles 
 integration/integration.cpp 
-AdamsBashforth5/AdamsBashforth5.cpp
-AdamsBashforth4/AdamsBashforth4.cpp
-AdamsBashforth3/AdamsBashforth3.cpp
 AdamsBashforth2/AdamsBashforth2.cpp
-AdamsMoulton3/AdamsMoulton3.cpp
-AdamsMoulton4/AdamsMoulton4.cpp
-AdamsMoulton5/AdamsMoulton5.cpp
+#AdamsBashforth5/AdamsBashforth5.cpp
+#AdamsBashforth4/AdamsBashforth4.cpp
+#AdamsBashforth3/AdamsBashforth3.cpp
+#AdamsMoulton3/AdamsMoulton3.cpp
+#AdamsMoulton4/AdamsMoulton4.cpp
+#AdamsMoulton5/AdamsMoulton5.cpp
 )
 
 set(link_libs Kokkos::kokkos phasicFlow)
diff --git a/src/Integration/integration/integration.cpp b/src/Integration/integration/integration.cpp
index 6e48ddaf..f3126e1e 100644
--- a/src/Integration/integration/integration.cpp
+++ b/src/Integration/integration/integration.cpp
@@ -19,33 +19,35 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "integration.hpp"
+#include "pointStructure.hpp"
+#include "repository.hpp"
 
 pFlow::integration::integration
 (
 	const word& baseName,
-	repository& owner,
-	const pointStructure& pStruct,
-	const word& method
+	pointStructure& pStruct,
+	const word&,
+	const realx3Field_D&
 )
 :
-	owner_(owner),
-	baseName_(baseName),
-	pStruct_(pStruct)
-{
-	CONSUME_PARAM(method);
-}
+	owner_(*pStruct.owner()),
+	pStruct_(pStruct),
+	baseName_(baseName)	
+{}
 
 
 pFlow::uniquePtr<pFlow::integration> 
-	pFlow::integration::create(
+	pFlow::integration::create
+(
 		const word& baseName,
-		repository& owner,
-		const pointStructure& pStruct,
-		const word& method)
+		pointStructure& pStruct,
+		const word& method,
+		const realx3Field_D& initialValField
+)
 {
 	if( wordvCtorSelector_.search(method) )
 	{
-		return wordvCtorSelector_[method] (baseName, owner, pStruct, method);
+		return wordvCtorSelector_[method] (baseName, pStruct, method, initialValField);
 	}
 	else
 	{
diff --git a/src/Integration/integration/integration.hpp b/src/Integration/integration/integration.hpp
index 3cca58c2..334e328e 100644
--- a/src/Integration/integration/integration.hpp
+++ b/src/Integration/integration/integration.hpp
@@ -23,14 +23,16 @@ Licence:
 
 
 #include "virtualConstructor.hpp"
-#include "Vectors.hpp"
-#include "pointStructure.hpp"
-#include "repository.hpp"
+#include "pointFields.hpp"
 
 
 namespace pFlow
 {
 
+// - Forward
+class repository;
+class pointStructure;
+
 /**
  * Base class for integrating the first order ODE (IVP) 
  * 
@@ -48,19 +50,19 @@ namespace pFlow
  */
 class integration
 {
-protected:
+private:
 
 	// - Protected data members 
 
 		/// The owner repository that all fields are storred in
 		repository& owner_;
 
-		/// The base name for integration 
-		const word baseName_;
-
 		/// A reference to pointStructure
 		const pointStructure& pStruct_;
 
+		/// The base name for integration 
+		const word baseName_;
+
 public:
 
 	/// Type info
@@ -72,9 +74,9 @@ public:
 		/// Construct from components
 		integration(
 			const word& baseName,
-			repository& owner,
-			const pointStructure& pStruct,
-			const word& method);
+			pointStructure& pStruct,
+			const word& method,
+			const realx3Field_D& initialValField);
 
 		/// Copy constructor 
 		integration(const integration&) = default;
@@ -88,22 +90,22 @@ public:
 		/// Move assignment
 		integration& operator = (integration&&) = default;
 
-		/// Polymorphic copy/cloning
-		virtual 
-		uniquePtr<integration> clone()const=0;
-
 		/// Destructor 
 		virtual ~integration()=default;
 
 		/// Add a virtual constructor 
-		create_vCtor(
+		create_vCtor
+		(
 			integration,
 			word,
-			(const word& baseName,
-			repository& owner,
-			const pointStructure& pStruct,
-			const word& method),
-			(baseName, owner, pStruct, method) );
+			(
+				const word& baseName,
+				pointStructure& pStruct,
+				const word& method,
+				const realx3Field_D& initialValField
+			),
+			(baseName, pStruct, method, initialValField)
+		);
 
 
 	// - Methods
@@ -129,13 +131,17 @@ public:
 			return owner_;
 		}
 
+		/// return integration method 
+		virtual 
+		word method()const = 0 ;
+
 		/// Prediction step in integration
 		virtual 
-		bool predict(real dt, realx3Vector_D& y, realx3Vector_D& dy) = 0;
+		bool predict(real dt, realx3PointField_D& y, realx3PointField_D& dy) = 0;
 
 		/// Correction/main integration step
 		virtual 
-		bool correct(real dt, realx3Vector_D& y, realx3Vector_D& dy) = 0;
+		bool correct(real dt, realx3PointField_D& y, realx3PointField_D& dy) = 0;
 
 		/// Set the initial values for new indices 
 		virtual 
@@ -152,9 +158,9 @@ public:
 	static
 		uniquePtr<integration> create(
 			const word& baseName,
-			repository& owner,
-			const pointStructure& pStruct,
-			const word& method);
+			pointStructure& pStruct,
+			const word& method,
+			const realx3Field_D& initialValField);
 
 }; // integration
 
diff --git a/src/Particles/CMakeLists.txt b/src/Particles/CMakeLists.txt
index 9c23631f..42ac0ea8 100644
--- a/src/Particles/CMakeLists.txt
+++ b/src/Particles/CMakeLists.txt
@@ -2,14 +2,14 @@
 set(SourceFiles 
 dynamicPointStructure/dynamicPointStructure.cpp
 particles/particles.cpp
-particles/particleIdHandler.cpp
-SphereParticles/sphereShape/sphereShape.cpp
-SphereParticles/sphereParticles/sphereParticles.cpp
-Insertion/shapeMixture/shapeMixture.cpp
-Insertion/insertion/insertion.cpp
-Insertion/Insertion/Insertions.cpp
-Insertion/insertionRegion/insertionRegion.cpp
-Insertion/insertionRegion/timeFlowControl.cpp
+#particles/particleIdHandler.cpp
+#SphereParticles/sphereShape/sphereShape.cpp
+#SphereParticles/sphereParticles/sphereParticles.cpp
+#Insertion/shapeMixture/shapeMixture.cpp
+#Insertion/insertion/insertion.cpp
+#Insertion/Insertion/Insertions.cpp
+#Insertion/insertionRegion/insertionRegion.cpp
+#Insertion/insertionRegion/timeFlowControl.cpp
 )
 
 set(link_libs Kokkos::kokkos phasicFlow Integration Property)
diff --git a/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp b/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
index 16e5b849..d99766e2 100644
--- a/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
+++ b/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
@@ -19,57 +19,40 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "dynamicPointStructure.hpp"
-
+#include "systemControl.hpp"
 
 pFlow::dynamicPointStructure::dynamicPointStructure
 (
-	Time& time,
-	const word& integrationMethod
+	systemControl& control
 )
 :
-	time_(time),
-	integrationMethod_(integrationMethod),
-	pStruct_(
-		time_.emplaceObject<pointStructure>(
-			objectFile(
-				pointStructureFile__,
-				"",
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_ALWAYS			
-				)
-			)
-		),
-	velocity_(
-		time_.emplaceObject<realx3PointField_D>(
-			objectFile(
-				"velocity",
-				"",
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_ALWAYS
-				),
-			pStruct(),
-			zero3
-			)
-		)
-
+	pointStructure(control),
+	velocity_
+	(
+		objectFile(
+			"velocity",
+			"",
+			objectFile::READ_ALWAYS,
+			objectFile::WRITE_ALWAYS
+			),
+		*this,
+		zero3
+	),
+	integrationMethod_
+	(
+		control.settingsDict().getVal<word>("integrationMethod")
+	)
 {
-
-	this->subscribe(pStruct());
-
 	REPORT(1)<< "Creating integration method "<<
-		greenText(integrationMethod_)<<" for dynamicPointStructure."<<endREPORT;
+		Green_Text(integrationMethod_)<<" for dynamicPointStructure."<<END_REPORT;
 
-	integrationPos_ = integration::create(
+	integrationPos_ = integration::create
+	(
 		"pStructPosition",
-		time_.integration(),
-		pStruct(),
-		integrationMethod_);
-	
-	integrationVel_ = integration::create(
-		"pStructVelocity",
-		time_.integration(),
-		pStruct(),
-		integrationMethod_);
+		*this,
+		integrationMethod_,
+		pointPosition()
+	);
 
 	if( !integrationPos_ )
 	{
@@ -77,6 +60,14 @@ pFlow::dynamicPointStructure::dynamicPointStructure
 		"  error in creating integration object for dynamicPointStructure (position). \n";
 		fatalExit;
 	}
+	
+	integrationVel_ = integration::create
+	(
+		"pStructVelocity",
+		*this,
+		integrationMethod_,
+		velocity_.field()
+	);
 
 	if( !integrationVel_ )
 	{
@@ -85,8 +76,10 @@ pFlow::dynamicPointStructure::dynamicPointStructure
 		fatalExit;
 	}
 
+
+	WARNING << "Initialization of integrationPos_ and integrationVel_ should be doen!"<<END_WARNING;
 	
-	if(!integrationPos_->needSetInitialVals()) return;
+	/*if(!integrationPos_->needSetInitialVals()) return;
 
 	
 		
@@ -107,14 +100,13 @@ pFlow::dynamicPointStructure::dynamicPointStructure
 		vel.push_back( hVel[index(i)]);
 	}
 
-	//output<< "pos "<< pos<<endl;
-	//output<< "vel "<< vel<<endl;
 
 	REPORT(2)<< "Initializing the required vectors for position integratoin "<<endREPORT;
 	integrationPos_->setInitialVals(indexHD, pos);
 
 	REPORT(2)<< "Initializing the required vectors for velocity integratoin\n "<<endREPORT;
-	integrationVel_->setInitialVals(indexHD, vel);
+	integrationVel_->setInitialVals(indexHD, vel);*/
+
 }
 
 bool pFlow::dynamicPointStructure::predict
@@ -123,10 +115,10 @@ bool pFlow::dynamicPointStructure::predict
 	realx3PointField_D& acceleration
 )
 {
-	auto& pos = pStruct().pointPosition();
+	//auto& pos = pStruct().pointPosition();
 
-	if(!integrationPos_().predict(dt, pos.VectorField(), velocity_.VectorField() ))return false;
-	if(!integrationVel_().predict(dt, velocity_.VectorField(), acceleration.VectorField()))return false;
+	//if(!integrationPos_().predict(dt, pos.VectorField(), velocity_.VectorField() ))return false;
+	//if(!integrationVel_().predict(dt, velocity_.VectorField(), acceleration.VectorField()))return false;
 
 	return true;
 }
@@ -137,11 +129,11 @@ bool pFlow::dynamicPointStructure::correct
 	realx3PointField_D& acceleration
 )
 {
-	auto& pos = pStruct().pointPosition();
+	//auto& pos = pStruct().pointPosition();
 	
-	if(!integrationPos_().correct(dt, pos.VectorField(), velocity_.VectorField() ))return false;
+	//if(!integrationPos_().correct(dt, pos.VectorField(), velocity_.VectorField() ))return false;
 	
-	if(!integrationVel_().correct(dt, velocity_.VectorField(), acceleration.VectorField()))return false;
+	//if(!integrationVel_().correct(dt, velocity_.VectorField(), acceleration.VectorField()))return false;
 
 	return true;	
 }
@@ -178,7 +170,7 @@ pFlow::uniquePtr<pFlow::int32IndexContainer> pFlow::dynamicPointStructure::inser
 }*/
 
 
-bool pFlow::dynamicPointStructure::update(
+/*bool pFlow::dynamicPointStructure::update(
 	const eventMessage& msg) 
 {
 	if( msg.isInsert())
@@ -215,4 +207,4 @@ bool pFlow::dynamicPointStructure::update(
 	}
 
 	return true;
-}
\ No newline at end of file
+}*/
\ No newline at end of file
diff --git a/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp b/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp
index 843a3c46..d2e72659 100644
--- a/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp
+++ b/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp
@@ -30,98 +30,65 @@ Licence:
 namespace pFlow
 {
 
+class systemControl;
+
 class dynamicPointStructure
 :
-	//public pointStructure
-public eventObserver
+	public pointStructure
 {
-protected:
+private:
 
-	Time& time_;
+	realx3PointField_D  	velocity_;
 
-	word 			integrationMethod_;
+	uniquePtr<integration>  integrationPos_ = nullptr;
 
-	pointStructure& 	pStruct_;
+	uniquePtr<integration>  integrationVel_ = nullptr;
 
-	realx3PointField_D&  	velocity_;
-
-	uniquePtr<integration>  integrationPos_;
-
-	uniquePtr<integration>  integrationVel_;
+	/// @brief integration method for velocity and position
+	word 					integrationMethod_;
 
 public:
 
 	TypeInfo("dynamicPointStructure");
 
-	dynamicPointStructure(Time& time, const word& integrationMethod);
-
-	dynamicPointStructure(const dynamicPointStructure& ps) = default;
+	dynamicPointStructure(systemControl& control);
 
+	dynamicPointStructure(const dynamicPointStructure& ps) = delete;
 		
-		// - no move construct 
+	// - no move construct 
 	dynamicPointStructure(dynamicPointStructure&&) = delete;
 
-	// - copy assignment 
-	//
-	//   should be changed, may causs undefined behavior 
-	//////////////////////////////////////////////////////////////
-	dynamicPointStructure& operator=(const dynamicPointStructure&) = default;
+	/// 
+	dynamicPointStructure& operator=(const dynamicPointStructure&) = delete;
 
 	// - no move assignment 
 	dynamicPointStructure& operator=(dynamicPointStructure&&) = delete;
 
 	// - destructor 
-	virtual ~dynamicPointStructure() = default;
+	~dynamicPointStructure() override = default;
 
 
-	inline pointStructure& pStruct() 
-	{
-		return pStruct_;
-	}
-
-	inline const pointStructure& pStruct() const
-	{
-		return pStruct_;
-	}
-
-	inline const realx3PointField_D& velocity()const
+	inline 
+	const realx3PointField_D& velocity()const
 	{
 		return velocity_;
 	}
 
-	inline auto velocityHostAll()
+	inline 
+	realx3PointField_D& velocity()
+	{
+		return velocity_;
+	}
+
+	/*inline auto velocityHostAll()
 	{
 		return velocity_.hostVectorAll();
-	}
-
-	inline auto pointPositionHostAll()
-	{
-		return pStruct_.pointPositionHostAll();
-	}
-
-	auto markDeleteOutOfBox(const box& domain)
-	{
-		return pStruct_.markDeleteOutOfBox(domain);
-	}
+	}*/
 
 	bool predict(real dt, realx3PointField_D& acceleration);
 
 	bool correct(real dt, realx3PointField_D& acceleration);
 
-
-	// - update data structure by inserting/setting new points 
-	//   Notifies all the fields in the registered list of data structure
-	//   and exclude the fields that re in the exclusionList
-	//   retrun nullptr if it fails 
-	/*FUNCTION_H
-	virtual uniquePtr<int32IndexContainer> insertPoints(
-		const realx3Vector& pos,
-		const List<eventObserver*>& exclusionList={nullptr}
-	)override;*/
-
-	bool update(const eventMessage& msg) override;
-	
-
 };
 
 }
diff --git a/src/Particles/particles/particles.cpp b/src/Particles/particles/particles.cpp
index d5c3bb45..23250718 100644
--- a/src/Particles/particles/particles.cpp
+++ b/src/Particles/particles/particles.cpp
@@ -24,135 +24,107 @@ Licence:
 
 pFlow::particles::particles
 (
-	systemControl& control,
-	const word& integrationMethod
+	systemControl& control
 )
 :
-	demParticles(control),
-	time_(control.time()),
-	integrationMethod_(integrationMethod),
-	/*dynPointStruct_(
-		time_.emplaceObject<dynamicPointStructure>(
-			objectFile(
-				pointStructureFile__,
-				"",
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_ALWAYS			
-				),
-			control.time(),
-			integrationMethod
-			)
-		),*/
-	dynPointStruct_(
-		control.time(),
-		integrationMethod),
-	shapeName_(
-		control.time().emplaceObject<wordPointField>(
-			objectFile(
-				"shapeName",
-				"",
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_ALWAYS,
-				false
-				),
-			pStruct(),
-			word("NO_NAME_SHAPE")
-			)
+	observer(),
+	demComponent("particles", control),
+	dynPointStruct_(control),
+	id_
+	(	
+		objectFile
+		(
+			"id",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_ALWAYS
 		),
-	id_(
-		control.time().emplaceObject<int32PointField_HD>(
-			objectFile(
-				"id",
-				"",
-				objectFile::READ_IF_PRESENT,
-				objectFile::WRITE_ALWAYS
-				),
-			pStruct(),
-			static_cast<int32>(-1)
-			)
+		dynPointStruct_,
+		static_cast<uint32>(-1)
+	),
+	propertyId_
+	(
+		objectFile
+		(
+			"propertyId",
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_NEVER
 		),
-	propertyId_(
-		control.time().emplaceObject<int8PointField_D>(
-			objectFile(
-				"propertyId",
-				"",
-				objectFile::READ_NEVER,
-				objectFile::WRITE_NEVER
-				),
-			pStruct(),
-			static_cast<int8>(0)
-			)
+		dynPointStruct_,
+		static_cast<int8>(0)
+	),
+	diameter_
+	(
+		objectFile
+		(
+			"diameter",
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_ALWAYS
 		),
-	diameter_(
-		control.time().emplaceObject<realPointField_D>(
-			objectFile(
-				"diameter",
-				"",
-				objectFile::READ_NEVER,
-				objectFile::WRITE_ALWAYS
-				),
-			pStruct(),
-			static_cast<real>(0.00000000001)
-			)
+		dynPointStruct_,
+		0.00000000001
+	),
+	mass_
+	(
+		objectFile
+		(
+			"mass",
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_ALWAYS
 		),
-	mass_(
-		control.time().emplaceObject<realPointField_D>(
-			objectFile(
-				"mass",
-				"",
-				objectFile::READ_NEVER,
-				objectFile::WRITE_ALWAYS
-				),
-			pStruct(),
-			static_cast<real>(0.0000000001)
-			)
+		dynPointStruct_,
+		0.0000000001
+	),
+	accelertion_
+	(
+		objectFile
+		(
+			"accelertion",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_ALWAYS
+			),
+		dynPointStruct_,
+		zero3
+	),
+	contactForce_
+	(
+		objectFile
+		(
+			"contactForce",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_ALWAYS
 		),
-	accelertion_(
-		control.time().emplaceObject<realx3PointField_D>(
-			objectFile(
-				"accelertion",
-				"",
-				objectFile::READ_IF_PRESENT,
-				objectFile::WRITE_ALWAYS
-				),
-			pStruct(),
-			zero3
-			)
+		dynPointStruct_,
+		zero3
+	),
+	contactTorque_
+	(
+	
+		objectFile
+		(
+			"contactTorque",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_ALWAYS
 		),
-	contactForce_(
-		control.time().emplaceObject<realx3PointField_D>(
-			objectFile(
-				"contactForce",
-				"",
-				objectFile::READ_IF_PRESENT,
-				objectFile::WRITE_ALWAYS
-				),
-			pStruct(),
-			zero3
-			)
-		),
-	contactTorque_(
-		control.time().emplaceObject<realx3PointField_D>(
-			objectFile(
-				"contactTorque",
-				"",
-				objectFile::READ_IF_PRESENT,
-				objectFile::WRITE_ALWAYS
-				),
-			pStruct(),
-			zero3
-			)
-		),
-	idHandler_(id_)
+		dynPointStruct_,
+		zero3
+	)
 {
 	
-	this->subscribe(pStruct());
+	WARNING<<"Subscribe particles"<<END_WARNING;
+	//this->subscribe(pStruct());
 
 }
 
 bool pFlow::particles::beforeIteration() 
 {
-	auto domain = this->control().domain();
+	/*auto domain = this->control().domain();
 
 	auto numMarked = dynPointStruct_.markDeleteOutOfBox(domain);
 	
@@ -174,12 +146,12 @@ bool pFlow::particles::beforeIteration()
 	}
 
 	this->zeroForce();
-	this->zeroTorque();
+	this->zeroTorque();*/
 
 	return true;
 }
 
-pFlow::uniquePtr<pFlow::List<pFlow::eventObserver*>> 
+/*pFlow::uniquePtr<pFlow::List<pFlow::eventObserver*>> 
 pFlow::particles::getFieldObjectList()const
 {
 	auto objListPtr = makeUnique<pFlow::List<pFlow::eventObserver*>>();
@@ -199,4 +171,4 @@ pFlow::particles::getFieldObjectList()const
 		static_cast<eventObserver*>(&shapeName_) );
 	
 	return objListPtr;
-}
+}*/
diff --git a/src/Particles/particles/particles.hpp b/src/Particles/particles/particles.hpp
index 7b207c50..554c9a85 100644
--- a/src/Particles/particles/particles.hpp
+++ b/src/Particles/particles/particles.hpp
@@ -23,66 +23,75 @@ Licence:
 #define __particles_hpp__
 
 #include "dynamicPointStructure.hpp"
-#include "particleIdHandler.hpp"
-#include "demParticles.hpp"
+#include "demComponent.hpp"
+
 namespace pFlow
 {
 
-class setFieldList;
 
 class particles
 :
-	public eventObserver,
-	public demParticles
+	public observer,
+	public demComponent
 {
-protected:
+private:
 	
-	// owner repository 
-	Time& time_;
-
-	const word integrationMethod_;
-
-	// dynamic point structure for particles 
+	/// dynamic point structure for particles center mass
 	dynamicPointStructure 	dynPointStruct_;
 
 	// - name of shapes - this is managed by particles 
-	wordPointField&  		shapeName_;
+	//wordPointField&  		shapeName_;
 
 	// id of particles on host
-	int32PointField_HD&		id_;
+	int32PointField_D		id_;
 
 	// property id on device
-	int8PointField_D& 		propertyId_;
+	int8PointField_D 		propertyId_;
 
 	// diameter / boundig sphere size of particles on device
-	realPointField_D&		diameter_;
+	realPointField_D		diameter_;
 
-	// mass on device
-	realPointField_D& 		mass_;
+	// mass of particles field 
+	realPointField_D 		mass_;
 
 	// - acceleration on device
-	realx3PointField_D& 	accelertion_;
+	realx3PointField_D 	accelertion_;
 
+	/// contact force field
+	realx3PointField_D     contactForce_;
 
-	realx3PointField_D&     contactForce_;
-
-
-	realx3PointField_D&     contactTorque_;	
+	/// contact torque field
+	realx3PointField_D     contactTorque_;	
 
 	
-	// - object handling particle id
-	particleIdHandler		idHandler_;
-
-	virtual uniquePtr<List<eventObserver*>> getFieldObjectList()const;
-
+	
 	void zeroForce()
 	{
-		contactForce_.fill(zero3);
+		WARNING<<"fill contactTorque"<<END_WARNING;
+		//contactForce_.fill(zero3);
 	}
 
 	void zeroTorque()
 	{
-		contactTorque_.fill(zero3);
+		WARNING<<"fill contactTorque"<<END_WARNING;
+		//contactTorque_.fill(zero3);
+	}
+protected:
+
+	inline auto& dynPointStruct()
+	{
+		return dynPointStruct_;
+	}
+
+	inline auto& pointPosition()
+	{
+		return dynPointStruct_.pointPosition();	
+	}
+
+	inline 
+	auto& velocity()
+	{
+		return dynPointStruct_.velocity();
 	}
 
 public:
@@ -90,166 +99,132 @@ public:
 	// type info
 	TypeInfo("particles");
 
-	particles(systemControl& control, const word& integrationMethod);
+	explicit particles(systemControl& control);
 
-	inline const auto& time()const {
-		return time_;
-	}
-
-	inline auto& time() {
-		return time_;
-	}
-	
-	inline auto integrationMethod()const
-	{
-		return integrationMethod_;
-	}
 
 	inline const auto& dynPointStruct()const 
 	{
 		return dynPointStruct_;
-	}
-
-	inline auto& dynPointStruct()
-	{
-		return dynPointStruct_;
-	}
-
-	inline const auto& pStruct()const{
-		return dynPointStruct_.pStruct();
-	}
-
-	inline auto& pStruct(){
-		return dynPointStruct_.pStruct();
-	}
+	}	
 
 	inline auto size()const{
-		return pStruct().size();
+		return dynPointStruct_.size();
 	}
 
 	inline auto capacity() const{
-		return pStruct().capacity();
-	}
-
-	inline auto activePointsMaskD()const{
-		return pStruct().activePointsMaskD();
-	}
-
-	inline auto numActive()const
-	{
-		return pStruct().numActive();
+		return dynPointStruct_.capacity();
 	}
 	
-	inline bool allActive()const{
-		return pStruct().allActive();
-	}
-
-	inline auto activeRange()const{
-		return pStruct().activeRange();
-	}
-
-	inline auto activePointsMaskH()const{
-		return pStruct().activePointsMaskH();
-	}
-
-	inline const auto& pointPosition()const{
-		return pStruct().pointPosition();
-	}
-
-	inline const auto& position()const
+	inline auto numActive()const
 	{
-		return pStruct().pointPosition();	
+		return dynPointStruct_.numActive();
+	}
+	
+	inline bool isAllActive()const
+	{
+		return dynPointStruct_.isAllActive();
 	}
 
-	inline const auto& pointVelocity()const{
-		return dynPointStruct().velocity();
+	inline 
+	const auto& pointPosition()const
+	{
+		return dynPointStruct_.pointPosition();
 	}
 
-	inline const auto& velocity()const{
-		return dynPointStruct().velocity();
+	inline 
+	const auto& velocity()const
+	{
+		return dynPointStruct_.velocity();
 	}
 
-	inline const auto& id()const{
-		return id_;
-	}
-
-	inline auto& id(){
-		return id_;
-	}
-
-	inline const auto& diameter()const{
+	inline 
+	const auto& diameter()const
+	{
 		return diameter_;
 	}
 
-	inline auto& diameter(){
+	inline 
+	auto& diameter()
+	{
 		return diameter_;
 	}
 
-	inline const auto& mass()const{
+	inline 
+	const auto& mass()const
+	{
 		return mass_;
 	}
 
-	inline auto& mass()	{
+	inline auto& mass()	
+	{
 		return mass_;
 	}
 
-	inline const auto& accelertion()const{
-		return accelertion_;
-	}
-
-	inline auto& accelertion(){
+	inline 
+	const auto& accelertion()const
+	{
 		return accelertion_;
 	}
 
 	inline 
-	realx3PointField_D& contactForce() 
+	auto& accelertion()
+	{
+		return accelertion_;
+	}
+
+	inline 
+	auto& contactForce() 
 	{
 		return contactForce_;
 	}
 
 	inline
-	const realx3PointField_D& contactForce() const
+	const auto& contactForce() const
 	{
 		return contactForce_;
 	}
 
 	inline
-	realx3PointField_D& contactTorque()
+	auto& contactTorque()
 	{
 		return contactTorque_;
 	}
 
 	inline
-	const realx3PointField_D& contactTorque() const 
+	const auto& contactTorque() const 
 	{
 		return contactTorque_;
 	}
 
-	inline const auto& propertyId()const{
+	inline 
+	const auto& propertyId()const
+	{
 		return propertyId_;
 	}
 
-	inline auto& propertyId(){
+	inline 
+	auto& propertyId()
+	{
 		return propertyId_;
 	}
 
-	inline const auto& shapeName()const{
+	/*inline const auto& shapeName()const{
 		return shapeName_;
-	}
+	}*/
 
-	inline auto& shapName(){
+	/*inline auto& shapName(){
 		return shapeName_;
-	}
+	}*/
 
 	bool beforeIteration() override;
 
-	virtual
+	/*virtual
 	bool insertParticles
 	(
 		const realx3Vector& position,
 	 	const wordVector&  shapes,
 	 	const setFieldList& setField
-	 ) = 0;
+	 ) = 0;*/
 
 	
 
@@ -259,8 +234,8 @@ public:
 	virtual
 	const realx3PointField_D& rAcceleration() const = 0;
 
-	virtual
-	const realVector_D& boundingSphere()const = 0;
+	/*virtual
+	const realVector_D& boundingSphere()const = 0;*/
 
 	virtual 
 	word shapeTypeName()const = 0;
diff --git a/src/Property/property.cpp b/src/Property/property.cpp
index b2745e10..e87de71e 100644
--- a/src/Property/property.cpp
+++ b/src/Property/property.cpp
@@ -18,55 +18,42 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-
 #include "property.hpp"
 #include "dictionary.hpp"
 
-bool pFlow::property::readDictionary
-(
-	const dictionary& dict
-)
+bool pFlow::property::readDictionary()
 {
 	
-	materials_ = dict.getVal<wordVector>("materials");
+	materials_ = getVal<wordVector>("materials");
 	
-	densities_ = dict.getVal<realVector>("densities");
+	densities_ = getVal<realVector>("densities");
 
 	if(materials_.size() != densities_.size() )
 	{
 		fatalErrorInFunction<<
 		"  number of elements in material ("<<materials_.size()<<
 		") is not equal to number of elements in densities ("<<densities_.size()<<
-		") in dictionary "<< dict.globalName()<<endl;
+		") in dictionary "<< globalName()<<endl;
 		return false;
 	}
 
-	if(!makeNameIndex())
-	{
-		fatalErrorInFunction<<
-		"  error in dictionary "<< dict.globalName()<<endl;
-		return false;
-	}
 	return true;
 }
 
-bool pFlow::property::writeDictionary
-(
-	dictionary& dict
-)const
+bool pFlow::property::writeDictionary()
 {
 
-	if(!dict.add("materials", materials_))
+	if(!add("materials", materials_))
 	{
 		fatalErrorInFunction<<
-		"  error in writing materials to dictionary "<< dict.globalName()<<endl;
+		"  error in writing materials to dictionary "<< globalName()<<endl;
 		return false;
 	}
 
-	if(!dict.add("densities", densities_))
+	if(!add("densities", densities_))
 	{
 		fatalErrorInFunction<<
-		"  error in writing densities to dictionary "<< dict.globalName()<<endl;
+		"  error in writing densities to dictionary "<< globalName()<<endl;
 		return false;
 	}
 
@@ -78,7 +65,7 @@ bool pFlow::property::makeNameIndex()
 	nameIndex_.clear();
 
 	uint32 i=0;
-	for(auto& nm:materials_)
+	for(auto const& nm:materials_)
 	{
 		if(!nameIndex_.insertIf(nm, i++))
 		{
@@ -88,68 +75,77 @@ bool pFlow::property::makeNameIndex()
 		}
 	}
 	nameIndex_.rehash(0);
-	numMaterials_ = materials_.size();
+	numMaterials_ = static_cast<uint32>(materials_.size());
 	return true;
 }
 
 
 pFlow::property::property
 (
+	const word& name, 
 	const wordVector& materials,
-	const realVector& densities
+	const realVector& densities,
+	repository* owner
 )
 :
+	fileDictionary
+	(
+		objectFile
+		(
+			name,
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_NEVER
+		),
+		owner
+	),
 	materials_(materials),
 	densities_(densities)
 {
+	
+	if(!writeDictionary())
+	{
+		fatalExit;
+	}
+
 	if(!makeNameIndex())
 	{
 		fatalErrorInFunction<<
-		"  error in the input parameters of constructor. \n";
+		"error in the input parameters of constructor. \n";
 		fatalExit;
 	}
 }
 
 pFlow::property::property
 (
-const fileSystem& file
+	const word& fileName,
+	repository* owner
 )
 :
-	dict_
+	fileDictionary
 	(
-		makeUnique<dictionary>
-		("property", true)
-	)
-{
-	iFstream dictStream(file);
-
-	if(!dict_().read(dictStream))
-	{
-		ioErrorInFile(dictStream.name(), dictStream.lineNumber());
-		fatalExit;
-	}
-
-	if(!readDictionary(dict_()))
-	{
-		fatalExit;
-	}
-
-}
-
-pFlow::property::property
-(
-	const dictionary& dict
-)
-:
-	dict_
-	(
-		makeUnique<dictionary>(dict)
+		objectFile
+		(
+			fileName,
+			"",
+			objectFile::READ_ALWAYS,
+			objectFile::WRITE_NEVER
+		),
+		owner
 	)
 {
 	
-	if(!readDictionary(dict_()))
+	if(!readDictionary())
 	{
 		fatalExit;
 	}
+
+	if(!makeNameIndex())
+	{
+		fatalErrorInFunction<<
+		"error in dictionary "<< globalName()<<endl;
+		fatalExit;
+	}
+
 }
 
diff --git a/src/Property/property.hpp b/src/Property/property.hpp
index e7633e8e..bba952ab 100644
--- a/src/Property/property.hpp
+++ b/src/Property/property.hpp
@@ -22,7 +22,7 @@ Licence:
 
 #include "Vectors.hpp"
 #include "hashMap.hpp"
-#include "fileSystem.hpp"
+#include "fileDictionary.hpp"
 #include "iFstream.hpp"
 
 namespace pFlow
@@ -38,14 +38,13 @@ class dictionary;
  * used in the simulation: for walls and particles.  
  */
 class property
+:
+	public fileDictionary
 {
-protected:
+private:
 
 	// - protected data members
 
-		/// pointer to the dictionary, if it is constructed from a file/dictionary
-		uniquePtr<dictionary> dict_ = nullptr;
-
 		/// list of name of materials
 		wordVector 		materials_;
 
@@ -62,10 +61,10 @@ protected:
 	// - protected member functions
 
 		/// read from dict
-		bool readDictionary(const dictionary& dict);
+		bool readDictionary();
 
 		/// write to dict
-		bool writeDictionary(dictionary& dict)const;
+		bool writeDictionary();
 
 		/// creates a mapp
 		bool makeNameIndex();
@@ -73,22 +72,19 @@ protected:
 public:
 
 	/// Type info
-	TypeInfoNV("property");
+	TypeInfo("property");
 
-	
 	// - Constructors 
 
-		/// Emptry constructor, used for reading from a file 
-		property(){}
-
-		/// Constructe from materials and densities 
-		property(const wordVector& materials, const realVector& densities);
-
-		/// Construct from file
-		property(const fileSystem& file);	
-
-		/// Construct from dictionary dict
-		property(const dictionary& dict);
+		explicit 
+		property(
+			const word& fileName, 
+			repository* owner=nullptr);
+		
+		property(const word& name, 
+				const wordVector& materials,
+				const realVector& densities,
+				repository* owner=nullptr);
 
 		/// Default copy
 		property(const property& ) = default;
@@ -103,17 +99,11 @@ public:
 		property& operator= (property&&) = default;
 
 		/// Default destructor 
-		~property() = default;
+		~property() override = default;
 
 	
 	// - Methods 
 
-		/// Return dictionary
-		inline const auto& dict()const
-		{
-			return dict_();
-		}
-
 		/// Return number of materials 
 		inline auto numMaterials()const
 		{
@@ -190,20 +180,6 @@ public:
 			}	
 		}
 		
-	//// - IO operatoins
-
-		/// Read from dictionary 
-		bool read(const dictionary& dict)
-		{
-			return readDictionary(dict);
-		}
-
-		/// Write to dictionary 
-		bool write(dictionary& dict)const
-		{
-			return writeDictionary(dict);
-		}
-
 };
 
 }
diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 805a55d0..23ee3e13 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -34,18 +34,6 @@ dictionary/entry/iEntry.cpp
 dictionary/entry/dataEntry.cpp 
 dictionary/twoPartEntry/twoPartEntry.cpp
 
-containers/Vector/Vectors.cpp
-containers/VectorHD/VectorSingles.cpp
-containers/Field/Fields.cpp
-containers/List/anyList/anyList.cpp
-containers/pointField/pointFields.cpp
-
-#setFieldList/setFieldList.cpp
-#setFieldList/setFieldEntry.cpp
-
-Timer/Timer.cpp
-Timer/Timers.cpp
-
 repository/IOobject/objectFile.cpp
 repository/IOobject/IOfileHeader.cpp
 repository/IOobject/IOobject.cpp
@@ -62,6 +50,24 @@ eventManagement/observer.cpp
 
 demComponent/demComponent.cpp
 
+containers/Vector/Vectors.cpp
+containers/VectorHD/VectorSingles.cpp
+containers/Field/Fields.cpp
+containers/List/anyList/anyList.cpp
+containers/pointField/pointFields.cpp
+
+#setFieldList/setFieldList.cpp
+#setFieldList/setFieldEntry.cpp
+
+Timer/Timer.cpp
+Timer/Timers.cpp
+
+
+
+
+
+
+
 structuredData/box/box.cpp
 structuredData/line/line.cpp
 structuredData/infinitePlane/infinitePlane.cpp
@@ -73,6 +79,7 @@ structuredData/pointStructure/internalPoints.cpp
 structuredData/pointStructure/pointStructure.cpp
 structuredData/boundaries/boundaryBase/boundaryBase.cpp
 structuredData/boundaries/boundaryExit/boundaryExit.cpp
+structuredData/boundaries/boundaryNone/boundaryNone.cpp
 structuredData/pointStructure/boundaryList.cpp
 
 commandLine/commandLine.cpp
diff --git a/src/phasicFlow/containers/Vector/Vector.hpp b/src/phasicFlow/containers/Vector/Vector.hpp
index 32d2f115..f2511fd5 100644
--- a/src/phasicFlow/containers/Vector/Vector.hpp
+++ b/src/phasicFlow/containers/Vector/Vector.hpp
@@ -322,7 +322,7 @@ public:
 	{
 		return readStdVector(is, vectorField());
 	}
-	bool write(iOstream& os)
+	bool write(iOstream& os)const
 	{
 		return writeStdVector(os, vectorField());
 	}
diff --git a/src/phasicFlow/containers/pointField/internalField.hpp b/src/phasicFlow/containers/pointField/internalField.hpp
index 9783fdbc..30e08bc4 100644
--- a/src/phasicFlow/containers/pointField/internalField.hpp
+++ b/src/phasicFlow/containers/pointField/internalField.hpp
@@ -86,6 +86,21 @@ public:
 		return field_.hostVector();
 	}
 
+	const FieldType& field()const
+	{
+		return field_;
+	}
+
+	const pFlagTypeDevice& activePointsMaskDevice()const
+	{
+		return internalPoints_.activePointsMaskDevice();
+	}
+	
+	const pFlagTypeHost& activePointsMaskHost()const
+	{
+		return internalPoints_.activePointsMaskHost();
+	}
+
 	FieldTypeHost activeValuesHost()const;
 
 	inline
diff --git a/src/phasicFlow/containers/pointField/pointField.cpp b/src/phasicFlow/containers/pointField/pointField.cpp
index 28bc8c73..edc42ce1 100644
--- a/src/phasicFlow/containers/pointField/pointField.cpp
+++ b/src/phasicFlow/containers/pointField/pointField.cpp
@@ -41,9 +41,32 @@ pFlow::pointField<T, MemorySpace>::pointField
 	boundaryFieldList_(pStruct.boundaries(), *this),
 	pStruct_(pStruct),
 	defaultValue_(defVal)
-{
-	
-}
+{}
+
+template<class T, class MemorySpace>
+pFlow::pointField<T, MemorySpace>::pointField
+(
+    const objectFile& objf,
+    repository* owner,
+    pointStructure& pStruct,
+    const T& defVal
+)
+:
+	IOobject
+	(
+		objf,
+		pStruct.ioPattern(),
+		owner
+	),
+	InternalFieldType
+	(
+		objf.name(),
+		pStruct
+	),
+	boundaryFieldList_(pStruct.boundaries(), *this),
+	pStruct_(pStruct),
+	defaultValue_(defVal)
+{}
 
 template<class T, class MemorySpace>
 pFlow::pointField<T, MemorySpace>::pointField
diff --git a/src/phasicFlow/containers/pointField/pointField.hpp b/src/phasicFlow/containers/pointField/pointField.hpp
index 5ebb015d..ffc315c5 100644
--- a/src/phasicFlow/containers/pointField/pointField.hpp
+++ b/src/phasicFlow/containers/pointField/pointField.hpp
@@ -81,6 +81,12 @@ public:
             pointStructure& pStruct, 
             const T& defVal);
 		
+		pointField(
+			const objectFile& objf,
+			repository* owner,
+			pointStructure& pStruct,
+			const T& defVal);
+		
 		pointField(
 			const objectFile& objf,
 			pointStructure& pStruct,
diff --git a/src/phasicFlow/containers/pointField/pointFields.hpp b/src/phasicFlow/containers/pointField/pointFields.hpp
index 2dc5242a..d3435812 100644
--- a/src/phasicFlow/containers/pointField/pointFields.hpp
+++ b/src/phasicFlow/containers/pointField/pointFields.hpp
@@ -36,57 +36,39 @@ template<typename T>
   using pointField_D = pointField<T>;
 
 
-using int8PointField_D 		= pointField<int8>;
+using int8PointField_D 		= pointField_D<int8>;
+using int8PointField_H 		= pointField_H<int8>;
 
-using int8PointField_H 		= pointField<int8, HostSpace>;
+using uint8PointField_D 		= pointField_D<uint8>;
+using uint8PointField_H 		= pointField_H<uint8>;
 
-using realPointField_D 		= pointField<real>;
+using int32PointField_D 		= pointField_D<int32>;
+using int32PointField_H 		= pointField_H<int32>;
 
-using realPointField_H 		= pointField<real, HostSpace>;
+using uint32PointField_D 		= pointField_D<uint32>;
+using uint32PointField_H 		= pointField_H<uint32>;
 
-//using int32PointField_D 	= pointField<VectorSingle, int32>;
+using int64PointField_D 		= pointField_D<int64>;
+using int63PointField_H 		= pointField_H<int64>;
 
-/*using int32PointField_H 	= pointField<VectorSingle, int32, HostSpace>;
+using uint64PointField_D 		= pointField_D<uint64>;
+using uint64PointField_H 		= pointField_H<uint64>;
 
-using int64PointField_D 	= pointField<VectorSingle, int64>;
+using int32PointField_D 		= pointField_D<int32>;
+using int32PointField_H 		= pointField_H<int32>;
 
-using int64PointField_H 	= pointField<VectorSingle, int64, HostSpace>;
+using realPointField_D 		= pointField_D<real>;
+using realPointField_H 		= pointField_H<real>;
 
-using uint32PointField_D 	= pointField<VectorSingle, uint32>;
+using realx3PointField_D 		= pointField_D<realx3>;
+using realx3PointField_H 		= pointField_H<realx3>;
 
-using uint32PointField_H 	= pointField<VectorSingle, uint32, HostSpace>;
+using realx4PointField_D 		= pointField_D<realx4>;
+using realx4PointField_H 		= pointField_H<realx4>;
 
-using labelPointField_D 	= pointField<VectorSingle, label>;
 
-using labelPointField_H  	= pointField<VectorSingle, label, HostSpace>;
 
-using realPointField_D 		= pointField<VectorSingle, real>;
 
-using realPointField_H 		= pointField<VectorSingle, real, HostSpace>;
-
-using realx3PointField_D 	= pointField<VectorSingle, realx3> ;
-
-using realx3PointField_H 	= pointField<VectorSingle, realx3, HostSpace>;
-
-using wordPointField_H 		= pointField<VectorSingle, word, HostSpace>;
-
-using int8PointField_HD 	= pointField<VectorDual, int8>;
-
-using int16PointField_HD 	= pointField<VectorDual, int16>;
-
-using int32PointField_HD 	= pointField<VectorDual, int32>;
-
-using int64PointField_HD 	= pointField<VectorDual, int64>;
-
-using uint32PointField_HD 	= pointField<VectorDual, uint32>;
-
-using labelPointField_HD 	= pointField<VectorDual, label>;
-
-using realPointField_HD 	= pointField<VectorDual, real>;
-
-using realx3PointField_HD 	= pointField<VectorDual, realx3>;
-
-using wordPointField 		= pointField<Vector, word, vecAllocator<word>>;*/
 
 }
 
diff --git a/src/phasicFlow/dictionary/fileDictionary.cpp b/src/phasicFlow/dictionary/fileDictionary.cpp
index 14012165..62bd3b2d 100644
--- a/src/phasicFlow/dictionary/fileDictionary.cpp
+++ b/src/phasicFlow/dictionary/fileDictionary.cpp
@@ -10,7 +10,7 @@ pFlow::fileDictionary::fileDictionary
     IOobject
     (
         of, 
-        IOPattern::IOPattern::AllProcessorsSimilar, 
+        IOPattern::AllProcessorsSimilar, 
         owner
     ),
     dictionary
diff --git a/src/phasicFlow/repository/IOobject/IOPattern.hpp b/src/phasicFlow/repository/IOobject/IOPattern.hpp
index 9f8f3124..9bd46e09 100644
--- a/src/phasicFlow/repository/IOobject/IOPattern.hpp
+++ b/src/phasicFlow/repository/IOobject/IOPattern.hpp
@@ -58,7 +58,7 @@ public:
 									// standard input and output streams 
 	};
 
-protected:
+private:
 
 	IOType 		    ioType_;
 
@@ -72,12 +72,16 @@ protected:
 
 public:
 
-	IOPattern( IOType iotype);
+	IOPattern( IOPattern::IOType iotype);
 	
 	IOPattern(const IOPattern&)=default;
 
+	IOPattern(IOPattern&&) = default;
+
 	IOPattern& operator=(const IOPattern&)=default;
 
+	IOPattern& operator=(IOPattern&&)=default;
+
 	~IOPattern() = default;
 
 	inline
@@ -123,6 +127,13 @@ public:
         return true;
     }
 
+	inline 
+	bool thisCallWrite()const
+	{
+		if(isMasterProcessorOnly()&& !isMaster())return false;
+		return true;
+	}
+
 	inline
 	bool thisProcReadData()const
 	{
diff --git a/src/phasicFlow/repository/IOobject/IOfileHeader.cpp b/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
index 15fda4fb..440a1ab6 100644
--- a/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
+++ b/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
@@ -36,7 +36,7 @@ pFlow::uniquePtr<pFlow::oFstream> pFlow::IOfileHeader::outStream()const
 	if(osPtr && owner())
 	{
 	 	auto outPrecision = owner()->outFilePrecision();
-	 	osPtr->precision(outPrecision);
+	 	osPtr->precision(static_cast<int>(outPrecision));
 	}
 
 	return osPtr;
@@ -62,7 +62,7 @@ pFlow::fileSystem pFlow::IOfileHeader::path() const
 	{
 		f = localPath();
 	}
-	f += name_;
+	f += name();
 	return f;
 }
 
@@ -146,11 +146,8 @@ bool pFlow::IOfileHeader::writeHeader
 ) const
 {
 
-	if(!forceWrite)
-	{
-		if(!writeHeader()) return true;
-	} 
-
+	if(!forceWrite && !writeHeader()) return true;
+	
 	writeBanner(os);
 
 	os.writeWordEntry("objectType", typeName );
diff --git a/src/phasicFlow/repository/IOobject/IOobject.cpp b/src/phasicFlow/repository/IOobject/IOobject.cpp
index 39e3090c..2cd77a9f 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.cpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.cpp
@@ -64,60 +64,56 @@ pFlow::repository* pFlow::IOobject::releaseOwner
 
 bool pFlow::IOobject::readObject(bool rdHdr)
 {
-    
-	if( implyRead() )
-	{
-		if( rdHdr & ioPattern().thisCallRead())
-		{	
-			if( auto ptrIS = inStream(); ptrIS )
-			{
-				if(!readHeader(ptrIS()))return false;
-			}
-			else
-			{
-				warningInFunction<<
-				"could not open file " << path() <<endl;
-				return false;
-			}
-		}
-
-        if(ioPattern().thisCallRead())
-        {
-            if( auto ptrIS = inStream(); ptrIS )
-            {
-                if(!readObject(ptrIS(), rdHdr))return false;              
-            }
-            else
-            {
-                warningInFunction<<
-                "could not open file " << path() <<endl;
-                return false;
-            }    
-        }
-		
-	}	
+    if(!implyRead())return true;
 	
+    if( rdHdr && ioPattern().thisCallRead())
+    {	
+        if( auto ptrIS = inStream(); ptrIS )
+        {
+            if(!readHeader(ptrIS()))return false;
+        }
+        else
+        {
+            warningInFunction<<
+            "could not open file " << path() <<endl;
+            return false;
+        }
+    }
+
+    if(ioPattern().thisCallRead())
+    {
+        if( auto ptrIS = inStream(); ptrIS )
+        {
+            if(!readObject(ptrIS(), rdHdr))return false;              
+        }
+        else
+        {
+            warningInFunction<<
+            "could not open file " << path() <<endl;
+            return false;
+        }    
+    }
+		
 	return true;
 }
 
 
 bool pFlow::IOobject::writeObject() const
 {
-	if(implyWrite())
+	if(implyWrite()&& ioPattern().thisCallWrite())
 	{
-		if(ioPattern().thisProcWriteData())
+		
+        if(auto ptrOS = outStream(); ptrOS )
         {
-            if(auto ptrOS = outStream(); ptrOS )
-            {
-                return writeObject(ptrOS());
-            }
-            else
-            {
-                warningInFunction<< 
-                "error in opening file "<< path() <<endl;
-                return false;
-            }
+            return writeObject(ptrOS());
         }
+        else
+        {
+            warningInFunction<< 
+            "error in opening file "<< path() <<endl;
+            return false;
+        }
+        
 	}
 
 	return true;
@@ -126,11 +122,10 @@ bool pFlow::IOobject::writeObject() const
 
 bool pFlow::IOobject::readObject(iIstream& is, bool rdHdr)
 {
-	if(rdHdr && ioPattern().thisCallRead() )
-	{
-		if(!readHeader(is))return false;
-	}
-
+	if(rdHdr && 
+        ioPattern().thisCallRead() && 
+        !readHeader(is)) return false;
+	
     if(ioPattern().thisCallRead())
     {
         return read(is, ioPattern());
@@ -148,11 +143,9 @@ bool pFlow::IOobject::writeObject(iOstream& os) const
 	if(this->writeHeader() && ioPattern().thisProcWriteHeader())
 		writeHeader(os, typeName());
     
-    if(ioPattern().thisProcWriteData())
-	 {   //return (object_->write_object_t(os, ioPattern_) && writeSeparator(os));
-        notImplementedFunction;
-        //return object_->read_object_t(is, ioPattern_);
-        return false;
+    if(ioPattern().thisCallWrite())
+	 {   
+        return write(os, ioPattern() );
      }
     else
         return true;
diff --git a/src/phasicFlow/repository/IOobject/IOobject.hpp b/src/phasicFlow/repository/IOobject/IOobject.hpp
index 952498c5..f2eaaba7 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.hpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.hpp
@@ -36,7 +36,7 @@ class IOobject
 :
 	public	IOfileHeader
 {
-protected:
+private:
 
     IOPattern       ioPattern_;
 
@@ -57,7 +57,7 @@ public:
             const IOPattern&    iop, 
             repository*   owner);
         
-        ~IOobject();
+        ~IOobject() override;
 
 		// - copy construct 
 		IOobject(const IOobject& src)=delete;	
diff --git a/src/phasicFlow/repository/IOobject/objectFile.hpp b/src/phasicFlow/repository/IOobject/objectFile.hpp
index 8bb5cb5f..dfe93fd2 100644
--- a/src/phasicFlow/repository/IOobject/objectFile.hpp
+++ b/src/phasicFlow/repository/IOobject/objectFile.hpp
@@ -45,16 +45,16 @@ public:
 	};
 
 
-protected:
+private:
 
 	/// Name of the entity
 	word 	name_;
 
 	/// Read flag
-	readFlag  rFlag_ = READ_NEVER;
+	readFlag  rFlag_ = readFlag::READ_NEVER;
 
 	/// Write flag
-	writeFlag wFlag_ = WRITE_NEVER;
+	writeFlag wFlag_ = writeFlag::WRITE_NEVER;
 
 	/// Local path of entity
 	fileSystem localPath_ = "";
@@ -70,7 +70,7 @@ public:
 
 	
 	// constructors
-	objectFile
+	explicit objectFile
 	(
 		const word& name
 	);
@@ -80,8 +80,8 @@ public:
 	(
 		const word& name,
 		const fileSystem& 	localPath,
-		const readFlag&   	rf = READ_NEVER,
-		const writeFlag&  	wf = WRITE_NEVER,
+		const readFlag&   	rf = readFlag::READ_NEVER,
+		const writeFlag&  	wf = writeFlag::WRITE_NEVER,
 		bool  rwHeader = true
 	);
 
@@ -122,31 +122,31 @@ public:
 	inline
 	bool isReadAlways()const
 	{
-		return rFlag_ == READ_ALWAYS;
+		return rFlag_ == readFlag::READ_ALWAYS;
 	}
 
 	inline
 	bool isReadNever()const
 	{
-		return rFlag_ == READ_NEVER;
+		return rFlag_ == readFlag::READ_NEVER;
 	}
 
 	inline
 	bool isReadIfPresent()const
 	{
-		return rFlag_ == READ_IF_PRESENT;
+		return rFlag_ == readFlag::READ_IF_PRESENT;
 	}
 
 	inline
 	bool isWriteAlways()const
 	{
-		return wFlag_ == WRITE_ALWAYS;
+		return wFlag_ == writeFlag::WRITE_ALWAYS;
 	}
 
 	inline
 	bool isWriteNever()const
 	{
-		return wFlag_ == WRITE_NEVER;
+		return wFlag_ == writeFlag::WRITE_NEVER;
 	}
 
 	inline 
diff --git a/src/phasicFlow/repository/Time/Time.cpp b/src/phasicFlow/repository/Time/Time.cpp
index 693dcd85..234dcfd0 100644
--- a/src/phasicFlow/repository/Time/Time.cpp
+++ b/src/phasicFlow/repository/Time/Time.cpp
@@ -55,12 +55,6 @@ pFlow::Time::Time
 		geometryRepository_,
 		geometryFolder__,
 		this
-	),
-	integration_
-	(
-		integrationRepository__,
-		integrationFolder__,
-		this
 	)
 {
 	
@@ -90,12 +84,6 @@ pFlow::Time::Time(
 		geometryRepository_,
 		geometryFolder__,
 		this
-	),
-	integration_
-	(
-		integrationRepository__,
-		integrationFolder__,
-		this
 	)
 {
 	if(!readDictionary(setiingsDict))
@@ -109,6 +97,11 @@ pFlow::fileSystem pFlow::Time::localPath()const
     return fileSystem(timeName());
 }
 
+pFlow::fileSystem pFlow::Time::integrationFolder() const
+{
+	return integrationFolder__;
+}
+
 bool pFlow::Time::write
 (
 	bool verbose
diff --git a/src/phasicFlow/repository/Time/Time.hpp b/src/phasicFlow/repository/Time/Time.hpp
index 7bdf7091..6cafa87b 100644
--- a/src/phasicFlow/repository/Time/Time.hpp
+++ b/src/phasicFlow/repository/Time/Time.hpp
@@ -28,7 +28,7 @@ Licence:
 
 #include "timeControl.hpp"
 #include "repository.hpp"
-
+#include "fileSystem.hpp"
 
 
 namespace pFlow
@@ -49,10 +49,6 @@ protected:
 	// - geometry folder/repository 
 	repository 		geometry_;
 
-	// - integration folder/repository 
-	repository 		integration_;
-
-
 	bool readDictionary(const dictionary& dict);
 
 public:
@@ -84,15 +80,7 @@ public:
 			return geometry_;
 		}
 
-		const repository& integration()const
-		{
-			return integration_;
-		}
-
-		repository& integration()
-		{
-			return integration_;
-		}
+		fileSystem integrationFolder()const;
 		
 		/// Write to the file with binary format?
 		bool outFileBinary()const override
diff --git a/src/phasicFlow/smartPointers/uniquePtr.hpp b/src/phasicFlow/smartPointers/uniquePtr.hpp
index 373a043b..c1363cde 100644
--- a/src/phasicFlow/smartPointers/uniquePtr.hpp
+++ b/src/phasicFlow/smartPointers/uniquePtr.hpp
@@ -18,7 +18,6 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-
 #ifndef __uniquePtr_hpp__
 #define __uniquePtr_hpp__
 
@@ -47,7 +46,7 @@ class uniquePtr
 {
 public:
 
-	typedef std::unique_ptr<T,Deleter>  uniquePtrType;
+	using uniquePtrType = std::unique_ptr<T, Deleter>;
 
 	// using base constructors 
 	using uniquePtrType::unique_ptr;
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
new file mode 100644
index 00000000..e3362956
--- /dev/null
+++ b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
@@ -0,0 +1,58 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "boundaryNone.hpp"
+
+pFlow::boundaryNone::boundaryNone
+(
+	const dictionary& dict,
+	const plane&      bplane,
+	internalPoints&   internal
+)
+:
+	boundaryBase(dict, bplane, internal)
+{}
+
+bool pFlow::boundaryNone::beforeIteratoin
+(
+	uint32 iterNum, 
+	real t
+)
+{
+	return true;
+}
+
+bool pFlow::boundaryNone::iterate
+(
+	uint32 iterNum, 
+	real t
+)
+{
+	return true;
+}
+
+bool pFlow::boundaryNone::afterIteration
+(
+	uint32 iterNum, 
+	real t
+)
+{
+	return true;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp
new file mode 100644
index 00000000..da93977e
--- /dev/null
+++ b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp
@@ -0,0 +1,64 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __boundaryNone_hpp__
+#define __boundaryNone_hpp__
+
+
+#include "boundaryBase.hpp"
+
+namespace pFlow
+{
+
+class boundaryNone
+:
+ 	public boundaryBase
+{
+
+public:
+
+	TypeInfo("boundary<none>");
+
+	boundaryNone(
+		const dictionary& 	dict,
+		const plane&    	bplane,
+		internalPoints& 	internal);
+
+	~boundaryNone() override= default;
+	
+	add_vCtor
+	(
+		boundaryBase,
+		boundaryNone,
+		dictionary
+	);
+
+	bool beforeIteratoin(uint32 iterNum, real t) override;
+
+	bool iterate(uint32 iterNum, real t) override;
+
+	bool afterIteration(uint32 iterNum, real t) override;
+
+
+};
+
+}
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp b/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
index 86fdf02e..7eeb888a 100644
--- a/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
+++ b/src/phasicFlow/structuredData/domain/regularSimulationDomain.hpp
@@ -39,6 +39,11 @@ public:
 
     uint32 initialNumberInThis()const override;
 
+	bool initialThisDomainActive()const override
+	{
+		return true;
+	}
+
 	/*bool updateDomains(
 		span<realx3> pointPos,
         pFlagTypeHost flags) override;*/
diff --git a/src/phasicFlow/structuredData/domain/simulationDomain.hpp b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
index 205f1c75..35718798 100644
--- a/src/phasicFlow/structuredData/domain/simulationDomain.hpp
+++ b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
@@ -97,6 +97,9 @@ public:
     virtual
     uint32 initialNumberInThis()const = 0;
 
+	virtual 
+	bool initialThisDomainActive()const = 0;
+
     virtual 
 	bool initialTransferBlockData(
 		span<char> src, 
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
index cbf1f539..83dbcec9 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
@@ -172,7 +172,7 @@ public:
 
 
 	INLINE_FUNCTION_HD
-	bool operator()(uint32 i)
+	bool operator()(uint32 i)const
 	{
 		return isActive(i);
 	}
diff --git a/utilities/Utilities/readFromTimeFolder.hpp b/utilities/Utilities/readFromTimeFolder.hpp
index 75559780..a0d3b93d 100644
--- a/utilities/Utilities/readFromTimeFolder.hpp
+++ b/utilities/Utilities/readFromTimeFolder.hpp
@@ -42,7 +42,7 @@ protected:
 public:
 
 
-	readFromTimeFolder(repository& rep);
+	explicit readFromTimeFolder(repository& rep);
 
 	auto path()const
 	{
@@ -65,9 +65,9 @@ public:
 	bool pointFieldGetType(word& typeName)const
 	{
 		word fieldTYPENAME = pointField_H<T>::TYPENAME();
-		word fldType{}, space{};
+		word fldType{};
 		
-		if( !pFlow::utilities::pointFieldGetType(
+		if(word space{};  !pFlow::utilities::pointFieldGetType(
 			fieldTYPENAME, fldType, space) )
 		{
 			fatalErrorInFunction<<
@@ -81,18 +81,19 @@ public:
 	}
 
 	template<typename T>
-	bool pointFieldGetCheckType(word fieldName, word& typeName) const
+	bool pointFieldGetCheckType(word const& fieldName, word& typeName) const
 	{
 		
 		word fieldTYPENAME = pointField_H<T>::TYPENAME();
-		word flType{},fldType{};
-
+		
+		word flType{};
 		if(!pointFieldFileGetType( fieldName, flType))
 		{
 			fatalExit;
 			return false;
 		}
-		
+
+		word fldType{};
 		if( !pointFieldGetType<T>(fldType) )
 		{
 			fatalExit;
@@ -112,7 +113,7 @@ public:
 	}
 
 	template<typename T>
-	pointField_H<T>&  createUniformPointField_H(word name, T value)
+	uniquePtr<pointField_H<T>>  createUniformPointField_H(word const& name, T value)
 	{
 		if( !checkForPointStructure() )
 		{
@@ -120,29 +121,28 @@ public:
 			"cannot find " << pointStructureFile__ << " in repository "<< repository_.name()<<endl;
 			fatalExit;
 		}
+
 		auto& pStruct = repository_.lookupObject<pointStructure>(pointStructureFile__);
 
-		word fType;
-		pointFieldGetType<T>(fType);
-		word newName = name + fType;
 
-		auto& field = repository_.emplaceReplaceObject<pointField_H<T>>(
-			objectFile(
+		auto Ptr = makeUnique<pointField_H<T>>
+		(
+			objectFile
+			(
 				name,
 				"",
 				objectFile::READ_NEVER,
 				objectFile::WRITE_NEVER
-				),
+			),
 			pStruct,
+			T{},
 			value
-			);
-
-		return field;
-
+		);
+		return Ptr;
 	}
 
 	template<typename T>
-	pointField_H<T>& readPointField_H(word name) 
+	uniquePtr<pointField_H<T>> readPointField_H(word const& name) 
 	{
 		if( !checkForPointStructure() )
 		{
@@ -152,23 +152,25 @@ public:
 		}
 		auto& pStruct = repository_.lookupObject<pointStructure>(pointStructureFile__);
 
-		auto& field = repository_.emplaceObjectOrGet<pointField_H<T>>(
-			objectFile(
+		auto Ptr = makeUnique<pointField_H<T>>
+		(
+			objectFile
+			(
 				name,
 				"",
 				objectFile::READ_IF_PRESENT,
 				objectFile::WRITE_ALWAYS
-				),
+			),
 			pStruct,
 			T{}
-			);
+		);
 
-		return field;
+		return Ptr;
 
 	}
 
 	template<typename T>
-	pointField_D<T>& readPointField_D(word name) 
+	uniquePtr<pointField_D<T>> readPointField_D(word const& name) 
 	{
 		if( !checkForPointStructure() )
 		{
@@ -178,18 +180,20 @@ public:
 		}
 		auto& pStruct = repository_.lookupObject<pointStructure>(pointStructureFile__);
 
-		auto& field = repository_.emplaceObjectOrGet<pointField_H<T>>(
-			objectFile(
+		auto Ptr = makeUnique<pointField_D<T>> 
+		(
+			objectFile
+			(
 				name,
 				"",
 				objectFile::READ_IF_PRESENT,
 				objectFile::WRITE_ALWAYS
-				),
+			),
 			pStruct,
 			T{}
-			);
+		);
 
-		return field;
+		return Ptr;
 	}
 
 };
diff --git a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
index 8d568a52..1e3351b5 100755
--- a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
+++ b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
@@ -72,21 +72,10 @@ int main( int argc, char* argv[] )
 // this should be palced in each main 
 #include "initialize_Control.hpp"
 
-	auto objCPDict = IOobject::make<fileDictionary>
-	(
-		objectFile
-		(
-			"particlesDict",
-			Control.settings().path(),
-			objectFile::READ_ALWAYS,
-			objectFile::WRITE_ALWAYS
-		),
-		"particlesDict"
-	);
+	fileDictionary cpDict("particlesDict", Control.settings().path());
+	
 
-	auto& cpDict = objCPDict().getObject<fileDictionary>();
-
-	pointStructure* pStructPtr = nullptr;
+	uniquePtr<pointStructure> pStructPtr = nullptr;
 
 
 	if(!setOnly)
@@ -100,24 +89,11 @@ int main( int argc, char* argv[] )
 
 		auto finalPos = pointPosition().getFinalPosition();
 
-		
-		auto& pStruct = Control.time().emplaceObject<pointStructure>
-		(
-			objectFile
-			(
-				pointStructureFile__,
-				Control.time().path(),
-				objectFile::READ_NEVER,
-				objectFile::WRITE_ALWAYS			
-			),
-			Control,
-            finalPos
-		);
+		pStructPtr = makeUnique<pointStructure>(Control, finalPos);
 
-		pStructPtr = &pStruct;
 
-		REPORT(1)<< "Created pStruct with "<< pStruct.size() << " points and capacity "<<
-		pStruct.capacity()<<" . . ."<< END_REPORT;
+		REPORT(1)<< "Created pStruct with "<< pStructPtr().size() << " points and capacity "<<
+		pStructPtr().capacity()<<" . . ."<< END_REPORT;
 
 		//REPORT(1)<< "Writing pStruct to " << Control.time().path()+ pointStructureFile__<< END_REPORT<<endl<<endl;
         
@@ -130,20 +106,8 @@ int main( int argc, char* argv[] )
 	}
     else
 	{
-
-		auto& pStruct = Control.time().emplaceObject<pointStructure>
-		(
-			objectFile
-			(
-				pointStructureFile__,
-				Control.time().path(),
-				objectFile::READ_NEVER,
-				objectFile::WRITE_ALWAYS			
-			),
-            Control
-		);
-
-		pStructPtr = &pStruct;
+		// read the content of pStruct from 0/pStructure
+		pStructPtr = makeUnique<pointStructure>(Control);
 
 	}
 
diff --git a/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp b/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
index 7ad046f6..a7d3879a 100755
--- a/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
+++ b/utilities/particlesPhasicFlow/positionParticles/positionParticles.cpp
@@ -19,6 +19,7 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "positionParticles.hpp"
+#include "vocabs.hpp"
 #include "box.hpp"
 #include "cylinder.hpp"
 #include "sphere.hpp"
@@ -101,7 +102,18 @@ pFlow::positionParticles::positionParticles
 	}
 	else
 	{
-		region_ = makeUnique<region<box>>( control.domainDict().subDict("globalBox"));
+		fileDictionary domainDict
+		(
+			objectFile
+			{
+				domainFile__,
+				"",
+				objectFile::READ_ALWAYS,
+				objectFile::WRITE_NEVER
+			},
+			&control.settings()
+		);
+		region_ = makeUnique<region<box>>( domainDict.subDict("globalBox"));
 	}
 	
 }

From 20be76aed0511b9bd32d774b0f7244558be1d825 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Thu, 25 Jan 2024 03:07:59 -0800
Subject: [PATCH 24/60] Particle base class and sphereParticle class have been
 updated

---
 src/Particles/CMakeLists.txt                  |   6 +-
 .../sphereParticles/sphereParticles.cpp       | 271 ++++++++++------
 .../sphereParticles/sphereParticles.hpp       | 106 +++----
 .../sphereShape/sphereShape.cpp               | 293 +++++++++---------
 .../sphereShape/sphereShape.hpp               | 146 +++------
 src/Particles/particles/baseShapeNames.cpp    | 114 +++++++
 src/Particles/particles/baseShapeNames.hpp    | 128 ++++++++
 src/Particles/particles/particles.cpp         | 185 ++++++-----
 src/Particles/particles/particles.hpp         |  66 ++--
 src/Particles/particles/shape.cpp             |  76 +++++
 src/Particles/particles/shape.hpp             | 183 +++++++++++
 11 files changed, 1051 insertions(+), 523 deletions(-)
 create mode 100644 src/Particles/particles/baseShapeNames.cpp
 create mode 100644 src/Particles/particles/baseShapeNames.hpp
 create mode 100644 src/Particles/particles/shape.cpp
 create mode 100644 src/Particles/particles/shape.hpp

diff --git a/src/Particles/CMakeLists.txt b/src/Particles/CMakeLists.txt
index 42ac0ea8..1b01ef94 100644
--- a/src/Particles/CMakeLists.txt
+++ b/src/Particles/CMakeLists.txt
@@ -1,10 +1,12 @@
 
 set(SourceFiles 
 dynamicPointStructure/dynamicPointStructure.cpp
+particles/baseShapeNames.cpp
+particles/shape.cpp
 particles/particles.cpp
 #particles/particleIdHandler.cpp
-#SphereParticles/sphereShape/sphereShape.cpp
-#SphereParticles/sphereParticles/sphereParticles.cpp
+SphereParticles/sphereShape/sphereShape.cpp
+SphereParticles/sphereParticles/sphereParticles.cpp
 #Insertion/shapeMixture/shapeMixture.cpp
 #Insertion/insertion/insertion.cpp
 #Insertion/Insertion/Insertions.cpp
diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp b/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
index f1d71012..04f4f19c 100644
--- a/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
@@ -19,10 +19,12 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "sphereParticles.hpp"
-#include "setFieldList.hpp"
-#include "sphereParticlesKernels.hpp"
+#include "systemControl.hpp"
+#include "vocabs.hpp"
+//#include "setFieldList.hpp"
+//#include "sphereParticlesKernels.hpp"
 
-pFlow::uniquePtr<pFlow::List<pFlow::eventObserver*>> 
+/*pFlow::uniquePtr<pFlow::List<pFlow::eventObserver*>> 
 pFlow::sphereParticles::getFieldObjectList()const
 {
 	auto objListPtr = particles::getFieldObjectList();
@@ -78,10 +80,10 @@ bool pFlow::sphereParticles::initializeParticles()
 		static_cast<int32>(shapeName_.size()));
 	
 	return insertSphereParticles(shapeName_, indices, false);
-}
+}*/
 
 
-bool pFlow::sphereParticles::beforeIteration() 
+/*bool pFlow::sphereParticles::beforeIteration() 
 {
 	particles::beforeIteration();
 	
@@ -98,45 +100,19 @@ bool pFlow::sphereParticles::beforeIteration()
 	intPredictTimer_.end();
 
 	return true;
-}
+}*/
 
 
-bool pFlow::sphereParticles::iterate() 
-{
-
-	accelerationTimer_.start();
-	//INFO<<"before accelerationTimer_ "<<endINFO;
-		pFlow::sphereParticlesKernels::acceleration(
-			control().g(),
-			mass().deviceVectorAll(),
-			contactForce().deviceVectorAll(),
-			I().deviceVectorAll(),
-			contactTorque().deviceVectorAll(),
-			pStruct().activePointsMaskD(),
-			accelertion().deviceVectorAll(),
-			rAcceleration().deviceVectorAll()
-			);
-	accelerationTimer_.end();
-	
-	intCorrectTimer_.start();
-	
-		dynPointStruct_.correct(this->dt(), accelertion_);
-	
-		rVelIntegration_().correct(this->dt(), rVelocity_, rAcceleration_);
-	
-	intCorrectTimer_.end();
-	
-	return true;
-}
 
 
-bool pFlow::sphereParticles::afterIteration() 
+
+/*bool pFlow::sphereParticles::afterIteration() 
 {
 	return true;
-}
+}*/
 
 
-bool pFlow::sphereParticles::insertSphereParticles(
+/*bool pFlow::sphereParticles::insertSphereParticles(
 	const wordVector& names,
 	const int32IndexContainer& indices,
 	bool setId
@@ -219,6 +195,39 @@ bool pFlow::sphereParticles::insertSphereParticles(
 
 	return true;
 
+}*/
+
+bool pFlow::sphereParticles::initInertia()
+{
+	
+	using exeSpace = typename realPointField_D::execution_space;
+	using policy = Kokkos::RangePolicy<
+			exeSpace,
+			Kokkos::IndexType<uint32>>;
+	
+	auto aPointsMask = dynPointStruct().activePointsMaskDevice();
+	auto aRange = aPointsMask.activeRange();
+
+	auto field_I = I_.fieldDevice();
+	auto field_shapeIndex = shapeIndex().fieldDevice();
+	
+	const auto& shp = getShapes();
+	realVector_D I ("I", shp.Inertia());
+	auto d_I = I.deviceVector();
+	
+	Kokkos::parallel_for(
+		"particles::initInertia",
+		policy(aRange.start(), aRange.end()),
+		LAMBDA_HD(uint32 i)
+		{
+			if(aPointsMask(i))
+			{
+				uint32 index = field_shapeIndex[i];
+				field_I[i] = d_I[index];
+			}
+		});
+	Kokkos::fence();
+	return true;
 }
 
 
@@ -227,78 +236,67 @@ pFlow::sphereParticles::sphereParticles(
 	const property& prop
 )
 :
-	particles(
-		control,
-		control.settingsDict().getValOrSet(
-			"integrationMethod",
-			word("AdamsBashforth3")
-			)
+	particles(control),
+	spheres_
+	(
+		shapeFile__,
+		&control.caseSetup(),
+		prop
+	),
+	I_
+	(
+		objectFile
+		(
+			"I",
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_NEVER
 		),
-	property_(prop),
-	shapes_(
-		control.caseSetup().emplaceObjectOrGet<sphereShape>(
-			objectFile(
-				sphereShapeFile__,
-				"",
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_NEVER
-				)
-			)
-		),
-	I_(
-		this->time().emplaceObject<realPointField_D>(
-			objectFile(
-				"I",
-				"",
-				objectFile::READ_NEVER,
-				objectFile::WRITE_ALWAYS
-				),
-			pStruct(),
-			static_cast<real>(0.0000000001)
-			)
-		),
-	rVelocity_(
-		this->time().emplaceObject<realx3PointField_D>(
-			objectFile(
-				"rVelocity",
-				"",
-				objectFile::READ_IF_PRESENT,
-				objectFile::WRITE_ALWAYS
-				),
-			pStruct(),
-			zero3
-			)
-		),
-	rAcceleration_(
-		this->time().emplaceObject<realx3PointField_D>(
-			objectFile(
-				"rAcceleration",
-				"",
-				objectFile::READ_IF_PRESENT,
-				objectFile::WRITE_ALWAYS
-				),
-			pStruct(),
-			zero3
-			)
+		dynPointStruct(),
+		static_cast<real>(0.0000000001)
+	),
+	rVelocity_
+	(
+		objectFile
+		(
+			"rVelocity",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_ALWAYS
 		),
+		dynPointStruct(),
+		zero3
+	),
+	rAcceleration_
+	(
+		objectFile(
+			"rAcceleration",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_ALWAYS
+			),
+		dynPointStruct(),
+		zero3
+	),
 	accelerationTimer_(
 		"Acceleration", &this->timers() ),
 	intPredictTimer_(
 		"Integration-predict", &this->timers() ),
 	intCorrectTimer_(
 		"Integration-correct", &this->timers() )
-
 {
 
-	REPORT(1)<<"Creating integration method "<<greenText(this->integrationMethod())
-		  << " for rotational velocity."<<endREPORT;
+	auto intMethod = control.settingsDict().getVal<word>("integrationMethod");
+	REPORT(1)<<"Creating integration method "<<Green_Text(intMethod)
+		  << " for rotational velocity."<<END_REPORT;
 		  
-	rVelIntegration_ = 
-		integration::create(
+	rVelIntegration_ = integration::create
+		(
 			"rVelocity",
-			this->time().integration(),
-			this->pStruct(),
-			this->integrationMethod());
+			dynPointStruct(),
+			intMethod,
+			rVelocity_.field()
+		);
 
 	if( !rVelIntegration_ )
 	{
@@ -307,7 +305,8 @@ pFlow::sphereParticles::sphereParticles(
 		fatalExit;
 	}
 
-	if(rVelIntegration_->needSetInitialVals())
+	WARNING<<"setFields for rVelIntegration_"<<END_WARNING;
+	/*if(rVelIntegration_->needSetInitialVals())
 	{
 		
 		auto [minInd, maxInd] = pStruct().activeRange();
@@ -327,17 +326,17 @@ pFlow::sphereParticles::sphereParticles(
 		REPORT(2)<< "Initializing the required vectors for rotational velocity integratoin\n "<<endREPORT;
 		rVelIntegration_->setInitialVals(indexHD, rvel);
 
-	}
+	}*/
 
 	
-	if(!initializeParticles())
+	if(!initInertia())
 	{
 		fatalExit;
 	}
 	
 } 
 
-bool pFlow::sphereParticles::update(const eventMessage& msg) 
+/*bool pFlow::sphereParticles::update(const eventMessage& msg) 
 {
 	
 	if(rVelIntegration_->needSetInitialVals())
@@ -362,9 +361,9 @@ bool pFlow::sphereParticles::update(const eventMessage& msg)
 	}	
 
 	return true;
-}
+}*/
 
-bool pFlow::sphereParticles::insertParticles
+/*bool pFlow::sphereParticles::insertParticles
 (
 	const realx3Vector& position,
  	const wordVector&  shapes,
@@ -419,4 +418,70 @@ bool pFlow::sphereParticles::insertParticles
 
 	return true;
 		
-}
\ No newline at end of file
+}*/
+
+bool pFlow::sphereParticles::beforeIteration()
+{
+	particles::beforeIteration();
+	intPredictTimer_.start();
+		dynPointStruct().predict(dt(), accelertion());
+		rVelIntegration_().predict(dt(),rVelocity_, rAcceleration_);
+	intPredictTimer_.end();
+	
+	WARNING<<"pFlow::sphereParticles::beforeIteration()"<<END_WARNING;
+	return true;
+}
+
+bool pFlow::sphereParticles::iterate() 
+{
+
+	particles::iterate();
+	accelerationTimer_.start();
+	WARNING<<"pFlow::sphereParticlesKernels::acceleration"<<END_WARNING;
+	//INFO<<"before accelerationTimer_ "<<endINFO;
+		/*pFlow::sphereParticlesKernels::acceleration(
+			control().g(),
+			mass().deviceVectorAll(),
+			contactForce().deviceVectorAll(),
+			I().deviceVectorAll(),
+			contactTorque().deviceVectorAll(),
+			pStruct().activePointsMaskD(),
+			accelertion().deviceVectorAll(),
+			rAcceleration().deviceVectorAll()
+			);*/
+	accelerationTimer_.end();
+	
+	intCorrectTimer_.start();
+	
+		if(!dynPointStruct().correct(dt(), accelertion()))
+		{
+			return false;
+		}
+		if(!rVelIntegration_().correct(
+			dt(), 
+			rVelocity_, 
+			rAcceleration_))
+		{
+			return false;
+		}
+	
+	intCorrectTimer_.end();
+	
+	return true;
+}
+
+bool pFlow::sphereParticles::afterIteration()
+{
+	particles::afterIteration();
+	return true;
+}
+
+pFlow::word pFlow::sphereParticles::shapeTypeName()const
+{
+	return "sphere";
+}
+
+const pFlow::shape &pFlow::sphereParticles::getShapes() const
+{
+    return spheres_;
+}
diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp b/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp
index db9ad178..4e5a8c6e 100644
--- a/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp
@@ -44,22 +44,21 @@ class sphereParticles
 :
 	public particles 
 {
-protected:
+public:
+	using ShapeType = sphereShape;
+private:
 
-	/// reference to material properties
-	const property& 	property_;
-
-	/// reference to shapes 
-	sphereShape& 		shapes_;
+		/// reference to shapes 
+	ShapeType 			spheres_;
 
 	/// pointField of inertial of particles 
-	realPointField_D&     	I_;
+	realPointField_D     	I_;
 
 	/// pointField of rotational Velocity of particles on device 
-	realx3PointField_D& 	rVelocity_;
+	realx3PointField_D 	rVelocity_;
 
 	/// pointField of rotational acceleration of particles on device  
-	realx3PointField_D& 	rAcceleration_;	
+	realx3PointField_D 	rAcceleration_;	
 
 	/// rotational velocity integrator 
 	uniquePtr<integration>  rVelIntegration_ = nullptr;
@@ -73,9 +72,9 @@ protected:
 	/// timer for integration computations (correction step)
 	Timer 					intCorrectTimer_;
 
-	bool diameterMassInertiaPropId(const word& shName, real& diam, real& mass, real& I, int8& propIdx);
+	bool initInertia();
 
-	bool initializeParticles();
+	/*bool initializeParticles();
 
 	bool insertSphereParticles(
 		const wordVector& names, 
@@ -83,25 +82,17 @@ protected:
 		bool setId = true);
 
 	virtual uniquePtr<List<eventObserver*>> getFieldObjectList()const override;
+	*/
 
 public:
 
 	/// construct from systemControl and property 
-	sphereParticles(systemControl &control, const property& prop);
+	sphereParticles(
+		systemControl &control, 
+		const property& prop);
 
-	/// no copy constructor 
-	sphereParticles(const sphereParticles&) = delete;
 
-	/// move constructor 
-	sphereParticles(sphereParticles&&) = default;
-
-	/// no copy-assignement
-	sphereParticles& operator=(const sphereParticles&) = delete;
-
-	/// move-assignement
-	sphereParticles& operator=(sphereParticles&&) = default;
-
-	virtual ~sphereParticles()=default;
+	~sphereParticles()override=default;
 
 	/**
 	 * Insert new particles in position with specified shapes
@@ -112,17 +103,17 @@ public:
 	 * \param shape shape of new particles
 	 * \param setField initial value of the selected fields for new particles
 	 */
-	bool insertParticles
+	/*bool insertParticles
 	(
 		const realx3Vector& position,
 	 	const wordVector&  shapes,
 	 	const setFieldList& setField
-	) override ;
+	) override ;*/
 
 	/// const reference to shapes object 
-	const auto& shapes()const
+	const auto& spheres()const
 	{
-		return shapes_;
+		return spheres_;
 	}
 
 	/// const reference to inertia pointField
@@ -137,41 +128,29 @@ public:
 		return I_;
 	}
 	
-	const realx3Vector_D rVelocity()const 
+	const auto& rVelocity()const 
 	{	
 		return rVelocity_;
 	}
 
-	const realVector_D& boundingSphere()const override
-	{
-		return this->diameter();
+	auto& rVelocity()
+	{	
+		return rVelocity_;
 	}
 
-	word shapeTypeName() const override
+	bool hearChanges
+	(
+		real t,
+		real dt,
+		uint32 iter,
+		const message& msg, 
+    	const anyList& varList
+	) override
 	{
-		return "sphere";
-	}
-
-	void boundingSphereMinMax(
-		real& minDiam,
-		real& maxDiam )const override
-	{
-		shapes_.diameterMinMax(minDiam, maxDiam);
-	}
-
-	bool update(const eventMessage& msg) override;
-	
-	
-	realx3PointField_D& rAcceleration() override
-	{
-		return rAcceleration_;
+		notImplementedFunction;
+		return false;
 	}
 	
-	const realx3PointField_D& rAcceleration() const override
-	{
-		return rAcceleration_;
-	}
-
 	/// before iteration step 
 	bool beforeIteration() override;
 
@@ -180,8 +159,25 @@ public:
 
 	/// after iteration step
 	bool afterIteration() override;
-	
 
+	realx3PointField_D& rAcceleration() override
+	{
+		return rAcceleration_;
+	}
+
+	const realx3PointField_D& rAcceleration() const override
+	{
+		return rAcceleration_;
+	}
+	
+	const realPointField_D& boundingSphere()const override
+	{
+		return diameter();
+	}
+
+	word shapeTypeName()const override;
+	
+	const shape& getShapes()const override;
 	
 }; //sphereParticles
 
diff --git a/src/Particles/SphereParticles/sphereShape/sphereShape.cpp b/src/Particles/SphereParticles/sphereShape/sphereShape.cpp
index 7723f039..f07942ce 100644
--- a/src/Particles/SphereParticles/sphereShape/sphereShape.cpp
+++ b/src/Particles/SphereParticles/sphereShape/sphereShape.cpp
@@ -19,186 +19,177 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "sphereShape.hpp"
-#include "dictionary.hpp"
-#include "vocabs.hpp"
-#include "streams.hpp"
 
 
-bool pFlow::sphereShape::insertNames
-(
-	const wordVector& names
-)
+bool pFlow::sphereShape::readDictionary()
 {
-	names_.clear();
-	uint32 i=0;
-	for(const auto& nm:names)
-	{
-		if(!names_.insertIf(nm, i))
-		{
-			fatalErrorInFunction<<
-			"  repeated name in the list of sphere names: " << names;
-			return false;
-		}
-		i++;
-	}
-	names_.rehash(0);
 	
-	numShapes_ = names_.size();
-	
-	return true;
-}
+	diameters_ = getVal<realVector>("diameters");
 
-
-bool pFlow::sphereShape::readDictionary
-(
-	const dictionary& dict
-)
-{
-	diameters_ = dict.getVal<realVector>("diameters");
-	materials_ = dict.getVal<wordVector>("materials");
-	auto names = dict.getVal<wordVector>("names");
-
-	if(diameters_.size() != materials_.size() )
+	if(diameters_.size() != numShapes() )
 	{
-		fatalErrorInFunction<<
-		"  number of elements in diameters and properties are not the same in "<< dict.globalName()<<endl;
-		return false;
-	}
-	else if(diameters_.size() != names.size() )
-	{
-		fatalErrorInFunction<<
-		"  number of elements in diameters and names are not the same in "<< dict.globalName()<<endl;
-		return false;
-	}
-
-	if( !insertNames(names) )
-	{
-		fatalErrorInFunction<<
-		"  error in reading dictionary "<< dict.globalName();
+		fatalErrorInFunction<< 
+		" number of elements in diameters in "<< globalName()<<" is not consistent"<<endl;
 		return false;
 	}
 
 	return true;
 }
 
-bool pFlow::sphereShape::writeDictionary
-(
-	dictionary& dict
-)const
+bool pFlow::sphereShape::writeToDict(dictionary& dict)const 
 {
+	
+	if(!shape::writeToDict(dict))return false;
 
-	if( !dict.add("diamters", diameters_) )
+	if( !dict.add("diameters", diameters_) )
 	{
-		fatalErrorInFunction<<  
+		fatalErrorInFunction<<
 		"  Error in writing diameters to dictionary "<< dict.globalName()<<endl;
 		return false;
 	}
 
-	if( !dict.add("properties", materials_) )
-	{
-		fatalErrorInFunction<<
-		"  Error in writing properties to dictionary "<< dict.globalName()<<endl;
-		return false;
-	}
-
-	size_t n = names_.size();
-	wordVector names(n);
-	names.clear();
-	word nm;
-	
-	for(label i=0; i<n; i++)
-	{
-		indexToName(i, nm);
-		names.push_back(nm);
-	}
-
-	if( !dict.add("names", names) )
-	{
-		fatalErrorInFunction<<
-		"  Error in writing names to dictionary "<< dict.globalName()<<endl;
-		return false;
-	}
-
 	return true;
 }
 
-
-
 pFlow::sphereShape::sphereShape
 (
-	const realVector& diameter,
-	const wordVector& property,
-	const wordVector& name
+	const word& fileName,
+	repository* owner,
+	const property& prop
 )
 :
-	diameters_(diameter),
-	materials_(property)
-{
-	if( !insertNames( name) )
-	{
-		fatalExit;
-	}
-}
-
-bool pFlow::sphereShape::shapeToDiameter
-(
-	wordVector& names,
-	realVector& diams
-)const
-{
-	diams.clear();
-	uint32 idx;
-	for(const auto& nm:names)
-	{
-		if(!nameToIndex(nm, idx))
-		{
-			fatalErrorInFunction<<
-			"  invalid shape name requested "<< nm <<endl;
-			return false;
-		}
-		diams.push_back(diameters_[idx]);
-	}
-
-	return true;
-}
-
-
-bool pFlow::sphereShape::read(iIstream& is)
+	shape(fileName, owner, prop)
 {
 
-	dictionary sphereDict(sphereShapeFile__, true);
-
-	if( !sphereDict.read(is) )
-	{
-		ioErrorInFile(is.name(), is.lineNumber()) <<
-		"  error in reading dictionray " << sphereShapeFile__ <<" from file. \n";
-		return false;
-	}
-
-	if( !readDictionary(sphereDict) )
-	{
-		return false;
-	}
-
-	return true;
 }
 
-bool pFlow::sphereShape::write(iOstream& os)const
+pFlow::real pFlow::sphereShape::maxBoundingSphere() const
 {
-
-	dictionary sphereDict(sphereShapeFile__, true);
-
-	if( !writeDictionary(sphereDict))
-	{
-		return false;
-	}
-
-	if( !sphereDict.write(os) )
-	{
-		ioErrorInFile( os.name(), os.lineNumber() )<<
-		"  error in writing dictionray to file. \n";
-		return false;
-	}
-
-	return true;
+    return max(diameters_);
+}
+
+pFlow::real pFlow::sphereShape::minBoundingSphere() const
+{
+    return min(diameters_);
+}
+
+bool pFlow::sphereShape::boundingDiameter(uint32 index, real &bDiam) const
+{
+	if( indexValid(index))
+	{
+		bDiam = diameters_[index];
+		return true;
+	}
+    return false;
+}
+
+pFlow::real pFlow::sphereShape::boundingDiameter(uint32 index) const
+{
+    if(indexValid(index))
+	{
+		return diameters_[index];
+	}
+	fatalErrorInFunction<<"Invalid index for diameter "<<
+	index<<endl;
+	fatalExit;
+	return 0.0;
+}
+
+pFlow::realVector pFlow::sphereShape::boundingDiameter() const
+{
+    return diameters_;
+}
+
+bool pFlow::sphereShape::mass(uint32 index, real &m) const
+{
+    if( indexValid(index) )
+	{
+		real d = diameters_[index];
+		real rho = indexToDensity(index);
+		m = Pi/6.0*pow(d,3)*rho;
+		return true;
+	}
+	return false;
+}
+
+pFlow::real pFlow::sphereShape::mass(uint32 index) const
+{
+    if(real m; mass(index, m))
+	{
+		return m;
+	}
+	fatalErrorInFunction<<"bad index for mass "<< index<<endl;
+	fatalExit;
+	return 0;
+}
+
+pFlow::realVector pFlow::sphereShape::mass() const
+{
+    return realVector ("mass", Pi/6*pow(diameters_,(real)3.0)*density());
+}
+
+pFlow::realVector pFlow::sphereShape::density()const 
+{
+	auto pids = shapePropertyIds();
+	realVector rho("rho", numShapes());
+	ForAll(i, pids)
+	{
+		rho[i] = properties().density(pids[i]);
+	}
+	return rho;
+}
+
+bool pFlow::sphereShape::Inertia(uint32 index, real &I) const
+{
+	if( indexValid(index) )
+	{
+		I = 0.4 * mass(index) * pow(diameters_[index]/2.0,2.0);
+		return true;
+	}
+    return false;
+}
+
+pFlow::real pFlow::sphereShape::Inertia(uint32 index) const
+{
+	if(real I; Inertia(index, I))
+	{
+		return I;
+	}
+    fatalExit;
+	return 0;
+}
+
+pFlow::realVector pFlow::sphereShape::Inertia() const
+{
+    return realVector("I", 0.4*mass()*pow(0.5*diameters_,(real)2.0));
+}
+
+bool pFlow::sphereShape::Inertia_xx(uint32 index, real &Ixx) const
+{
+    return Inertia(index,Ixx);
+}
+
+pFlow::real pFlow::sphereShape::Inertial_xx(uint32 index) const
+{
+    return Inertia(index);
+}
+
+bool pFlow::sphereShape::Inertia_yy(uint32 index, real &Iyy) const
+{
+    return Inertia(index,Iyy);
+}
+
+pFlow::real pFlow::sphereShape::Inertial_yy(uint32 index) const
+{
+    return Inertia(index);
+}
+
+bool pFlow::sphereShape::Inertia_zz(uint32 index, real &Izz) const
+{
+    return Inertia(index,Izz);
+}
+
+pFlow::real pFlow::sphereShape::Inertial_zz(uint32 index) const
+{
+    return Inertia(index);
 }
diff --git a/src/Particles/SphereParticles/sphereShape/sphereShape.hpp b/src/Particles/SphereParticles/sphereShape/sphereShape.hpp
index f6357558..6c03bfd4 100644
--- a/src/Particles/SphereParticles/sphereShape/sphereShape.hpp
+++ b/src/Particles/SphereParticles/sphereShape/sphereShape.hpp
@@ -21,154 +21,78 @@ Licence:
 #ifndef __sphereShape_hpp__
 #define __sphereShape_hpp__
 
-#include "Vectors.hpp"
-#include "hashMap.hpp"
+#include "shape.hpp"
 
 namespace pFlow
 {
 
-class dictionary;
+
 
 class sphereShape
+:
+	public shape
 {
-protected:
+private:
 	
 	// - diameter of spheres
 	realVector 			diameters_;
 	
-	// - property name of spheres
-	wordVector 			materials_;
+	bool readDictionary();
 
-	// - hashed list of spheres names
-	wordHashMap<uint32> names_;
+protected:
 
-	size_t 				numShapes_;
-
-
-	bool insertNames(const wordVector& names);
-
-	bool readDictionary(const dictionary& dict);
-
-	bool writeDictionary(dictionary& dict)const;
+	bool writeToDict(dictionary& dict)const override;
 
 public:
 
 	// - type info
-	TypeInfoNV("sphereShape");
+	TypeInfo("shape<sphere>");
 
+	sphereShape(
+		const word& fileName,
+		repository* owner,
+		const property& prop);
 
-		sphereShape(){}
-
-		sphereShape(
-			const realVector& diameter,
-			const wordVector& property,
-			const wordVector& name
-			);
-
-		sphereShape(const sphereShape&) = default;
-
-		sphereShape(sphereShape&&) = default;
-
-		sphereShape& operator=(const sphereShape&) = default;
-
-		sphereShape& operator=(sphereShape&&) = default;
-
-		auto clone()const
-		{
-			return makeUnique<sphereShape>(*this);
-		}
-
-		sphereShape* clonePtr()const
-		{
-			return new sphereShape(*this);
-		}
-
-		~sphereShape() = default;
+	
+	~sphereShape() override = default;
 
 	//// - Methods
-		const auto& names()const{
-			return names_;
-		}
 
-		const auto& diameters()const{
-			return diameters_;
-		}
+	real maxBoundingSphere()const override;
 
-		const auto& materials()const{
-			return materials_;
-		}
+    real minBoundingSphere()const override;
 
-		const auto diameter(label i)const{
-			return diameters_[i];
-		}
+	bool boundingDiameter(uint32 index, real& bDiam)const override;
 
-		const auto material(label i)const{
-			return materials_[i];
-		}
+	real boundingDiameter(uint32 index)const override;
 
+	realVector boundingDiameter()const override;
 
-		// name to index
-		bool nameToIndex(const word& name, uint32& index)const
-		{
-			if(auto[iter, found] = names_.findIf(name); found )
-			{
-				index = iter->second;
-				return true;
-			}
-			else
-			{
-				index = 0;
-				return false;
-			}
-		}
+	bool mass(uint32 index, real& m)const override;
 
-		uint32 nameToIndex(const word& name)const
-		{
-			return names_.at(name);
-		}
+	real mass(uint32 index) const override;
 
-		bool indexToName(uint32 i, word& name)const
-		{
-			for(auto& nm: names_)
-			{
-				if(nm.second == i)
-				{
-					name = nm.first;
-					return true;
-				}
-			}
-			name = "";
-			return false;
-		}
+	realVector mass()const override;
 
-		bool shapeToDiameter(wordVector& names, realVector& diams)const;
+    realVector density() const override;
 
-		void diameterMinMax(real& minD, real& maxD)const
-		{
-			minD = min(diameters_);
-			maxD = max(diameters_);
-		}
+	bool Inertia(uint32 index, real& I)const override;
 
-	//// - IO operatoin 
+	real Inertia(uint32 index)const override;
 
-		// - read from stream/file
-		bool read(iIstream& is);
+	realVector Inertia()const override;
+	 
+    bool Inertia_xx(uint32 index, real& Ixx)const override;
 
-		// - write to stream/file
-		bool write(iOstream& os)const;
+    real Inertial_xx(uint32 index)const override;
+	
+    bool Inertia_yy(uint32 index, real& Iyy)const override;
 
-		// - read from dictionary 
-		bool read(const dictionary& dict)
-		{
-			return readDictionary(dict);
-		}
+    real Inertial_yy(uint32 index)const override;
 
-		// - write to dictionary 
-		bool write(dictionary& dict)const
-		{
-			return writeDictionary(dict);
-		}
+    bool Inertia_zz(uint32 index, real& Izz)const override;
 
+    real Inertial_zz(uint32 index)const override;
 
 };
 
diff --git a/src/Particles/particles/baseShapeNames.cpp b/src/Particles/particles/baseShapeNames.cpp
new file mode 100644
index 00000000..c8200f0c
--- /dev/null
+++ b/src/Particles/particles/baseShapeNames.cpp
@@ -0,0 +1,114 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "baseShapeNames.hpp"
+
+bool pFlow::baseShapeNames::createHashNames()
+{
+	hashNames_.clear();
+	uint32 i=0;
+	for(const auto& nm:shapeNames_)
+	{
+		if(!hashNames_.insertIf(nm, i))
+		{
+			fatalErrorInFunction<<
+			"  repeated name in the list of shape names: " << shapeNames_;
+			return false;
+		}
+		i++;
+	}
+	hashNames_.rehash(0);
+	
+	return true;
+}
+
+
+bool pFlow::baseShapeNames::readFromDictionary()
+{
+	
+	shapeNames_ = getVal<wordVector>("names");
+	numShapes_ = shapeNames_.size();
+
+	return true;
+}
+
+
+pFlow::baseShapeNames::baseShapeNames
+(
+    const word &fileName, 
+    repository *owner
+)
+:
+    fileDictionary
+    (
+        objectFile
+        (
+            fileName,
+            "",
+            objectFile::READ_ALWAYS,
+            objectFile::WRITE_ALWAYS
+        ),
+        owner
+    )
+{
+	
+	if( !readFromDictionary() )
+	{
+		fatalExit;
+	}
+
+	if( !createHashNames())
+	{
+		fatalExit;
+	}
+
+}
+
+bool pFlow::baseShapeNames::writeToDict(dictionary &dict)const
+{
+	
+	if( !dict.add("names", shapeNames_) )
+	{
+		fatalErrorInFunction<<
+		"  Error in writing names to dictionary "<< dict.globalName()<<endl;
+		return false;
+	}
+
+	return true;
+}
+
+bool pFlow::baseShapeNames::write(iOstream &os) const
+{
+	dictionary newDict(fileDictionary::dictionary::name(), true);
+
+	if( !writeToDict(newDict) )
+	{
+		return false;
+	}
+
+	if( !newDict.write(os) )
+	{
+		fatalErrorInFunction<<"Error in writing dictionary "<< globalName()<<
+		"to stream "<< os.name()<<endl; 
+		return false;
+	}
+
+	return true;
+}
diff --git a/src/Particles/particles/baseShapeNames.hpp b/src/Particles/particles/baseShapeNames.hpp
new file mode 100644
index 00000000..9c427c32
--- /dev/null
+++ b/src/Particles/particles/baseShapeNames.hpp
@@ -0,0 +1,128 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __baseShapeNames_hpp__
+#define __baseShapeNames_hpp__
+
+#include "fileDictionary.hpp"
+#include "Vectors.hpp"
+#include "hashMap.hpp"
+
+
+namespace pFlow
+{
+
+class repository;
+
+class baseShapeNames
+:
+	public fileDictionary
+{
+private:
+
+	size_t 				numShapes_;
+
+	// - hashed list of spheres names
+	wordHashMap<uint32> hashNames_;
+
+	/// list of shape names 
+	wordVector 			shapeNames_;
+	
+	bool createHashNames();
+
+	bool readFromDictionary();	
+
+protected:
+
+	virtual
+	bool writeToDict(dictionary& dict)const;
+
+public:
+    
+    TypeInfo("baseShapeNames");
+
+	baseShapeNames(
+		const word& fileName,
+		repository* owner);
+
+    ~baseShapeNames() override=default;
+	
+
+    inline
+    const wordVector& shapeNames()const
+	{
+		return shapeNames_;
+	}
+
+	inline 
+	wordList shapeNameList()const
+	{
+		wordList wl;
+		wl.insert(wl.begin(), shapeNames_.begin(), shapeNames_.end());
+		return wl;
+	}
+
+    inline
+    size_t numShapes()const
+	{
+		return numShapes_;
+	}
+
+	// name to index
+	inline
+	bool shapeNameToIndex(const word& name, uint32& index)const
+	{
+		if(auto[iter, found] = hashNames_.findIf(name); found )
+		{
+			index = iter->second;
+			return true;
+		}
+		else
+		{
+			index = 0;
+			return false;
+		}
+	}
+
+	inline
+	bool indexToShapeName(uint32 i, word& name)const
+	{
+		if( i < numShapes_)
+		{
+			name = shapeNames_[i];
+			return true;
+		}
+		return false;
+	}
+
+	inline
+	bool indexValid(uint32 index)const
+	{
+		return index < numShapes_;
+	}
+
+	// - IO
+
+	bool write(iOstream& os)const override;
+
+};
+
+}
+
+#endif //__shapeNames_hpp__
\ No newline at end of file
diff --git a/src/Particles/particles/particles.cpp b/src/Particles/particles/particles.cpp
index 23250718..ff32aa4f 100644
--- a/src/Particles/particles/particles.cpp
+++ b/src/Particles/particles/particles.cpp
@@ -21,17 +21,71 @@ Licence:
 
 #include "particles.hpp"
 
+bool pFlow::particles::initMassDiameter()const 
+{
+
+	auto [minIndex, maxIndex] = minMax(shapeIndex_.internal());
+
+	const auto& shp = getShapes();
+
+	if( !shp.indexValid(maxIndex) )
+	{
+		fatalErrorInFunction<< 
+		"the maximum value of shape index is "<< maxIndex << 
+		" which is not valid."<<endl;
+		return false;
+	}
+
+	realVector_D d("diameter", shp.boundingDiameter());
+	realVector_D mass("mass",shp.mass());
+	uint8Vector_D propId("propId", shp.shapePropertyIds());
+
+	
+	auto aPointsMask = dynPointStruct_.activePointsMaskDevice();
+	auto aRange = aPointsMask.activeRange();
+
+	using exeSpace = typename realPointField_D::execution_space;
+	using policy = Kokkos::RangePolicy<
+			exeSpace,
+			Kokkos::IndexType<uint32>>;
+
+	auto field_diameter = diameter_.fieldDevice();
+	auto field_mass = mass_.fieldDevice();
+	auto field_propId = propertyId_.fieldDevice();
+	auto field_shapeIndex = shapeIndex_.fieldDevice();
+
+	auto d_d = d.deviceVector();
+	auto d_mass = mass.deviceVector();
+	auto d_propId = propId.deviceVector();
+
+	Kokkos::parallel_for(
+		"particles::initMassDiameter",
+		policy(aRange.start(), aRange.end()),
+		LAMBDA_HD(uint32 i)
+		{
+			if(aPointsMask(i))
+			{
+				uint32 index = field_shapeIndex[i];
+				field_diameter[i] = d_d[index];
+				field_mass[i] = d_mass[index];
+				field_propId[i] = d_propId[index];
+			}
+		});
+	Kokkos::fence();
+
+    return true;
+}
 
 pFlow::particles::particles
 (
-	systemControl& control
+    systemControl &control
 )
-:
-	observer(),
+: 
+	observer(defaultMessage_),
 	demComponent("particles", control),
 	dynPointStruct_(control),
 	id_
-	(	
+	(
 		objectFile
 		(
 			"id",
@@ -48,127 +102,108 @@ pFlow::particles::particles
 		(
 			"propertyId",
 			"",
-			objectFile::READ_NEVER,
+			objectFile::READ_ALWAYS,
 			objectFile::WRITE_NEVER
 		),
 		dynPointStruct_,
 		static_cast<int8>(0)
 	),
-	diameter_
+	shapeIndex_
 	(
 		objectFile
 		(
+			"shapeIndex",
+			"",
+			objectFile::READ_ALWAYS,
+			objectFile::WRITE_ALWAYS
+		),
+		dynPointStruct_,
+		0
+	),
+	diameter_
+	(
+		objectFile(
 			"diameter",
 			"",
 			objectFile::READ_NEVER,
-			objectFile::WRITE_ALWAYS
-		),
+			objectFile::WRITE_NEVER),
 		dynPointStruct_,
 		0.00000000001
 	),
 	mass_
 	(
-		objectFile
-		(
+		objectFile(
 			"mass",
 			"",
 			objectFile::READ_NEVER,
-			objectFile::WRITE_ALWAYS
-		),
+			objectFile::WRITE_NEVER),
 		dynPointStruct_,
 		0.0000000001
 	),
 	accelertion_
 	(
-		objectFile
-		(
+		objectFile(
 			"accelertion",
 			"",
 			objectFile::READ_IF_PRESENT,
-			objectFile::WRITE_ALWAYS
-			),
+			objectFile::WRITE_ALWAYS),
 		dynPointStruct_,
 		zero3
 	),
-	contactForce_
-	(
-		objectFile
-		(
+	contactForce_(
+		objectFile(
 			"contactForce",
 			"",
 			objectFile::READ_IF_PRESENT,
-			objectFile::WRITE_ALWAYS
-		),
+			objectFile::WRITE_ALWAYS),
 		dynPointStruct_,
-		zero3
-	),
-	contactTorque_
-	(
-	
-		objectFile
-		(
+		zero3),
+	contactTorque_(
+		objectFile(
 			"contactTorque",
 			"",
 			objectFile::READ_IF_PRESENT,
-			objectFile::WRITE_ALWAYS
-		),
+			objectFile::WRITE_ALWAYS),
 		dynPointStruct_,
-		zero3
-	)
+		zero3)
 {
 	
-	WARNING<<"Subscribe particles"<<END_WARNING;
-	//this->subscribe(pStruct());
+	this->addToSubscriber(dynPointStruct_);
+
+	if(!initMassDiameter())
+	{
+		fatalExit;
+	}
 
 }
 
 bool pFlow::particles::beforeIteration() 
 {
-	/*auto domain = this->control().domain();
-
-	auto numMarked = dynPointStruct_.markDeleteOutOfBox(domain);
 	
-	if(time_.sortTime())
-	{
-		real min_dx, max_dx;
-		boundingSphereMinMax(min_dx, max_dx);
-		Timer t;
-		t.start();
-		REPORT(0)<<"Performing morton sorting on particles ...."<<endREPORT;
-		if(!pStruct().mortonSortPoints(domain, max_dx))
-		{
-			fatalErrorInFunction<<"Morton sorting was not successful"<<endl;
-			return false;
-		}
-		t.end();
-		REPORT(1)<<"Active range is "<< pStruct().activeRange()<<endREPORT;
-		REPORT(1)<<"It took "<< yellowText(t.totalTime())<<" seconds."<<endREPORT;
-	}
-
-	this->zeroForce();
-	this->zeroTorque();*/
+	dynPointStruct_.beforeIteration();
+	zeroForce();
+	zeroTorque();
 
 	return true;
 }
 
-/*pFlow::uniquePtr<pFlow::List<pFlow::eventObserver*>> 
-pFlow::particles::getFieldObjectList()const
+bool pFlow::particles::iterate()
 {
-	auto objListPtr = makeUnique<pFlow::List<pFlow::eventObserver*>>();
-	objListPtr().push_back(
-		static_cast<eventObserver*>(&id_) );
-		
-	objListPtr().push_back(
-		static_cast<eventObserver*>(&propertyId_) );
+	return dynPointStruct_.iterate();
+}
 
-	objListPtr().push_back(
-		static_cast<eventObserver*>(&diameter_) );
+bool pFlow::particles::afterIteration() 
+{
+	return dynPointStruct_.afterIteration();
+}
 
-	objListPtr().push_back(
-		static_cast<eventObserver*>(&mass_) );
-	
-	objListPtr().push_back(
-		static_cast<eventObserver*>(&shapeName_) );
-	
-	return objListPtr;
-}*/
+void pFlow::particles::boundingSphereMinMax
+(
+	real &minDiam, 
+	real &maxDiam
+) const
+{
+	auto& shp = getShapes();
+	minDiam = shp.minBoundingSphere();
+	maxDiam = shp.maxBoundingSphere();
+}
\ No newline at end of file
diff --git a/src/Particles/particles/particles.hpp b/src/Particles/particles/particles.hpp
index 554c9a85..5f9e7ea8 100644
--- a/src/Particles/particles/particles.hpp
+++ b/src/Particles/particles/particles.hpp
@@ -24,6 +24,7 @@ Licence:
 
 #include "dynamicPointStructure.hpp"
 #include "demComponent.hpp"
+#include "shape.hpp"
 
 namespace pFlow
 {
@@ -39,43 +40,51 @@ private:
 	/// dynamic point structure for particles center mass
 	dynamicPointStructure 	dynPointStruct_;
 
-	// - name of shapes - this is managed by particles 
-	//wordPointField&  		shapeName_;
+	/// id of particles on host
+	uint32PointField_D		id_;
 
-	// id of particles on host
-	int32PointField_D		id_;
+	/// property id on device
+	uint8PointField_D 		propertyId_;
 
-	// property id on device
-	int8PointField_D 		propertyId_;
+	/// property id on device
+	uint32PointField_D 		shapeIndex_;
 
-	// diameter / boundig sphere size of particles on device
+	/// diameter / boundig sphere size of particles on device
 	realPointField_D		diameter_;
 
-	// mass of particles field 
+	/// mass of particles field 
 	realPointField_D 		mass_;
 
-	// - acceleration on device
-	realx3PointField_D 	accelertion_;
+	/// acceleration on device
+	realx3PointField_D 		accelertion_;
 
 	/// contact force field
 	realx3PointField_D     contactForce_;
 
 	/// contact torque field
-	realx3PointField_D     contactTorque_;	
+	realx3PointField_D     contactTorque_;
 
+	static inline
+	const message defaultMessage_ = 
+	(
+		message::CAP_CHANGED+
+		message::SIZE_CHANGED+
+		message::ITEM_INSERT+
+		message::ITEM_DELETE
+	);
 	
+	bool initMassDiameter()const;
 	
 	void zeroForce()
 	{
-		WARNING<<"fill contactTorque"<<END_WARNING;
-		//contactForce_.fill(zero3);
+		contactForce_.fill(zero3);
 	}
 
 	void zeroTorque()
 	{
-		WARNING<<"fill contactTorque"<<END_WARNING;
-		//contactTorque_.fill(zero3);
+		contactTorque_.fill(zero3);
 	}
+
 protected:
 
 	inline auto& dynPointStruct()
@@ -94,6 +103,12 @@ protected:
 		return dynPointStruct_.velocity();
 	}
 
+	inline 
+	auto& shapeIndex()
+	{
+		return shapeIndex_;
+	}
+
 public:
 
 	// type info
@@ -208,16 +223,12 @@ public:
 		return propertyId_;
 	}
 
-	/*inline const auto& shapeName()const{
-		return shapeName_;
-	}*/
-
-	/*inline auto& shapName(){
-		return shapeName_;
-	}*/
-
 	bool beforeIteration() override;
 
+	bool iterate()override;
+
+	bool afterIteration() override;
+
 	/*virtual
 	bool insertParticles
 	(
@@ -234,14 +245,17 @@ public:
 	virtual
 	const realx3PointField_D& rAcceleration() const = 0;
 
-	/*virtual
-	const realVector_D& boundingSphere()const = 0;*/
+	virtual
+	const realPointField_D& boundingSphere()const = 0;
 
 	virtual 
 	word shapeTypeName()const = 0;
 
 	virtual
-	void boundingSphereMinMax(real & minDiam, real& maxDiam)const = 0;
+	const shape& getShapes()const = 0;
+
+	virtual
+	void boundingSphereMinMax(real & minDiam, real& maxDiam)const;
 
 	
 
diff --git a/src/Particles/particles/shape.cpp b/src/Particles/particles/shape.cpp
new file mode 100644
index 00000000..b73fe9c0
--- /dev/null
+++ b/src/Particles/particles/shape.cpp
@@ -0,0 +1,76 @@
+#include "shape.hpp"
+
+
+bool pFlow::shape::findPropertyIds()
+{	
+	shapePropertyIds_.resize(numShapes());
+
+	ForAll( i, materialNames_)
+	{	
+		
+		if(uint32 propId; property_.nameToIndex(materialNames_[i], propId) )
+		{
+			shapePropertyIds_[i] = static_cast<uint8>(propId);
+		}
+		else
+		{
+			fatalErrorInFunction<<"Material name "<< materialNames_[i]<< 
+			"is not valid in dictionary "<<globalName()<<endl;
+			return false;
+		}
+	}
+    return false;
+}
+
+bool pFlow::shape::readFromDictionary()
+{
+	
+	materialNames_ = getVal<wordVector>("materials");
+
+	if(materialNames_.size() != numShapes() )
+	{
+		fatalErrorInFunction<<
+		"  number of elements in materials and names are not the same in "<< globalName()<<endl;
+		return false;
+	}
+
+	return true;
+}
+
+
+pFlow::shape::shape
+(
+    const word &fileName, 
+    repository *owner, 
+    const property &prop
+)
+:
+   baseShapeNames(fileName,owner),
+    property_(prop)
+{
+	
+	if( !readFromDictionary() )
+	{
+		fatalExit;
+	}
+
+	if(!findPropertyIds())
+	{
+		fatalExit;
+	}
+
+}
+
+bool pFlow::shape::writeToDict(dictionary &dict)const
+{
+	if(!baseShapeNames::writeToDict(dict))return false;
+
+	if( !dict.add("materials", materialNames_) )
+	{
+		fatalErrorInFunction<<
+		"  Error in writing materials to dictionary "<< dict.globalName()<<endl;
+		return false;
+	}
+
+	return true;
+}
\ No newline at end of file
diff --git a/src/Particles/particles/shape.hpp b/src/Particles/particles/shape.hpp
new file mode 100644
index 00000000..a85a85ae
--- /dev/null
+++ b/src/Particles/particles/shape.hpp
@@ -0,0 +1,183 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __shape_hpp__
+#define __shape_hpp__
+
+#include "baseShapeNames.hpp"
+#include "property.hpp"
+
+namespace pFlow
+{
+
+
+class shape
+:
+	public baseShapeNames
+{
+private:
+
+	/// property of materials 
+  	const property& 	property_; 
+
+	/// list of property ids of shapes (index)
+	uint8Vector			shapePropertyIds_;
+
+	/// list of material names 
+	wordVector 			materialNames_;
+		
+	
+	bool findPropertyIds();
+
+	bool readFromDictionary();	
+
+protected:
+
+	
+	bool writeToDict(dictionary& dict)const override;
+
+public:
+    
+    TypeInfo("shape");
+
+	shape(
+		const word& fileName,
+		repository* owner,
+		const property& prop);
+
+    ~shape() override=default;
+
+	inline 
+	const auto& properties()const
+	{
+		return property_;
+	}
+
+    
+	inline
+    const wordVector& materialNames()const
+	{
+		return materialNames_;
+	}
+
+	inline
+	const auto& shapePropertyIds()const
+	{
+		return shapePropertyIds_;
+	}
+
+    
+	
+    inline
+    bool shapeNameToPropId(const word& name, int8& propId)const
+	{	
+		if(uint32 index; shapeNameToIndex(name, index))
+		{
+			propId = shapePropertyIds_[index];
+			return true;
+		}
+		return false;
+	}
+
+	inline
+    bool propIdValid(int8 propId)const
+	{
+		return static_cast<uint32>(propId) < property_.numMaterials();
+	}
+
+
+	inline
+    bool indexToDensity(uint32 index, real& rho)const
+	{
+		if(indexValid(index))
+			return property_.density(shapePropertyIds_[index], rho);
+		return false;
+	}
+
+    inline
+    real indexToDensity(uint32 index)const
+	{
+		if(indexValid(index))
+		{
+			return property_.density(shapePropertyIds_[index]);
+		}
+		
+		fatalExit;
+		return 0.0;
+	}
+
+	virtual 
+    real maxBoundingSphere()const = 0;
+
+    virtual 
+    real minBoundingSphere()const = 0;
+
+    virtual 
+    bool boundingDiameter(uint32 index, real& bDiam)const =0;
+
+    virtual
+    real boundingDiameter(uint32 index)const = 0;
+
+	virtual
+	realVector boundingDiameter()const = 0;
+
+    virtual 
+    bool mass(uint32 index, real& m)const = 0;
+
+    virtual 
+    real mass(uint32 index) const =0;
+
+	virtual
+	realVector mass()const =0;
+
+	virtual
+	realVector density()const =0;
+
+    virtual 
+    bool Inertia(uint32 index, real& I)const = 0;
+
+    virtual
+    real Inertia(uint32 index)const = 0;
+
+	virtual 
+	realVector Inertia()const=0;
+
+    virtual 
+    bool Inertia_xx(uint32 index, real& Ixx)const = 0;
+
+    virtual
+    real Inertial_xx(uint32 index)const =0;
+	
+    virtual 
+    bool Inertia_yy(uint32 index, real& Iyy)const = 0;
+
+    virtual 
+    real Inertial_yy(uint32 index)const = 0;
+
+    virtual 
+    bool Inertia_zz(uint32 index, real& Izz)const = 0;
+
+    virtual 
+    real Inertial_zz(uint32 index)const = 0;
+
+};
+
+}
+
+#endif //__shape_hpp__
\ No newline at end of file

From 8dc8009311813854c1be32380c5e2c1754161108 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Thu, 25 Jan 2024 03:09:08 -0800
Subject: [PATCH 25/60] properry class refactored

---
 src/Property/property.cpp | 4 ++--
 src/Property/property.hpp | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/Property/property.cpp b/src/Property/property.cpp
index e87de71e..25573665 100644
--- a/src/Property/property.cpp
+++ b/src/Property/property.cpp
@@ -82,7 +82,7 @@ bool pFlow::property::makeNameIndex()
 
 pFlow::property::property
 (
-	const word& name, 
+	const word& fileName, 
 	const wordVector& materials,
 	const realVector& densities,
 	repository* owner
@@ -92,7 +92,7 @@ pFlow::property::property
 	(
 		objectFile
 		(
-			name,
+			fileName,
 			"",
 			objectFile::READ_NEVER,
 			objectFile::WRITE_NEVER
diff --git a/src/Property/property.hpp b/src/Property/property.hpp
index bba952ab..e60cbbbf 100644
--- a/src/Property/property.hpp
+++ b/src/Property/property.hpp
@@ -81,7 +81,7 @@ public:
 			const word& fileName, 
 			repository* owner=nullptr);
 		
-		property(const word& name, 
+		property(const word& fileName, 
 				const wordVector& materials,
 				const realVector& densities,
 				repository* owner=nullptr);

From ab6308bb0aabe39c2ec6c491ba2f41c2c29a2511 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Thu, 25 Jan 2024 03:10:44 -0800
Subject: [PATCH 26/60] code refactor upto pointFields and insertion etc.

---
 src/phasicFlow/CMakeLists.txt                 |  12 +-
 src/phasicFlow/containers/Field/Field.hpp     |  22 +-
 .../containers/List/ListPtr/ListPtr.hpp       |  24 +-
 src/phasicFlow/containers/Set/Set.hpp         |   5 +
 .../containers/VectorHD/VectorSingle.cpp      |  72 +++++-
 .../containers/VectorHD/VectorSingle.hpp      |   8 +
 .../VectorHD/VectorSingleAlgorithms.hpp       |   4 -
 .../containers/pointField/boundaryField.cpp   |   2 +-
 .../containers/pointField/boundaryField.hpp   |  18 ++
 .../pointField/boundaryFieldList.hpp          |   8 +
 .../pointField/exitBoundaryField.hpp          |   3 +
 .../containers/pointField/internalField.cpp   |   2 +-
 .../containers/pointField/internalField.hpp   |  22 +-
 .../pointField/internalFieldAlgorithms.hpp    | 205 ++++++++++++++++++
 .../containers/pointField/pointField.hpp      |  65 +-----
 .../containers/pointField/pointFields.cpp     |  74 ++++---
 .../containers/pointField/pointFields.hpp     |   9 +-
 src/phasicFlow/demComponent/demComponent.cpp  |  11 +-
 src/phasicFlow/demComponent/demComponent.hpp  |  19 +-
 src/phasicFlow/dictionary/dictionary.hpp      |  11 +-
 src/phasicFlow/eventManagement/observer.cpp   |  46 ++--
 src/phasicFlow/eventManagement/observer.hpp   |  19 +-
 src/phasicFlow/eventManagement/subscriber.cpp |  12 +-
 src/phasicFlow/eventManagement/subscriber.hpp |   7 +-
 src/phasicFlow/globals/error.hpp              |   2 +-
 src/phasicFlow/globals/vocabs.hpp             |   4 +-
 ...andomInt32.hpp => uniformRandomUint32.hpp} |  22 +-
 .../repository/IOobject/IOfileHeader.cpp      |   2 +
 .../repository/IOobject/IOfileHeader.hpp      |  12 +
 .../repository/IOobject/IOobject.cpp          |  15 ++
 .../repository/IOobject/IOobject.hpp          |   6 +
 .../repository/IOobject/objectFile.hpp        |   6 +-
 .../repository/repository/repository.cpp      |   3 +-
 .../repository/repository/repository.hpp      |  17 ++
 .../repository/repositoryTemplates.cpp        | 118 +---------
 .../systemControl/systemControl.cpp           |  49 +++--
 .../systemControl/systemControl.hpp           |  38 +++-
 src/phasicFlow/setFieldList/setFieldEntry.cpp | 123 +++++++----
 src/phasicFlow/setFieldList/setFieldEntry.hpp |  32 +--
 .../setFieldList/setFieldEntryTemplates.cpp   |  70 ++----
 .../streams/dataIO/dataIOTemplate.cpp         |  19 +-
 .../pStructSelector/pStructSelector.hpp       |   4 +-
 .../selectors/selectBox/selectBox.hpp         |   6 +-
 .../selectors/selectRandom/selectRandom.cpp   |  22 +-
 .../selectors/selectRandom/selectRandom.hpp   |  12 +-
 .../selectors/selectRange/selectRange.cpp     |  16 +-
 .../selectors/selectRange/selectRange.hpp     |  12 +-
 47 files changed, 814 insertions(+), 476 deletions(-)
 create mode 100644 src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp
 rename src/phasicFlow/random/randomInt32/{uniformRandomInt32.hpp => uniformRandomUint32.hpp} (77%)

diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 23ee3e13..ae7df3ac 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -56,18 +56,14 @@ containers/Field/Fields.cpp
 containers/List/anyList/anyList.cpp
 containers/pointField/pointFields.cpp
 
-#setFieldList/setFieldList.cpp
-#setFieldList/setFieldEntry.cpp
+setFieldList/setFieldList.cpp
+setFieldList/setFieldEntry.cpp
 
 Timer/Timer.cpp
 Timer/Timers.cpp
 
 
 
-
-
-
-
 structuredData/box/box.cpp
 structuredData/line/line.cpp
 structuredData/infinitePlane/infinitePlane.cpp
@@ -81,6 +77,10 @@ structuredData/boundaries/boundaryBase/boundaryBase.cpp
 structuredData/boundaries/boundaryExit/boundaryExit.cpp
 structuredData/boundaries/boundaryNone/boundaryNone.cpp
 structuredData/pointStructure/boundaryList.cpp
+structuredData/pointStructure/selectors/pStructSelector/pStructSelector.cpp
+structuredData/pointStructure/selectors/selectBox/selectBox.cpp
+structuredData/pointStructure/selectors/selectRange/selectRange.cpp 
+structuredData/pointStructure/selectors/selectRandom/selectRandom.cpp
 
 commandLine/commandLine.cpp
 
diff --git a/src/phasicFlow/containers/Field/Field.hpp b/src/phasicFlow/containers/Field/Field.hpp
index 2312309c..8c1ac98c 100644
--- a/src/phasicFlow/containers/Field/Field.hpp
+++ b/src/phasicFlow/containers/Field/Field.hpp
@@ -158,20 +158,6 @@ public:
 		/// Move assignment 
 		FieldType& operator = (FieldType&&) = default;
 
-		/// clone as a uniquePtr
-		INLINE_FUNCTION_H
-		uniquePtr<FieldType> clone() const
-		{
-			return makeUnique<FieldType>(*this);
-		}
-
-		/// clone as a raw pointer 
-		INLINE_FUNCTION_H
-		FieldType* clonePtr()const
-		{
-			return new FieldType(*this);
-		}
-
 	//// - Methods
 
 		/// return field key
@@ -184,7 +170,13 @@ public:
 		{
 			return VectorType::name();
 		}
-	
+
+
+		void fillField(rangeU32 span, const T& val)
+		{
+			this->fill(span, val);
+		}
+		
 	//// - IO operations 
 		
 		bool read(iIstream& is);
diff --git a/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp b/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
index 649a77c0..efe0fc50 100644
--- a/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
+++ b/src/phasicFlow/containers/List/ListPtr/ListPtr.hpp
@@ -39,8 +39,12 @@ class ListPtr
 public:
 
 	using ListPtrType 		= ListPtr<T> ; 
+	
 	using listType 			= std::list<T*>;
 
+	using iterator 			= typename listType::iterator;
+
+	using const_iterator 	= typename listType::const_iterator;
 
 	template<typename... Args>
     inline static uniquePtr<T> makeSafe(Args&&... args)
@@ -183,7 +187,25 @@ public:
 		// - clear the ith element
 		void clear(size_t i);	
 		
-		// - clone the object 
+		iterator begin()		
+		{
+			return list_.begin();
+		}
+		
+		const_iterator begin()const
+		{
+			return list_.begin();
+		}
+
+		iterator end()
+		{
+			return list_.end();
+		}
+
+		const_iterator end()const
+		{
+			return list_.end();
+		}
 		
 };
 
diff --git a/src/phasicFlow/containers/Set/Set.hpp b/src/phasicFlow/containers/Set/Set.hpp
index 3b6ea999..3c619f0b 100644
--- a/src/phasicFlow/containers/Set/Set.hpp
+++ b/src/phasicFlow/containers/Set/Set.hpp
@@ -23,6 +23,8 @@ Licence:
 
 #include <set>
 
+#include "types.hpp"
+
 namespace pFlow
 {
 
@@ -30,6 +32,9 @@ namespace pFlow
 template<typename Key>
 using Set = std::set<Key,std::less<Key>,std::allocator<Key>>;
 
+using wordSet = Set<word>;
+
+
 }
 
 #endif 
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
index 6b0789b1..b469f2b8 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
@@ -351,6 +351,17 @@ void pFlow::VectorSingle<T,MemorySpace>::fill(const T& val)
     pFlow::fill(view_, rangeU32(0 ,size_) ,val);
 }
 
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+void pFlow::VectorSingle<T,MemorySpace>::fill
+(
+    rangeU32 r, 
+    const T& val
+)
+{
+    pFlow::fill(view_, r, val);
+}
+
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H
 void pFlow::VectorSingle<T,MemorySpace>::assign
@@ -494,7 +505,7 @@ bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
 )
 {
 
-	if(indices.size() == 0)return true;
+	if(indices.empty())return true;
 	if(indices.size() != vals.size())return false;
 
 	auto maxInd = indices.max(); 
@@ -518,9 +529,7 @@ bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
 		Kokkos::parallel_for(
 			"VectorSingle::insertSetElement",
 			policy(0,indices.size()), LAMBDA_HD(int32 i){	
-				dVec(ind(i))= dVals(i);}
-			);
-
+				dVec(ind(i))= dVals(i);});
 		Kokkos::fence();
 
 	}
@@ -532,9 +541,7 @@ bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
 		Kokkos::parallel_for(
 			"VectorSingle::insertSetElement",
 			policy(0,indices.size()), LAMBDA_HD(int32 i){	
-				dVec(ind(i))= hVals(i);}
-			);
-
+				dVec(ind(i))= hVals(i);});
 		Kokkos::fence();
 
 	}
@@ -542,6 +549,57 @@ bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
 	return true;
 }
 
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
+(
+	uint32IndexContainer indices, 
+	const ViewType1D<T, memory_space> vals
+)
+{
+    if(indices.empty())return true;
+	if(indices.size() != vals.size())return false;
+
+	auto maxInd = indices.max(); 
+	
+	if(this->empty() || maxInd > size()-1 )
+	{
+		resize(maxInd+1);
+	} 
+
+    using policy = Kokkos::RangePolicy<
+                    execution_space,
+                    Kokkos::IndexType<uint32>>;
+
+	if constexpr( isDeviceAccessible_ )
+	{
+		auto dVec = view_;
+        auto dVals = vals;
+		auto ind = indices.deviceView();
+
+		Kokkos::parallel_for(
+			"VectorSingle::insertSetElement",
+			policy(0,indices.size()), LAMBDA_HD(int32 i){	
+				dVec(ind(i))= dVals(i);});
+		Kokkos::fence();
+
+	}
+	else
+	{
+		auto dVec = view_;
+        auto hVals = vals;
+		auto ind = indices.hostView();
+
+		Kokkos::parallel_for(
+			"VectorSingle::insertSetElement",
+			policy(0,indices.size()), LAMBDA_HD(int32 i){	
+				dVec(ind(i))= hVals(i);});
+		Kokkos::fence();
+
+	}
+		
+	return true;
+}
 
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 0876e6e5..64793c5e 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -256,6 +256,9 @@ public:
 		/// Fill the range [0,size) with val
 		INLINE_FUNCTION_H 
 		void fill(const T& val);
+
+		INLINE_FUNCTION_H
+		void fill(rangeU32 r,  const T& val);
 		
 		/// Change size of the vector and assign val to vector and 
 		INLINE_FUNCTION_H
@@ -291,6 +294,11 @@ public:
 		INLINE_FUNCTION_H
 		bool insertSetElement(uint32IndexContainer indices, const std::vector<T>& vals);
 		
+		INLINE_FUNCTION_H
+		bool insertSetElement(
+			uint32IndexContainer indices, 
+			const ViewType1D<T, memory_space> vals);
+
 		INLINE_FUNCTION_H
 		bool reorderItems(uint32IndexContainer indices);
 
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp b/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp
index 13bce66b..893e6c1e 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp
@@ -21,8 +21,6 @@ Licence:
 #define __VectorSingleMath_hpp__
 
 
-
-
 namespace pFlow
 {
 
@@ -51,8 +49,6 @@ INLINE_FUNCTION_H T max( const VectorSingle<T, MemorySpace>& vec)
 		);		
 }
 
-
-
 }
 
 
diff --git a/src/phasicFlow/containers/pointField/boundaryField.cpp b/src/phasicFlow/containers/pointField/boundaryField.cpp
index 1b6ba9c1..b4a90c13 100644
--- a/src/phasicFlow/containers/pointField/boundaryField.cpp
+++ b/src/phasicFlow/containers/pointField/boundaryField.cpp
@@ -25,7 +25,7 @@ pFlow::boundaryField<T, MemorySpace>::boundaryField
 	InternalFieldType& internal
 )
 :
-	observer(),
+	observer(&boundary, defaultMessage_),
 	boundary_(boundary),
 	internal_(internal)
 {}
diff --git a/src/phasicFlow/containers/pointField/boundaryField.hpp b/src/phasicFlow/containers/pointField/boundaryField.hpp
index 90786cbc..9836599c 100644
--- a/src/phasicFlow/containers/pointField/boundaryField.hpp
+++ b/src/phasicFlow/containers/pointField/boundaryField.hpp
@@ -49,6 +49,15 @@ protected:
     /// @brief a ref to the internal field 
     InternalFieldType& 			internal_;
 
+	static inline
+	const message defaultMessage_ = 
+	(
+		message::CAP_CHANGED+
+		message::SIZE_CHANGED+
+		message::ITEM_INSERT+
+		message::ITEM_DELETE
+	);
+
 public:
 
 	TypeInfo("boundaryField<none>");
@@ -79,6 +88,9 @@ public:
 
 	bool hearChanges
 	(
+		real t,
+		real dt,
+		uint32 iter,
 		const message& msg, 
     	const anyList& varList
 	) override
@@ -97,6 +109,12 @@ public:
 		return boundary_.capacity();
 	}
 
+	virtual
+	void fill(const T& val)
+	{
+		return ;
+	}
+
 	static
 	uniquePtr<boundaryField> create(
 		const boundaryBase& boundary, 
diff --git a/src/phasicFlow/containers/pointField/boundaryFieldList.hpp b/src/phasicFlow/containers/pointField/boundaryFieldList.hpp
index 8bdf9840..4de85bf6 100644
--- a/src/phasicFlow/containers/pointField/boundaryFieldList.hpp
+++ b/src/phasicFlow/containers/pointField/boundaryFieldList.hpp
@@ -60,6 +60,14 @@ public:
         }
     }
 
+    void fill(const T& val)
+    {
+        for(auto& bf: *this)
+        {
+            bf->fill(val);
+        }
+    }
+
 };
 
 }
diff --git a/src/phasicFlow/containers/pointField/exitBoundaryField.hpp b/src/phasicFlow/containers/pointField/exitBoundaryField.hpp
index bcf168d7..dbc942d7 100644
--- a/src/phasicFlow/containers/pointField/exitBoundaryField.hpp
+++ b/src/phasicFlow/containers/pointField/exitBoundaryField.hpp
@@ -63,6 +63,9 @@ public:
 
 	bool hearChanges
 	(
+		real t,
+		real dt,
+		uint32 iter,
 		const message& msg, 
     	const anyList& varList
 	) override
diff --git a/src/phasicFlow/containers/pointField/internalField.cpp b/src/phasicFlow/containers/pointField/internalField.cpp
index c568589e..3f0ed1cc 100644
--- a/src/phasicFlow/containers/pointField/internalField.cpp
+++ b/src/phasicFlow/containers/pointField/internalField.cpp
@@ -64,7 +64,7 @@ pFlow::internalField<T, MemorySpace>::internalField
 	),
 	internalPoints_(internal)
 {
-	field_.fill(val);
+	fillInternal(val);
 } 
 
 
diff --git a/src/phasicFlow/containers/pointField/internalField.hpp b/src/phasicFlow/containers/pointField/internalField.hpp
index 30e08bc4..21213743 100644
--- a/src/phasicFlow/containers/pointField/internalField.hpp
+++ b/src/phasicFlow/containers/pointField/internalField.hpp
@@ -139,7 +139,26 @@ public:
 		return internalPoints_.isAllActive();
 	}
 
-	bool hearChanges(const message& msg, const anyList& varList) override
+	inline 
+	void fillInternal(const T& val)
+	{
+		field_.fillField(activeRange(), val);
+	}
+
+	inline 
+	bool insertSetElement(uint32IndexContainer indices, const T& val)
+	{
+		return field_.insertSetElement(indices, val);
+	}
+
+	bool hearChanges
+	(
+		real t,
+		real dt,
+		uint32 iter,
+		const message& msg, 
+		const anyList& varList
+	) override
 	{
 		notImplementedFunction;
 		return false;
@@ -171,5 +190,6 @@ iOstream& operator<<
 } // pFlow
 
 #include "internalField.cpp"
+#include "internalFieldAlgorithms.hpp"
 
 #endif // __internalField_hpp__
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp b/src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp
new file mode 100644
index 00000000..2f1f85df
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp
@@ -0,0 +1,205 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __internalFieldAlgorithms_hpp__
+#define __internalFieldAlgorithms_hpp__
+
+namespace pFlow
+{
+
+template<class T, class MemorySpace>
+inline 
+T min(const internalField<T,MemorySpace>& iField)
+{   
+    using exeSpace = typename internalField<T,MemorySpace>::execution_space;
+
+    using policy = Kokkos::RangePolicy<
+			exeSpace,
+			Kokkos::IndexType<uint32> >;
+
+    if constexpr(isDeviceAccessible<exeSpace>())
+    {
+        // this is a device view 
+        auto maskD = iField.activePointsMaskDevice();
+        auto aRange = maskD.activeRange();
+        auto filed = iField.field().deviceVectorAll();
+
+        T minElement;
+        
+        Kokkos::parallel_reduce(
+		"min(internalField)",
+		policy(aRange.start(), aRange.end() ),
+		LAMBDA_HD(uint32 i, T& minUpdate)
+        {
+			if( maskD(i) )
+                if(filed[i] < minUpdate) minUpdate = filed[i];
+		},
+		Kokkos::Min<T>(minElement));
+	    return minElement;
+    }
+    else
+    {
+        // this is a host view 
+        auto maskH = iField.activePointsMaskHost();
+        auto aRange = maskH.activeRange();
+        auto filed = iField.field().deviceVectorAll();
+        T minElement;
+        Kokkos::parallel_reduce(
+            "min(internalField)",
+            policy(aRange.start(), aRange.end()),
+            LAMBDA_HD(uint32 i, T& minUpdate)
+            {
+                if( maskH(i) )
+                    if(filed[i] < minUpdate) minUpdate = filed[i];
+            },
+            Kokkos::Min<T>(minElement));
+
+	    return minElement;
+    }
+}
+
+template<class T, class MemorySpace>
+inline 
+T max(const internalField<T,MemorySpace>& iField)
+{   
+    using exeSpace = typename internalField<T,MemorySpace>::execution_space;
+
+    using policy = Kokkos::RangePolicy<
+			exeSpace,
+			Kokkos::IndexType<uint32> >;
+
+    if constexpr(isDeviceAccessible<exeSpace>())
+    {
+        // this is a device view 
+        auto maskD = iField.activePointsMaskDevice();
+        auto aRange = maskD.activeRange();
+        auto filed = iField.field().deviceVectorAll();
+
+        T maxElement;
+        
+        Kokkos::parallel_reduce(
+		"max(internalField)",
+		policy(aRange.start(), aRange.end() ),
+		LAMBDA_HD(uint32 i, T& maxUpdate)
+        {
+			if( maskD(i) )
+                if( maxUpdate <filed[i]) maxUpdate = filed[i];
+		},
+		Kokkos::Max<T>(maxElement));
+	    return maxElement;
+    }
+    else
+    {
+        // this is a host view 
+        auto maskH = iField.activePointsMaskHost();
+        auto aRange = maskH.activeRange();
+        auto filed = iField.field().deviceVectorAll();
+
+        T maxElement;
+        
+        Kokkos::parallel_reduce(
+		"max(internalField)",
+		policy(aRange.start(), aRange.end() ),
+		LAMBDA_HD(uint32 i, T& maxUpdate)
+        {
+			if( maskH(i) )
+                if( maxUpdate <filed[i]) maxUpdate = filed[i];
+		},
+		Kokkos::Max<T>(maxElement));
+	    return maxElement;
+    }
+}
+
+
+template<class T, class MemorySpace>
+inline 
+Pair<T,T> minMax(const internalField<T,MemorySpace>& iField)
+{   
+    using exeSpace = typename internalField<T,MemorySpace>::execution_space;
+
+    using policy = Kokkos::RangePolicy<
+			exeSpace,
+			Kokkos::IndexType<uint32> >;
+
+    if constexpr(isDeviceAccessible<exeSpace>())
+    {
+        // this is a device view 
+        auto maskD = iField.activePointsMaskDevice();
+        auto aRange = maskD.activeRange();
+        auto filed = iField.field().deviceVectorAll();
+
+        T minElement;
+        T maxElement;
+        
+        Kokkos::parallel_reduce(
+		"minMax(internalField)",
+		policy(aRange.start(), aRange.end() ),
+		LAMBDA_HD(uint32 i, T& minUpdate, T& maxUpdate)
+        {
+			if( maskD(i) )
+            {
+                if(maxUpdate < filed[i]) maxUpdate = filed[i];
+                if(filed[i] < minUpdate) minUpdate = filed[i];
+            }
+                
+		},
+		Kokkos::Min<T>(minElement),
+        Kokkos::Max<T>(maxElement)
+        );
+	    return {minElement, maxElement};
+    }
+    else
+    {
+        // this is a host view 
+        auto maskH = iField.activePointsMaskHost();
+        auto aRange = maskH.activeRange();
+        auto filed = iField.field().deviceVectorAll();
+
+        T minElement;
+        T maxElement;
+        
+        Kokkos::parallel_reduce(
+		"minMax(internalField)",
+		policy(aRange.start(), aRange.end() ),
+		LAMBDA_HD(uint32 i, T& minUpdate, T& maxUpdate)
+        {
+			if( maskH(i) )
+            {
+                if(maxUpdate < filed[i]) maxUpdate = filed[i];
+                if(filed[i] < minUpdate) minUpdate = filed[i];
+            }
+                
+		},
+		Kokkos::Min<T>(minElement),
+        Kokkos::Max<T>(maxElement)
+        );
+	    return {minElement, maxElement};
+    }
+}
+
+
+
+}
+
+
+
+
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/pointField.hpp b/src/phasicFlow/containers/pointField/pointField.hpp
index ffc315c5..9057174c 100644
--- a/src/phasicFlow/containers/pointField/pointField.hpp
+++ b/src/phasicFlow/containers/pointField/pointField.hpp
@@ -93,77 +93,26 @@ public:
 			const T& defVal,
 			const T& val);
 		
+		
+
+	//// - Methods
+	
 		const auto& internal()const
 		{
 			return static_cast<const InternalFieldType&>(*this);
 		}
 
-		// - construct from iIOEntity, pointStructure and a value
-		/*pointField( const pointStructure& pStruct, const T& val, const T& defVal, bool subscribe = true);
-
-		// - construct from another pointField
-		//   subscribe to events if true
-		pointField( const pointField& src, bool subscribe);
-
-
-		// - copy construct 
-		pointField(const pointField& src);
-
-		// - no move construct
-		pointField(pointField&& src) = delete;
-
-
-		// assignment, only assign the VectorField and preserve other parts of this 
-		pointField& operator = (const pointField& rhs);
-
-		// no move assignment 
-		pointField& operator = (pointField&&) = delete;		
-
-
-		inline uniquePtr<pointFieldType> clone() const
-		{
-			return makeUnique<pointFieldType>(*this);
-		}
-
-		inline pointFieldType* clonePtr()const
-		{
-			return new pointFieldType(*this);
-		}
-
-	//// - Methods
-
 		// - reference to pointStructure
 		inline const pointStructure& pStruct()const {
 			return pStruct_;
 		}
 
-		// if all points are active 
-		INLINE_FUNCTION_H
-		bool allActive()const {	
-			return pStruct_.allActive();
-		}
-		
-
-		INLINE_FUNCTION_H
-		bool isActive(label i)const {
-			return pStruct_.isActive(i);
-		}
-
-		const auto& pointFlag()const
+		void fill(const T& val)
 		{
-			return pStruct_.pointFlag();
+			InternalFieldType::fillInternal(val);
+			boundaryFieldList_.fill(val);
 		}
 
-		range activeRange()const
-		{
-			return pStruct_.activeRange();
-		}
-
-		// - update the field if any changes occure in pStruct 
-		//   for now it checks for deleted points
-		bool update(const eventMessage& msg);*/
-
-
 	//// -  IO operations
 		bool readPointField(iIstream& is, const IOPattern& iop);
 
diff --git a/src/phasicFlow/containers/pointField/pointFields.cpp b/src/phasicFlow/containers/pointField/pointFields.cpp
index cb1c8584..8e90019f 100644
--- a/src/phasicFlow/containers/pointField/pointFields.cpp
+++ b/src/phasicFlow/containers/pointField/pointFields.cpp
@@ -31,6 +31,31 @@ template class pFlow::pointField<pFlow::int8>;
 createBaseBoundary(pFlow::int8, void);
 createBoundary(pFlow::int8, void, exit);
 
+
+template class pFlow::pointField<pFlow::uint8, pFlow::HostSpace>; 
+createBaseBoundary(pFlow::uint8, pFlow::HostSpace);
+createBoundary(pFlow::uint8, pFlow::HostSpace, exit);
+
+template class pFlow::pointField<pFlow::uint8>; 
+createBaseBoundary(pFlow::uint8, void);
+createBoundary(pFlow::uint8, void, exit);
+
+template class pFlow::pointField<pFlow::int32, pFlow::HostSpace>; 
+createBaseBoundary(pFlow::int32, pFlow::HostSpace);
+createBoundary(pFlow::int32, pFlow::HostSpace, exit);
+
+template class pFlow::pointField<pFlow::int32>; 
+createBaseBoundary(pFlow::int32, void);
+createBoundary(pFlow::int32, void, exit);
+
+template class pFlow::pointField<pFlow::uint32, pFlow::HostSpace>; 
+createBaseBoundary(pFlow::uint32, pFlow::HostSpace);
+createBoundary(pFlow::uint32, pFlow::HostSpace, exit);
+
+template class pFlow::pointField<pFlow::uint32>; 
+createBaseBoundary(pFlow::uint32, void);
+createBoundary(pFlow::uint32, void, exit);
+
 template class pFlow::pointField<pFlow::real, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::real, pFlow::HostSpace);
 createBoundary(pFlow::real, pFlow::HostSpace, exit);
@@ -40,36 +65,25 @@ template class pFlow::pointField<pFlow::real>;
 createBaseBoundary(pFlow::real, void);
 createBoundary(pFlow::real, void, exit);
 
-
-/*template class pFlow::pointField<pFlow::VectorSingle, pFlow::int8, pFlow::HostSpace>; 
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::int16>; 
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::int16, pFlow::HostSpace>; 
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::int32>; 
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::int32, pFlow::HostSpace>; 
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::int64>; 
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::int64, pFlow::HostSpace>; 
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::uint32>; 
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::uint32, pFlow::HostSpace>;
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::label>; 
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::label, pFlow::HostSpace>;
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::real>; 
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::real, pFlow::HostSpace>;
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::realx3>; 
-
-template class pFlow::pointField<pFlow::VectorSingle, pFlow::realx3, pFlow::HostSpace>;*/
+template class pFlow::pointField<pFlow::realx3, pFlow::HostSpace>; 
+createBaseBoundary(pFlow::realx3, pFlow::HostSpace);
+createBoundary(pFlow::realx3, pFlow::HostSpace, exit);
 
 
+template class pFlow::pointField<pFlow::realx3>; 
+createBaseBoundary(pFlow::realx3, void);
+createBoundary(pFlow::realx3, void, exit);
 
+
+template class pFlow::pointField<pFlow::realx4, pFlow::HostSpace>; 
+createBaseBoundary(pFlow::realx4, pFlow::HostSpace);
+createBoundary(pFlow::realx4, pFlow::HostSpace, exit);
+
+
+template class pFlow::pointField<pFlow::realx4>; 
+createBaseBoundary(pFlow::realx4, void);
+createBoundary(pFlow::realx4, void, exit);
+
+template class pFlow::pointField<pFlow::word, pFlow::HostSpace>; 
+createBaseBoundary(pFlow::word, pFlow::HostSpace);
+createBoundary(pFlow::word, pFlow::HostSpace, exit);
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/pointFields.hpp b/src/phasicFlow/containers/pointField/pointFields.hpp
index d3435812..26e0d52a 100644
--- a/src/phasicFlow/containers/pointField/pointFields.hpp
+++ b/src/phasicFlow/containers/pointField/pointFields.hpp
@@ -49,14 +49,11 @@ using uint32PointField_D 		= pointField_D<uint32>;
 using uint32PointField_H 		= pointField_H<uint32>;
 
 using int64PointField_D 		= pointField_D<int64>;
-using int63PointField_H 		= pointField_H<int64>;
+using int64PointField_H 		= pointField_H<int64>;
 
 using uint64PointField_D 		= pointField_D<uint64>;
 using uint64PointField_H 		= pointField_H<uint64>;
 
-using int32PointField_D 		= pointField_D<int32>;
-using int32PointField_H 		= pointField_H<int32>;
-
 using realPointField_D 		= pointField_D<real>;
 using realPointField_H 		= pointField_H<real>;
 
@@ -66,9 +63,7 @@ using realx3PointField_H 		= pointField_H<realx3>;
 using realx4PointField_D 		= pointField_D<realx4>;
 using realx4PointField_H 		= pointField_H<realx4>;
 
-
-
-
+using wordPointField_H      = pointField_H<word>;
 
 }
 
diff --git a/src/phasicFlow/demComponent/demComponent.cpp b/src/phasicFlow/demComponent/demComponent.cpp
index 0307b333..9225eb17 100644
--- a/src/phasicFlow/demComponent/demComponent.cpp
+++ b/src/phasicFlow/demComponent/demComponent.cpp
@@ -24,10 +24,10 @@ Licence:
 
 pFlow::demComponent::demComponent(const word& name, systemControl& control)
 :
-	componentName_(name),
 	control_(control),
 	time_(control.time()),
-	timers_(name, &control.timers())
+	timers_(name, &control.timers()),
+  componentName_(name)
 {}
 
 pFlow::real pFlow::demComponent::dt()const
@@ -37,5 +37,10 @@ pFlow::real pFlow::demComponent::dt()const
 
 pFlow::real pFlow::demComponent::currentTime()const
 {
-    return time_.currentTime();
+   return time_.currentTime();
+}
+
+pFlow::uint32 pFlow::demComponent::currentIter() const
+{
+  return time_.currentIter();
 }
diff --git a/src/phasicFlow/demComponent/demComponent.hpp b/src/phasicFlow/demComponent/demComponent.hpp
index 35d6dc67..cbab450e 100644
--- a/src/phasicFlow/demComponent/demComponent.hpp
+++ b/src/phasicFlow/demComponent/demComponent.hpp
@@ -40,13 +40,9 @@ class Time;
  */
 class demComponent
 {
-protected:
-
-	// - Protected data members 
-
-		/// Name of the DEM component 
-		word 	componentName_;
-
+private:
+	// - Protected data members 		
+		
 		/// Reference to systemControl 
 		systemControl& 	control_;
 
@@ -55,6 +51,9 @@ protected:
 		/// All timers (if any) of this component
 		Timers 	timers_;
 
+		/// Name of the DEM component 
+		word 	componentName_;
+
 public:
 
 	/// Type info
@@ -102,6 +101,8 @@ public:
 		
 		/// Current simulation time 
 		real currentTime()const;
+
+		uint32 currentIter()const;
 		
 		inline
 		const auto& time()const
@@ -134,7 +135,7 @@ public:
 		virtual
 		bool beforeTimeLoop()
 		{
-			notImplementedFunction
+			notImplementedFunction;
 			return false;
 		}
 
@@ -155,7 +156,7 @@ public:
 		virtual
 		bool afterTimeLoop()
 		{
-			notImplementedFunction
+			notImplementedFunction;
 			return false;
 		}
 
diff --git a/src/phasicFlow/dictionary/dictionary.hpp b/src/phasicFlow/dictionary/dictionary.hpp
index db77733c..d09c03bc 100644
--- a/src/phasicFlow/dictionary/dictionary.hpp
+++ b/src/phasicFlow/dictionary/dictionary.hpp
@@ -107,11 +107,7 @@ protected:
 		/// write dictionary to stream - with keyword
 		bool writeDictionary(iOstream& os, bool withBlock = true)const;
 
-        /// construct an empty dictionary with keyword and make it global/fileDictionary (if true)
-		dictionary(const word& keyword, bool global);
-
-		/// construct a dictionary with name and read it from file 
-		dictionary(const word& keyword, const fileSystem& file);
+        
 	
 
 public:
@@ -122,7 +118,12 @@ public:
 	TypeInfo("dictionary");
 
 	//// - Constructors
+		/// construct an empty dictionary with keyword and make it global/fileDictionary (if true)
+		dictionary(const word& keyword, bool global);
 
+		/// construct a dictionary with name and read it from file 
+		dictionary(const word& keyword, const fileSystem& file);
+		
 		/// cunstructs a null dictionary
 		dictionary();
 
diff --git a/src/phasicFlow/eventManagement/observer.cpp b/src/phasicFlow/eventManagement/observer.cpp
index 03621f31..d47fef24 100644
--- a/src/phasicFlow/eventManagement/observer.cpp
+++ b/src/phasicFlow/eventManagement/observer.cpp
@@ -21,8 +21,9 @@ Licence:
 #include "observer.hpp"
 #include "subscriber.hpp" 
 
-pFlow::observer::observer():
-	subscriber_(nullptr)
+pFlow::observer::observer(message msg):
+	subscriber_(nullptr),
+	message_(msg)
 {}
 
 pFlow::observer::observer
@@ -30,30 +31,47 @@ pFlow::observer::observer
 	const subscriber* subscrbr,
 	message msg
 )
-:
-	subscriber_(subscrbr),
-	message_(msg)
+{
+	addToSubscriber(subscrbr, msg);
+}
+
+pFlow::observer::~observer()
 {
+	if(subscriber_)
+		subscriber_->unsubscribe(this);
+	invalidateSubscriber();
+}
+
+void pFlow::observer::addToSubscriber
+(
+	const subscriber* subscrbr, 
+	message msg
+)
+{
+	if(subscriber_)
+		subscriber_->unsubscribe(this);
+	invalidateSubscriber();
+
+	subscriber_ = subscrbr;
+	message_ = msg;
+
 	if(subscriber_)
 	{
-		if(!subscriber_->subscribe(msg, this))
+		if(!subscriber_->subscribe(message_, this))
 		{
 			fatalErrorInFunction<<
 			"error in subscribing an observer"<<endl;
 			fatalExit;
 		}
-	}
-}
-
-pFlow::observer::~observer()
-{
-	if( subscriber_)
-		subscriber_->unsubscribe(this);
-	invalidateSubscriber();
+	}	
 }
 
 bool pFlow::observer::addToSubscriber(const subscriber& subscrbr)
 {
+	if(subscriber_)
+		subscriber_->unsubscribe(this);
+	invalidateSubscriber();
+
 	subscriber_ = &subscrbr;
 	return subscriber_->subscribe(message_, this);
 }
\ No newline at end of file
diff --git a/src/phasicFlow/eventManagement/observer.hpp b/src/phasicFlow/eventManagement/observer.hpp
index 7990cd32..6b8fca11 100644
--- a/src/phasicFlow/eventManagement/observer.hpp
+++ b/src/phasicFlow/eventManagement/observer.hpp
@@ -39,12 +39,12 @@ protected:
 	const subscriber* 	subscriber_ = nullptr;
 	
 	/// list of events in the message 
-	const message 		message_;
+	message 			message_;
 
 
 public:
 
-	observer();
+	observer(message msg);
 
 	observer(
 		const subscriber* subscrbr, 
@@ -53,12 +53,20 @@ public:
 	virtual 
 	~observer();
 
+	void subscribe(
+		const subscriber* subscrbr, 
+		message msg);
+
 	inline 
 	bool subscribed()const 
 	{
 		return subscriber_!=nullptr;
 	}
 
+	void addToSubscriber(
+		const subscriber* subscrbr, 
+		message msg);
+
 	bool addToSubscriber(const subscriber& subscriber);
 	
 	inline void invalidateSubscriber()
@@ -72,7 +80,12 @@ public:
 		return message::numEvents();
 	} 
 
-	virtual bool hearChanges(const message& msg, const anyList& varList)=0;
+	virtual bool hearChanges(
+		real t,
+		real dt,
+		uint32 iter,
+		const message& msg, 
+		const anyList& varList)=0;
 };
 
 } // pFlow
diff --git a/src/phasicFlow/eventManagement/subscriber.cpp b/src/phasicFlow/eventManagement/subscriber.cpp
index ea8319ee..db8009bd 100644
--- a/src/phasicFlow/eventManagement/subscriber.cpp
+++ b/src/phasicFlow/eventManagement/subscriber.cpp
@@ -82,6 +82,9 @@ bool pFlow::subscriber::unsubscribe
 
 bool pFlow::subscriber::notify
 (
+	real t,
+	real dt,
+	uint32 iter,
 	const message msg, 
 	const anyList& varList
 )
@@ -93,7 +96,14 @@ bool pFlow::subscriber::notify
 		{
 			for( auto obsvr: observerList_[i] )
 			{
-				obsvr->hearChanges(message(i), varList);
+				obsvr->hearChanges
+				(
+					t,
+					dt,
+					iter,
+					message(i),
+					varList
+				);
 			}
 		}
 	}
diff --git a/src/phasicFlow/eventManagement/subscriber.hpp b/src/phasicFlow/eventManagement/subscriber.hpp
index 23570485..48143f18 100644
--- a/src/phasicFlow/eventManagement/subscriber.hpp
+++ b/src/phasicFlow/eventManagement/subscriber.hpp
@@ -69,7 +69,12 @@ public:
 
 
 	
-	bool notify(const message msg, const anyList& varList);
+	bool notify(
+		real t,
+		real dt,
+		uint32 iter,
+		const message msg, 
+		const anyList& varList);
 	
 
 };
diff --git a/src/phasicFlow/globals/error.hpp b/src/phasicFlow/globals/error.hpp
index a58a30c0..540e7719 100644
--- a/src/phasicFlow/globals/error.hpp
+++ b/src/phasicFlow/globals/error.hpp
@@ -62,7 +62,7 @@ pFlow::iOstream& reportAndExit(int errorCode = EXIT_FAILURE);
     notImplementedErrorMessage ((functionName), __FILE__, __LINE__ )
 
 /// Report that a function is yet not implemented. 
-#define notImplementedFunction Not_Implemented(FUNCTION_NAME);
+#define notImplementedFunction Not_Implemented(FUNCTION_NAME)
 
 /// Report an error in file operation with supplied fileName and lineNumber. 
 #define ioErrorInFile( fileName, lineNumber) \
diff --git a/src/phasicFlow/globals/vocabs.hpp b/src/phasicFlow/globals/vocabs.hpp
index 5afac001..f1ffede1 100755
--- a/src/phasicFlow/globals/vocabs.hpp
+++ b/src/phasicFlow/globals/vocabs.hpp
@@ -37,9 +37,9 @@ const inline char* integrationFolder__  	= "integration";
 
 // file names
 const inline char* settingsFile__			= "settingsDict";
-const inline char* domainFile__     = "domainDict";
+const inline char* domainFile__     		= "domainDict";
 const inline char* insertionFile__ 			= "particleInsertion";
-const inline char* sphereShapeFile__  		= "sphereShape";
+const inline char* shapeFile__          	= "shapes";
 const inline char* pointStructureFile__ 	= "pStructure";
 const inline char* triSurfaceFile__ 		= "triSurface";
 const inline char* createParticles__		= "createParticles";
diff --git a/src/phasicFlow/random/randomInt32/uniformRandomInt32.hpp b/src/phasicFlow/random/randomInt32/uniformRandomUint32.hpp
similarity index 77%
rename from src/phasicFlow/random/randomInt32/uniformRandomInt32.hpp
rename to src/phasicFlow/random/randomInt32/uniformRandomUint32.hpp
index 86408dcf..86564d93 100644
--- a/src/phasicFlow/random/randomInt32/uniformRandomInt32.hpp
+++ b/src/phasicFlow/random/randomInt32/uniformRandomUint32.hpp
@@ -18,8 +18,8 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-#ifndef __uniformRandomInt32_hpp__
-#define __uniformRandomInt32_hpp__
+#ifndef __uniformRandomUint32_hpp__
+#define __uniformRandomUint32_hpp__
 
 #include <random>
 
@@ -29,35 +29,35 @@ Licence:
 namespace pFlow
 {
 
-class uniformRandomInt32
+class uniformRandomUint32
 {
 protected:
 
  	std::mt19937_64 engineGen_;
 
- 	std::uniform_int_distribution<int32> distrbution_;
+ 	std::uniform_int_distribution<uint32> distrbution_;
 
 public:
 
 	// type info
 	TypeInfoNV("uniform");
 
-	explicit uniformRandomInt32(int32 min, int32 max)
+	explicit uniformRandomUint32(uint32 min, uint32 max)
 	:
 		engineGen_(std::random_device()()),
 		distrbution_(min, max)
 	{}
 
-	~uniformRandomInt32()= default;
+	~uniformRandomUint32()= default;
 
-	inline real  randomNumber() 
+	inline uint32  randomNumber() 
 	{
 		return  distrbution_(engineGen_);
 	}
 	
-	inline int32x3 randomNumber3()
+	inline triple<uint32> randomNumber3()
 	{
-		return int32x3
+		return triple<uint32>
 		(
 			randomNumber(),
 			randomNumber(),
@@ -65,9 +65,9 @@ public:
 		);
 	}	
 
-	inline realx3 operator()()
+	inline triple<uint32> operator()()
 	{
-		return randomNumber();
+		return randomNumber3();
 	}
 
 	
diff --git a/src/phasicFlow/repository/IOobject/IOfileHeader.cpp b/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
index 440a1ab6..96a49f67 100644
--- a/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
+++ b/src/phasicFlow/repository/IOobject/IOfileHeader.cpp
@@ -116,6 +116,8 @@ bool pFlow::IOfileHeader::implyRead() const
 
 bool pFlow::IOfileHeader::implyWrite() const
 {
+	if( isExcluded( name() ) ) return false;
+	if( isIncluded( name() ) ) return true;
 	return isWriteAlways();
 }
 
diff --git a/src/phasicFlow/repository/IOobject/IOfileHeader.hpp b/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
index 4d9964f7..1d2a1e4c 100644
--- a/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
+++ b/src/phasicFlow/repository/IOobject/IOfileHeader.hpp
@@ -81,6 +81,18 @@ public:
     {
         return nullptr;
     }
+
+	virtual
+	bool isIncluded(const word& objName)const
+	{
+		return false;
+	}
+
+	virtual
+	bool isExcluded(const word& objName)const
+	{
+		return false;
+	}
 	
 	// - path to file name 
 	fileSystem path() const;
diff --git a/src/phasicFlow/repository/IOobject/IOobject.cpp b/src/phasicFlow/repository/IOobject/IOobject.cpp
index 2cd77a9f..6745ad0b 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.cpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.cpp
@@ -62,6 +62,21 @@ pFlow::repository* pFlow::IOobject::releaseOwner
     return old;
 }
 
+bool pFlow::IOobject::isIncluded(const word& objName)const 
+{
+    if(owner_)
+        return owner_->isIncluded(objName);
+    return false;
+}
+
+
+bool pFlow::IOobject::isExcluded(const word& objName)const 
+{
+    if(owner_)
+        return owner_->isExcluded(objName);
+    return false;
+}
+
 bool pFlow::IOobject::readObject(bool rdHdr)
 {
     if(!implyRead())return true;
diff --git a/src/phasicFlow/repository/IOobject/IOobject.hpp b/src/phasicFlow/repository/IOobject/IOobject.hpp
index f2eaaba7..36508be1 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.hpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.hpp
@@ -85,6 +85,12 @@ public:
 
         repository* releaseOwner(bool fromOwner = false);
 
+        
+        bool isIncluded(const word& objName)const override;
+        
+        bool isExcluded(const word& objName)const override;
+        
+
 	//// - IO operations 
 
 		// - read from file 
diff --git a/src/phasicFlow/repository/IOobject/objectFile.hpp b/src/phasicFlow/repository/IOobject/objectFile.hpp
index dfe93fd2..ee0cf85a 100644
--- a/src/phasicFlow/repository/IOobject/objectFile.hpp
+++ b/src/phasicFlow/repository/IOobject/objectFile.hpp
@@ -97,12 +97,14 @@ public:
 
 	virtual ~objectFile()=default;
 
-	virtual word name() const
+	virtual 
+	const word& name() const
 	{
 		return name_;
 	}
 
-	virtual fileSystem localPath()const
+	virtual 
+	const fileSystem& localPath()const
 	{
 		return localPath_;
 	}
diff --git a/src/phasicFlow/repository/repository/repository.cpp b/src/phasicFlow/repository/repository/repository.cpp
index d3e268ea..b555eab3 100644
--- a/src/phasicFlow/repository/repository/repository.cpp
+++ b/src/phasicFlow/repository/repository/repository.cpp
@@ -283,7 +283,8 @@ bool pFlow::repository::write
 	{
 		if(verbose)
 		{
-			REPORT(1)<< "Writing to " << obj.second->path()<<END_REPORT;
+			if(obj.second->implyWrite())
+				REPORT(1)<< "Writing to " << obj.second->path()<<END_REPORT;
 		}
 		
 		if(!obj.second->writeObject())
diff --git a/src/phasicFlow/repository/repository/repository.hpp b/src/phasicFlow/repository/repository/repository.hpp
index cc5ec1c2..93698ab7 100644
--- a/src/phasicFlow/repository/repository/repository.hpp
+++ b/src/phasicFlow/repository/repository/repository.hpp
@@ -114,6 +114,23 @@ public:
 		bool removeFromRepository(IOobject* io);
 
         repository* releaseOwner(bool fromOwner = false);
+
+		virtual
+		bool isIncluded(const word& objName)const
+        {
+            if(owner_)
+                return owner_->isIncluded(objName);
+            return false;
+        }
+
+        virtual
+        bool isExcluded(const word& objName)const 
+        {
+            if(owner_)
+                return owner_->isExcluded(objName);
+            return false;
+        }
+
 	//// - lookups and queries
 	
 		// - check if name of object exists
diff --git a/src/phasicFlow/repository/repository/repositoryTemplates.cpp b/src/phasicFlow/repository/repository/repositoryTemplates.cpp
index 52ec9b02..a4c9ee1e 100644
--- a/src/phasicFlow/repository/repository/repositoryTemplates.cpp
+++ b/src/phasicFlow/repository/repository/repositoryTemplates.cpp
@@ -17,117 +17,7 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-/*
 
-template<typename T, typename... Args>
-T& pFlow::repository::emplaceObject(const objectFile& objf, Args&&... args)
-{
-	
-	if( auto [iter2, success2] = objects_.findIf(objf.name()); !success2 )
-	{
-		auto ptr = IOobject::make_object_t<T>(std::forward<Args>(args)...);
-		auto [iter, success] = objects_.emplace(std::piecewise_construct,
-					 std::forward_as_tuple(objf.name()),
-					 std::forward_as_tuple(objf, this, std::move(ptr) )
-					 );
-	
-		return iter->second.template getObject<T>();
-	}
-	else
-	{
-		fatalErrorInFunction<<
-		"IOobject " << objf.name() << " already exists in repository " << name() <<endl;
-		fatalExit;
-		return	iter2->second.template getObject<T>();
-		
-	}
-}
-
-template<typename T, typename... Args>
-T& pFlow::repository::emplaceObjectOrGet(const objectFile& objf, Args&&... args)
-{
-
-	if(auto [iter, success] = objects_.findIf(objf.name()); !success )
-	{
-		return emplaceObject<T>(objf, std::forward<Args>(args)... );
-	}
-	else
-	{
-		// type check 
-		if( checkForObjectType<T>( iter->second ) )
-		{
-			return iter->second.template getObject<T>();
-		}
-		else
-		{
-			fatalErrorInFunction<<
-			"  IOobject "<< objf.name() <<" already exist in the repository "<< name() <<
-			". Trying to return the existing object but there is a type mismatch. \n"<<
-			reportTypeError<T>( iter->second );
-			fatalExit;
-			return iter->second.template getObject<T>(); // this is never executed 
-		}
-	}
-}
-
-template<typename T, typename... Args>
-T& pFlow::repository::emplaceReplaceObject(const objectFile& objf, Args&&... args)
-{
-	
-	eraseObject(objf.name());
-
-	auto ptr = IOobject::make_object_t<T>(std::forward<Args>(args)...);
-	auto [iter, success] = objects_.emplace(std::piecewise_construct,
-					 std::forward_as_tuple(objf.name()),
-					 std::forward_as_tuple(objf, this, std::move(ptr) )
-					 );
-	
-	return iter->second.template getObject<T>();
-}
-
-template<typename T>
-T& pFlow::repository::insertReplaceObject(uniquePtr<IOobject>&& ptr )
-{
-	if( !ptr->owner() )
-	{
-		eraseObject(ptr->name());
-		objectFile objf( ptr() );
-		
-		auto [iter, success] = objects_.emplace
-					(
-						std::piecewise_construct,
-					 	std::forward_as_tuple(ptr->name()),
-					 	std::forward_as_tuple(objf, this, std::move(ptr))
-					 );
-		return iter->second.template getObject<T>();
-	}else
-	{
-		return ptr().getObject<T>();
-	}
-}
-
-template<typename T>
-T& pFlow::repository::insertReplaceObject(const objectFile& objf, uniquePtr<IOobject>&& ptr )
-{
-	if( !ptr->owner() )
-	{
-		eraseObject(objf.name());
-		
-		auto [iter, success] = objects_.emplace
-					(
-						std::piecewise_construct,
-					 	std::forward_as_tuple(objf.name()),
-					 	std::forward_as_tuple(objf, this, std::move(ptr))
-					 );
-		return iter->second.template getObject<T>();
-	}else
-	{
-		return ptr().getObject<T>();
-	}
-}
-
-
-*/
 
 template <typename Type1>
 pFlow::word pFlow::repository::reportTypeError(IOobject& object)
@@ -154,15 +44,15 @@ T& pFlow::repository::lookupObject(const word& name)
 
     	if( checkType<T>(iter->second) )
     	{
-    		return static_cast<T&>(iter->second);
+    		return static_cast<T&>(*iter->second);
             
 
     	}else
     	{
     		fatalErrorInFunction << 
-    		reportTypeError<T>(iter->second)<<endl;
+    		reportTypeError<T>(*iter->second)<<endl;
     		fatalExit;
-    		return static_cast<T&>(iter->second);
+    		return static_cast<T&>(*iter->second);
     	}
         
     }
@@ -172,6 +62,6 @@ T& pFlow::repository::lookupObject(const word& name)
 		"Object with name " << name << " is not found in repository " << this->name()<<endl <<
 		"list of avaiable objest is \n" << objectNames();
         fatalExit;
-        return iter->second.template getObject<T>();
+        return static_cast<T&>(*iter->second);
     }
 }
\ No newline at end of file
diff --git a/src/phasicFlow/repository/systemControl/systemControl.cpp b/src/phasicFlow/repository/systemControl/systemControl.cpp
index 77a7b684..ba96adab 100644
--- a/src/phasicFlow/repository/systemControl/systemControl.cpp
+++ b/src/phasicFlow/repository/systemControl/systemControl.cpp
@@ -24,25 +24,32 @@ Licence:
 #include "error.hpp"
 #include "systemControl.hpp"
 #include "vocabs.hpp"
+#include "Lists.hpp"
 
-/*bool pFlow::systemControl::readDomainDict()
+bool pFlow::systemControl::readIncludeExclue
+(
+	const dictionary& dict
+)
 {
-    if(!domainDict_)
-    {
-        domainDict_ = makeUnique<fileDictionary>
-        (
-            objectFile
-            (
-                domainFile__,
-                "",
-                objectFile::READ_ALWAYS,
-                objectFile::WRITE_NEVER
-            ),
-            &settings()
-        );
-    }
-    return true;
-}*/
+	if(dict.containsDataEntry("includeObjects"))
+	{
+		wordList incld = dict.getVal<wordList>("includeObjects");
+		for(auto& nm:incld)
+		{
+			includeList_.insert(nm);
+		}
+	}
+
+	if(dict.containsDataEntry("excludeObjects"))
+	{
+		wordList excld = dict.getVal<wordList>("excludeObjects");
+		for(auto& nm:excld)
+		{
+			excludeList_.insert(nm);
+		}
+	}
+	return true;
+}
 
 pFlow::word pFlow::systemControl::getRunName
 (
@@ -176,7 +183,7 @@ pFlow::systemControl::systemControl
 	),
 	writeToFileTimer_("Write to file", &timers_)	
 {
-    //readDomainDict();
+    readIncludeExclue(settingsDict_());
 }
 
 pFlow::systemControl::systemControl(
@@ -250,13 +257,9 @@ pFlow::systemControl::systemControl(
 	),
 	writeToFileTimer_("Write to file", &timers_)	
 {
-    //readDomainDict();
+    readIncludeExclue(settingsDict_());
 }
 
-/*pFlow::fileDictionary& pFlow::systemControl::domainDict()
-{
-    return domainDict_();
-}*/
 
 bool pFlow::systemControl::operator ++(int)
 {
diff --git a/src/phasicFlow/repository/systemControl/systemControl.hpp b/src/phasicFlow/repository/systemControl/systemControl.hpp
index 3cf1317c..28d5542b 100644
--- a/src/phasicFlow/repository/systemControl/systemControl.hpp
+++ b/src/phasicFlow/repository/systemControl/systemControl.hpp
@@ -34,6 +34,7 @@ Licence:
 #include "box.hpp"
 #include "Timers.hpp"
 #include "dynamicLinkLibs.hpp"
+#include "Set.hpp"
 
 namespace pFlow
 {
@@ -79,7 +80,12 @@ protected:
 
 	Timer 			writeToFileTimer_;
 
-    //bool readDomainDict();
+	wordSet 		includeList_;
+
+	wordSet 		excludeList_;
+    
+	
+	bool readIncludeExclue(const dictionary& dict);
 
 	static word getRunName( const fileSystem& path);
 	
@@ -189,6 +195,36 @@ public:
 		return outFilePrecision_;
 	}
 
+	
+	bool isIncluded(const word& objName)const final
+	{
+		return includeList_.count(objName) == static_cast<size_t>(1);
+	}
+
+	
+	bool isExcluded(const word& objName)const final
+	{
+		return excludeList_.count(objName) == static_cast<size_t>(1);
+	}
+
+	void clearIncludeExclude()
+	{
+		includeList_.clear();
+		excludeList_.clear();
+	}
+
+	bool addInclude(const word& objName)
+	{
+		auto [iter, success] = includeList_.insert(objName);
+		return success;
+	}
+
+	bool addExclude(const word& objName)
+	{
+		auto [ite, success] = excludeList_.insert(objName);
+		return success;
+	}
+
 };
 
 
diff --git a/src/phasicFlow/setFieldList/setFieldEntry.cpp b/src/phasicFlow/setFieldList/setFieldEntry.cpp
index 8cb0c24f..7da664fa 100644
--- a/src/phasicFlow/setFieldList/setFieldEntry.cpp
+++ b/src/phasicFlow/setFieldList/setFieldEntry.cpp
@@ -39,13 +39,15 @@ bool pFlow::setFieldEntry::checkForTypeAndValueAll()const
 	if( 
 		!(
 			checkForTypeAndValue<int8>() ||
-			checkForTypeAndValue<int16>() ||
+			checkForTypeAndValue<uint8>() ||
 			checkForTypeAndValue<int32>() ||
 			checkForTypeAndValue<int64>() ||
 			checkForTypeAndValue<uint32>() ||
-			checkForTypeAndValue<label>() ||
+			checkForTypeAndValue<uint64>() ||
 			checkForTypeAndValue<real>()  ||
-			checkForTypeAndValue<realx3>()
+			checkForTypeAndValue<realx3>() ||
+			checkForTypeAndValue<realx4>() ||
+			checkForTypeAndValue<word>()
 		 )
 	   )
 	{
@@ -57,40 +59,58 @@ bool pFlow::setFieldEntry::checkForTypeAndValueAll()const
 	return true;
 }
 
-void* pFlow::setFieldEntry::setPointFieldDefaultValueNewAll
+pFlow::uniquePtr<pFlow::IOobject> 
+	pFlow::setFieldEntry::setPointFieldDefaultValueNewAll
 (
-	repository& owner,
 	pointStructure& pStruct,
 	bool verbose
 )
 {
-	if( void* res =  setPointFieldDefaultValueNew<int8> (owner, pStruct, verbose) ; res)
+	uniquePtr<IOobject> Ptr = nullptr;
+
+	if(  Ptr =  setPointFieldDefaultValueNew<int8>(pStruct, verbose) ; Ptr)
 	{
-		return res;
-	}else if(void* res = setPointFieldDefaultValueNew<int16>(owner, pStruct, verbose); res)
+		return Ptr;
+	}
+	else if(Ptr = setPointFieldDefaultValueNew<uint8>(pStruct, verbose); Ptr)
 	{
-		return res;
-	}else if(void* res = setPointFieldDefaultValueNew<int32> (owner, pStruct, verbose); res)
+		return Ptr;
+	}
+	else if(Ptr = setPointFieldDefaultValueNew<int32> (pStruct, verbose); Ptr)
 	{
-		return res;
-	}else if(void* res = setPointFieldDefaultValueNew<int64> (owner, pStruct, verbose); res)
+		return Ptr;
+	}
+	else if(Ptr = setPointFieldDefaultValueNew<int64> (pStruct, verbose); Ptr)
 	{
-		return res;
-	}else if(void* res = setPointFieldDefaultValueNew<uint32> (owner, pStruct, verbose); res)
+		return Ptr;
+	}
+	else if(Ptr = setPointFieldDefaultValueNew<uint32> (pStruct, verbose); Ptr)
 	{
-		return res;
-	}else if(void* res = setPointFieldDefaultValueNew<label>(owner, pStruct, verbose); res)
+		return Ptr;
+	}
+	else if(Ptr = setPointFieldDefaultValueNew<int64>(pStruct, verbose); Ptr)
 	{
-		return res;
-	}else if(void* res = setPointFieldDefaultValueNew<real>(owner, pStruct, verbose); res)
+		return Ptr;
+	}
+	else if(Ptr = setPointFieldDefaultValueNew<uint64>(pStruct, verbose); Ptr)
 	{
-		return res;
-	}else if(void* res = setPointFieldDefaultValueNew<realx3>(owner, pStruct, verbose); res)
+		return Ptr;
+	}
+	else if(Ptr = setPointFieldDefaultValueNew<real>(pStruct, verbose); Ptr)
 	{
-		return res;
-	}else if(void* res = setPointFieldDefaultValueStdNew<word>(owner, pStruct, verbose); res)
+		return Ptr;
+	}
+	else if(Ptr = setPointFieldDefaultValueNew<realx3>(pStruct, verbose); Ptr)
 	{
-		return res;
+		return Ptr;
+	}
+	else if(Ptr = setPointFieldDefaultValueNew<realx4>(pStruct, verbose); Ptr)
+	{
+		return Ptr;
+	}
+	else if(Ptr = setPointFieldDefaultValueNew<word>(pStruct, verbose); Ptr)
+	{
+		return Ptr;
 	}else
 	{
 		fatalErrorInFunction<< 
@@ -100,46 +120,59 @@ void* pFlow::setFieldEntry::setPointFieldDefaultValueNewAll
 
 }
 
-void* pFlow::setFieldEntry::setPointFieldSelectedAll
+bool pFlow::setFieldEntry::setPointFieldSelectedAll
 (
 	repository& owner,
-	int32IndexContainer& selected,
+	uint32IndexContainer& selected,
 	bool verbose
 )
 {
 
-	if( void* res =  setPointFieldSelected<int8> (owner, selected, verbose) ; res)
+	if( setPointFieldSelected<int8> (owner, selected, verbose))
 	{
-		return res;
-	}else if(void* res = setPointFieldSelected<int16>(owner, selected, verbose); res)
+		return true;
+	}
+	else if( setPointFieldSelected<uint8>(owner, selected, verbose))
 	{
-		return res;
-	}else if(void* res = setPointFieldSelected<int32> (owner, selected, verbose); res)
+		return true;
+	}
+	else if( setPointFieldSelected<int32>(owner, selected, verbose))
 	{
-		return res;
-	}else if(void* res = setPointFieldSelected<int64> (owner, selected, verbose); res)
+		return true;
+	}
+	else if( setPointFieldSelected<uint32>(owner, selected, verbose))
 	{
-		return res;
-	}else if(void* res = setPointFieldSelected<uint32> (owner, selected, verbose); res)
+		return true;
+	}
+	else if( setPointFieldSelected<int64>(owner, selected, verbose))
 	{
-		return res;
-	}else if(void* res = setPointFieldSelected<label>(owner, selected, verbose); res)
+		return true;
+	}
+	else if( setPointFieldSelected<uint64>(owner, selected, verbose))
 	{
-		return res;
-	}else if(void* res = setPointFieldSelected<real>(owner, selected, verbose); res)
+		return true;
+	}
+	else if( setPointFieldSelected<real>(owner, selected, verbose))
 	{
-		return res;
-	}else if(void* res = setPointFieldSelected<realx3>(owner, selected, verbose); res)
+		return true;
+	}
+	else if( setPointFieldSelected<realx3>(owner, selected, verbose))
 	{
-		return res;
-	}else if(void* res = setPointFieldSelectedStd<word>(owner, selected, verbose); res)
+		return true;
+	}
+	else if( setPointFieldSelected<realx4>(owner, selected, verbose))
 	{
-		return res;
-	}else
+		return true;
+	}
+	else if( setPointFieldSelected<word>(owner, selected, verbose))
+	{
+		return true;
+	}
+	else
 	{
 		fatalErrorInFunction<< 
 		"  un-supported data type "<<entry_.firstPart() << " in setField for field " << fieldName() <<endl;
-		return nullptr;
+		return false;
 	}
 
 }
diff --git a/src/phasicFlow/setFieldList/setFieldEntry.hpp b/src/phasicFlow/setFieldList/setFieldEntry.hpp
index 214d9d57..f23bdaae 100644
--- a/src/phasicFlow/setFieldList/setFieldEntry.hpp
+++ b/src/phasicFlow/setFieldList/setFieldEntry.hpp
@@ -65,48 +65,34 @@ public:
 		bool checkForTypeAndValueAll()const;
 		
 		template <typename Type>
-		void* setPointFieldDefaultValueNew
+		uniquePtr<pointField_H<Type>> 
+			setPointFieldDefaultValueNew
 		(
-			repository& owner,
 			pointStructure& pStruct,
 			bool verbose = false
 		);
 
-		template<typename Type>
-		void* setPointFieldDefaultValueStdNew
+		uniquePtr<IOobject>
+			 setPointFieldDefaultValueNewAll
 		(
-			repository& owner,
-			pointStructure& pStruct,
-			bool verbose = false
-		);
-
-		void* setPointFieldDefaultValueNewAll
-		(
-			repository& owner,
 			pointStructure& pStruct,
 			bool verbose = false
 		);
 
 		template <typename Type>
-		void* setPointFieldSelected
+		bool setPointFieldSelected
 		(
 			repository& owner,
-			int32IndexContainer& selected,
+			uint32IndexContainer& selected,
 			bool verbose = false
 		);
 
-		template <typename Type>
-		void* setPointFieldSelectedStd
-		(
-			repository& owner,
-			int32IndexContainer& selected,
-			bool verbose = false
-		);
+		
 
-		void* setPointFieldSelectedAll
+		bool setPointFieldSelectedAll
 		(
 			repository& owner,
-			int32IndexContainer& selected,
+			uint32IndexContainer& selected,
 			bool verbose = false
 		);
 
diff --git a/src/phasicFlow/setFieldList/setFieldEntryTemplates.cpp b/src/phasicFlow/setFieldList/setFieldEntryTemplates.cpp
index 83540daa..ac30c06c 100644
--- a/src/phasicFlow/setFieldList/setFieldEntryTemplates.cpp
+++ b/src/phasicFlow/setFieldList/setFieldEntryTemplates.cpp
@@ -37,9 +37,9 @@ bool pFlow::setFieldEntry::checkForTypeAndValue()const
 }
 
 template <typename Type>
-void* pFlow::setFieldEntry::setPointFieldDefaultValueNew
+pFlow::uniquePtr<pFlow::pointField_H<Type>>
+	 pFlow::setFieldEntry::setPointFieldDefaultValueNew
 (
-	repository& owner,
 	pointStructure& pStruct,
 	bool verbose
 )
@@ -50,13 +50,10 @@ void* pFlow::setFieldEntry::setPointFieldDefaultValueNew
 	Type defValue = entry_.secondPartVal<Type>();
 	
 	if(verbose)
-		REPORT(2)<<"Creating pointField " << Green_Text(fieldName())<< " with default value " << cyanText(defValue)<<
-	             " in repository "<< owner.name() <<END_REPORT;
-
+		REPORT(2)<<"Creating pointField " << Green_Text(fieldName())<< " with default value " << Cyan_Text(defValue)<<
+	             " in repository "<< pStruct.owner()->name() <<END_REPORT;
 	
-	auto& field = 
-	owner.emplaceObject<pointField<VectorSingle,Type>>
-	(
+	auto Ptr = makeUnique<pointField_H<Type>>(
 		objectFile
 		(
 			fieldName(),
@@ -65,13 +62,14 @@ void* pFlow::setFieldEntry::setPointFieldDefaultValueNew
 			objectFile::WRITE_ALWAYS
 		),
 		pStruct,
-		defValue
+		defValue,
+		defValue	
 	);
-
-	return &field;
+	
+	return Ptr;
 }
 
-template <typename Type>
+/*template <typename Type>
 void* pFlow::setFieldEntry::setPointFieldDefaultValueStdNew
 (
 	repository& owner,
@@ -104,17 +102,17 @@ void* pFlow::setFieldEntry::setPointFieldDefaultValueStdNew
 	);
 
 	return &field;
-}
+}*/
 
 template <typename Type>
-void* pFlow::setFieldEntry::setPointFieldSelected
+bool pFlow::setFieldEntry::setPointFieldSelected
 (
 	repository& owner,
-	int32IndexContainer& selected,
+	uint32IndexContainer& selected,
 	bool verbose
 )
 {
-	if( !checkForType<Type>() ) return nullptr;
+	if( !checkForType<Type>() ) return false;
 
 	
 	auto fName = fieldName();
@@ -123,56 +121,34 @@ void* pFlow::setFieldEntry::setPointFieldSelected
 	{
 		fatalErrorInFunction<<
 		"Cannot find "<< fName << " in repository " << owner.name() << ". \n";
-		return nullptr;
+		return false;
 	}
 
 	Type value = entry_.secondPartVal<Type>();
 
 	if(verbose)
 		REPORT(2)<< "Setting selected points of " << Green_Text(fName)
-		 		 << " to value " << cyanText(value) <<END_REPORT;
+		 		 << " to value " << Cyan_Text(value) <<END_REPORT;
 	
 	
 	auto fieldTypeName = owner.lookupObjectTypeName(fName);
 
-	if( pointField<VectorSingle,Type>::TYPENAME() == fieldTypeName )
+	if( getTypeName<pointField_H<Type>>() == fieldTypeName )
 	{
 		
-		auto& field = owner.lookupObject<pointField<VectorSingle,Type>>(fName);
+		auto& field = owner.lookupObject<pointField_H<Type>>(fName);
 		if(field.insertSetElement(selected, value))
-			return &field;
+			return true;
 		else
-			return nullptr;
+			return false;
 	}
 
-	if( pointField<VectorSingle,Type, HostSpace>::TYPENAME() == fieldTypeName )
-	{
-		
-		auto& field = owner.lookupObject<pointField<VectorSingle,Type,HostSpace>>(fName);
-		if(field.insertSetElement(selected, value))
-			return &field;
-		else
-			return nullptr;
-	}
-
-	/*if( pointField<VectorDual,Type>::TYPENAME() == fieldTypeName )
-	{
-		
-		
-		auto& field = owner.lookupObject<pointField<VectorDual,Type>>(fName);
-		if(field.insertSetElement(selected, value))
-			return &field;
-		else
-			return nullptr;
-	}*/
-
 	fatalErrorInFunction<<
 	fieldTypeName<< " is not a supported field type for setFieldEntry.\n";
-	return nullptr;
-	
+	return false;
 }
 
-template <typename Type>
+/*template <typename Type>
 void* pFlow::setFieldEntry::setPointFieldSelectedStd
 (
 	repository& owner,
@@ -213,4 +189,4 @@ void* pFlow::setFieldEntry::setPointFieldSelectedStd
 	}
 
 	return nullptr;
-}
\ No newline at end of file
+}*/
\ No newline at end of file
diff --git a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
index 58b811ac..1682d58e 100644
--- a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
+++ b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
@@ -210,8 +210,14 @@ template<>
 inline
 bool pFlow::dataIO<pFlow::word>::writeData(iOstream& os, span<word> data)
 {
-    notImplementedFunction;
-    fatalExit;
+    
+	if( ioPattern_.isParallel()	)
+	{
+		notImplementedFunction<<
+		"data transfer for type word is not supported in parallel mode!"<<endl;
+		fatalExit;
+	}
+
     /// first gather data from all processors (if any)
 	if(!gatherData( data ) )
 	{
@@ -220,7 +226,14 @@ bool pFlow::dataIO<pFlow::word>::writeData(iOstream& os, span<word> data)
 		return false;
 	}
 	
-	return false;
+	if( ioPattern_.thisProcWriteData())
+	{
+		return writeDataASCII(os, data);
+	}
+	else
+	{
+		return true;
+	}
 }
 
 template<typename T>
diff --git a/src/phasicFlow/structuredData/pointStructure/selectors/pStructSelector/pStructSelector.hpp b/src/phasicFlow/structuredData/pointStructure/selectors/pStructSelector/pStructSelector.hpp
index ee8b099b..a3ce07cc 100644
--- a/src/phasicFlow/structuredData/pointStructure/selectors/pStructSelector/pStructSelector.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/selectors/pStructSelector/pStructSelector.hpp
@@ -62,9 +62,9 @@ public:
 		const pointStructure& pStruct()const;
 
 
-		virtual const int32Vector& selectedPoinsts()const = 0;
+		virtual const uint32Vector& selectedPoinsts()const = 0;
 
-		virtual int32Vector& selectedPoinsts() = 0;
+		virtual uint32Vector& selectedPoinsts() = 0;
 
 
 	static
diff --git a/src/phasicFlow/structuredData/pointStructure/selectors/selectBox/selectBox.hpp b/src/phasicFlow/structuredData/pointStructure/selectors/selectBox/selectBox.hpp
index cacc8afa..88c5a5b2 100644
--- a/src/phasicFlow/structuredData/pointStructure/selectors/selectBox/selectBox.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/selectors/selectBox/selectBox.hpp
@@ -38,7 +38,7 @@ class selectBox
 {
 protected:
 	
-	int32Vector selectedPoints_;
+	uint32Vector selectedPoints_;
 
 	box 		box_;
 
@@ -63,12 +63,12 @@ public:
 
 	//// - Methods
 
-		virtual const int32Vector& selectedPoinsts()const override
+		virtual const uint32Vector& selectedPoinsts()const override
 		{
 			return selectedPoints_;
 		}
 
-		virtual int32Vector& selectedPoinsts() override
+		virtual uint32Vector& selectedPoinsts() override
 		{
 			return selectedPoints_;
 		}
diff --git a/src/phasicFlow/structuredData/pointStructure/selectors/selectRandom/selectRandom.cpp b/src/phasicFlow/structuredData/pointStructure/selectors/selectRandom/selectRandom.cpp
index f25ef4c2..0963220b 100644
--- a/src/phasicFlow/structuredData/pointStructure/selectors/selectRandom/selectRandom.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/selectors/selectRandom/selectRandom.cpp
@@ -21,31 +21,31 @@ Licence:
 
 #include "selectRandom.hpp"
 #include "dictionary.hpp"
-#include "uniformRandomInt32.hpp"
+#include "uniformRandomUint32.hpp"
 #include "Set.hpp"
 
 
 bool pFlow::selectRandom::selectAllPointsInRange()
 {
 	// to reduct allocations
-	int32 maxNum = number_+1;
+	uint32 maxNum = number_+1;
 	
 	selectedPoints_.reserve	(maxNum);
 
 	selectedPoints_.clear();
 	
-	uniformRandomInt32 intRand (begin_, end_);
+	uniformRandomUint32 intRand (begin_, end_);
 
 
-	int32 n = 0;
-	int32 iter = 0;
+	uint32 n = 0;
+	uint32 iter = 0;
 	bool finished = false;
 
-	Set<int32> selctedIndices;
+	Set<uint32> selctedIndices;
 
 	while( iter < number_*100)
 	{
-		int32 newInd = intRand.randomNumber();
+		uint32 newInd = intRand.randomNumber();
 
 		if( auto [it, inserted] = selctedIndices.insert(newInd); inserted )
 		{
@@ -91,7 +91,7 @@ pFlow::selectRandom::selectRandom
 	),
 	begin_
 	(
-		dict.subDict("selectRandomInfo").getVal<int32>("begin")
+		dict.subDict("selectRandomInfo").getVal<uint32>("begin")
 	),
 	end_
 	(
@@ -102,9 +102,9 @@ pFlow::selectRandom::selectRandom
 		dict.subDict("selectRandomInfo").getValOrSet("number", 1)
 	)
 {
-	begin_ 	= max(begin_,1);
-	end_ 	= min(end_, static_cast<int32>(pStruct.size()));
-	number_ = max(number_,0);
+	begin_ 	= max(begin_,1u);
+	end_ 	= min(end_, static_cast<uint32>(pStruct.size()));
+	number_ = max(number_,0u);
 	if(end_-begin_ < number_)
 	{
 
diff --git a/src/phasicFlow/structuredData/pointStructure/selectors/selectRandom/selectRandom.hpp b/src/phasicFlow/structuredData/pointStructure/selectors/selectRandom/selectRandom.hpp
index 48a7cd1c..b132e9ee 100644
--- a/src/phasicFlow/structuredData/pointStructure/selectors/selectRandom/selectRandom.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/selectors/selectRandom/selectRandom.hpp
@@ -37,16 +37,16 @@ class selectRandom
 {
 protected:
 	
-	int32Vector selectedPoints_;
+	uint32Vector selectedPoints_;
 
 	// begin index
-	int32 	begin_;
+	uint32 	begin_;
 
 	// end index
-	int32 	end_;
+	uint32 	end_;
 
 	// stride
-	int32 	number_;
+	uint32 	number_;
 
 	bool selectAllPointsInRange();
 	
@@ -69,12 +69,12 @@ public:
 
 	//// - Methods
 
-		virtual const int32Vector& selectedPoinsts()const override
+		virtual const uint32Vector& selectedPoinsts()const override
 		{
 			return selectedPoints_;
 		}
 
-		virtual int32Vector& selectedPoinsts() override
+		virtual uint32Vector& selectedPoinsts() override
 		{
 			return selectedPoints_;
 		}
diff --git a/src/phasicFlow/structuredData/pointStructure/selectors/selectRange/selectRange.cpp b/src/phasicFlow/structuredData/pointStructure/selectors/selectRange/selectRange.cpp
index 09315952..ad7079e9 100644
--- a/src/phasicFlow/structuredData/pointStructure/selectors/selectRange/selectRange.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/selectors/selectRange/selectRange.cpp
@@ -25,13 +25,13 @@ Licence:
 void pFlow::selectRange::selectAllPointsInRange()
 {
 	// to reduct allocations
-	int32 maxNum = (end_ - begin_)/stride_+2;
+	uint32 maxNum = (end_ - begin_)/stride_+2;
 	
 	selectedPoints_.reserve	(maxNum);
 
 	selectedPoints_.clear();
 		
-	for(int32 i = begin_; i<end_; i+= stride_)
+	for(uint32 i = begin_; i<end_; i+= stride_)
 	{
 		selectedPoints_.push_back(i);
 	}
@@ -49,20 +49,20 @@ pFlow::selectRange::selectRange
 	),
 	begin_
 	(
-		dict.subDict("selectRangeInfo").getVal<int32>("begin")
+		dict.subDict("selectRangeInfo").getVal<uint32>("begin")
 	),
 	end_
 	(
-		dict.subDict("selectRangeInfo").getValOrSet("end", pStruct.size())
+		dict.subDict("selectRangeInfo").getValOrSet<uint32>("end", pStruct.size())
 	),
 	stride_
 	(
-		dict.subDict("selectRangeInfo").getValOrSet("stride", 1)
+		dict.subDict("selectRangeInfo").getValOrSet<uint32>("stride", 1u)
 	)
 {
-	begin_ 	= max(begin_,1);
-	end_ 	= min(end_, static_cast<int32>(pStruct.size()));
-	stride_ = max(stride_,1);
+	begin_ 	= max(begin_,1u);
+	end_ 	= min(end_, static_cast<uint32>(pStruct.size()));
+	stride_ = max(stride_,1u);
 
 	selectAllPointsInRange();
 }
diff --git a/src/phasicFlow/structuredData/pointStructure/selectors/selectRange/selectRange.hpp b/src/phasicFlow/structuredData/pointStructure/selectors/selectRange/selectRange.hpp
index 842b3278..9c86625a 100644
--- a/src/phasicFlow/structuredData/pointStructure/selectors/selectRange/selectRange.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/selectors/selectRange/selectRange.hpp
@@ -37,16 +37,16 @@ class selectRange
 {
 protected:
 	
-	int32Vector selectedPoints_;
+	uint32Vector selectedPoints_;
 
 	// begin index
-	int32 	begin_;
+	uint32 	begin_;
 
 	// end index
-	int32 	end_;
+	uint32 	end_;
 
 	// stride
-	int32 	stride_;
+	uint32 	stride_;
 
 	void selectAllPointsInRange();
 	
@@ -69,12 +69,12 @@ public:
 
 	//// - Methods
 
-		virtual const int32Vector& selectedPoinsts()const override
+		virtual const uint32Vector& selectedPoinsts()const override
 		{
 			return selectedPoints_;
 		}
 
-		virtual int32Vector& selectedPoinsts() override
+		virtual uint32Vector& selectedPoinsts() override
 		{
 			return selectedPoints_;
 		}

From 206df8924e4f14c4798b6bc805a45e65e1c2d4dc Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Thu, 25 Jan 2024 03:12:01 -0800
Subject: [PATCH 27/60] utility particlesPhasicFlow updated. TODO: upgrade it
 further more to mandates supplying shapeName in particlesDict

---
 utilities/particlesPhasicFlow/CMakeLists.txt  |   2 +-
 .../particlesPhasicFlow.cpp                   | 170 ++++++------------
 utilities/particlesPhasicFlow/setFields.hpp   |   2 +-
 3 files changed, 59 insertions(+), 115 deletions(-)

diff --git a/utilities/particlesPhasicFlow/CMakeLists.txt b/utilities/particlesPhasicFlow/CMakeLists.txt
index 03b0f1c6..649d9ba0 100644
--- a/utilities/particlesPhasicFlow/CMakeLists.txt
+++ b/utilities/particlesPhasicFlow/CMakeLists.txt
@@ -8,6 +8,6 @@ empty/empty.cpp
 )
 #set(link_lib phasicFlow Kokkos::kokkos Interaction Utilities)
 
-set(link_lib phasicFlow Kokkos::kokkos Utilities)
+set(link_lib phasicFlow Kokkos::kokkos Particles Utilities)
 
 pFlow_make_executable_install(particlesPhasicFlow source_files link_lib)
diff --git a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
index 1e3351b5..255caa0a 100755
--- a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
+++ b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
@@ -21,10 +21,11 @@ Licence:
 
 #include "positionParticles.hpp"
 #include "pointStructure.hpp"
-//#include "setFields.hpp"
+#include "setFields.hpp"
 #include "systemControl.hpp"
 #include "commandLine.hpp"
 #include "vocabs.hpp"
+#include "baseShapeNames.hpp"
 
 //#include "readControlDict.hpp"
 
@@ -95,14 +96,6 @@ int main( int argc, char* argv[] )
 		REPORT(1)<< "Created pStruct with "<< pStructPtr().size() << " points and capacity "<<
 		pStructPtr().capacity()<<" . . ."<< END_REPORT;
 
-		//REPORT(1)<< "Writing pStruct to " << Control.time().path()+ pointStructureFile__<< END_REPORT<<endl<<endl;
-        
-		/*if( !Control.time().write())
-		{
-			fatalErrorInFunction<<
-			"ERRor in writing to file. \n ";
-			return 1; 
-		}*/
 	}
     else
 	{
@@ -111,12 +104,12 @@ int main( int argc, char* argv[] )
 
 	}
 
-	
+	List<uniquePtr<IOobject>> allObjects;
 
 	if(!positionOnly)
 	{
-        WARNING<< "setFields is not active "<<END_WARNING;
-	/*	auto& pStruct = *pStructPtr;
+        
+		auto& pStruct = pStructPtr();
 
 		auto& sfDict = cpDict.subDict("setFields");
 
@@ -124,7 +117,11 @@ int main( int argc, char* argv[] )
 
 		for(auto& sfEntry: defValueList)
 		{
-			if( !sfEntry.setPointFieldDefaultValueNewAll(Control.time(), pStruct, true))
+			if( auto Ptr = sfEntry.setPointFieldDefaultValueNewAll( pStruct, true); Ptr)
+			{
+				allObjects.push_back(std::move(Ptr));
+			}
+			else
 			{
 				ERR<< "\n error occured in setting default value fields.\n"<<END_ERR;
 				return 1;
@@ -149,10 +146,55 @@ int main( int argc, char* argv[] )
 				return 1;
 			}
 			output<<endl;
-		}*/
+		}
 	}
 
+	Control.clearIncludeExclude();
+	Control.addExclude("shapeName");
+
+	uint32PointField_H shapeIndex
+	(
+		objectFile
+		(
+			"shapeIndex",
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_ALWAYS
+		),
+		pStructPtr(),
+		0u
+	);
+
+	baseShapeNames shapes(
+		shapeFile__,
+		&Control.caseSetup()
+	);
 	
+	auto& shapeName = Control.time().template lookupObject<wordPointField_H>("shapeName");
+
+	REPORT(0)<< "Converting shapeName field to shapeIndex field"<<END_REPORT;
+
+	auto shapeName_D = shapeName.fieldDevice();
+	auto shapeIndex_D = shapeIndex.fieldDevice();
+	
+	REPORT(1)<<"List of shape names in "<<shapes.globalName()<<
+	" is: "<<Green_Text(shapes.shapeNameList())<<END_REPORT;
+
+	ForAll(i, shapeIndex)
+	{
+		if(uint32 index; shapes.shapeNameToIndex(shapeName_D[i], index))
+		{
+			shapeIndex_D[i] = index;
+		}
+		else
+		{
+			fatalErrorInFunction<<"Found shape name "<< Yellow_Text(shapeName_D[i])<<
+			"in shapeName field. But the list of shape names in file "<< 
+			shapes.globalName()<<" is : \n"<<
+			shapes.shapeNames()<<endl;
+		}
+	}
+
     if( !Control.time().write(true))
     {
         fatalErrorInFunction<<
@@ -161,107 +203,9 @@ int main( int argc, char* argv[] )
     }
 	REPORT(0)<< Green_Text("\nFinished successfully.\n")<<END_REPORT;
 
-
+	
 // this should be palced in each main 
 #include "finalize.hpp"
 
 	return 0;
 } 
-
-
-
-/*
-uniquePtr<IOobject> pStructObj{nullptr};
-
-	if(!setOnly)
-	{
-
-		// position particles based on the dict content 
-		REPORT(0)<< "Positioning points . . . \n"<<endREPORT;
-		auto pointPosition = positionParticles::create(cpDict.subDict("positionParticles"));
-
-		fileSystem pStructPath = Control.time().path()+pointStructureFile__;
-
-		auto finalPos = pointPosition().getFinalPosition();
-
-		
-		pStructObj = IOobject::make<pointStructure>
-		(
-			objectFile
-			(
-				pointStructureFile__,
-				Control.time().path(),
-				objectFile::READ_NEVER,
-				objectFile::WRITE_ALWAYS			
-			),
-			finalPos
-		);
-
-		auto& pSruct = pStructObj().getObject<pointStructure>();
-
-		REPORT(1)<< "Created pStruct with "<< pSruct.size() << " points and capacity "<<
-		pSruct.capacity()<<" . . ."<< endREPORT;
-
-		REPORT(1)<< "Writing pStruct to " << pStructObj().path() << endREPORT<<endl<<endl;
-
-		if( !pStructObj().write())
-		{
-			fatalErrorInFunction<<
-			"ERRor in writing to file. \n ";
-			return 1; 
-		}
-	}else
-	{
-		pStructObj = IOobject::make<pointStructure>
-		(
-			objectFile
-			(
-				pointStructureFile__,
-				Control.time().path(),
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_NEVER			
-			)
-		);
-	}
-
-	
-
-	if(!positionOnly)
-	{
-
-		auto& pStruct = pStructObj().getObject<pointStructure>();
-
-		auto& sfDict = cpDict.subDict("setFields");
-
-		setFieldList defValueList(sfDict.subDict("defaultValue"));
-
-		for(auto& sfEntry: defValueList)
-		{
-			if( !sfEntry.setPointFieldDefaultValueNewAll(Control.time(), pStruct, true))
-			{
-				ERR<< "\n error occured in setting default value fields.\n"<<endERR;
-				return 1;
-			}
-		}
-		
-		output<<endl;
-
-		auto& selectorsDict = sfDict.subDict("selectors");
-
-		auto selNames = selectorsDict.dictionaryKeywords();
-
-		for(auto name: selNames)
-		{
-			REPORT(1)<< "Applying selector " << greenText(name) <<endREPORT;
-			
-			if(
-				!applySelector(Control, pStruct, selectorsDict.subDict(name))
-			 )
-			{
-				ERR<<"\n error occured in setting selector. \n"<<endERR;
-				return 1;
-			}
-			output<<endl;
-		}
-	}
-	*/
\ No newline at end of file
diff --git a/utilities/particlesPhasicFlow/setFields.hpp b/utilities/particlesPhasicFlow/setFields.hpp
index 0315c1b2..0eb56745 100755
--- a/utilities/particlesPhasicFlow/setFields.hpp
+++ b/utilities/particlesPhasicFlow/setFields.hpp
@@ -39,7 +39,7 @@ bool applySelector(systemControl& control, const pointStructure& pStruct, const
 
 	auto& selected = selector().selectedPoinsts();
 
-	int32IndexContainer selIndex(selected.data(), selected.size());
+	uint32IndexContainer selIndex(selected.data(), selected.size());
 
 	setFieldList sfList(selDict.subDict("fieldValue"));
 

From 0df384f54622c0e112da3288eaaa06763fffaac3 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Fri, 26 Jan 2024 01:10:10 -0800
Subject: [PATCH 28/60] sphereParticles tested

---
 src/Particles/CMakeLists.txt                  |   1 +
 .../sphereParticles/sphereParticles.cpp       | 132 ++++++++++++------
 .../sphereParticles/sphereParticles.hpp       |  30 ++++
 .../sphereParticlesKernels.cpp                | 100 +++++++++++++
 .../sphereParticlesKernels.hpp                |  54 +++----
 .../sphereShape/sphereShape.cpp               |   9 +-
 .../sphereShape/sphereShape.hpp               |   4 +-
 .../dynamicPointStructure.cpp                 |  31 ----
 src/Particles/particles/baseShapeNames.cpp    |   7 +-
 src/Particles/particles/baseShapeNames.hpp    |   2 +-
 src/Particles/particles/particles.cpp         |  93 ------------
 src/Particles/particles/particles.hpp         |  58 ++------
 src/Particles/particles/shape.cpp             |  15 +-
 src/Particles/particles/shape.hpp             |   6 +-
 .../containers/Vector/stdVectorHelper.hpp     |   2 +-
 .../streams/dataIO/dataIOTemplate.cpp         |   6 +-
 16 files changed, 277 insertions(+), 273 deletions(-)
 create mode 100644 src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.cpp

diff --git a/src/Particles/CMakeLists.txt b/src/Particles/CMakeLists.txt
index 1b01ef94..b5c78045 100644
--- a/src/Particles/CMakeLists.txt
+++ b/src/Particles/CMakeLists.txt
@@ -7,6 +7,7 @@ particles/particles.cpp
 #particles/particleIdHandler.cpp
 SphereParticles/sphereShape/sphereShape.cpp
 SphereParticles/sphereParticles/sphereParticles.cpp
+SphereParticles/sphereParticles/sphereParticlesKernels.cpp
 #Insertion/shapeMixture/shapeMixture.cpp
 #Insertion/insertion/insertion.cpp
 #Insertion/Insertion/Insertions.cpp
diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp b/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
index 04f4f19c..fcb7f757 100644
--- a/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
@@ -21,9 +21,10 @@ Licence:
 #include "sphereParticles.hpp"
 #include "systemControl.hpp"
 #include "vocabs.hpp"
-//#include "setFieldList.hpp"
-//#include "sphereParticlesKernels.hpp"
+#include "sphereParticlesKernels.hpp"
 
+
+//#include "setFieldList.hpp"
 /*pFlow::uniquePtr<pFlow::List<pFlow::eventObserver*>> 
 pFlow::sphereParticles::getFieldObjectList()const
 {
@@ -205,16 +206,36 @@ bool pFlow::sphereParticles::initInertia()
 			exeSpace,
 			Kokkos::IndexType<uint32>>;
 	
-	auto aPointsMask = dynPointStruct().activePointsMaskDevice();
-	auto aRange = aPointsMask.activeRange();
+	auto [minIndex, maxIndex] = minMax(shapeIndex().internal());		
 
-	auto field_I = I_.fieldDevice();
-	auto field_shapeIndex = shapeIndex().fieldDevice();
-	
-	const auto& shp = getShapes();
-	realVector_D I ("I", shp.Inertia());
-	auto d_I = I.deviceVector();
+	if( !spheres_.indexValid(maxIndex) )
+	{
+		fatalErrorInFunction<< 
+		"the maximum value of shapeIndex is "<< maxIndex << 
+		" which is not valid."<<endl;
+		return false;
+	}
+
+	auto aPointsMask 	= dynPointStruct().activePointsMaskDevice();
+	auto aRange 		= aPointsMask.activeRange();
 	
+	auto field_shapeIndex 	= shapeIndex().fieldDevice();
+	auto field_diameter 	= diameter_.fieldDevice();
+	auto field_mass 		= mass_.fieldDevice();
+	auto field_propId 		= propertyId_.fieldDevice();
+	auto field_I 			= I_.fieldDevice();
+
+	// get info from spheres shape 
+	realVector_D d("diameter", spheres_.boundingDiameter());
+	realVector_D mass("mass",spheres_.mass());
+	uint32Vector_D propId("propId", spheres_.shapePropertyIds());
+	realVector_D  I("I", spheres_.Inertia());
+
+	auto d_d 		= d.deviceVector();
+	auto d_mass 	= mass.deviceVector();
+	auto d_propId 	= propId.deviceVector();
+	auto d_I 		= I.deviceVector();
+		
 	Kokkos::parallel_for(
 		"particles::initInertia",
 		policy(aRange.start(), aRange.end()),
@@ -224,9 +245,13 @@ bool pFlow::sphereParticles::initInertia()
 			{
 				uint32 index = field_shapeIndex[i];
 				field_I[i] = d_I[index];
+				field_diameter[i] = d_d[index];
+				field_mass[i] = d_mass[index];
+				field_propId[i] = d_propId[index];
 			}
 		});
 	Kokkos::fence();
+	
 	return true;
 }
 
@@ -243,6 +268,38 @@ pFlow::sphereParticles::sphereParticles(
 		&control.caseSetup(),
 		prop
 	),
+	propertyId_
+	(
+		objectFile
+		(
+			"propertyId",
+			"",
+			objectFile::READ_ALWAYS,
+			objectFile::WRITE_NEVER
+		),
+		dynPointStruct(),
+		0u
+	),
+	diameter_
+	(
+		objectFile(
+			"diameter",
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_NEVER),
+		dynPointStruct(),
+		0.00000000001
+	),
+	mass_
+	(
+		objectFile(
+			"mass",
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_NEVER),
+		dynPointStruct(),
+		0.0000000001
+	),
 	I_
 	(
 		objectFile
@@ -285,7 +342,7 @@ pFlow::sphereParticles::sphereParticles(
 	intCorrectTimer_(
 		"Integration-correct", &this->timers() )
 {
-
+	
 	auto intMethod = control.settingsDict().getVal<word>("integrationMethod");
 	REPORT(1)<<"Creating integration method "<<Green_Text(intMethod)
 		  << " for rotational velocity."<<END_REPORT;
@@ -306,31 +363,10 @@ pFlow::sphereParticles::sphereParticles(
 	}
 
 	WARNING<<"setFields for rVelIntegration_"<<END_WARNING;
-	/*if(rVelIntegration_->needSetInitialVals())
-	{
-		
-		auto [minInd, maxInd] = pStruct().activeRange();
-		int32IndexContainer indexHD(minInd, maxInd);
-	
-		auto n = indexHD.size();
-		auto index = indexHD.indicesHost();
-
-		realx3Vector rvel(n,RESERVE());
-		const auto hrVel = rVelocity_.hostVector();
-
-		for(auto i=0; i<n; i++)
-		{
-			rvel.push_back( hrVel[index(i)]);
-		}
-		
-		REPORT(2)<< "Initializing the required vectors for rotational velocity integratoin\n "<<endREPORT;
-		rVelIntegration_->setInitialVals(indexHD, rvel);
-
-	}*/
-
 	
 	if(!initInertia())
 	{
+		fatalErrorInFunction;
 		fatalExit;
 	}
 	
@@ -437,18 +473,16 @@ bool pFlow::sphereParticles::iterate()
 
 	particles::iterate();
 	accelerationTimer_.start();
-	WARNING<<"pFlow::sphereParticlesKernels::acceleration"<<END_WARNING;
-	//INFO<<"before accelerationTimer_ "<<endINFO;
-		/*pFlow::sphereParticlesKernels::acceleration(
+		pFlow::sphereParticlesKernels::acceleration(
 			control().g(),
-			mass().deviceVectorAll(),
-			contactForce().deviceVectorAll(),
-			I().deviceVectorAll(),
-			contactTorque().deviceVectorAll(),
-			pStruct().activePointsMaskD(),
-			accelertion().deviceVectorAll(),
-			rAcceleration().deviceVectorAll()
-			);*/
+			mass().fieldDevice(),
+			contactForce().fieldDevice(),
+			I().fieldDevice(),
+			contactTorque().fieldDevice(),
+			dynPointStruct().activePointsMaskDevice(),
+			accelertion().fieldDevice(),
+			rAcceleration().fieldDevice()
+			);
 	accelerationTimer_.end();
 	
 	intCorrectTimer_.start();
@@ -485,3 +519,13 @@ const pFlow::shape &pFlow::sphereParticles::getShapes() const
 {
     return spheres_;
 }
+
+void pFlow::sphereParticles::boundingSphereMinMax
+(
+	real & minDiam, 
+	real& maxDiam
+)const
+{
+	minDiam = spheres_.minBoundingSphere();
+	maxDiam = spheres_.maxBoundingSphere();
+}
diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp b/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp
index 4e5a8c6e..8009dcb7 100644
--- a/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp
@@ -51,6 +51,15 @@ private:
 		/// reference to shapes 
 	ShapeType 			spheres_;
 
+	/// property id on device
+	uint32PointField_D 		propertyId_;
+
+	/// diameter / boundig sphere size of particles on device
+	realPointField_D		diameter_;
+
+	/// mass of particles field 
+	realPointField_D 		mass_;
+
 	/// pointField of inertial of particles 
 	realPointField_D     	I_;
 
@@ -150,6 +159,24 @@ public:
 		notImplementedFunction;
 		return false;
 	}
+
+	
+	const uint32PointField_D& propertyId()const override
+	{
+		return propertyId_;
+	}
+	
+	
+	const realPointField_D& diameter()const override
+	{
+		return diameter_;
+	}
+
+
+	const realPointField_D& mass()const override
+	{
+		return mass_;
+	}
 	
 	/// before iteration step 
 	bool beforeIteration() override;
@@ -178,6 +205,9 @@ public:
 	word shapeTypeName()const override;
 	
 	const shape& getShapes()const override;
+
+	
+	void boundingSphereMinMax(real & minDiam, real& maxDiam)const override;
 	
 }; //sphereParticles
 
diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.cpp b/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.cpp
new file mode 100644
index 00000000..810d9c17
--- /dev/null
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.cpp
@@ -0,0 +1,100 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+-----------------------------------------------------------------------------*/
+
+#include "sphereParticlesKernels.hpp"
+
+using policy = Kokkos::RangePolicy<
+			pFlow::DefaultExecutionSpace,
+			Kokkos::Schedule<Kokkos::Static>,
+			Kokkos::IndexType<pFlow::uint32>>;
+
+void pFlow::sphereParticlesKernels::addMassDiamInertiaProp
+(
+    deviceViewType1D<uint32>    shapeIndex,
+    deviceViewType1D<real>  	mass,
+	deviceViewType1D<real>  	diameter,
+	deviceViewType1D<real>  	I,
+    deviceViewType1D<uint32>  	propertyId,
+    pFlagTypeDevice 		    incld,
+    deviceViewType1D<real>  	src_mass,
+	deviceViewType1D<real>  	src_diameter,
+	deviceViewType1D<real>  	src_I,
+    deviceViewType1D<uint32>  	src_propertyId
+)
+{
+    auto aRange = incld.activeRange();
+
+    Kokkos::parallel_for(
+		"particles::initInertia",
+		policy(aRange.start(), aRange.end()),
+		LAMBDA_HD(uint32 i)
+		{
+			if(incld(i))
+			{
+				uint32 index = shapeIndex[i];
+				I[i] = src_I[index];
+				diameter[i] = src_diameter[index];
+				mass[i] = src_mass[index];
+				propertyId[i] = src_propertyId[index];
+			}
+		});
+
+}
+
+void pFlow::sphereParticlesKernels::acceleration
+( 
+	realx3		g,
+	deviceViewType1D<real>  	mass,
+	deviceViewType1D<realx3>  	force,
+	deviceViewType1D<real>  	I,
+	deviceViewType1D<realx3>  	torque,
+	pFlagTypeDevice 		    incld,
+	deviceViewType1D<realx3> 	lAcc,
+	deviceViewType1D<realx3> 	rAcc
+)
+{
+
+	auto activeRange = incld.activeRange();
+	if(incld.isAllActive())
+	{
+		Kokkos::parallel_for(
+		"pFlow::sphereParticlesKernels::acceleration",
+		policy(activeRange.start(), activeRange.end()),
+		LAMBDA_HD(uint32 i){
+				lAcc[i] = force[i]/mass[i] + g;
+				rAcc[i] = torque[i]/I[i];
+		});
+	}
+	else
+	{
+		Kokkos::parallel_for(
+		"pFlow::sphereParticlesKernels::acceleration",
+		policy(activeRange.start(), activeRange.end()),
+		LAMBDA_HD(uint32 i){
+			if(incld(i))
+			{
+				lAcc[i] = force[i]/mass[i] + g;
+				rAcc[i] = torque[i]/I[i];
+			}
+		});
+
+	}
+	
+	Kokkos::fence();
+}
diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.hpp b/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.hpp
index 2edeff2b..f2ebbe22 100644
--- a/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.hpp
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.hpp
@@ -21,56 +21,36 @@ Licence:
 #ifndef __sphereParticlesKernels_hpp__
 #define __sphereParticlesKernels_hpp__
 
+#include "types.hpp"
+#include "pointFlag.hpp"
+
 namespace pFlow::sphereParticlesKernels
 {
 
-using rpAcceleration = Kokkos::RangePolicy<
-			DefaultExecutionSpace,
-			Kokkos::Schedule<Kokkos::Static>,
-			Kokkos::IndexType<int32>
-			>;
+void addMassDiamInertiaProp(
+    deviceViewType1D<uint32>    shapeIndex,
+    deviceViewType1D<real>  	mass,
+	deviceViewType1D<real>  	diameter,
+	deviceViewType1D<real>  	I,
+    deviceViewType1D<uint32>  	propertyId,
+    pFlagTypeDevice 		    incld,
+    deviceViewType1D<real>  	src_mass,
+	deviceViewType1D<real>  	src_diameter,
+	deviceViewType1D<real>  	src_I,
+    deviceViewType1D<uint32>  	src_propertyId
+);
 
-template<typename IncludeFunctionType>
 void acceleration( 
 	realx3		g,
 	deviceViewType1D<real>  	mass,
 	deviceViewType1D<realx3>  	force,
 	deviceViewType1D<real>  	I,
 	deviceViewType1D<realx3>  	torque,
-	IncludeFunctionType 		incld,
+	pFlagTypeDevice 		    incld,
 	deviceViewType1D<realx3> 	lAcc,
 	deviceViewType1D<realx3> 	rAcc
-	)
-{
+);
 
-	auto activeRange = incld.activeRange();
-	if(incld.allActive())
-	{
-		Kokkos::parallel_for(
-		"pFlow::sphereParticlesKernels::acceleration",
-		rpAcceleration(activeRange.first, activeRange.second),
-		LAMBDA_HD(int32 i){
-				lAcc[i] = force[i]/mass[i] + g;
-				rAcc[i] = torque[i]/I[i];
-		});
-	}
-	else
-	{
-		Kokkos::parallel_for(
-		"pFlow::sphereParticlesKernels::acceleration",
-		rpAcceleration(activeRange.first, activeRange.second),
-		LAMBDA_HD(int32 i){
-			if(incld(i))
-			{
-				lAcc[i] = force[i]/mass[i] + g;
-				rAcc[i] = torque[i]/I[i];
-			}
-		});
-
-	}
-	
-	Kokkos::fence();
-}
 
 }
 
diff --git a/src/Particles/SphereParticles/sphereShape/sphereShape.cpp b/src/Particles/SphereParticles/sphereShape/sphereShape.cpp
index f07942ce..75ec21e3 100644
--- a/src/Particles/SphereParticles/sphereShape/sphereShape.cpp
+++ b/src/Particles/SphereParticles/sphereShape/sphereShape.cpp
@@ -21,9 +21,9 @@ Licence:
 #include "sphereShape.hpp"
 
 
-bool pFlow::sphereShape::readDictionary()
+bool pFlow::sphereShape::readFromDictionary3()
 {
-	
+
 	diameters_ = getVal<realVector>("diameters");
 
 	if(diameters_.size() != numShapes() )
@@ -61,6 +61,11 @@ pFlow::sphereShape::sphereShape
 	shape(fileName, owner, prop)
 {
 
+	if(!readFromDictionary3())
+	{
+		fatalExit;
+		fatalErrorInFunction;
+	}
 }
 
 pFlow::real pFlow::sphereShape::maxBoundingSphere() const
diff --git a/src/Particles/SphereParticles/sphereShape/sphereShape.hpp b/src/Particles/SphereParticles/sphereShape/sphereShape.hpp
index 6c03bfd4..b59625ce 100644
--- a/src/Particles/SphereParticles/sphereShape/sphereShape.hpp
+++ b/src/Particles/SphereParticles/sphereShape/sphereShape.hpp
@@ -26,8 +26,6 @@ Licence:
 namespace pFlow
 {
 
-
-
 class sphereShape
 :
 	public shape
@@ -37,7 +35,7 @@ private:
 	// - diameter of spheres
 	realVector 			diameters_;
 	
-	bool readDictionary();
+	bool readFromDictionary3();
 
 protected:
 
diff --git a/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp b/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
index d99766e2..122d2392 100644
--- a/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
+++ b/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
@@ -76,37 +76,6 @@ pFlow::dynamicPointStructure::dynamicPointStructure
 		fatalExit;
 	}
 
-
-	WARNING << "Initialization of integrationPos_ and integrationVel_ should be doen!"<<END_WARNING;
-	
-	/*if(!integrationPos_->needSetInitialVals()) return;
-
-	
-		
-	auto [minInd, maxInd] = pStruct().activeRange();
-	int32IndexContainer indexHD(minInd, maxInd);
-	
-	auto n = indexHD.size();
-	auto index = indexHD.indicesHost();
-
-	realx3Vector pos(n,RESERVE());
-	realx3Vector vel(n,RESERVE());
-	const auto hVel = velocity().hostVector();
-	const auto hPos = pStruct().pointPosition().hostVector();
-
-	for(auto i=0; i<n; i++)
-	{
-		pos.push_back( hPos[index(i)]);
-		vel.push_back( hVel[index(i)]);
-	}
-
-
-	REPORT(2)<< "Initializing the required vectors for position integratoin "<<endREPORT;
-	integrationPos_->setInitialVals(indexHD, pos);
-
-	REPORT(2)<< "Initializing the required vectors for velocity integratoin\n "<<endREPORT;
-	integrationVel_->setInitialVals(indexHD, vel);*/
-
 }
 
 bool pFlow::dynamicPointStructure::predict
diff --git a/src/Particles/particles/baseShapeNames.cpp b/src/Particles/particles/baseShapeNames.cpp
index c8200f0c..f20efc06 100644
--- a/src/Particles/particles/baseShapeNames.cpp
+++ b/src/Particles/particles/baseShapeNames.cpp
@@ -40,7 +40,7 @@ bool pFlow::baseShapeNames::createHashNames()
 }
 
 
-bool pFlow::baseShapeNames::readFromDictionary()
+bool pFlow::baseShapeNames::readFromDictionary1()
 {
 	
 	shapeNames_ = getVal<wordVector>("names");
@@ -69,18 +69,21 @@ pFlow::baseShapeNames::baseShapeNames
     )
 {
 	
-	if( !readFromDictionary() )
+	if( !readFromDictionary1() )
 	{
+		fatalErrorInFunction;
 		fatalExit;
 	}
 
 	if( !createHashNames())
 	{
+		fatalErrorInFunction;
 		fatalExit;
 	}
 
 }
 
+
 bool pFlow::baseShapeNames::writeToDict(dictionary &dict)const
 {
 	
diff --git a/src/Particles/particles/baseShapeNames.hpp b/src/Particles/particles/baseShapeNames.hpp
index 9c427c32..8f4ca44e 100644
--- a/src/Particles/particles/baseShapeNames.hpp
+++ b/src/Particles/particles/baseShapeNames.hpp
@@ -46,7 +46,7 @@ private:
 	
 	bool createHashNames();
 
-	bool readFromDictionary();	
+	bool readFromDictionary1();	
 
 protected:
 
diff --git a/src/Particles/particles/particles.cpp b/src/Particles/particles/particles.cpp
index ff32aa4f..cbda5c61 100644
--- a/src/Particles/particles/particles.cpp
+++ b/src/Particles/particles/particles.cpp
@@ -21,60 +21,6 @@ Licence:
 
 #include "particles.hpp"
 
-bool pFlow::particles::initMassDiameter()const 
-{
-
-	auto [minIndex, maxIndex] = minMax(shapeIndex_.internal());
-
-	const auto& shp = getShapes();
-
-	if( !shp.indexValid(maxIndex) )
-	{
-		fatalErrorInFunction<< 
-		"the maximum value of shape index is "<< maxIndex << 
-		" which is not valid."<<endl;
-		return false;
-	}
-
-	realVector_D d("diameter", shp.boundingDiameter());
-	realVector_D mass("mass",shp.mass());
-	uint8Vector_D propId("propId", shp.shapePropertyIds());
-
-	
-	auto aPointsMask = dynPointStruct_.activePointsMaskDevice();
-	auto aRange = aPointsMask.activeRange();
-
-	using exeSpace = typename realPointField_D::execution_space;
-	using policy = Kokkos::RangePolicy<
-			exeSpace,
-			Kokkos::IndexType<uint32>>;
-
-	auto field_diameter = diameter_.fieldDevice();
-	auto field_mass = mass_.fieldDevice();
-	auto field_propId = propertyId_.fieldDevice();
-	auto field_shapeIndex = shapeIndex_.fieldDevice();
-
-	auto d_d = d.deviceVector();
-	auto d_mass = mass.deviceVector();
-	auto d_propId = propId.deviceVector();
-
-	Kokkos::parallel_for(
-		"particles::initMassDiameter",
-		policy(aRange.start(), aRange.end()),
-		LAMBDA_HD(uint32 i)
-		{
-			if(aPointsMask(i))
-			{
-				uint32 index = field_shapeIndex[i];
-				field_diameter[i] = d_d[index];
-				field_mass[i] = d_mass[index];
-				field_propId[i] = d_propId[index];
-			}
-		});
-	Kokkos::fence();
-
-    return true;
-}
 
 pFlow::particles::particles
 (
@@ -96,18 +42,6 @@ pFlow::particles::particles
 		dynPointStruct_,
 		static_cast<uint32>(-1)
 	),
-	propertyId_
-	(
-		objectFile
-		(
-			"propertyId",
-			"",
-			objectFile::READ_ALWAYS,
-			objectFile::WRITE_NEVER
-		),
-		dynPointStruct_,
-		static_cast<int8>(0)
-	),
 	shapeIndex_
 	(
 		objectFile
@@ -120,26 +54,6 @@ pFlow::particles::particles
 		dynPointStruct_,
 		0
 	),
-	diameter_
-	(
-		objectFile(
-			"diameter",
-			"",
-			objectFile::READ_NEVER,
-			objectFile::WRITE_NEVER),
-		dynPointStruct_,
-		0.00000000001
-	),
-	mass_
-	(
-		objectFile(
-			"mass",
-			"",
-			objectFile::READ_NEVER,
-			objectFile::WRITE_NEVER),
-		dynPointStruct_,
-		0.0000000001
-	),
 	accelertion_
 	(
 		objectFile(
@@ -167,14 +81,7 @@ pFlow::particles::particles
 		dynPointStruct_,
 		zero3)
 {
-	
 	this->addToSubscriber(dynPointStruct_);
-
-	if(!initMassDiameter())
-	{
-		fatalExit;
-	}
-
 }
 
 bool pFlow::particles::beforeIteration() 
diff --git a/src/Particles/particles/particles.hpp b/src/Particles/particles/particles.hpp
index 5f9e7ea8..6b847e63 100644
--- a/src/Particles/particles/particles.hpp
+++ b/src/Particles/particles/particles.hpp
@@ -43,18 +43,9 @@ private:
 	/// id of particles on host
 	uint32PointField_D		id_;
 
-	/// property id on device
-	uint8PointField_D 		propertyId_;
-
-	/// property id on device
+	
 	uint32PointField_D 		shapeIndex_;
 
-	/// diameter / boundig sphere size of particles on device
-	realPointField_D		diameter_;
-
-	/// mass of particles field 
-	realPointField_D 		mass_;
-
 	/// acceleration on device
 	realx3PointField_D 		accelertion_;
 
@@ -73,8 +64,7 @@ private:
 		message::ITEM_DELETE
 	);
 	
-	bool initMassDiameter()const;
-	
+
 	void zeroForce()
 	{
 		contactForce_.fill(zero3);
@@ -152,29 +142,6 @@ public:
 		return dynPointStruct_.velocity();
 	}
 
-	inline 
-	const auto& diameter()const
-	{
-		return diameter_;
-	}
-
-	inline 
-	auto& diameter()
-	{
-		return diameter_;
-	}
-
-	inline 
-	const auto& mass()const
-	{
-		return mass_;
-	}
-
-	inline auto& mass()	
-	{
-		return mass_;
-	}
-
 	inline 
 	const auto& accelertion()const
 	{
@@ -211,18 +178,6 @@ public:
 		return contactTorque_;
 	}
 
-	inline 
-	const auto& propertyId()const
-	{
-		return propertyId_;
-	}
-
-	inline 
-	auto& propertyId()
-	{
-		return propertyId_;
-	}
-
 	bool beforeIteration() override;
 
 	bool iterate()override;
@@ -237,7 +192,14 @@ public:
 	 	const setFieldList& setField
 	 ) = 0;*/
 
+	virtual 
+	const uint32PointField_D& propertyId()const = 0;
 	
+	virtual
+	const realPointField_D& diameter()const = 0;
+
+	virtual 
+	const realPointField_D& mass()const = 0;		
 
 	virtual
 	realx3PointField_D& rAcceleration() = 0;
@@ -255,7 +217,7 @@ public:
 	const shape& getShapes()const = 0;
 
 	virtual
-	void boundingSphereMinMax(real & minDiam, real& maxDiam)const;
+	void boundingSphereMinMax(real & minDiam, real& maxDiam)const = 0;
 
 	
 
diff --git a/src/Particles/particles/shape.cpp b/src/Particles/particles/shape.cpp
index b73fe9c0..bcf66e74 100644
--- a/src/Particles/particles/shape.cpp
+++ b/src/Particles/particles/shape.cpp
@@ -7,24 +7,23 @@ bool pFlow::shape::findPropertyIds()
 
 	ForAll( i, materialNames_)
 	{	
-		
 		if(uint32 propId; property_.nameToIndex(materialNames_[i], propId) )
 		{
-			shapePropertyIds_[i] = static_cast<uint8>(propId);
+			shapePropertyIds_[i] = propId;
 		}
 		else
 		{
 			fatalErrorInFunction<<"Material name "<< materialNames_[i]<< 
-			"is not valid in dictionary "<<globalName()<<endl;
+			" is not valid in dictionary "<<globalName()<<endl;
 			return false;
 		}
 	}
-    return false;
+    return true;
 }
 
-bool pFlow::shape::readFromDictionary()
+bool pFlow::shape::readFromDictionary2()
 {
-	
+
 	materialNames_ = getVal<wordVector>("materials");
 
 	if(materialNames_.size() != numShapes() )
@@ -49,13 +48,15 @@ pFlow::shape::shape
     property_(prop)
 {
 	
-	if( !readFromDictionary() )
+	if( !readFromDictionary2() )
 	{
+		fatalErrorInFunction;
 		fatalExit;
 	}
 
 	if(!findPropertyIds())
 	{
+		fatalErrorInFunction;
 		fatalExit;
 	}
 
diff --git a/src/Particles/particles/shape.hpp b/src/Particles/particles/shape.hpp
index a85a85ae..1ce5d8ce 100644
--- a/src/Particles/particles/shape.hpp
+++ b/src/Particles/particles/shape.hpp
@@ -37,7 +37,7 @@ private:
   	const property& 	property_; 
 
 	/// list of property ids of shapes (index)
-	uint8Vector			shapePropertyIds_;
+	uint32Vector			shapePropertyIds_;
 
 	/// list of material names 
 	wordVector 			materialNames_;
@@ -45,7 +45,7 @@ private:
 	
 	bool findPropertyIds();
 
-	bool readFromDictionary();	
+	bool readFromDictionary2();	
 
 protected:
 
@@ -96,7 +96,7 @@ public:
 	}
 
 	inline
-    bool propIdValid(int8 propId)const
+    bool propIdValid(uint32 propId)const
 	{
 		return static_cast<uint32>(propId) < property_.numMaterials();
 	}
diff --git a/src/phasicFlow/containers/Vector/stdVectorHelper.hpp b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
index 60a71873..37a85a6f 100644
--- a/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
+++ b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
@@ -111,7 +111,7 @@ bool readStdVector
 	std::vector<T,Allocator>& vec
 )
 {
-	
+
 	return readDataAsciiBinary(is, vec);
 	
 }
diff --git a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
index 1682d58e..74efd812 100644
--- a/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
+++ b/src/phasicFlow/streams/dataIO/dataIOTemplate.cpp
@@ -130,12 +130,15 @@ bool pFlow::readDataAscii
 	token firstToken(is);
 
 	size_t len = 0;
+	bool lenFound = false;
 	if( firstToken.isInt64())
 	{
 		len = firstToken.int64Token();
+		lenFound = true;
 		vec.reserve(len);
 		firstToken  = token(is);
 	}
+	
 
 	T val{};
 	if( firstToken.isPunctuation() ) // start of vector 
@@ -164,6 +167,7 @@ bool pFlow::readDataAscii
 			
 			is >> lastToken;
 			is.fatalCheck(FUNCTION_NAME);
+
 		}
 
 	} else
@@ -174,7 +178,7 @@ bool pFlow::readDataAscii
 		return false;
 	}
 	
-	if(len>0&& len != vec.size())
+	if(lenFound && len>0 && len != vec.size())
 	{
 		warningInFunction<<"vector length specified "<< len << 
 		" is different from number of elements "<< vec.size()<<endl;

From c0ee29e39c751c8133f68d6aa67efcd56d6a8420 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 28 Jan 2024 14:43:10 -0800
Subject: [PATCH 29/60] boundaryExit beforeIteration, not tested

---
 .../sphereParticles/sphereParticles.cpp       |   2 +-
 src/Particles/particles/particles.hpp         |   4 +-
 src/phasicFlow/CMakeLists.txt                 |   2 +-
 src/phasicFlow/Kokkos/ViewAlgorithms.hpp      |  28 ++---
 .../algorithms/kokkosAlgorithms.hpp           |  52 ++++----
 .../containers/Vector/stdVectorHelper.hpp     |  17 +++
 .../containers/pointField/pointField.cpp      |  43 ++++++-
 .../containers/pointField/pointField.hpp      |   2 +-
 src/phasicFlow/containers/span/span.hpp       |   8 +-
 .../repository/Time/baseTimeControl.cpp       |   7 +-
 .../repository/Time/baseTimeControl.hpp       |  33 ++---
 .../boundaries/boundaryBase/boundaryBase.cpp  |   2 +-
 .../boundaries/boundaryBase/boundaryBase.hpp  |  43 +++++--
 ...eldAccess.hpp => scatteredFieldAccess.hpp} |  53 +++++---
 .../boundaries/boundaryExit/boundaryExit.cpp  | 114 +++++++++++++++++-
 .../boundaries/boundaryExit/boundaryExit.hpp  |   2 +-
 .../boundaryList.cpp                          |  84 ++++++++++---
 .../boundaryList.hpp                          |  29 +++--
 .../boundaries/boundaryNone/boundaryNone.cpp  |   5 +-
 .../boundaries/boundaryNone/boundaryNone.hpp  |   2 +-
 src/phasicFlow/structuredData/plane/plane.hpp |   5 +
 .../pointStructure/internalPoints.cpp         |  22 +++-
 .../pointStructure/internalPoints.hpp         |   5 +
 .../pointStructure/pointFlag.hpp              |   4 +
 .../pointStructure/pointFlagKernels.hpp       |  49 ++++++++
 .../pointStructure/pointStructure.cpp         |   9 +-
 26 files changed, 484 insertions(+), 142 deletions(-)
 rename src/phasicFlow/structuredData/boundaries/boundaryBase/{scatterFieldAccess.hpp => scatteredFieldAccess.hpp} (52%)
 rename src/phasicFlow/structuredData/{pointStructure => boundaries}/boundaryList.cpp (65%)
 rename src/phasicFlow/structuredData/{pointStructure => boundaries}/boundaryList.hpp (81%)

diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp b/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
index fcb7f757..517c4e86 100644
--- a/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
@@ -274,7 +274,7 @@ pFlow::sphereParticles::sphereParticles(
 		(
 			"propertyId",
 			"",
-			objectFile::READ_ALWAYS,
+			objectFile::READ_NEVER,
 			objectFile::WRITE_NEVER
 		),
 		dynPointStruct(),
diff --git a/src/Particles/particles/particles.hpp b/src/Particles/particles/particles.hpp
index 6b847e63..847b89ac 100644
--- a/src/Particles/particles/particles.hpp
+++ b/src/Particles/particles/particles.hpp
@@ -87,11 +87,11 @@ protected:
 		return dynPointStruct_.pointPosition();	
 	}
 
-	inline 
+	/*inline 
 	auto& velocity()
 	{
 		return dynPointStruct_.velocity();
-	}
+	}*/
 
 	inline 
 	auto& shapeIndex()
diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index ae7df3ac..2afe777f 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -76,7 +76,7 @@ structuredData/pointStructure/pointStructure.cpp
 structuredData/boundaries/boundaryBase/boundaryBase.cpp
 structuredData/boundaries/boundaryExit/boundaryExit.cpp
 structuredData/boundaries/boundaryNone/boundaryNone.cpp
-structuredData/pointStructure/boundaryList.cpp
+structuredData/boundaries/boundaryList.cpp
 structuredData/pointStructure/selectors/pStructSelector/pStructSelector.cpp
 structuredData/pointStructure/selectors/selectBox/selectBox.cpp
 structuredData/pointStructure/selectors/selectRange/selectRange.cpp 
diff --git a/src/phasicFlow/Kokkos/ViewAlgorithms.hpp b/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
index 7e8134a9..1ee86959 100644
--- a/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
+++ b/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
@@ -241,19 +241,19 @@ void copy(
 }
 
 template <
-	typename dType,
-	typename sType,
+	typename Type,
 	typename... sProperties>
 INLINE_FUNCTION_H
 void getNth(
-	dType& dst,
-	const ViewType1D<sType, sProperties...>& src,
+	Type& dst,
+	const ViewType1D<Type, sProperties...>& src,
 	const uint32 n
 	)
 {
-	range32 span(n,n+1);
-	auto subV = Kokkos::subview(src, span);
-	hostViewType1D<dType> dstView("getNth",1);
+		
+	auto subV = Kokkos::subview(src, Kokkos::make_pair(n,n+1));
+	hostViewType1D<Type> dstView("getNth",1);
+	//hostViewTypeScalar
 	Kokkos::deep_copy(dstView,subV);
 	dst = *dstView.data();
 }
@@ -425,13 +425,12 @@ int32 binarySearch(
 template<
 	typename Type,
 	typename... properties,
-	typename dType,
 	typename... dProperties>
 void exclusiveScan(
 	const ViewType1D<Type, properties...>& view,
 	uint32 start,
 	uint32 end,
-	ViewType1D<dType, dProperties...>& dView,
+	ViewType1D<Type, dProperties...>& dView,
 	uint32 dStart )
 {
 
@@ -439,7 +438,7 @@ void exclusiveScan(
 	(
 		areAccessible<
 			typename ViewType1D<Type, properties...>::execution_space,
-			typename ViewType1D<dType, dProperties...>::memory_space>(),
+			typename ViewType1D<Type, dProperties...>::memory_space>(),
 		"In exclusiveScan, view and dView should have the same space"
 
 	);
@@ -448,7 +447,7 @@ void exclusiveScan(
 	
 	uint32 numElems = end-start;
 	
-	pFlow::algorithms::KOKKOS::exclusiveScan<Type,dType,ExecutionSpace>(
+	pFlow::algorithms::KOKKOS::exclusiveScan<Type,ExecutionSpace>(
 		view.data()+start,
 		dView.data()+dStart,
 		numElems);
@@ -458,13 +457,12 @@ void exclusiveScan(
 template<
 	typename Type,
 	typename... properties,
-	typename dType,
 	typename... dProperties>
 void inclusiveScan(
 	const ViewType1D<Type, properties...>& view,
 	uint32 start,
 	uint32 end,
-	ViewType1D<dType, dProperties...>& dView,
+	ViewType1D<Type, dProperties...>& dView,
 	uint32 dStart)
 {
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
@@ -473,14 +471,14 @@ void inclusiveScan(
 	(
 		areAccessible<
 			typename ViewType1D<Type, properties...>::execution_space,
-			typename ViewType1D<dType, dProperties...>::memory_space>(),
+			typename ViewType1D<Type, dProperties...>::memory_space>(),
 		"In exclusiveScan, view and dView should have the same space"
 	);
 
 
 	uint32 numElems = end-start;
 
-	pFlow::algorithms::KOKKOS::inclusiveScan<Type,dType,ExecutionSpace>(
+	pFlow::algorithms::KOKKOS::inclusiveScan<Type,ExecutionSpace>(
 		view.data()+start,
 		dView.data()+dStart,
 		numElems);
diff --git a/src/phasicFlow/algorithms/kokkosAlgorithms.hpp b/src/phasicFlow/algorithms/kokkosAlgorithms.hpp
index 218e6e6d..6102dd7a 100644
--- a/src/phasicFlow/algorithms/kokkosAlgorithms.hpp
+++ b/src/phasicFlow/algorithms/kokkosAlgorithms.hpp
@@ -30,15 +30,15 @@ namespace pFlow::algorithms::KOKKOS
 
 template<typename Type, typename ExecutionSpace>
 INLINE_FUNCTION_H
-int32 count(const Type* first, int32 numElems, const Type& val)
+uint32 count(const Type* first, uint32 numElems, const Type& val)
 {
 	using policy = Kokkos::RangePolicy<
 			ExecutionSpace,
-			Kokkos::IndexType<int32> >;
-	int32 num = 0;
+			Kokkos::IndexType<uint32> >;
+	uint32 num = 0;
 	Kokkos::parallel_reduce("count",
 							policy(0, numElems),
-							LAMBDA_HD(int32 i, int32& updateVal){
+							LAMBDA_HD(uint32 i, uint32& updateVal){
 								if(equal(first[i],val)) updateVal++;
 							},
 							num);
@@ -50,17 +50,17 @@ int32 count(const Type* first, int32 numElems, const Type& val)
 
 template<typename Type, typename ExecutionSpace>
 INLINE_FUNCTION_H
-void fillSequence(Type* first, int32 numElems, const Type& firstVal)
+void fillSequence(Type* first, uint32 numElems, const Type& firstVal)
 {
 	
 	using policy = Kokkos::RangePolicy<
 			ExecutionSpace,
-			Kokkos::IndexType<int32> >;
+			Kokkos::IndexType<uint32> >;
 
 	Kokkos::parallel_for(
 		"fillSequence",
 		policy(0, numElems),
-		LAMBDA_HD(int32 i){ 
+		LAMBDA_HD(uint32 i){ 
 			first[i] = firstVal+i;
 		});
 	Kokkos::fence();
@@ -68,15 +68,15 @@ void fillSequence(Type* first, int32 numElems, const Type& firstVal)
 
 template<typename Type, typename indexType, typename ExecutionSpace>
 INLINE_FUNCTION_H
-void fillSelected(Type* first, const indexType* indices, const int32 numElems, const Type val)
+void fillSelected(Type* first, const indexType* indices, const uint32 numElems, const Type val)
 {
 	using policy = Kokkos::RangePolicy<
 			ExecutionSpace,
-			Kokkos::IndexType<int32> >;
+			Kokkos::IndexType<uint32> >;
 	Kokkos::parallel_for(
 		"fillSelected",
 		policy(0,numElems),
-		LAMBDA_HD(int32 i){
+		LAMBDA_HD(uint32 i){
 			first[indices[i]]= val;
 		});
 	Kokkos::fence();
@@ -84,16 +84,16 @@ void fillSelected(Type* first, const indexType* indices, const int32 numElems, c
 
 template<typename Type, typename indexType, typename ExecutionSpace>
 INLINE_FUNCTION_H
-void fillSelected(Type* first, const indexType* indices, const Type* vals, const int32 numElems)
+void fillSelected(Type* first, const indexType* indices, const Type* vals, const uint32 numElems)
 {
 	using policy = Kokkos::RangePolicy<
 			ExecutionSpace,
-			Kokkos::IndexType<int32> >;
+			Kokkos::IndexType<uint32> >;
 
 	Kokkos::parallel_for(
 		"fillSelected",
 		policy(0,numElems),
-		LAMBDA_HD(int32 i){
+		LAMBDA_HD(uint32 i){
 			first[indices[i]]= vals[i];
 		});
 	Kokkos::fence();
@@ -101,17 +101,17 @@ void fillSelected(Type* first, const indexType* indices, const Type* vals, const
 
 template<typename Type, typename ExecutionSpace>
 INLINE_FUNCTION_H
-Type max(const Type* first, int32 numElems)
+Type max(const Type* first, uint32 numElems)
 {
 	using policy = Kokkos::RangePolicy<
 			ExecutionSpace,
-			Kokkos::IndexType<int32> >;
+			Kokkos::IndexType<uint32> >;
 	Type maxElement=0;
 
 	Kokkos::parallel_reduce(
 		"max",
 		policy(0, numElems),
-		LAMBDA_HD(int32 i, Type& maxUpdate){
+		LAMBDA_HD(uint32 i, Type& maxUpdate){
 			if(maxUpdate<first[i]) maxUpdate = first[i];
 		},
 		Kokkos::Max<Type>(maxElement));
@@ -144,38 +144,38 @@ Type min(const Type* first, int32 numElems)
 //void sort(Type* first, int32 numElems, CompareFunc compare);
 //void permuteSort(const Type* first, PermuteType* pFirst, int32 numElems);
 
-template<typename Type, typename DestType, typename ExecutionSpace>
-void exclusiveScan(Type* first, DestType* dFirst, int32 numElems)
+template<typename Type, typename ExecutionSpace>
+void exclusiveScan(Type* first, Type* dFirst, uint32 numElems)
 {	
 	using policy = Kokkos::RangePolicy<
 			ExecutionSpace,
-			Kokkos::IndexType<int32> >;
+			Kokkos::IndexType<uint32> >;
 
 	Kokkos::parallel_scan(
 		"exclusiveScan",
 		policy(0, numElems),
-		LAMBDA_HD(const int32 i, DestType& valToUpdate, const bool final)
+		LAMBDA_HD(const uint32 i, Type& valToUpdate, const bool final)
 		{
-			const int32 val = first[i];
+			const Type val = first[i];
 			if(final)
 				dFirst[i] = valToUpdate;
 			valToUpdate += val;
 		});
 }
 
-template<typename Type, typename DestType, typename ExecutionSpace>
-void inclusiveScan(Type* first, DestType* dFirst, int32 numElems)
+template<typename Type, typename ExecutionSpace>
+void inclusiveScan(Type* first, Type* dFirst, uint32 numElems)
 {
 	using policy = Kokkos::RangePolicy<
 			ExecutionSpace,
-			Kokkos::IndexType<int32> >;
+			Kokkos::IndexType<uint32> >;
 
 	Kokkos::parallel_scan(
 		"inclusiveScan",
 		policy(0, numElems),
-		LAMBDA_HD(const int32 i, int32& valToUpdate, const bool final)
+		LAMBDA_HD(const uint32 i, Type& valToUpdate, const bool final)
 		{
-			const int32 val = first[i];
+			const Type val = first[i];
 			valToUpdate += val;
 			if(final)
 				dFirst[i] = valToUpdate;
diff --git a/src/phasicFlow/containers/Vector/stdVectorHelper.hpp b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
index 37a85a6f..210ea048 100644
--- a/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
+++ b/src/phasicFlow/containers/Vector/stdVectorHelper.hpp
@@ -48,6 +48,23 @@ public:
 template<typename T>
 using vecAllocator = std::allocator<T>;
 
+template<typename T>
+inline
+span<T> makeSpan(std::vector<T>& container)
+{
+    return span<T>(container.data(), container.size());
+}
+
+template<typename T>
+inline
+span<T> makeSpan(const std::vector<T>& container)
+{
+    return span<T>(
+		const_cast<T*>(container.data()), 
+		container.size());
+}
+
+
 template<typename T>
 inline
 bool writeSpan(
diff --git a/src/phasicFlow/containers/pointField/pointField.cpp b/src/phasicFlow/containers/pointField/pointField.cpp
index edc42ce1..5b444402 100644
--- a/src/phasicFlow/containers/pointField/pointField.cpp
+++ b/src/phasicFlow/containers/pointField/pointField.cpp
@@ -1,4 +1,3 @@
-#include "pointField.hpp"
 /*------------------------------- phasicFlow ---------------------------------
       O        C enter of
      O O       E ngineering and
@@ -41,7 +40,25 @@ pFlow::pointField<T, MemorySpace>::pointField
 	boundaryFieldList_(pStruct.boundaries(), *this),
 	pStruct_(pStruct),
 	defaultValue_(defVal)
-{}
+{
+    
+    if(IOobject::implyRead())
+    {
+        REPORT(1)<< "Reading field "<< Green_Text(IOobject::name())<<
+        " from "<<IOobject::path()<<END_REPORT;
+    }
+    else
+    {
+        REPORT(1)<< "Creating field "<< Green_Text(IOobject::name())<<END_REPORT;
+    }
+    if( !IOobject::readObject() )
+    {
+        fatalErrorInFunction<<
+        "Error in reading from file "<<IOobject::path()<<endl;
+        fatalExit;
+    }    
+
+}
 
 template<class T, class MemorySpace>
 pFlow::pointField<T, MemorySpace>::pointField
@@ -66,7 +83,23 @@ pFlow::pointField<T, MemorySpace>::pointField
 	boundaryFieldList_(pStruct.boundaries(), *this),
 	pStruct_(pStruct),
 	defaultValue_(defVal)
-{}
+{
+    if(IOobject::implyRead())
+    {
+        REPORT(1)<< "Reading field "<< Green_Text(IOobject::name())<<
+        " from "<<IOobject::path()<<END_REPORT;
+    }
+    else
+    {
+        REPORT(1)<< "Creating field "<< Green_Text(IOobject::name())<<END_REPORT;
+    }
+    if( !IOobject::readObject() )
+    {
+        fatalErrorInFunction<<
+        "Error in reading from file "<<IOobject::path()<<endl;
+        fatalExit;
+    }
+}
 
 template<class T, class MemorySpace>
 pFlow::pointField<T, MemorySpace>::pointField
@@ -98,7 +131,9 @@ pFlow::pointField<T, MemorySpace>::pointField
 	boundaryFieldList_(pStruct.boundaries(), *this),
 	pStruct_(pStruct),
 	defaultValue_(defVal)
-{}
+{
+
+}
 
 
  /*
diff --git a/src/phasicFlow/containers/pointField/pointField.hpp b/src/phasicFlow/containers/pointField/pointField.hpp
index 9057174c..c6191dc8 100644
--- a/src/phasicFlow/containers/pointField/pointField.hpp
+++ b/src/phasicFlow/containers/pointField/pointField.hpp
@@ -52,7 +52,7 @@ public:
 
 	using execution_space 	= typename InternalFieldType::execution_space;
 
-protected:
+private:
 
     //// - data members 
 
diff --git a/src/phasicFlow/containers/span/span.hpp b/src/phasicFlow/containers/span/span.hpp
index 902ad990..91deb71f 100644
--- a/src/phasicFlow/containers/span/span.hpp
+++ b/src/phasicFlow/containers/span/span.hpp
@@ -157,7 +157,7 @@ public:
 
 };
 
-template<typename T, typename... properties, template<class, class...> class Container>
+/*template<typename T, typename... properties, template<class, class...> class Container>
 size_t makeSpan(Container<T, properties...>& container)
 {
     return span<T>(container.data(), container.size());
@@ -169,7 +169,7 @@ size_t makeSpan(const Container<T, properties...>& container)
     return span<T>(
         const_cast<T*>(container.data()), 
         container.size());
-}
+}*/
 
 
 template<typename T>
@@ -192,7 +192,7 @@ span<const char> charSpan(span<const T> s)
         s.size()*el);
 }
 
-template<typename T, template<class> class Container>
+/*template<typename T, template<class> class Container>
 span<T> makeSpan(Container<T>& container)
 {
     return span<T>(container.data(), container.size());
@@ -204,7 +204,7 @@ span<T> makeSpan(const Container<T>& container)
     return span<T>(
         const_cast<T*>(container.data()), 
         container.size());
-}
+}*/
 
 
 
diff --git a/src/phasicFlow/repository/Time/baseTimeControl.cpp b/src/phasicFlow/repository/Time/baseTimeControl.cpp
index 642af864..54d8ea45 100644
--- a/src/phasicFlow/repository/Time/baseTimeControl.cpp
+++ b/src/phasicFlow/repository/Time/baseTimeControl.cpp
@@ -25,7 +25,8 @@ Licence:
 pFlow::baseTimeControl::baseTimeControl
 (
     const dictionary &dict,
-    const word& intervalPrefix
+    const word& intervalPrefix,
+	real defStartTime
 )
 {
 	auto tControl = dict.getVal<word>("timeControl");
@@ -47,7 +48,7 @@ pFlow::baseTimeControl::baseTimeControl
 
 	if(isTimeStep_)
 	{
-		auto startTime = (dict.getValOrSet<real>("startTime", 0.0));
+		auto startTime = (dict.getValOrSet<real>("startTime", defStartTime));
     	auto endTime = (dict.getValOrSet<real>("endTime", largeValue));
 		auto interval = dict.getVal<real>(intervalWord);
 		rRange_ = realStridedRange(startTime, endTime, interval);
@@ -55,7 +56,7 @@ pFlow::baseTimeControl::baseTimeControl
 	}
 	else
 	{
-		auto startTime = (dict.getValOrSet<int32>("startTime", 0.0));
+		auto startTime = (dict.getValOrSet<int32>("startTime", 0));
     	auto endTime = (dict.getValOrSet<int32>("endTime", largestPosInt32));
 		auto interval = dict.getVal<int32>(intervalWord);
 		iRange_ = int32StridedRagne(startTime, endTime, interval);
diff --git a/src/phasicFlow/repository/Time/baseTimeControl.hpp b/src/phasicFlow/repository/Time/baseTimeControl.hpp
index f82fda5f..647cd84e 100644
--- a/src/phasicFlow/repository/Time/baseTimeControl.hpp
+++ b/src/phasicFlow/repository/Time/baseTimeControl.hpp
@@ -1,20 +1,20 @@
 /*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
+			O        C enter of
+		 O O       E ngineering and
+		O   O      M ultiscale modeling of
+	 OOOOOOO     F luid flow       
 ------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
+	Copyright (C): www.cemf.ir
+	email: hamid.r.norouzi AT gmail.com
 ------------------------------------------------------------------------------  
 Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
+	This file is part of phasicFlow code. It is a free software for simulating 
+	granular and multiphase flows. You can redistribute it and/or modify it under
+	the terms of GNU General Public License v3 or any other later versions. 
  
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+	phasicFlow is distributed to help others in their research in the field of 
+	granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+	implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
 #ifndef __baseTimeControl_hpp__
@@ -30,8 +30,8 @@ namespace pFlow
 class baseTimeControl
 {
 private:
-   
-    bool 	isTimeStep_;
+	 
+	bool 	isTimeStep_;
 
 	int32StridedRagne iRange_;
 
@@ -40,7 +40,10 @@ private:
 
 public:
 
-	baseTimeControl(const dictionary& dict, const word& intervalPrefix = "");
+	baseTimeControl(
+		const dictionary& dict, 
+		const word& intervalPrefix = "",
+		real defStartTime = 0.0);
 
 
 	bool timeEvent(uint32 iter, real t, real dt)const;
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
index 10decdd5..d79b8ee0 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
@@ -50,9 +50,9 @@ pFlow::boundaryBase::boundaryBase
 :
 	subscriber(dict.name()),
 	boundaryPlane_(bplane),
+	indexList_(groupNames(dict.name(),"indexList")),
 	neighborLength_(dict.getVal<real>("neighborLength")),
 	internal_(internal),
-	indexList_(groupNames(dict.name(),"indexList")),
 	mirrorProcessoNo_(dict.getVal<uint32>("mirrorProcessorNo")),
 	name_(dict.name()),
 	type_(dict.getVal<word>("type"))
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
index 7f21e18e..45b28cc7 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
@@ -25,7 +25,7 @@ Licence:
 #include "subscriber.hpp"
 #include "VectorSingles.hpp"
 #include "plane.hpp"
-#include "scatterFieldAccess.hpp"
+#include "scatteredFieldAccess.hpp"
 
 #include "streams.hpp"
 
@@ -44,29 +44,27 @@ class boundaryBase
 public:
 
     using pointFieldAccessType = 
-        scatterFieldAccess<realx3,DefaultExecutionSpace>;
+        deviceScatteredFieldAccess<realx3>;
 
-
-protected:
+private:
 
 	const plane& 	boundaryPlane_;
 
+	/// list of particles indices on device 
+	uint32Vector_D 	indexList_;
+
 	/// The length defined for creating neighbor list 
 	real  			neighborLength_;	
 
 	/// a reference to 
 	internalPoints& internal_;
 
-	/// list of particles indices on device 
-	uint32Vector_D 	indexList_;
-
 	uint32 			mirrorProcessoNo_;
 
 	word 		name_;
 
 	word 		type_;
 
-
 public:
 
 	TypeInfo("boundaryBase");
@@ -85,7 +83,7 @@ public:
 
 	boundaryBase& operator=(boundaryBase&&) = default;
 
-	virtual ~boundaryBase() = default;
+	~boundaryBase() override = default;
 	
 
 	create_vCtor
@@ -117,22 +115,42 @@ public:
 		return name_;
 	}
 
+	bool empty()const
+	{
+		return indexList_.size()==0;
+	}
+
 	auto size()const
 	{
 		return indexList_.size();
 	}
 
+	const plane& boundaryPlane()const
+	{
+		return boundaryPlane_;
+	}
+
 	auto capacity()const
 	{
 		return indexList_.capacity();
 	}
 
+	const internalPoints& internal()const
+	{
+		return internal_;
+	}
+
+	internalPoints& internal()
+	{
+		return internal_;
+	}
+
 	/// @brief set the size of indexList 
 	/// Always make sure that size+1 <= capacity
 	void setSize(uint32 newSize);
 
 	virtual 
-    bool beforeIteratoin(uint32 iterNum, real t) = 0 ;
+    bool beforeIteration(uint32 iterNum, real t, real dt) = 0 ;
 
 	virtual 
     bool iterate(uint32 iterNum, real t) = 0;
@@ -146,6 +164,11 @@ public:
 		return indexList_;
 	}
 
+	auto& indexList()
+	{
+		return indexList_;
+	}
+
     pointFieldAccessType thisPoints();
 
     virtual
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/scatterFieldAccess.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/scatteredFieldAccess.hpp
similarity index 52%
rename from src/phasicFlow/structuredData/boundaries/boundaryBase/scatterFieldAccess.hpp
rename to src/phasicFlow/structuredData/boundaries/boundaryBase/scatteredFieldAccess.hpp
index 27c16f2a..19c9caa7 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/scatterFieldAccess.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/scatteredFieldAccess.hpp
@@ -1,6 +1,6 @@
 
-#ifndef __scatterFieldAccess_hpp__
-#define __scatterFieldAccess_hpp__
+#ifndef __scatteredFieldAccess_hpp__
+#define __scatteredFieldAccess_hpp__
 
 
 #include "phasicFlowKokkos.hpp"
@@ -9,8 +9,8 @@ namespace pFlow
 {
 
 
-template<typename T, typename MemorySpace>
-class scatterFieldAccess
+template<typename T, typename MemorySpace=void>
+class scatteredFieldAccess
 {
 public:
 	
@@ -22,7 +22,7 @@ public:
 
     using execution_space 	= typename viewType::execution_space;
 
-protected:
+private:
 
 	uint32 								size_ = 0;
 
@@ -32,12 +32,12 @@ protected:
 
 public:
 
-    scatterFieldAccess():
+    scatteredFieldAccess():
         indices_(),
         fieldVals_()    
     {}
 
-	scatterFieldAccess(
+	scatteredFieldAccess(
 		uint32 	sz,
 		ViewType1D<uint32, memory_space> ind,
 		ViewType1D<T, memory_space> fVals)
@@ -47,15 +47,15 @@ public:
 		fieldVals_(fVals)
 	{}
 
-	scatterFieldAccess(const scatterFieldAccess&) = default;
+	scatteredFieldAccess(const scatteredFieldAccess&) = default;
 
-	scatterFieldAccess(scatterFieldAccess&&) = default;
+	scatteredFieldAccess(scatteredFieldAccess&&) = default;
 
-	scatterFieldAccess& operator=(const scatterFieldAccess&) = default;
+	scatteredFieldAccess& operator=(const scatteredFieldAccess&) = default;
 
-	scatterFieldAccess& operator=(scatterFieldAccess&&) = default;
+	scatteredFieldAccess& operator=(scatteredFieldAccess&&) = default;
 
-	~scatterFieldAccess() = default;
+	~scatteredFieldAccess() = default;
 
 	// - Methods
 
@@ -95,10 +95,35 @@ public:
 		return size_ == 0;
 	}
 
+	T getFirstCopy()const
+	{
+		T val;
+		uint32 n = indices_(0);
+		getNth(val, fieldVals_, n);
+		return val;
+	}
+
+	T getLastCopy()const 
+	{
+		T val;
+		if(empty())return val;
+		uint32 n = indices_(size()-1);
+		getNth(val, fieldVals_, n);
+		return val;
+	}
+
 };
 
-}
+template<typename T>
+	using deviceScatteredFieldAccess = 
+		scatteredFieldAccess<T, typename DefaultExecutionSpace::memory_space>;
+
+template<typename T>
+	using hostScatteredFieldAccess = 
+		scatteredFieldAccess<T,HostSpace>;
+
+} // pFlow
 
 
-#endif //__scatterFieldAccess_hpp__
+#endif //__scatteredFieldAccess_hpp__
 
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
index db5d4d5c..e8f005e8 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
@@ -19,8 +19,10 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "boundaryExit.hpp"
+#include "internalPoints.hpp"
 #include "dictionary.hpp"
 
+
 pFlow::boundaryExit::boundaryExit
 (
 	const dictionary& dict,
@@ -36,12 +38,120 @@ pFlow::boundaryExit::boundaryExit
 		dict.getValOrSet("checkForExitInterval", 1), 1);
 }
 
-bool pFlow::boundaryExit::beforeIteratoin
+bool pFlow::boundaryExit::beforeIteration
 (
 	uint32 iterNum, 
-	real t
+	real t,
+	real dt
 )
 {
+	// nothing have to be done
+	if(empty())
+	{
+		return true;
+	}
+
+	uint32 s = size();
+	deviceViewType1D<uint32> delFlags("delFlags",s+1); 
+	deviceViewType1D<uint32> keepFlags("keepFlags", s+1);
+	fill(delFlags, 0, s+1, 0u);
+	fill(keepFlags, 0, s+1, 0u);
+
+	using policy = Kokkos::RangePolicy<
+			pFlow::DefaultExecutionSpace,
+			Kokkos::Schedule<Kokkos::Static>,
+			Kokkos::IndexType<pFlow::uint32>>;
+
+	auto points = thisPoints();
+	uint32 numDeleted = 0;
+	auto p = boundaryPlane().infPlane();
+
+	Kokkos::parallel_reduce
+	(
+		"boundaryExit::beforeIteration",
+		policy(0,s),
+		LAMBDA_HD(uint32 i, uint32& delToUpdate)
+		{
+			if(p.pointInNegativeSide(points(i)))
+			{
+				delFlags(i)=1;
+				delToUpdate++;
+			}
+			else
+			{
+				keepFlags(i) = 1;
+			}
+		}, 
+		numDeleted
+	);
+	
+	// no point is deleted
+	if(numDeleted == 0 )
+	{
+		return true;
+	}
+
+	exclusiveScan(delFlags, 0u, s+1, delFlags, 0u);
+	exclusiveScan(keepFlags, 0u, s+1, keepFlags, 0u);
+	
+	deviceViewType1D<uint32> deleteList("deleteList", numDeleted);
+
+	Kokkos::parallel_for
+	(
+		"boundaryExit::parllel_for",
+		policy(0, size()),
+		LAMBDA_HD(uint32 i)
+		{
+			if(delFlags(i)!= delFlags(i+1))
+				deleteList(delFlags(i)) = i;
+		}	
+	);
+	Kokkos::fence();
+
+	deviceScatteredFieldAccess<uint32> deleteIndices(
+			numDeleted, 
+			deleteList,
+			indexList().deviceVectorAll());
+	
+	// tell internal to remove these points from its list 
+	if(!internal().deletePoints(deleteIndices))
+	{
+		fatalErrorInFunction<<
+		"error in deleting points from boundary "<< name()<<endl;
+		return false;
+	}
+
+	// delete these indices from your list 
+	if(numDeleted == s )
+	{
+		indexList().resize(0u);
+	}
+	else
+	{
+		uint newSize = s-numDeleted;
+		deviceViewType1D<uint32> newIndices("newIndices", newSize);
+		auto oldIndices = indexList().deviceVectorAll();
+
+		Kokkos::parallel_for(
+			"fillIndices",
+			policy(0,s),
+			LAMBDA_HD(uint32 i)
+			{
+				if(keepFlags(i)!= keepFlags(i+1))
+				{
+					newIndices(keepFlags(i)) = oldIndices(i);
+				}
+			}
+		);
+		Kokkos::fence();
+		copy(oldIndices, newIndices);
+		indexList().resize(newSize);
+	}
+
+	// notify your observers 
+
+	WARNING<<"notify observers in boundary exit "<<END_WARNING;
+	
 	return true;
 }
 
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
index 0d07f48b..2199fc60 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
@@ -61,7 +61,7 @@ public:
 		dictionary
 	);
 
-	bool beforeIteratoin(uint32 iterNum, real t) override;
+	bool beforeIteration(uint32 iterNum, real t, real dt) override;
 
 	bool iterate(uint32 iterNum, real t) override;
 
diff --git a/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp b/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
similarity index 65%
rename from src/phasicFlow/structuredData/pointStructure/boundaryList.cpp
rename to src/phasicFlow/structuredData/boundaries/boundaryList.cpp
index e4f14e22..005aca29 100644
--- a/src/phasicFlow/structuredData/pointStructure/boundaryList.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
@@ -19,8 +19,8 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "boundaryList.hpp"
-#include "internalPoints.hpp"
-#include "simulationDomain.hpp"
+#include "pointStructure.hpp"
+
 
 bool pFlow::boundaryList::resetLists()
 {
@@ -41,10 +41,10 @@ bool pFlow::boundaryList::updateLists()
 	dist[5] = boundary(5).neighborLength();
 
 	
-	internal_.updateFlag(
-			simDomain_.thisDomain(),
+	pStruct_.updateFlag(
+			pStruct_.simDomain().thisDomain(),
 			dist);
-	const auto& maskD = internal_.activePointsMaskDevice();
+	const auto& maskD = pStruct_.activePointsMaskDevice();
 	boundary(0).setSize( maskD.leftSize() );
 	boundary(1).setSize( maskD.rightSize() );
 	boundary(2).setSize( maskD.bottomSize() );
@@ -52,7 +52,7 @@ bool pFlow::boundaryList::updateLists()
 	boundary(4).setSize( maskD.rearSize() );
 	boundary(5).setSize( maskD.frontSize() );
 
-	internal_.fillNeighborsLists(
+	pStruct_.fillNeighborsLists(
 		boundary(0).indexList().deviceVectorAll(),
 		boundary(1).indexList().deviceVectorAll(),
 		boundary(2).indexList().deviceVectorAll(),
@@ -65,17 +65,16 @@ bool pFlow::boundaryList::updateLists()
 
 pFlow::boundaryList::boundaryList
 (
-    const simulationDomain &simD,
-    internalPoints &internal
+    pointStructure& pStruct
 )
 : 
-	ListPtr<boundaryBase>(simD.sizeOfBoundaries()),
-	internal_(internal),
-	simDomain_(simD),
+	ListPtr<boundaryBase>(pStruct.simDomain().sizeOfBoundaries()),
+	pStruct_(pStruct),
 	timeControl_
 	(
-		simDomain_.subDict("boundaries"), 
-		"update"
+		pStruct.simDomain().subDict("boundaries"), 
+		"update",
+		pStruct.currentTime()
 	)
 {}
 
@@ -92,16 +91,16 @@ bool pFlow::boundaryList::setLists()
 {
 	if(listSet_)return true;
 
-	for(auto i=0; i<simDomain_.sizeOfBoundaries();i++)
+	for(auto i=0; i<pStruct_.simDomain().sizeOfBoundaries();i++)
 	{
 		this->set
 		(
 			i,
 			boundaryBase::create
 			(
-				simDomain_.boundaryDict(i),
-				simDomain_.boundaryPlane(i),
-				internal_
+				pStruct_.simDomain().boundaryDict(i),
+				pStruct_.simDomain().boundaryPlane(i),
+				pStruct_
 			)
 		);
 	}
@@ -109,3 +108,54 @@ bool pFlow::boundaryList::setLists()
 
 	return true;
 }
+
+bool pFlow::boundaryList::beforeIteration
+(
+	uint32 iter, 
+	real t, 
+	real dt
+)
+{
+	// it is time to update lists 
+	if(timeControl_.timeEvent(iter, t, dt))
+	{
+		if(!updateLists())
+		{
+			fatalErrorInFunction;
+			return false;
+		}
+
+		WARNING<<"Maybe notification about the update list "<<END_WARNING;
+	}
+
+	for(auto& bdry:*this)
+	{
+		if( !bdry->beforeIteration(iter, t, dt))
+		{
+			fatalErrorInFunction<<
+			"Error in beforeIteration in boundary "<<bdry->name()<<endl;
+			return false;
+		}
+	}
+    return true;
+}
+
+bool pFlow::boundaryList::iterate
+(
+	uint32 iter, 
+	real t, 
+	real dt
+)
+{
+    return true;
+}
+
+bool pFlow::boundaryList::afterIteration
+(
+	uint32 iter, 
+	real t, 
+	real dt
+)
+{
+    return true;
+}
diff --git a/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp b/src/phasicFlow/structuredData/boundaries/boundaryList.hpp
similarity index 81%
rename from src/phasicFlow/structuredData/pointStructure/boundaryList.hpp
rename to src/phasicFlow/structuredData/boundaries/boundaryList.hpp
index 526eb761..d9e6ce75 100644
--- a/src/phasicFlow/structuredData/pointStructure/boundaryList.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryList.hpp
@@ -30,8 +30,7 @@ Licence:
 namespace pFlow
 {
 
-class simulationDomain;
-class internalPoints;
+class pointStructure;
 
 class boundaryList
 :
@@ -41,13 +40,11 @@ class boundaryList
 protected:
 
 	//// - data members
-        internalPoints& 		internal_;
-		
-        const simulationDomain& simDomain_;
+		pointStructure& 		pStruct_;
 
 		baseTimeControl 		timeControl_;
 
-        bool                    listSet_ = false;
+		bool                    listSet_ = false;
 
 		bool resetLists();
 
@@ -62,9 +59,7 @@ public:
 	
 
 	//// - Constructors
-	boundaryList(
-		const simulationDomain& simD, 
-		internalPoints& internal);
+	boundaryList(pointStructure& pStruct);
 
 
   	~boundaryList() = default;
@@ -73,8 +68,6 @@ public:
 	/// the time intervals
 	bool updateLists(uint32 iter, real t, real dt);
 
-	
-
 	bool setLists();
 
 	auto& boundary(size_t i)
@@ -84,8 +77,20 @@ public:
 
 	const auto& boundary(size_t i)const
 	{
-	return ListPtr<boundaryBase>::operator[](i);
+		return ListPtr<boundaryBase>::operator[](i);
 	}
+
+	const baseTimeControl& timeControl()const
+	{
+		return timeControl_;
+	}
+
+	bool beforeIteration(uint32 iter, real t, real dt);
+
+	bool iterate(uint32 iter, real t, real dt);
+
+	bool afterIteration(uint32 iter, real t, real dt);
+	
 };
 
 } // pFlow
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
index e3362956..9ac6b2b7 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
@@ -30,10 +30,11 @@ pFlow::boundaryNone::boundaryNone
 	boundaryBase(dict, bplane, internal)
 {}
 
-bool pFlow::boundaryNone::beforeIteratoin
+bool pFlow::boundaryNone::beforeIteration
 (
 	uint32 iterNum, 
-	real t
+	real t,
+	real dt
 )
 {
 	return true;
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp
index da93977e..332bedd3 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp
@@ -50,7 +50,7 @@ public:
 		dictionary
 	);
 
-	bool beforeIteratoin(uint32 iterNum, real t) override;
+	bool beforeIteration(uint32 iterNum, real t, real dt) override;
 
 	bool iterate(uint32 iterNum, real t) override;
 
diff --git a/src/phasicFlow/structuredData/plane/plane.hpp b/src/phasicFlow/structuredData/plane/plane.hpp
index 239b700b..93930a85 100644
--- a/src/phasicFlow/structuredData/plane/plane.hpp
+++ b/src/phasicFlow/structuredData/plane/plane.hpp
@@ -122,6 +122,11 @@ public:
 	// return the parallel plane to this plane 
 	plane parallelPlane(real distance)const;
 
+	infinitePlane infPlane()const
+	{
+		return infinitePlane(normal(), d());
+	}
+
 
 	static 
 	bool validPlane4(
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
index 2b092e94..e5766ab2 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
@@ -124,7 +124,21 @@ typename pFlow::internalPoints::PointsTypeHost
     return aPoints;
 }
 
-
+bool pFlow::internalPoints::deletePoints
+(
+	scatteredFieldAccess<uint32, memory_space> delPoints
+)
+{
+	if(!pFlagsD_.deletePoints(delPoints))
+	{
+		fatalErrorInFunction<<
+		"Error in deleting points from internal points"<<endl;
+		return false;
+	}
+	WARNING<<"Notify the observersin in internalPoints"<<END_WARNING;
+	pFlagSync_ = false;
+    return true;
+}
 
 FUNCTION_H
 pFlow::uint32 pFlow::internalPoints::updateFlag
@@ -133,6 +147,7 @@ pFlow::uint32 pFlow::internalPoints::updateFlag
 	const std::array<real,6>& dist
 )
 {
+	pFlagSync_ = false;
 	return pFlagsD_.markPointRegions
 	(
 		dm,
@@ -143,9 +158,7 @@ pFlow::uint32 pFlow::internalPoints::updateFlag
 		dist[3],
 		dist[4],
 		dist[5]
-	);
-
-	pFlagSync_ = false;
+	);	
 }
 
 void pFlow::internalPoints::fillNeighborsLists
@@ -166,7 +179,6 @@ void pFlow::internalPoints::fillNeighborsLists
 		rearList,
 		frontList);
 		
-	pFlagSync_ = false;
 }
 
 FUNCTION_H
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
index 91ed9de3..17413878 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
@@ -166,6 +166,11 @@ public:
 			return pFlagsD_.activeRange();
 		}
 
+		///@brief delete points at indices given in delPoints.
+		/// The default is that delPoints contains sorted indices 
+		FUNCTION_H
+		bool deletePoints(
+			scatteredFieldAccess<uint32, memory_space> delPoints);
 		
 		FUNCTION_H
 		uint32 updateFlag(
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
index 83dbcec9..911ea654 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
@@ -23,6 +23,7 @@ Licence:
 
 #include "phasicFlowKokkos.hpp"
 #include "domain.hpp"
+#include "scatteredFieldAccess.hpp"
 
 namespace pFlow
 {
@@ -260,6 +261,9 @@ public:
 		ViewType1D<realx3, memory_space> points);
 
 	
+	bool deletePoints(
+		scatteredFieldAccess<uint32, memory_space> points);
+	
 	/// @brief mark points based on their position in the domain.
 	/// This should be the first method to be called when updating
 	/// boundaries (step 1 of 2).
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
index c5eaa78c..46a26828 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
@@ -148,6 +148,55 @@ pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::scanPointFlag()
 	return numActive;
 }*/
 
+template<typename ExecutionSpace>
+bool pFlow::pointFlag<ExecutionSpace>::deletePoints
+(
+	scatteredFieldAccess<uint32, memory_space>  points
+)
+{
+	if(points.empty())return true;
+	
+	uint32 minIndex = points.getFirstCopy();
+	uint32 maxIndex = points.getLastCopy();
+	
+	if(maxIndex<minIndex) return false;
+	if(maxIndex>activeRange_.end())return false;
+	if(minIndex<activeRange_.start())return false;
+
+	using policy = Kokkos::RangePolicy<
+		execution_space,  
+		Kokkos::IndexType<uint32>>;
+
+	uint32 numDeleted = 0;
+	Kokkos::parallel_reduce
+	(
+		"pointFlagKernels::deletePoints",
+		policy(0u, points.size()),
+		CLASS_LAMBDA_HD(uint32 i, uint32& valDelUpdate)
+		{
+			uint32 n = points(i);
+			if(isActive(n))
+			{
+				valDelUpdate++;
+				flags_[n] = Flag::DELETED;
+			}
+		},
+		numDeleted
+	);	
+
+	if(numDeleted >= numActive_)
+	{
+		activeRange_ = {0, 0};
+		numDeleted == numActive_;
+	}
+		
+	numActive_ 	= numActive_ - numDeleted;
+	isAllActive_ = 
+		(activeRange_.numElements() == numActive_)&& numActive_>0;
+	
+	return true;
+}
+
 
 template<typename ExecutionSpace>
 pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markPointRegions
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
index 54214a92..dcba001d 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
@@ -114,17 +114,17 @@ pFlow::pointStructure::pointStructure
 	),
 	boundaries_
 	(
-		simulationDomain_(),
-		*this
+        *this
 	)
 {
-    REPORT(0)<< "Reading point structure from "<<
-    IOobject::path()<<END_REPORT;
+    REPORT(0)<< "Reading "<< Green_Text("point structure")<<
+    " from "<<IOobject::path()<<END_REPORT;
 
     if( !IOobject::readObject() )
     {
         fatalErrorInFunction<<
         "Error in reading from file "<<IOobject::path()<<endl;
+        fatalExit;
     }
 }
 
@@ -153,7 +153,6 @@ pFlow::pointStructure::pointStructure(
 	),
 	boundaries_
 	(
-		simulationDomain_(),
 		*this
 	)
 {

From 182e156786694ece1e1d88fb0c5c55f8fb80769e Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Mon, 29 Jan 2024 07:57:19 -0800
Subject: [PATCH 30/60] sphereParticles tested on CPU, iteration, write to
 file, particle deletion

---
 .../AdamsBashforth2/AdamsBashforth2.cpp       | 39 ++++++----
 .../AdamsBashforth2/AdamsBashforth2.hpp       | 11 +++
 .../AdamsBashforth3/AdamsBashforth3.cpp       |  6 +-
 .../AdamsBashforth3/AdamsBashforth3.hpp       |  6 +-
 .../AdamsBashforth4/AdamsBashforth4.cpp       |  6 +-
 .../AdamsBashforth4/AdamsBashforth4.hpp       |  6 +-
 .../AdamsBashforth5/AdamsBashforth5.cpp       |  6 +-
 .../AdamsBashforth5/AdamsBashforth5.hpp       |  6 +-
 .../AdamsMoulton3/AdamsMoulton3.cpp           | 20 +++---
 .../AdamsMoulton3/AdamsMoulton3.hpp           | 20 +++---
 .../AdamsMoulton4/AdamsMoulton4.cpp           | 24 +++----
 .../AdamsMoulton4/AdamsMoulton4.hpp           | 24 +++----
 .../AdamsMoulton5/AdamsMoulton5.cpp           | 28 ++++----
 .../AdamsMoulton5/AdamsMoulton5.hpp           | 28 ++++----
 src/Integration/integration/integration.hpp   |  6 ++
 .../sphereParticles/sphereParticles.cpp       | 34 ++++-----
 .../dynamicPointStructure.cpp                 | 38 ++++++----
 .../dynamicPointStructure.hpp                 | 12 ++--
 .../containers/VectorHD/VectorDual.hpp        | 72 +++++++++----------
 .../VectorHD/VectorDualAlgorithms.hpp         | 12 ++--
 .../containers/VectorHD/VectorSingle.cpp      | 39 +++++-----
 .../containers/VectorHD/VectorSingle.hpp      | 29 ++++----
 .../VectorHD/VectorSingleAlgorithms.hpp       |  6 +-
 .../containers/pointField/internalField.cpp   | 13 +---
 .../containers/pointField/internalField.hpp   | 18 +++--
 .../pointField/internalFieldAlgorithms.hpp    | 12 ++--
 .../pointField/pointFieldAlgorithms.hpp       | 24 +++----
 src/phasicFlow/ranges/stridedRange.hpp        | 20 +++++-
 .../repository/Time/baseTimeControl.cpp       |  5 +-
 .../repository/Time/timeControl.cpp           |  2 +-
 .../boundaries/boundaryBase/boundaryBase.cpp  | 42 ++++++-----
 .../boundaries/boundaryBase/boundaryBase.hpp  |  8 ++-
 .../boundaries/boundaryExit/boundaryExit.cpp  | 17 +++--
 .../boundaries/boundaryList.cpp               | 14 ++--
 .../pointStructure/internalPoints.cpp         | 29 +++-----
 .../pointStructure/internalPoints.hpp         |  4 +-
 .../pointStructure/pointFlag.hpp              | 35 ++++-----
 .../pointStructure/pointFlagKernels.hpp       | 19 ++---
 .../pointStructure/pointStructure.cpp         |  7 ++
 .../selectors/selectBox/selectBox.cpp         |  2 +-
 .../trisurfaceStructure/multiTriSurface.cpp   |  8 +--
 .../trisurfaceStructure/triSurface.cpp        |  2 +-
 .../trisurfaceStructure/triSurface.hpp        | 12 ++--
 .../trisurfaceStructure/triSurfaceKernels.hpp |  6 +-
 src/setHelpers/setProperty.hpp                |  5 +-
 .../particlesPhasicFlow.cpp                   |  4 +-
 .../positionParticles/positionParticles.hpp   |  3 +-
 .../positionRandom/positionRandom.cpp         |  6 +-
 48 files changed, 424 insertions(+), 371 deletions(-)

diff --git a/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp b/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp
index 4c6a05cc..01fc695a 100644
--- a/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp
+++ b/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp
@@ -35,20 +35,20 @@ using rpIntegration = Kokkos::RangePolicy<
 
 bool intAllActive(
 	real dt, 
-	realx3PointField_D& y, 
+	realx3Field_D& y, 
 	realx3PointField_D& dy,
 	realx3PointField_D& dy1)
 {
 
-	auto d_dy = dy.fieldDevice();
-	auto d_y  = y.fieldDevice();
-	auto d_dy1= dy1.fieldDevice();
+	auto d_dy = dy.deviceView();
+	auto d_y  = y.deviceView();
+	auto d_dy1= dy1.deviceView();
 	auto activeRng = dy1.activeRange();
 
 	Kokkos::parallel_for(
 		"AdamsBashforth2::correct",
 		rpIntegration (activeRng.start(), activeRng.end()),
-		LAMBDA_HD(int32 i){
+		LAMBDA_HD(uint32 i){
 			d_y[i] +=  dt*(static_cast<real>(1.5) * d_dy[i] - static_cast<real>(0.5) * d_dy1[i]);
 			d_dy1[i] = d_dy[i];
 		});
@@ -60,22 +60,22 @@ bool intAllActive(
 bool intScattered
 (
 	real dt, 
-	realx3PointField_D& y,
+	realx3Field_D& y,
 	realx3PointField_D& dy,
 	realx3PointField_D& dy1
 )
 {
 
-	auto d_dy 		= dy.fieldDevice();
-	auto d_y  		= y.fieldDevice();
-	auto d_dy1		= dy1.fieldDevice();
+	auto d_dy 		= dy.deviceView();
+	auto d_y  		= y.deviceView();
+	auto d_dy1		= dy1.deviceView();
 	auto activeRng 	= dy1.activeRange();
 	const auto& activeP = dy1.activePointsMaskDevice();
 
 	Kokkos::parallel_for(
 		"AdamsBashforth2::correct",
 		rpIntegration (activeRng.start(), activeRng.end()),
-		LAMBDA_HD(int32 i){
+		LAMBDA_HD(uint32 i){
 			if( activeP(i))
 			{
 				d_y[i] +=  dt*(static_cast<real>(1.5) * d_dy[i] - static_cast<real>(0.5) * d_dy1[i]);
@@ -122,16 +122,30 @@ bool pFlow::AdamsBashforth2::predict
 	realx3PointField_D& UNUSED(dy)
 )
 {
-
 	return true;
 }
 
+bool pFlow::AdamsBashforth2::predict
+(
+	real dt, 
+	realx3Field_D &y, 
+	realx3PointField_D &dy
+)
+{
+    return true;
+}
+
 bool pFlow::AdamsBashforth2::correct
 (
 	real dt,
 	realx3PointField_D& y,
 	realx3PointField_D& dy
 )
+{
+	return correct(dt, y.field(), dy);
+}
+
+bool pFlow::AdamsBashforth2::correct(real dt, realx3Field_D &y, realx3PointField_D &dy)
 {
 	auto& dy1l = dy1();
 
@@ -143,8 +157,7 @@ bool pFlow::AdamsBashforth2::correct
 	{
 		return intScattered(dt, y, dy, dy1l);
 	}
-
-	return true;
+    return false;
 }
 
 bool pFlow::AdamsBashforth2::setInitialVals(
diff --git a/src/Integration/AdamsBashforth2/AdamsBashforth2.hpp b/src/Integration/AdamsBashforth2/AdamsBashforth2.hpp
index 54e1c421..863bd8a1 100644
--- a/src/Integration/AdamsBashforth2/AdamsBashforth2.hpp
+++ b/src/Integration/AdamsBashforth2/AdamsBashforth2.hpp
@@ -81,12 +81,23 @@ public:
 			real UNUSED(dt), 
 			realx3PointField_D& UNUSED(y), 
 			realx3PointField_D& UNUSED(dy)) final;
+		
+		bool predict(
+			real dt, 
+			realx3Field_D& y, 
+			realx3PointField_D& dy) final;
 
 		bool correct(
 			real dt, 
 			realx3PointField_D& y, 
 			realx3PointField_D& dy) final;
 
+		bool correct(
+			real dt, 
+			realx3Field_D& y, 
+			realx3PointField_D& dy);
+		
+
 		bool setInitialVals(
 			const int32IndexContainer& newIndices,
 			const realx3Vector& y) final;
diff --git a/src/Integration/AdamsBashforth3/AdamsBashforth3.cpp b/src/Integration/AdamsBashforth3/AdamsBashforth3.cpp
index 040a9e40..f8ec6b5a 100644
--- a/src/Integration/AdamsBashforth3/AdamsBashforth3.cpp
+++ b/src/Integration/AdamsBashforth3/AdamsBashforth3.cpp
@@ -89,9 +89,9 @@ bool pFlow::AdamsBashforth3::intAll(
 	realx3Vector_D& dy, 
 	range activeRng)
 {
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
-	auto d_history = history_.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
+	auto d_history = history_.deviceViewAll();
 
 	Kokkos::parallel_for(
 		"AdamsBashforth3::correct",
diff --git a/src/Integration/AdamsBashforth3/AdamsBashforth3.hpp b/src/Integration/AdamsBashforth3/AdamsBashforth3.hpp
index 6bd47b11..279fdcda 100644
--- a/src/Integration/AdamsBashforth3/AdamsBashforth3.hpp
+++ b/src/Integration/AdamsBashforth3/AdamsBashforth3.hpp
@@ -160,9 +160,9 @@ bool pFlow::AdamsBashforth3::intRange(
 	realx3Vector_D& dy,
 	activeFunctor activeP )
 {
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
-	auto d_history = history_.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
+	auto d_history = history_.deviceViewAll();
 	auto activeRng = activeP.activeRange();
 
 	Kokkos::parallel_for(
diff --git a/src/Integration/AdamsBashforth4/AdamsBashforth4.cpp b/src/Integration/AdamsBashforth4/AdamsBashforth4.cpp
index 547de93f..23bad29b 100644
--- a/src/Integration/AdamsBashforth4/AdamsBashforth4.cpp
+++ b/src/Integration/AdamsBashforth4/AdamsBashforth4.cpp
@@ -89,9 +89,9 @@ bool pFlow::AdamsBashforth4::intAll(
 	realx3Vector_D& dy, 
 	range activeRng)
 {
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
-	auto d_history = history_.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
+	auto d_history = history_.deviceViewAll();
 
 	Kokkos::parallel_for(
 		"AdamsBashforth4::correct",
diff --git a/src/Integration/AdamsBashforth4/AdamsBashforth4.hpp b/src/Integration/AdamsBashforth4/AdamsBashforth4.hpp
index 4f4a2914..cf1f50d8 100644
--- a/src/Integration/AdamsBashforth4/AdamsBashforth4.hpp
+++ b/src/Integration/AdamsBashforth4/AdamsBashforth4.hpp
@@ -165,9 +165,9 @@ bool pFlow::AdamsBashforth4::intRange(
 	realx3Vector_D& dy,
 	activeFunctor activeP )
 {
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
-	auto d_history = history_.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
+	auto d_history = history_.deviceViewAll();
 	auto activeRng = activeP.activeRange();
 
 	Kokkos::parallel_for(
diff --git a/src/Integration/AdamsBashforth5/AdamsBashforth5.cpp b/src/Integration/AdamsBashforth5/AdamsBashforth5.cpp
index 580f0c06..7b87a4a3 100644
--- a/src/Integration/AdamsBashforth5/AdamsBashforth5.cpp
+++ b/src/Integration/AdamsBashforth5/AdamsBashforth5.cpp
@@ -89,9 +89,9 @@ bool pFlow::AdamsBashforth5::intAll(
 	realx3Vector_D& dy, 
 	range activeRng)
 {
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
-	auto d_history = history_.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
+	auto d_history = history_.deviceViewAll();
 
 	Kokkos::parallel_for(
 		"AdamsBashforth5::correct",
diff --git a/src/Integration/AdamsBashforth5/AdamsBashforth5.hpp b/src/Integration/AdamsBashforth5/AdamsBashforth5.hpp
index 99261588..16b55927 100644
--- a/src/Integration/AdamsBashforth5/AdamsBashforth5.hpp
+++ b/src/Integration/AdamsBashforth5/AdamsBashforth5.hpp
@@ -165,9 +165,9 @@ bool pFlow::AdamsBashforth5::intRange(
 	realx3Vector_D& dy,
 	activeFunctor activeP )
 {
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
-	auto d_history = history_.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
+	auto d_history = history_.deviceViewAll();
 	auto activeRng = activeP.activeRange();
 
 	Kokkos::parallel_for(
diff --git a/src/Integration/AdamsMoulton3/AdamsMoulton3.cpp b/src/Integration/AdamsMoulton3/AdamsMoulton3.cpp
index cb819c7c..4fb030bf 100644
--- a/src/Integration/AdamsMoulton3/AdamsMoulton3.cpp
+++ b/src/Integration/AdamsMoulton3/AdamsMoulton3.cpp
@@ -124,11 +124,11 @@ bool pFlow::AdamsMoulton3::predictAll(
 	range activeRng)
 {
 
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
-	auto d_y0 = y0_.deviceVectorAll();
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_dy1= dy1_.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
+	auto d_y0 = y0_.deviceViewAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_dy1= dy1_.deviceViewAll();
 
 	Kokkos::parallel_for(
 		"AdamsMoulton3::predict",
@@ -150,12 +150,12 @@ bool pFlow::AdamsMoulton3::intAll(
 	range activeRng)
 {
 
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
 
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_y0  = y0_.deviceVectorAll();
-	auto d_dy1 = dy1_.deviceVectorAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_y0  = y0_.deviceViewAll();
+	auto d_dy1 = dy1_.deviceViewAll();
 
 	Kokkos::parallel_for(
 		"AdamsMoulton3::correct",
diff --git a/src/Integration/AdamsMoulton3/AdamsMoulton3.hpp b/src/Integration/AdamsMoulton3/AdamsMoulton3.hpp
index 349d62b2..3193a819 100644
--- a/src/Integration/AdamsMoulton3/AdamsMoulton3.hpp
+++ b/src/Integration/AdamsMoulton3/AdamsMoulton3.hpp
@@ -144,11 +144,11 @@ bool AdamsMoulton3::predictRange(
 	realx3Vector_D& dy,
 	activeFunctor activeP)
 {
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
-	auto d_y0 = y0_.deviceVectorAll();
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_dy1= dy1_.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
+	auto d_y0 = y0_.deviceViewAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_dy1= dy1_.deviceViewAll();
 	
 	auto activeRng = activeP.activeRange();
 
@@ -182,12 +182,12 @@ bool pFlow::AdamsMoulton3::intRange(
 	activeFunctor activeP)
 {
 
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
 
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_y0  = y0_.deviceVectorAll();
-	auto d_dy1 = dy1_.deviceVectorAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_y0  = y0_.deviceViewAll();
+	auto d_dy1 = dy1_.deviceViewAll();
 
 	auto activeRng = activeP.activeRange();
 
diff --git a/src/Integration/AdamsMoulton4/AdamsMoulton4.cpp b/src/Integration/AdamsMoulton4/AdamsMoulton4.cpp
index ec735ac8..3cdbbc8f 100644
--- a/src/Integration/AdamsMoulton4/AdamsMoulton4.cpp
+++ b/src/Integration/AdamsMoulton4/AdamsMoulton4.cpp
@@ -135,13 +135,13 @@ bool pFlow::AdamsMoulton4::predictAll(
 	range activeRng)
 {
 
-	auto d_dy  = dy.deviceVectorAll();
-	auto d_y   = y.deviceVectorAll();
+	auto d_dy  = dy.deviceViewAll();
+	auto d_y   = y.deviceViewAll();
 
-	auto d_y0  = y0_.deviceVectorAll();
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_dy1 = dy1_.deviceVectorAll();
-	auto d_dy2 = dy2_.deviceVectorAll();
+	auto d_y0  = y0_.deviceViewAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_dy1 = dy1_.deviceViewAll();
+	auto d_dy2 = dy2_.deviceViewAll();
 
 	Kokkos::parallel_for(
 		"AdamsMoulton4::predict",
@@ -165,13 +165,13 @@ bool pFlow::AdamsMoulton4::intAll(
 	range activeRng)
 {
 
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
 
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_y0  = y0_.deviceVectorAll();
-	auto d_dy1 = dy1_.deviceVectorAll();
-	auto d_dy2 = dy2_.deviceVectorAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_y0  = y0_.deviceViewAll();
+	auto d_dy1 = dy1_.deviceViewAll();
+	auto d_dy2 = dy2_.deviceViewAll();
 
 	Kokkos::parallel_for(
 		"AdamsMoulton4::correct",
diff --git a/src/Integration/AdamsMoulton4/AdamsMoulton4.hpp b/src/Integration/AdamsMoulton4/AdamsMoulton4.hpp
index c0da0f62..3950798a 100644
--- a/src/Integration/AdamsMoulton4/AdamsMoulton4.hpp
+++ b/src/Integration/AdamsMoulton4/AdamsMoulton4.hpp
@@ -147,13 +147,13 @@ bool AdamsMoulton4::predictRange(
 	realx3Vector_D& dy,
 	activeFunctor activeP )
 {
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
 
-	auto d_y0 = y0_.deviceVectorAll();
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_dy1 = dy1_.deviceVectorAll();
-	auto d_dy2 = dy2_.deviceVectorAll();
+	auto d_y0 = y0_.deviceViewAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_dy1 = dy1_.deviceViewAll();
+	auto d_dy2 = dy2_.deviceViewAll();
 	
 	auto activeRng = activeP.activeRange();
 
@@ -185,13 +185,13 @@ bool pFlow::AdamsMoulton4::intRange(
 	activeFunctor activeP )
 {
 
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
 
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_y0  = y0_.deviceVectorAll();
-	auto d_dy1 = dy1_.deviceVectorAll();
-	auto d_dy2 = dy2_.deviceVectorAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_y0  = y0_.deviceViewAll();
+	auto d_dy1 = dy1_.deviceViewAll();
+	auto d_dy2 = dy2_.deviceViewAll();
 
 	auto activeRng = activeP.activeRange();
 
diff --git a/src/Integration/AdamsMoulton5/AdamsMoulton5.cpp b/src/Integration/AdamsMoulton5/AdamsMoulton5.cpp
index c3f62f18..37629649 100644
--- a/src/Integration/AdamsMoulton5/AdamsMoulton5.cpp
+++ b/src/Integration/AdamsMoulton5/AdamsMoulton5.cpp
@@ -145,14 +145,14 @@ bool pFlow::AdamsMoulton5::predictAll(
 	range activeRng)
 {
 
-	auto d_dy  = dy.deviceVectorAll();
-	auto d_y   = y.deviceVectorAll();
+	auto d_dy  = dy.deviceViewAll();
+	auto d_y   = y.deviceViewAll();
 
-	auto d_y0  = y0_.deviceVectorAll();
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_dy1 = dy1_.deviceVectorAll();
-	auto d_dy2 = dy2_.deviceVectorAll();
-	auto d_dy3 = dy3_.deviceVectorAll();
+	auto d_y0  = y0_.deviceViewAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_dy1 = dy1_.deviceViewAll();
+	auto d_dy2 = dy2_.deviceViewAll();
+	auto d_dy3 = dy3_.deviceViewAll();
 
 	Kokkos::parallel_for(
 		"AdamsMoulton5::predict",
@@ -178,14 +178,14 @@ bool pFlow::AdamsMoulton5::intAll(
 	range activeRng)
 {
 
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
 
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_y0  = y0_.deviceVectorAll();
-	auto d_dy1 = dy1_.deviceVectorAll();
-	auto d_dy2 = dy2_.deviceVectorAll();
-	auto d_dy3 = dy3_.deviceVectorAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_y0  = y0_.deviceViewAll();
+	auto d_dy1 = dy1_.deviceViewAll();
+	auto d_dy2 = dy2_.deviceViewAll();
+	auto d_dy3 = dy3_.deviceViewAll();
 
 	Kokkos::parallel_for(
 		"AdamsMoulton5::correct",
diff --git a/src/Integration/AdamsMoulton5/AdamsMoulton5.hpp b/src/Integration/AdamsMoulton5/AdamsMoulton5.hpp
index 2e381d4a..451ff81f 100644
--- a/src/Integration/AdamsMoulton5/AdamsMoulton5.hpp
+++ b/src/Integration/AdamsMoulton5/AdamsMoulton5.hpp
@@ -150,14 +150,14 @@ bool AdamsMoulton5::predictRange(
 	realx3Vector_D& dy,
 	activeFunctor activeP )
 {
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
 
-	auto d_y0 = y0_.deviceVectorAll();
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_dy1 = dy1_.deviceVectorAll();
-	auto d_dy2 = dy2_.deviceVectorAll();
-	auto d_dy3 = dy3_.deviceVectorAll();
+	auto d_y0 = y0_.deviceViewAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_dy1 = dy1_.deviceViewAll();
+	auto d_dy2 = dy2_.deviceViewAll();
+	auto d_dy3 = dy3_.deviceViewAll();
 	
 	auto activeRng = activeP.activeRange();
 
@@ -189,14 +189,14 @@ bool pFlow::AdamsMoulton5::intRange(
 	activeFunctor activeP )
 {
 
-	auto d_dy = dy.deviceVectorAll();
-	auto d_y  = y.deviceVectorAll();
+	auto d_dy = dy.deviceViewAll();
+	auto d_y  = y.deviceViewAll();
 
-	auto d_dy0 = dy0_.deviceVectorAll();
-	auto d_y0  = y0_.deviceVectorAll();
-	auto d_dy1 = dy1_.deviceVectorAll();
-	auto d_dy2 = dy2_.deviceVectorAll();
-	auto d_dy3 = dy3_.deviceVectorAll();
+	auto d_dy0 = dy0_.deviceViewAll();
+	auto d_y0  = y0_.deviceViewAll();
+	auto d_dy1 = dy1_.deviceViewAll();
+	auto d_dy2 = dy2_.deviceViewAll();
+	auto d_dy3 = dy3_.deviceViewAll();
 
 	auto activeRng = activeP.activeRange();
 
diff --git a/src/Integration/integration/integration.hpp b/src/Integration/integration/integration.hpp
index 334e328e..4769c3ec 100644
--- a/src/Integration/integration/integration.hpp
+++ b/src/Integration/integration/integration.hpp
@@ -139,10 +139,16 @@ public:
 		virtual 
 		bool predict(real dt, realx3PointField_D& y, realx3PointField_D& dy) = 0;
 
+		virtual 
+		bool predict(real dt, realx3Field_D& y, realx3PointField_D& dy) = 0;
+
 		/// Correction/main integration step
 		virtual 
 		bool correct(real dt, realx3PointField_D& y, realx3PointField_D& dy) = 0;
 
+		virtual 
+		bool correct(real dt, realx3Field_D& y, realx3PointField_D& dy) = 0;
+
 		/// Set the initial values for new indices 
 		virtual 
 		bool setInitialVals(
diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp b/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
index 517c4e86..03373f87 100644
--- a/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
@@ -219,11 +219,11 @@ bool pFlow::sphereParticles::initInertia()
 	auto aPointsMask 	= dynPointStruct().activePointsMaskDevice();
 	auto aRange 		= aPointsMask.activeRange();
 	
-	auto field_shapeIndex 	= shapeIndex().fieldDevice();
-	auto field_diameter 	= diameter_.fieldDevice();
-	auto field_mass 		= mass_.fieldDevice();
-	auto field_propId 		= propertyId_.fieldDevice();
-	auto field_I 			= I_.fieldDevice();
+	auto field_shapeIndex 	= shapeIndex().deviceView();
+	auto field_diameter 	= diameter_.deviceView();
+	auto field_mass 		= mass_.deviceView();
+	auto field_propId 		= propertyId_.deviceView();
+	auto field_I 			= I_.deviceView();
 
 	// get info from spheres shape 
 	realVector_D d("diameter", spheres_.boundingDiameter());
@@ -231,10 +231,10 @@ bool pFlow::sphereParticles::initInertia()
 	uint32Vector_D propId("propId", spheres_.shapePropertyIds());
 	realVector_D  I("I", spheres_.Inertia());
 
-	auto d_d 		= d.deviceVector();
-	auto d_mass 	= mass.deviceVector();
-	auto d_propId 	= propId.deviceVector();
-	auto d_I 		= I.deviceVector();
+	auto d_d 		= d.deviceView();
+	auto d_mass 	= mass.deviceView();
+	auto d_propId 	= propId.deviceView();
+	auto d_I 		= I.deviceView();
 		
 	Kokkos::parallel_for(
 		"particles::initInertia",
@@ -385,7 +385,7 @@ pFlow::sphereParticles::sphereParticles(
 		auto index = indexHD.indicesHost();
 
 		realx3Vector rvel(n,RESERVE());
-		const auto hrVel = rVelocity_.hostVector();
+		const auto hrVel = rVelocity_.hostView();
 
 		for(auto i=0; i<n; i++)
 		{
@@ -464,7 +464,7 @@ bool pFlow::sphereParticles::beforeIteration()
 		rVelIntegration_().predict(dt(),rVelocity_, rAcceleration_);
 	intPredictTimer_.end();
 	
-	WARNING<<"pFlow::sphereParticles::beforeIteration()"<<END_WARNING;
+	//WARNING<<"pFlow::sphereParticles::beforeIteration()"<<END_WARNING;
 	return true;
 }
 
@@ -475,13 +475,13 @@ bool pFlow::sphereParticles::iterate()
 	accelerationTimer_.start();
 		pFlow::sphereParticlesKernels::acceleration(
 			control().g(),
-			mass().fieldDevice(),
-			contactForce().fieldDevice(),
-			I().fieldDevice(),
-			contactTorque().fieldDevice(),
+			mass().deviceView(),
+			contactForce().deviceView(),
+			I().deviceView(),
+			contactTorque().deviceView(),
 			dynPointStruct().activePointsMaskDevice(),
-			accelertion().fieldDevice(),
-			rAcceleration().fieldDevice()
+			accelertion().deviceView(),
+			rAcceleration().deviceView()
 			);
 	accelerationTimer_.end();
 	
diff --git a/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp b/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
index 122d2392..4fbeeecb 100644
--- a/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
+++ b/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
@@ -78,16 +78,28 @@ pFlow::dynamicPointStructure::dynamicPointStructure
 
 }
 
-bool pFlow::dynamicPointStructure::predict
-(
-	real dt,
-	realx3PointField_D& acceleration
-)
+/*bool pFlow::dynamicPointStructure::beforeIteration()
 {
-	//auto& pos = pStruct().pointPosition();
+	pointStructure::beforeIteration();
+	auto& acc = time().lookupObject<realx3PointField_D>("acceleration");
+    return predict(dt(), acc);
+}*/
 
-	//if(!integrationPos_().predict(dt, pos.VectorField(), velocity_.VectorField() ))return false;
-	//if(!integrationVel_().predict(dt, velocity_.VectorField(), acceleration.VectorField()))return false;
+/*bool pFlow::dynamicPointStructure::iterate()
+{
+	pointStructure::iterate();
+	auto& acc = time().lookupObject<realx3PointField_D>("acceleration");
+    return correct(dt(), acc);
+    
+}*/
+
+bool pFlow::dynamicPointStructure::predict(
+    real dt,
+    realx3PointField_D &acceleration)
+{
+	
+	if(!integrationPos_().predict(dt, pointPosition(), velocity_ ))return false;
+	if(!integrationVel_().predict(dt, velocity_, acceleration))return false;
 
 	return true;
 }
@@ -100,9 +112,9 @@ bool pFlow::dynamicPointStructure::correct
 {
 	//auto& pos = pStruct().pointPosition();
 	
-	//if(!integrationPos_().correct(dt, pos.VectorField(), velocity_.VectorField() ))return false;
+	if(!integrationPos_().correct(dt, pointPosition(), velocity_) )return false;
 	
-	//if(!integrationVel_().correct(dt, velocity_.VectorField(), acceleration.VectorField()))return false;
+	if(!integrationVel_().correct(dt, velocity_, acceleration))return false;
 
 	return true;	
 }
@@ -121,7 +133,7 @@ pFlow::uniquePtr<pFlow::int32IndexContainer> pFlow::dynamicPointStructure::inser
 
 	if(!integrationPos_().needSetInitialVals()) return newIndicesPtr;
 
-	auto hVel = velocity_.hostVector();
+	auto hVel = velocity_.hostView();
 	auto n = newIndicesPtr().size();
 	auto index = newIndicesPtr().indicesHost();
 
@@ -158,8 +170,8 @@ pFlow::uniquePtr<pFlow::int32IndexContainer> pFlow::dynamicPointStructure::inser
 
 		realx3Vector pos(n,RESERVE());
 		realx3Vector vel(n,RESERVE());
-		const auto hVel = velocity().hostVector();
-		const auto hPos = pStruct().pointPosition().hostVector();
+		const auto hVel = velocity().hostView();
+		const auto hPos = pStruct().pointPosition().hostView();
 
 		for(auto i=0; i<n; i++)
 		{
diff --git a/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp b/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp
index d2e72659..80f006a1 100644
--- a/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp
+++ b/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp
@@ -80,10 +80,14 @@ public:
 		return velocity_;
 	}
 
-	/*inline auto velocityHostAll()
-	{
-		return velocity_.hostVectorAll();
-	}*/
+	/// In the time loop before iterate
+	//bool beforeIteration() override;
+
+	/// @brief This is called in time loop. Perform the main calculations 
+	/// when the component should evolve along time.
+	//bool iterate() override;
+
+		
 
 	bool predict(real dt, realx3PointField_D& acceleration);
 
diff --git a/src/phasicFlow/containers/VectorHD/VectorDual.hpp b/src/phasicFlow/containers/VectorHD/VectorDual.hpp
index aa39549e..407c10e5 100644
--- a/src/phasicFlow/containers/VectorHD/VectorDual.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorDual.hpp
@@ -259,8 +259,8 @@ public:
 				dualView_.clear_sync_state();
 			}
 
-			Kokkos::deep_copy(hostVector(), src.hostVector());
-			Kokkos::deep_copy(deviceVector(), src.deviceVector());
+			Kokkos::deep_copy(hostView(), src.hostView());
+			Kokkos::deep_copy(deviceView(), src.deviceView());
 		}
 
 		// copy construct with new name 
@@ -280,8 +280,8 @@ public:
 				dualView_.clear_sync_state();
 			}
 
-			Kokkos::deep_copy(hostVector(), src.hostVector());
-			Kokkos::deep_copy(deviceVector(), src.deviceVector());
+			Kokkos::deep_copy(hostView(), src.hostView());
+			Kokkos::deep_copy(deviceView(), src.deviceView());
 		}
 
 		// - copy assignment 
@@ -332,53 +332,53 @@ public:
 		}
 
 		// - Device vector
-		INLINE_FUNCTION_H deviceViewType& deviceVectorAll(){
+		INLINE_FUNCTION_H deviceViewType& deviceViewAll(){
 			return dualView_.d_view;
 		}
 
 		// - Device vector 
-		INLINE_FUNCTION_H const deviceViewType& deviceVectorAll() const {
+		INLINE_FUNCTION_H const deviceViewType& deviceViewAll() const {
 			return dualView_.d_view;
 		}
 
 		// - Host vector
-		INLINE_FUNCTION_H hostViewType& hostVectorAll(){
+		INLINE_FUNCTION_H hostViewType& hostViewAll(){
 			return dualView_.h_view;
 		}
 
 		// - Host Vector
-		INLINE_FUNCTION_H const hostViewType& hostVectorAll() const {
+		INLINE_FUNCTION_H const hostViewType& hostViewAll() const {
 			return dualView_.h_view;
 		}
 
-		INLINE_FUNCTION_H deviceViewType& deviceVector(){
+		INLINE_FUNCTION_H deviceViewType& deviceView(){
 			updateSubViews();
 			return deviceSubView_;
 		}
 
-		INLINE_FUNCTION_H const deviceViewType& deviceVector() const{
+		INLINE_FUNCTION_H const deviceViewType& deviceView() const{
 			updateSubViews();
 			return deviceSubView_;
 		}
 
-		INLINE_FUNCTION_H hostViewType& hostVector(){
+		INLINE_FUNCTION_H hostViewType& hostView(){
 			updateSubViews();
 			return hostSubView_;
 		}
 
-		INLINE_FUNCTION_H const hostViewType& hostVector()const{
+		INLINE_FUNCTION_H const hostViewType& hostView()const{
 			updateSubViews();
 			return hostSubView_;
 		}
 
 		INLINE_FUNCTION_H
-		hostViewType hostVector(int32 start, int32 end)const
+		hostViewType hostView(int32 start, int32 end)const
 		{
 			return Kokkos::subview(dualView_.h_view, Kokkos::make_pair(start,end));
 		}
 
 		INLINE_FUNCTION_H
-		deviceViewType deviceVector(int32 start, int32 end)const
+		deviceViewType deviceView(int32 start, int32 end)const
 		{
 			return Kokkos::subview(dualView_.d_view, Kokkos::make_pair(start,end));
 		}
@@ -455,22 +455,22 @@ public:
 		INLINE_FUNCTION_H void fill(const T& val)
 		{
 			if(empty())return;
-			Kokkos::deep_copy(deviceVector(),val);
-			Kokkos::deep_copy(hostVector(),val);
+			Kokkos::deep_copy(deviceView(),val);
+			Kokkos::deep_copy(hostView(),val);
 			dualView_.clear_sync_state();
 		}
 
 		INLINE_FUNCTION_H void fillHost(const T& val)
 		{
 			if(empty())return;
-			Kokkos::deep_copy(hostVector(),val);
+			Kokkos::deep_copy(hostView(),val);
 			modifyOnHost();
 		}
 
 		INLINE_FUNCTION_H void fillDevice(const T& val)
 		{
 			if(empty())return;
-			Kokkos::deep_copy(deviceVector(),val);
+			Kokkos::deep_copy(deviceView(),val);
 			modifyOnDevice();
 		}
 
@@ -556,7 +556,7 @@ public:
 			size_t newSize = indices.size();
 
 			deviceViewType 	sortedView("sortedView", newSize);
-			auto dVec = deviceVectorAll();
+			auto dVec = deviceViewAll();
 
 			auto d_indices = indices.deviceView();
 			
@@ -570,7 +570,7 @@ public:
 			
 			Kokkos::fence();
 			setSize(newSize);
-			copy(deviceVector(), sortedView);
+			copy(deviceView(), sortedView);
 			modifyOnDevice();
 			syncViews();
 		}
@@ -586,10 +586,10 @@ public:
 			{
 				resize(maxInd+1);
 			} 
-			fillSelected(hostVectorAll(), indices.hostView(), indices.size(), val);
+			fillSelected(hostViewAll(), indices.hostView(), indices.size(), val);
 			
 			auto dIndices = indices.deviceView();
-			auto dVals = deviceVectorAll();
+			auto dVals = deviceViewAll();
 
 			Kokkos::parallel_for(
 				"fillSelected",
@@ -627,10 +627,10 @@ public:
 			{
 
 				hostViewType1D<T> hVecVals( const_cast<T*>(vals.data()), vals.size());
-				//fillSelected(hostVector(), indices.hostView(), hVecVals, indices.size());
+				//fillSelected(hostView(), indices.hostView(), hVecVals, indices.size());
 
 				pFlow::algorithms::KOKKOS::fillSelected<T, int32, DefaultHostExecutionSpace>(
-					hostVectorAll().data(),
+					hostViewAll().data(),
 					indices.hostView().data(),
 					hVecVals.data(),
 					indices.size());
@@ -648,9 +648,9 @@ public:
 				Kokkos::deep_copy(dVecVals, hVecVals);
 				
 
-				//fillSelected(deviceVector(), indices.deviceView(), dVecVals, indices.size());
+				//fillSelected(deviceView(), indices.deviceView(), dVecVals, indices.size());
 				pFlow::algorithms::KOKKOS::fillSelected<T, int32, execution_space>(
-					deviceVectorAll().data(),
+					deviceViewAll().data(),
 					indices.deviceView().data(),
 					dVecVals.data(),
 					indices.size());
@@ -683,7 +683,7 @@ public:
 			if constexpr (std::is_same<side,HostSide>::value )
 			{
 				hostViewType1D<int32> hVecInd( const_cast<int32*>(indices.data()), indices.size());
-				fillSelected( hostVectorAll(), hVecInd, indices.size(), val);
+				fillSelected( hostViewAll(), hVecInd, indices.size(), val);
 
 				modifyOnHost();
 				syncViews(minInd, maxInd+1);
@@ -696,7 +696,7 @@ public:
 				hostViewType1D<int32> hVecInd( const_cast<int32*>(indices.data()), indices.size());
 				deviceViewType1D<int32> dVecInd("dVecInd", indices.size());
 				Kokkos::deep_copy(dVecInd, hVecInd);
-				fillSelected(deviceVectorAll(), dVecInd, indices.size(), val);
+				fillSelected(deviceViewAll(), dVecInd, indices.size(), val);
 				
 				modifyOnDevice();
 
@@ -734,7 +734,7 @@ public:
 				hostViewType1D<int32> hVecInd( const_cast<int32*>(indices.data()), indices.size());
 				hostViewType1D<T> hVecVals( const_cast<T*>(vals.data()), vals.size());
 
-				fillSelected(hostVectorAll(), hVecInd, hVecVals, indices.size());
+				fillSelected(hostViewAll(), hVecInd, hVecVals, indices.size());
 
 				modifyOnHost();
 			
@@ -752,7 +752,7 @@ public:
 				Kokkos::deep_copy(dVecVals, hVecVals);
 				Kokkos::deep_copy(dVecInd, hVecInd);
 
-				fillSelected(deviceVectorAll(), dVecInd, dVecVals, indices.size());
+				fillSelected(deviceViewAll(), dVecInd, dVecVals, indices.size());
 
 				modifyOnDevice();
 				
@@ -858,7 +858,7 @@ public:
 		{
 			if(empty())return;
 			
-			Kokkos::deep_copy(deviceVector(), hostVector());
+			Kokkos::deep_copy(deviceView(), hostView());
 			dualView_.clear_sync_state();
 		}
 
@@ -866,7 +866,7 @@ public:
 		void copyHostToDevice(int32 start, int32 end, bool setUpdated = true)
 		{
 			if(empty())return;
-			Kokkos::deep_copy(deviceVector(start, end), hostVector(start, end));
+			Kokkos::deep_copy(deviceView(start, end), hostView(start, end));
 			if(setUpdated)
 				dualView_.clear_sync_state();
 		}
@@ -876,7 +876,7 @@ public:
 		INLINE_FUNCTION_H void copyDeviceToHost()
 		{
 			if(empty())return;
-			Kokkos::deep_copy(hostVector(), deviceVector());
+			Kokkos::deep_copy(hostView(), deviceView());
 			dualView_.clear_sync_state();
 		}
 
@@ -884,7 +884,7 @@ public:
 		void copyDeviceToHost(int32 start, int32 end, bool setUpdated = true)
 		{
 			if(empty())return;
-			Kokkos::deep_copy(hostVector(start, end), deviceVector(start, end));
+			Kokkos::deep_copy(hostView(start, end), deviceView(start, end));
 			if(setUpdated)
 				dualView_.clear_sync_state();
 		}
@@ -962,12 +962,12 @@ public:
 			if(hostRequiresSync()) // device is updated
 			{
 				//const auto dVec = Kokkos::subview(dualView_.d_view, Kokkos::make_pair(0,int(size_)));
-				Kokkos::deep_copy(mirror,deviceVector());
+				Kokkos::deep_copy(mirror,deviceView());
 			}
 			else // either host is updated or both sides are syncronized
 			{
 				//const auto hVec = Kokkos::subview(dualView_.h_view, Kokkos::make_pair(0,int(size_)));
-				Kokkos::deep_copy(mirror,hostVector());
+				Kokkos::deep_copy(mirror,hostView());
 			}				
 			return vecToFile.write(os);
 		}
diff --git a/src/phasicFlow/containers/VectorHD/VectorDualAlgorithms.hpp b/src/phasicFlow/containers/VectorHD/VectorDualAlgorithms.hpp
index a1191675..603ae29a 100644
--- a/src/phasicFlow/containers/VectorHD/VectorDualAlgorithms.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorDualAlgorithms.hpp
@@ -39,11 +39,11 @@ int64 count(const VectorDual<T,MemorySpace>& vec, const T& val)
 {
 	if constexpr (std::is_same<side,HostSide>::value)
 	{
-		return count( vec.hostVectorAll(), static_cast<size_t>(0), vec.size(), val);
+		return count( vec.hostViewAll(), static_cast<size_t>(0), vec.size(), val);
 	}
 	else
 	{
-		return count( vec.deviceVectorAll(), static_cast<size_t>(0), vec.size(), val);
+		return count( vec.deviceViewAll(), static_cast<size_t>(0), vec.size(), val);
 	}
 
 	return -1;
@@ -63,11 +63,11 @@ int64 min(const VectorDual<T,MemorySpace>& vec)
 {
 	if constexpr (std::is_same<side,HostSide>::value)
 	{
-		return min( vec.hostVectorAll(), static_cast<size_t>(0), vec.size());
+		return min( vec.hostViewAll(), static_cast<size_t>(0), vec.size());
 	}
 	else
 	{
-		return min( vec.deviceVectorAll(), static_cast<size_t>(0), vec.size());
+		return min( vec.deviceViewAll(), static_cast<size_t>(0), vec.size());
 	}
 
 	return 0.0;
@@ -87,11 +87,11 @@ int64 max(const VectorDual<T,MemorySpace>& vec)
 {
 	if constexpr (std::is_same<side,HostSide>::value)
 	{
-		return max( vec.hostVectorAll(), static_cast<size_t>(0), vec.size());
+		return max( vec.hostViewAll(), static_cast<size_t>(0), vec.size());
 	}
 	else
 	{
-		return max( vec.deviceVectorAll(), static_cast<size_t>(0), vec.size());
+		return max( vec.deviceViewAll(), static_cast<size_t>(0), vec.size());
 	}
 
 	return 0.0;
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
index b469f2b8..0fe5d251 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
@@ -182,7 +182,7 @@ pFlow::VectorSingle<T,MemorySpace>::VectorSingle
 :
     VectorSingle(name, src.capacity(), src.size(), RESERVE())
 {
-    copy(deviceVector(), src.deviceVector());	
+    copy(deviceView(), src.deviceView());	
 }
 
 template<typename T, typename MemorySpace>
@@ -213,13 +213,6 @@ pFlow::uniquePtr<pFlow::VectorSingle<T,MemorySpace>>
     return makeUnique<VectorSingle>( this->name(), *this);
 }
 
-template<typename T, typename MemorySpace>
-INLINE_FUNCTION_H
-pFlow::VectorSingle<T,MemorySpace>*
-    pFlow::VectorSingle<T,MemorySpace>::clonePtr()const   
-{
-    return new VectorSingle(this->name(), *this);
-}
 
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H
@@ -239,21 +232,23 @@ pFlow::VectorSingle<T,MemorySpace>::VectorField()const
 
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H 
-auto pFlow::VectorSingle<T,MemorySpace>::deviceVectorAll() const
+auto pFlow::VectorSingle<T,MemorySpace>::deviceViewAll() const
 {
     return view_;
 }
 
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H 
-auto pFlow::VectorSingle<T,MemorySpace>::deviceVector()const
+auto pFlow::VectorSingle<T,MemorySpace>::deviceView()const
 {
-    return Kokkos::subview(view_, Kokkos::make_pair(0,int(size_)));
+    return Kokkos::subview(
+        view_, 
+        Kokkos::make_pair(0u,static_cast<uint32>(size_)));
 }
 
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H 
-auto pFlow::VectorSingle<T,MemorySpace>::hostVectorAll()const
+auto pFlow::VectorSingle<T,MemorySpace>::hostViewAll()const
 {
     auto hView = Kokkos::create_mirror_view(view_);
     copy(hView, view_);
@@ -262,10 +257,10 @@ auto pFlow::VectorSingle<T,MemorySpace>::hostVectorAll()const
 
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H 
-auto pFlow::VectorSingle<T,MemorySpace>::hostVector()const
+auto pFlow::VectorSingle<T,MemorySpace>::hostView()const
 {
-    auto hView = Kokkos::create_mirror_view(deviceVector());
-    copy(hView, deviceVector());
+    auto hView = Kokkos::create_mirror_view(deviceView());
+    copy(hView, deviceView());
     return hView;
 }
 
@@ -402,7 +397,7 @@ void pFlow::VectorSingle<T,MemorySpace>::assign
     
     // - unmanaged view in the host
     hostViewType1D<const T> temp(src.data(), srcSize );
-    copy(deviceVector(), temp);
+    copy(deviceView(), temp);
 }
 
 template<typename T, typename MemorySpace>
@@ -429,7 +424,7 @@ void pFlow::VectorSingle<T,MemorySpace>::assign(const VectorTypeHost& src)
     {
         setSize(srcSize);
     }
-	copy(deviceVector(), src.hostVector());
+	copy(deviceView(), src.hostView());
 }
 
 template<typename T, typename MemorySpace>
@@ -528,7 +523,7 @@ bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
 
 		Kokkos::parallel_for(
 			"VectorSingle::insertSetElement",
-			policy(0,indices.size()), LAMBDA_HD(int32 i){	
+			policy(0,indices.size()), LAMBDA_HD(uint32 i){	
 				dVec(ind(i))= dVals(i);});
 		Kokkos::fence();
 
@@ -540,7 +535,7 @@ bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
 
 		Kokkos::parallel_for(
 			"VectorSingle::insertSetElement",
-			policy(0,indices.size()), LAMBDA_HD(int32 i){	
+			policy(0,indices.size()), LAMBDA_HD(uint32 i){	
 				dVec(ind(i))= hVals(i);});
 		Kokkos::fence();
 
@@ -579,7 +574,7 @@ bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
 
 		Kokkos::parallel_for(
 			"VectorSingle::insertSetElement",
-			policy(0,indices.size()), LAMBDA_HD(int32 i){	
+			policy(0,indices.size()), LAMBDA_HD(uint32 i){	
 				dVec(ind(i))= dVals(i);});
 		Kokkos::fence();
 
@@ -592,7 +587,7 @@ bool pFlow::VectorSingle<T,MemorySpace>::insertSetElement
 
 		Kokkos::parallel_for(
 			"VectorSingle::insertSetElement",
-			policy(0,indices.size()), LAMBDA_HD(int32 i){	
+			policy(0,indices.size()), LAMBDA_HD(uint32 i){	
 				dVec(ind(i))= hVals(i);});
 		Kokkos::fence();
 
@@ -665,7 +660,7 @@ bool pFlow::VectorSingle<T,MemorySpace>::reorderItems(uint32IndexContainer indic
 		Kokkos::fence();
 	}
 
-	copy(deviceVector(), sortedView);
+	copy(deviceView(), sortedView);
 	
 	return true;
 }
\ No newline at end of file
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 64793c5e..f0185cb9 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -178,10 +178,7 @@ public:
 		INLINE_FUNCTION_H 
 		uniquePtr<VectorSingle> clone() const;
 
-		/// Clone as a pointer (perform deep copy)
-		INLINE_FUNCTION_H
-		VectorSingle* clonePtr()const;
-	
+			
 	//// - Methods
 
 		/// Return *this
@@ -192,22 +189,22 @@ public:
 		INLINE_FUNCTION_H
 		const VectorType& VectorField()const;
 
-		/// Device vector range [0,capcity)
+		/// Device view range [0,capcity)
 		INLINE_FUNCTION_H 
-		auto deviceVectorAll() const;
+		auto deviceViewAll() const;
 
-		///  Device vector range [0, size)
+		///  Device view range [0, size)
 		INLINE_FUNCTION_H 
-		auto deviceVector()const;
+		auto deviceView()const;
 
-		/// Return a vector accessible on Host in range [0,capacity)
+		/// Return a view accessible on Host in range [0,capacity)
 		INLINE_FUNCTION_H 
-		auto hostVectorAll()const;
+		auto hostViewAll()const;
 		
 
-		/// Return a vector accessible on Host in range [0,size)
+		/// Return a view accessible on Host in range [0,size)
 		INLINE_FUNCTION_H 
-		auto hostVector()const;
+		auto hostView()const;
 
 		/// Name of the vector 
 		INLINE_FUNCTION_H 
@@ -403,7 +400,7 @@ public:
 		FUNCTION_H
 		bool write(iOstream& os, const IOPattern& iop)const
 		{
-			auto hVec = hostVector();
+			auto hVec = hostView();
 			auto sp = span<T>( const_cast<T*>(hVec.data()), hVec.size());
 			
 			return writeSpan(os, sp, iop);
@@ -413,7 +410,7 @@ public:
 		FUNCTION_H
 		bool write(iOstream& os)const
 		{
-			auto hVec = hostVector();
+			auto hVec = hostView();
 			auto sp = span<T>( const_cast<T*>(hVec.data()), hVec.size());
 			
 			return writeSpan(os, sp);
@@ -424,7 +421,7 @@ public:
 		FUNCTION_H
 		bool write(iOstream& os, const IOPattern& iop, const HostMask& mask)const
 		{
-			auto hVec = hostVector();
+			auto hVec = hostView();
 			
 			auto numActive = mask.numActive();
 			std::vector<T> finalField;
@@ -518,5 +515,5 @@ inline iOstream& operator << (iOstream& os, const VectorSingle<T, MemorySpace>&
 		INLINE_FUNCTION_H
 		bool append(const VectorSingle& Vec)
 		{
-			return append(Vec.deviceVector(), Vec.size());
+			return append(Vec.deviceView(), Vec.size());
 		}*/
\ No newline at end of file
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp b/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp
index 893e6c1e..831390d4 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingleAlgorithms.hpp
@@ -28,14 +28,14 @@ template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H 
 size_t count(const VectorSingle<T,MemorySpace>& vec, const T& val)
 {
-	return count( vec.deviceVectorAll(), 0, vec.size(), val);
+	return count( vec.deviceViewAll(), 0, vec.size(), val);
 }
 
 template<class T, class MemorySpace>
 INLINE_FUNCTION_H T min( const VectorSingle<T,MemorySpace>& vec) 
 {
 	return min(
-		vec.deviceVectorAll(),
+		vec.deviceViewAll(),
 		0, vec.size()
 		);	
 }
@@ -44,7 +44,7 @@ template<class T, class MemorySpace>
 INLINE_FUNCTION_H T max( const VectorSingle<T, MemorySpace>& vec) 
 {
 	return min(
-		vec.deviceVectorAll(),
+		vec.deviceViewAll(),
 		0, vec.size()
 		);		
 }
diff --git a/src/phasicFlow/containers/pointField/internalField.cpp b/src/phasicFlow/containers/pointField/internalField.cpp
index 3f0ed1cc..d75c6d5f 100644
--- a/src/phasicFlow/containers/pointField/internalField.cpp
+++ b/src/phasicFlow/containers/pointField/internalField.cpp
@@ -73,7 +73,7 @@ typename pFlow::internalField<T, MemorySpace>::FieldTypeHost
 	pFlow::internalField<T, MemorySpace>::activeValuesHost() const
 {
 	auto maskH = internalPoints_.activePointsMaskHost();
-    auto fieldH = field_.hostVector();
+    auto fieldH = field_.hostView();
 
 	FieldTypeHost aField
 	(
@@ -105,13 +105,6 @@ bool pFlow::internalField<T, MemorySpace>::write
 	const IOPattern& iop
 )const
 {
-	if( internalPoints_.isAllActive() )
-	{
-		return field_.write(os, iop);
-	}
-	else
-	{
-		auto aField = activeValuesHost();
-		return aField.write(os, iop);
-	}
+	auto aField = activeValuesHost();
+	return aField.write(os, iop);
 }
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/internalField.hpp b/src/phasicFlow/containers/pointField/internalField.hpp
index 21213743..d92fff0f 100644
--- a/src/phasicFlow/containers/pointField/internalField.hpp
+++ b/src/phasicFlow/containers/pointField/internalField.hpp
@@ -75,22 +75,30 @@ public:
 		const internalPoints& internal,
 		const T& val);
 	
-
-	auto fieldDevice()const
+	inline
+	auto deviceView()const
 	{
-		return field_.deviceVector();
+		return field_.deviceView();
 	}
 
-	auto fieldHost()const
+	inline
+	auto hostView()const
 	{
-		return field_.hostVector();
+		return field_.hostView();
 	}
 
+	inline
 	const FieldType& field()const
 	{
 		return field_;
 	}
 
+	inline
+	FieldType& field()
+	{
+		return field_;
+	}
+
 	const pFlagTypeDevice& activePointsMaskDevice()const
 	{
 		return internalPoints_.activePointsMaskDevice();
diff --git a/src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp b/src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp
index 2f1f85df..8f94bfb6 100644
--- a/src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp
+++ b/src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp
@@ -39,7 +39,7 @@ T min(const internalField<T,MemorySpace>& iField)
         // this is a device view 
         auto maskD = iField.activePointsMaskDevice();
         auto aRange = maskD.activeRange();
-        auto filed = iField.field().deviceVectorAll();
+        auto filed = iField.field().deviceViewAll();
 
         T minElement;
         
@@ -59,7 +59,7 @@ T min(const internalField<T,MemorySpace>& iField)
         // this is a host view 
         auto maskH = iField.activePointsMaskHost();
         auto aRange = maskH.activeRange();
-        auto filed = iField.field().deviceVectorAll();
+        auto filed = iField.field().deviceViewAll();
         T minElement;
         Kokkos::parallel_reduce(
             "min(internalField)",
@@ -90,7 +90,7 @@ T max(const internalField<T,MemorySpace>& iField)
         // this is a device view 
         auto maskD = iField.activePointsMaskDevice();
         auto aRange = maskD.activeRange();
-        auto filed = iField.field().deviceVectorAll();
+        auto filed = iField.field().deviceViewAll();
 
         T maxElement;
         
@@ -110,7 +110,7 @@ T max(const internalField<T,MemorySpace>& iField)
         // this is a host view 
         auto maskH = iField.activePointsMaskHost();
         auto aRange = maskH.activeRange();
-        auto filed = iField.field().deviceVectorAll();
+        auto filed = iField.field().deviceViewAll();
 
         T maxElement;
         
@@ -143,7 +143,7 @@ Pair<T,T> minMax(const internalField<T,MemorySpace>& iField)
         // this is a device view 
         auto maskD = iField.activePointsMaskDevice();
         auto aRange = maskD.activeRange();
-        auto filed = iField.field().deviceVectorAll();
+        auto filed = iField.field().deviceViewAll();
 
         T minElement;
         T maxElement;
@@ -170,7 +170,7 @@ Pair<T,T> minMax(const internalField<T,MemorySpace>& iField)
         // this is a host view 
         auto maskH = iField.activePointsMaskHost();
         auto aRange = maskH.activeRange();
-        auto filed = iField.field().deviceVectorAll();
+        auto filed = iField.field().deviceViewAll();
 
         T minElement;
         T maxElement;
diff --git a/src/phasicFlow/containers/pointField/pointFieldAlgorithms.hpp b/src/phasicFlow/containers/pointField/pointFieldAlgorithms.hpp
index 022e35f1..ce3765d2 100644
--- a/src/phasicFlow/containers/pointField/pointFieldAlgorithms.hpp
+++ b/src/phasicFlow/containers/pointField/pointFieldAlgorithms.hpp
@@ -109,15 +109,15 @@ T maxActive(const pointField<VectorSingle, T, MemorySpace>& pField)
 	{
 		if(len < sizeToSerial__ ) // serial execution instead of lunching parallel execution 
 			return maxActive_serial(
-				pField.deviceVectorAll(),
-				pField.pointFlag().hostVectorAll(),
+				pField.deviceViewAll(),
+				pField.pointFlag().hostViewAll(),
 				static_cast<size_t>(0),
 				len
 				);
 		else
 			return maxActiveH(
-				pField.deviceVectorAll(),
-				pField.pointFlag().hostVectorAll(),
+				pField.deviceViewAll(),
+				pField.pointFlag().hostViewAll(),
 				static_cast<size_t>(0),
 				len
 				);
@@ -125,8 +125,8 @@ T maxActive(const pointField<VectorSingle, T, MemorySpace>& pField)
 	else
 	{
 		return maxActiveD(
-			pField.deviceVectorAll(),
-			pField.pointFlag().deviceVectorAll(),
+			pField.deviceViewAll(),
+			pField.pointFlag().deviceViewAll(),
 			static_cast<size_t>(0),
 			len
 			);
@@ -148,23 +148,23 @@ T maxActive(const pointField<VectorDual, T, MemorySpace>& pField)
 	{
 		if( len < sizeToSerial__)
 			return maxActive_serial(
-				pField.hostVectorAll(),
-				pField.pointFlag().hostVectorAll(),
+				pField.hostViewAll(),
+				pField.pointFlag().hostViewAll(),
 				static_cast<size_t>(0),
 				len
 				);
 		else
 			return maxActiveH(
-				pField.hostVectorAll(),
-				pField.pointFlag().hostVectorAll(),
+				pField.hostViewAll(),
+				pField.pointFlag().hostViewAll(),
 				static_cast<size_t>(0),
 				len
 				);
 	}else
 	{
 		return maxActiveD(
-				pField.deviceVectorAll(),
-				pField.pointFlag().deviceVectorAll(),
+				pField.deviceViewAll(),
+				pField.pointFlag().deviceViewAll(),
 				static_cast<size_t>(0),
 				len
 				);
diff --git a/src/phasicFlow/ranges/stridedRange.hpp b/src/phasicFlow/ranges/stridedRange.hpp
index 0f7eb10f..02df31d2 100644
--- a/src/phasicFlow/ranges/stridedRange.hpp
+++ b/src/phasicFlow/ranges/stridedRange.hpp
@@ -25,6 +25,7 @@ Licence:
 #include "typeInfo.hpp"
 #include "dictionary.hpp"
 
+#include "streams.hpp"
 
 namespace pFlow
 {
@@ -108,8 +109,9 @@ public:
 	inline
 	bool isMember(T val, T epsilon = 0)const
 	{
+		
 		if(!isInRange(val)) return false;
-		if(abs(mod(val-begin_,stride_))<= epsilon) return true;
+		if(T dist = val-begin_; abs(dist%stride_)<= epsilon) return true;
 		if(equal(val,begin_))return true;
 		if(equal(val,end_))return true;
 		return false;
@@ -147,6 +149,22 @@ public:
 	}
 };
 
+template<>
+inline
+bool stridedRange<real>::isMember(real val, real epsilon)const
+	{
+
+	if(!isInRange(val)) return false;
+	real dist = val-begin_;
+	if(abs(
+		(dist-(static_cast<uint64>((dist+0.01*epsilon)/stride_)*stride_))
+		)<= epsilon) return true;
+	if(equal(val,begin_))return true;
+	if(equal(val,end_))return true;
+	return false;
+}
+
+
 }
 
 #endif  //__stridedRange_hpp__ 
diff --git a/src/phasicFlow/repository/Time/baseTimeControl.cpp b/src/phasicFlow/repository/Time/baseTimeControl.cpp
index 54d8ea45..413736c0 100644
--- a/src/phasicFlow/repository/Time/baseTimeControl.cpp
+++ b/src/phasicFlow/repository/Time/baseTimeControl.cpp
@@ -21,7 +21,6 @@ Licence:
 #include "baseTimeControl.hpp"
 
 
-
 pFlow::baseTimeControl::baseTimeControl
 (
     const dictionary &dict,
@@ -46,7 +45,7 @@ pFlow::baseTimeControl::baseTimeControl
 
 	word intervalWord = intervalPrefix.size()==0? word("interval"): intervalPrefix+"Interval";
 
-	if(isTimeStep_)
+	if(!isTimeStep_)
 	{
 		auto startTime = (dict.getValOrSet<real>("startTime", defStartTime));
     	auto endTime = (dict.getValOrSet<real>("endTime", largeValue));
@@ -72,7 +71,7 @@ bool pFlow::baseTimeControl::timeEvent(uint32 iter, real t, real dt) const
 	}
 	else
 	{
-		return rRange_.isMember(t, 0.51*dt);
+		return rRange_.isMember(t, 0.55*dt);
 	}
     return false;
 }
diff --git a/src/phasicFlow/repository/Time/timeControl.cpp b/src/phasicFlow/repository/Time/timeControl.cpp
index d9182701..701130e8 100644
--- a/src/phasicFlow/repository/Time/timeControl.cpp
+++ b/src/phasicFlow/repository/Time/timeControl.cpp
@@ -174,7 +174,7 @@ void pFlow::timeControl::checkForOutputToFile()
 bool pFlow::timeControl::timersReportTime()const
 {
 	if(currentIter_<=1)return false;
-	return timersReportInterval_.isMember(currentTime_, dt_);
+	return timersReportInterval_.isMember(currentTime_, 0.55*dt_);
 }
 
 bool pFlow::timeControl::sortTime()const
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
index d79b8ee0..cc11e502 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
@@ -41,33 +41,39 @@ Licence:
 	
 }*/
 
-pFlow::boundaryBase::boundaryBase
+void pFlow::boundaryBase::setNewIndices
 (
-	const dictionary& 	dict,
-	const plane& 		bplane,
-	internalPoints& 	internal
+	deviceViewType1D<uint32> newIndices
 )
-:
-	subscriber(dict.name()),
-	boundaryPlane_(bplane),
-	indexList_(groupNames(dict.name(),"indexList")),
-	neighborLength_(dict.getVal<real>("neighborLength")),
-	internal_(internal),
-	mirrorProcessoNo_(dict.getVal<uint32>("mirrorProcessorNo")),
-	name_(dict.name()),
-	type_(dict.getVal<word>("type"))
 {
+	auto newSize = newIndices.size();
+	setSize(static_cast<uint32>(newSize));
+	copy(indexList_.deviceView(), newIndices);
+}
 
+pFlow::boundaryBase::boundaryBase(
+    const dictionary &dict,
+    const plane &bplane,
+    internalPoints &internal)
+    : subscriber(dict.name()),
+      boundaryPlane_(bplane),
+      indexList_(groupNames(dict.name(), "indexList")),
+      neighborLength_(dict.getVal<real>("neighborLength")),
+      internal_(internal),
+      mirrorProcessoNo_(dict.getVal<uint32>("mirrorProcessorNo")),
+      name_(dict.name()),
+      type_(dict.getVal<word>("type"))
+{
 }
 
 void pFlow::boundaryBase::setSize(uint32 newSize)
 {
 	indexList_.resize(newSize);
-
-	if( indexList_.capacity() <= newSize+1 )
+	/*if( indexList_.capacity() <= newSize+1 )
 	{
 		indexList_.reserve(newSize+1);
-	}
+	}*/
+	//INFORMATION<<"new size of boundary "<< name_<<" "<< indexList_.size()<<END_INFO;
 }	
 
 typename pFlow::boundaryBase::pointFieldAccessType
@@ -77,8 +83,8 @@ pFlow::boundaryBase::thisPoints()
     return pointFieldAccessType
     (
         indexList_.size(),
-        indexList_.deviceVectorAll(),
-        internal_.pointPosition().deviceVectorAll()
+        indexList_.deviceViewAll(),
+        internal_.pointPosition().deviceViewAll()
     );
    
 }
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
index 45b28cc7..4974174d 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
@@ -65,6 +65,10 @@ private:
 
 	word 		type_;
 
+protected:
+
+	void setNewIndices(deviceViewType1D<uint32> newIndices);
+
 public:
 
 	TypeInfo("boundaryBase");
@@ -164,10 +168,10 @@ public:
 		return indexList_;
 	}
 
-	auto& indexList()
+	/*auto& indexList()
 	{
 		return indexList_;
-	}
+	}*/
 
     pointFieldAccessType thisPoints();
 
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
index e8f005e8..9c0706d4 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
@@ -65,6 +65,7 @@ bool pFlow::boundaryExit::beforeIteration
 	auto points = thisPoints();
 	uint32 numDeleted = 0;
 	auto p = boundaryPlane().infPlane();
+	
 
 	Kokkos::parallel_reduce
 	(
@@ -85,6 +86,7 @@ bool pFlow::boundaryExit::beforeIteration
 		numDeleted
 	);
 	
+	
 	// no point is deleted
 	if(numDeleted == 0 )
 	{
@@ -111,7 +113,7 @@ bool pFlow::boundaryExit::beforeIteration
 	deviceScatteredFieldAccess<uint32> deleteIndices(
 			numDeleted, 
 			deleteList,
-			indexList().deviceVectorAll());
+			indexList().deviceViewAll());
 	
 	// tell internal to remove these points from its list 
 	if(!internal().deletePoints(deleteIndices))
@@ -124,13 +126,13 @@ bool pFlow::boundaryExit::beforeIteration
 	// delete these indices from your list 
 	if(numDeleted == s )
 	{
-		indexList().resize(0u);
+		setSize(0u);
 	}
 	else
 	{
-		uint newSize = s-numDeleted;
+		uint32 newSize = s-numDeleted;
 		deviceViewType1D<uint32> newIndices("newIndices", newSize);
-		auto oldIndices = indexList().deviceVectorAll();
+		auto oldIndices = indexList().deviceViewAll();
 
 		Kokkos::parallel_for(
 			"fillIndices",
@@ -144,13 +146,10 @@ bool pFlow::boundaryExit::beforeIteration
 			}
 		);
 		Kokkos::fence();
-		copy(oldIndices, newIndices);
-		indexList().resize(newSize);
+		setNewIndices(newIndices);
 	}
 
-	// notify your observers 
-
-	WARNING<<"notify observers in boundary exit "<<END_WARNING;
+	//TODO: notify observers about changes 
 	
 	return true;
 }
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryList.cpp b/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
index 005aca29..8cd8864f 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
@@ -53,12 +53,12 @@ bool pFlow::boundaryList::updateLists()
 	boundary(5).setSize( maskD.frontSize() );
 
 	pStruct_.fillNeighborsLists(
-		boundary(0).indexList().deviceVectorAll(),
-		boundary(1).indexList().deviceVectorAll(),
-		boundary(2).indexList().deviceVectorAll(),
-		boundary(3).indexList().deviceVectorAll(),
-		boundary(4).indexList().deviceVectorAll(),
-		boundary(5).indexList().deviceVectorAll());
+		boundary(0).indexList().deviceViewAll(),
+		boundary(1).indexList().deviceViewAll(),
+		boundary(2).indexList().deviceViewAll(),
+		boundary(3).indexList().deviceViewAll(),
+		boundary(4).indexList().deviceViewAll(),
+		boundary(5).indexList().deviceViewAll());
 
 	return true;	
 }
@@ -124,8 +124,6 @@ bool pFlow::boundaryList::beforeIteration
 			fatalErrorInFunction;
 			return false;
 		}
-
-		WARNING<<"Maybe notification about the update list "<<END_WARNING;
 	}
 
 	for(auto& bdry:*this)
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
index e5766ab2..3f727513 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
@@ -135,8 +135,9 @@ bool pFlow::internalPoints::deletePoints
 		"Error in deleting points from internal points"<<endl;
 		return false;
 	}
-	WARNING<<"Notify the observersin in internalPoints"<<END_WARNING;
 	pFlagSync_ = false;
+	WARNING<<"Notify the observersin in internalPoints"<<END_WARNING;
+
     return true;
 }
 
@@ -151,7 +152,7 @@ pFlow::uint32 pFlow::internalPoints::updateFlag
 	return pFlagsD_.markPointRegions
 	(
 		dm,
-		pointPosition_.deviceVectorAll(),
+		pointPosition_.deviceViewAll(),
 		dist[0],
 		dist[1],
 		dist[2],
@@ -213,15 +214,8 @@ bool pFlow::internalPoints::write
 	iOstream& os
 )const
 {
-	if( pFlagsD_.isAllActive())
-	{
-		return pointPosition_.write(os);
-	}
-	else
-	{
-		auto aPoints = this->activePointsHost();
-		return aPoints.write(os);
-	}
+	auto aPoints = this->activePointsHost();
+	return aPoints.write(os);
 }
 
 FUNCTION_H
@@ -259,15 +253,8 @@ bool pFlow::internalPoints::write
 	const IOPattern& iop
 )const
 {
-	if( pFlagsD_.isAllActive())
-	{
-		return pointPosition_.write(os, iop);
-	}
-	else
-	{
-		auto aPoints = activePointsHost();
-		return aPoints.write(os,iop);
-	}
+	auto aPoints = activePointsHost();
+	return aPoints.write(os,iop);	
 }
 
 
@@ -288,7 +275,7 @@ bool pFlow::internalPoints::evaluateinternalPoints()
 		0,
 		numPoints_,
 		static_cast<int8>(internalPoints::ACTIVE),
-		pointFlag_.deviceVectorAll(),
+		pointFlag_.deviceViewAll(),
 		minActive,
 		maxActive
 		);
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
index 17413878..5a0d81a0 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
@@ -121,13 +121,13 @@ public:
         INLINE_FUNCTION_H
         auto pointPositionHost()const
         {
-            return pointPosition_.hostVector();
+            return pointPosition_.hostView();
         }
 
         INLINE_FUNCTION_H
         auto pointPositionDevice()const
         {
-            return pointPosition_.deviceVector();
+            return pointPosition_.deviceView();
         }
 
 		PointsTypeHost activePointsHost()const;
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
index 911ea654..f39b702d 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
@@ -33,14 +33,14 @@ class pointFlag
 {
 	enum Flag: uint8
 	{
-		DELETED 	= 1, 	//10000000
-		INTERNAL 	= 2,	//00000001
-		LEFT 		= 4,	//00000010
-		RIGHT 		= 8,    //00000100
-		BOTTOM 		= 16,	//00001000
-		TOP 		= 32,	//00010000
-		REAR 		= 64, 	//00100000
-		FRONT 		= 128	//01000000
+		DELETED 	= 1, 	//00000001
+		INTERNAL 	= 2,	//00000010
+		LEFT 		= 4,	//00000100
+		RIGHT 		= 8,    //00001000
+		BOTTOM 		= 16,	//00010000
+		TOP 		= 32,	//00100000
+		REAR 		= 64, 	//01000000
+		FRONT 		= 128	//10000000
 	};
 
 	using execution_space 	= ExecutionSpace;
@@ -184,12 +184,7 @@ public:
 		return flags_[i] > DELETED;
 	}
 
-	INLINE_FUNCTION_HD
-	bool isBoundary(uint32 i)const
-	{
-		return flags_[i] > INTERNAL;
-	}
-
+	
 	INLINE_FUNCTION_HD
 	bool isBoundary(uint8 flg)const
 	{
@@ -200,38 +195,38 @@ public:
 	INLINE_FUNCTION_HD
 	bool isLeft(uint8 flg)const
 	{
-		return (flg&LEFT) == LEFT;
+		return flg&LEFT;
 	}
 
 	INLINE_FUNCTION_HD
 	bool isRight(uint8 flg)const
 	{
-		return (flg&&RIGHT) == RIGHT;
+		return flg&RIGHT;
 	}
 
 
 	INLINE_FUNCTION_HD
 	bool isBottom(uint8 flg)const
 	{
-		return (flg&&BOTTOM) == BOTTOM;
+		return flg&BOTTOM;
 	}
 
 	INLINE_FUNCTION_HD
 	bool isTop(uint8 flg)const
 	{
-		return (flg&&TOP) == TOP;
+		return flg&TOP;
 	}
 
 	INLINE_FUNCTION_HD
 	bool isRear(uint8 flg)const
 	{
-		return (flg&&REAR) == REAR;
+		return flg&REAR;
 	}
 
 	INLINE_FUNCTION_HD
 	bool isFront(uint8 flg)const
 	{
-		return (flg&&FRONT) == FRONT;
+		return flg&FRONT;
 	}
 
 	template<typename ExeSpace>
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
index 46a26828..88e3d145 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
@@ -20,6 +20,8 @@ Licence:
 #ifndef __pointFlagKernels_hpp__
 #define __pointFlagKernels_hpp__
 
+#include "streams.hpp"
+
 template<typename ExecutionSpace>
 pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markOutOfBoxDelete
 (
@@ -353,9 +355,9 @@ void pFlow::pointFlag<ExecutionSpace>::fillNeighborsLists
 	uint32 end   = activeRange().end();
 
 	ViewType1D<uint32, memory_space> nElems("nElems",6);
-
+	
 	fill(nElems, 0, 6, static_cast<uint32>(0));
-
+		
 	if(start<end)
 	{
 		Kokkos::parallel_for(
@@ -363,16 +365,15 @@ void pFlow::pointFlag<ExecutionSpace>::fillNeighborsLists
 			rpMark(start,end),
 			CLASS_LAMBDA_HD(uint32 i){
 
-				uint32 flg = flags_(i);
-
+				uint8 flg = flags_(i);
 				if(this->isBoundary(flg))
 				{
 					if(this->isLeft(flg)) leftList[Kokkos::atomic_fetch_add(&nElems[0],1)] = i;
-					if(this->isRight(flg)) rightList[Kokkos::atomic_fetch_add(&nElems[1],1)] = i;
-					if(this->isBottom(flg)) bottomList[Kokkos::atomic_fetch_add(&nElems[2],1)] = i;
-					if(this->isTop(flg)) topList[Kokkos::atomic_fetch_add(&nElems[3],1)] = i;
-					if(this->isRear(flg)) rearList[Kokkos::atomic_fetch_add(&nElems[4],1)] = i;
-					if(this->isFront(flg)) frontList[Kokkos::atomic_fetch_add(&nElems[5],1)] = i;
+					if(this->isRight(flg))rightList[Kokkos::atomic_fetch_add(&nElems[1],1)] = i;
+					if(this->isBottom(flg))bottomList[Kokkos::atomic_fetch_add(&nElems[2],1)] = i;
+					if(this->isTop(flg))topList[Kokkos::atomic_fetch_add(&nElems[3],1)] = i;
+					if(this->isRear(flg))rearList[Kokkos::atomic_fetch_add(&nElems[4],1)] = i;
+					if(this->isFront(flg))frontList[Kokkos::atomic_fetch_add(&nElems[5],1)] = i;
 				}
 			});
 		Kokkos::fence();	
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
index dcba001d..f73481ef 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
@@ -166,6 +166,12 @@ pFlow::pointStructure::pointStructure(
 
 bool pFlow::pointStructure::beforeIteration()
 {
+    if( !boundaries_.beforeIteration(currentIter(), currentTime(), dt()) )
+    {
+        fatalErrorInFunction<<
+        "Unable to perform beforeIteration for boundaries"<<endl;
+        return false;
+    }
     return true;
 }
 
@@ -206,5 +212,6 @@ bool pFlow::pointStructure::write
     const IOPattern& iop
 )const
 {
+    output<<"bool pFlow::pointStructure::write bool pFlow::pointStructure::write bool pFlow::pointStructure::write"<<endl;
     return internalPoints::write(os, iop);
 }
diff --git a/src/phasicFlow/structuredData/pointStructure/selectors/selectBox/selectBox.cpp b/src/phasicFlow/structuredData/pointStructure/selectors/selectBox/selectBox.cpp
index 89e89cfc..a384b820 100644
--- a/src/phasicFlow/structuredData/pointStructure/selectors/selectBox/selectBox.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/selectors/selectBox/selectBox.cpp
@@ -31,7 +31,7 @@ void pFlow::selectBox::selectAllPointsInBox()
 	);
 
 	selectedPoints_.clear();
-	auto pPos = pStruct().pointPosition().hostVector();
+	auto pPos = pStruct().pointPosition().hostView();
 	
 	ForAll(i , pPos)
 	{
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/multiTriSurface.cpp b/src/phasicFlow/structuredData/trisurfaceStructure/multiTriSurface.cpp
index fe37308c..247748db 100644
--- a/src/phasicFlow/structuredData/trisurfaceStructure/multiTriSurface.cpp
+++ b/src/phasicFlow/structuredData/trisurfaceStructure/multiTriSurface.cpp
@@ -115,11 +115,11 @@ bool pFlow::multiTriSurface::addTriSurface
 	vertices_.resize(vNewSize);
 	area_.resize(vNewSize);
 	
-	auto verVec = vertices_.deviceVectorAll();
-	auto areaVec = area_.deviceVectorAll();
+	auto verVec = vertices_.deviceViewAll();
+	auto areaVec = area_.deviceViewAll();
 
-	auto newVerVec = newVertices.deviceVectorAll();
-	auto newArea = newAreas.deviceVectorAll();
+	auto newVerVec = newVertices.deviceViewAll();
+	auto newArea = newAreas.deviceViewAll();
 
 	auto maxIdx = maxIndex();
 
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.cpp b/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.cpp
index ff23104b..83507bad 100644
--- a/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.cpp
+++ b/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.cpp
@@ -85,7 +85,7 @@ pFlow::int32 pFlow::triSurface::calcMaxIndex()const
 
 	if(vertices_.size()>0)
 	{
-		auto verDeviceVec = vertices_.deviceVectorAll();
+		auto verDeviceVec = vertices_.deviceViewAll();
 		
 		Kokkos::parallel_reduce(
 			"triSurface::calcMaxIndex",
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.hpp b/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.hpp
index 0583b353..1ab89bbf 100644
--- a/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.hpp
+++ b/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.hpp
@@ -175,9 +175,9 @@ public:
 		{
 			return triangleAccessor(
 				numPoints(),
-				points_.deviceVectorAll(),
+				points_.deviceViewAll(),
 				numTriangles(),
-				vertices_.deviceVectorAll()
+				vertices_.deviceViewAll()
 				);
 		}
 
@@ -203,12 +203,12 @@ public:
 
 		const realx3* pointsData_D()const
 		{
-			return points_.deviceVectorAll().data();
+			return points_.deviceViewAll().data();
 		}
 
 		realx3* pointsData_D()
 		{
-			return points_.deviceVectorAll().data();
+			return points_.deviceViewAll().data();
 		}
 
 		const int32x3Vector_D& vertices() const
@@ -223,12 +223,12 @@ public:
 
 		int32x3* verticesData_D()
 		{
-			return vertices_.deviceVectorAll().data();
+			return vertices_.deviceViewAll().data();
 		}
 
 		const int32x3* verticesData_D()const
 		{
-			return vertices_.deviceVectorAll().data();
+			return vertices_.deviceViewAll().data();
 		}
 
 		void clear()
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/triSurfaceKernels.hpp b/src/phasicFlow/structuredData/trisurfaceStructure/triSurfaceKernels.hpp
index f9cba450..fbb1d7d6 100644
--- a/src/phasicFlow/structuredData/trisurfaceStructure/triSurfaceKernels.hpp
+++ b/src/phasicFlow/structuredData/trisurfaceStructure/triSurfaceKernels.hpp
@@ -32,9 +32,9 @@ INLINE_FUNCTION_H
 bool calculateArea(const realx3Field_D& points, const int32x3Field_D& vertices, realField_D& area)
 {
 	auto numTri = vertices.size();
-	auto areaD = area.deviceVectorAll();
-	auto pointsD = points.deviceVectorAll();
-	auto verticesD = vertices.deviceVectorAll();
+	auto areaD = area.deviceViewAll();
+	auto pointsD = points.deviceViewAll();
+	auto verticesD = vertices.deviceViewAll();
 
 	Kokkos::parallel_for(
 		"pFlow::triSurfaceKernels::calculateArea",
diff --git a/src/setHelpers/setProperty.hpp b/src/setHelpers/setProperty.hpp
index ee2e1896..a35a1026 100644
--- a/src/setHelpers/setProperty.hpp
+++ b/src/setHelpers/setProperty.hpp
@@ -18,12 +18,11 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-
 #ifndef __setProperty_hpp__
 #define __setProperty_hpp__
 
 REPORT(0)<<"\nReading proprties . . . "<<END_REPORT;
 
-auto proprties = pFlow::property(Control.caseSetup().path()+pFlow::propertyFile__);
+auto proprties = property(propertyFile__, &Control.caseSetup());
 
-#endif
+#endif // __setProperty_hpp__
diff --git a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
index 255caa0a..12d43025 100755
--- a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
+++ b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
@@ -174,8 +174,8 @@ int main( int argc, char* argv[] )
 
 	REPORT(0)<< "Converting shapeName field to shapeIndex field"<<END_REPORT;
 
-	auto shapeName_D = shapeName.fieldDevice();
-	auto shapeIndex_D = shapeIndex.fieldDevice();
+	auto shapeName_D = shapeName.deviceView();
+	auto shapeIndex_D = shapeIndex.deviceView();
 	
 	REPORT(1)<<"List of shape names in "<<shapes.globalName()<<
 	" is: "<<Green_Text(shapes.shapeNameList())<<END_REPORT;
diff --git a/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp b/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp
index 0cde29fb..ddd12455 100755
--- a/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp
+++ b/utilities/particlesPhasicFlow/positionParticles/positionParticles.hpp
@@ -151,7 +151,8 @@ public:
 	virtual realx3Vector getFinalPosition();
 
 	static
-	uniquePtr<positionParticles> create(systemControl& control, const dictionary & dict);
+	uniquePtr<positionParticles> 
+		create(systemControl& control, const dictionary & dict);
 	
 };	
 
diff --git a/utilities/particlesPhasicFlow/positionRandom/positionRandom.cpp b/utilities/particlesPhasicFlow/positionRandom/positionRandom.cpp
index d0053791..750509f3 100755
--- a/utilities/particlesPhasicFlow/positionRandom/positionRandom.cpp
+++ b/utilities/particlesPhasicFlow/positionRandom/positionRandom.cpp
@@ -69,8 +69,8 @@ bool pFlow::positionRandom::positionOnePass(int32 pass, int32 startNum)
 	SearchType search(
 					box(minP, maxP),
 					diameter_,
-					positionHD.deviceVectorAll(),
-					diameter.deviceVectorAll());
+					positionHD.deviceViewAll(),
+					diameter.deviceViewAll());
 
 	ContainerType pairs(3*startNum);
 		
@@ -250,7 +250,7 @@ pFlow::int32 pFlow::findCollisions(
 {
 	auto allPairs = pairs.getPairs();
 	auto num = pairs.capacity();
-	auto dFlags = flags.deviceVector();
+	auto dFlags = flags.deviceView();
 	
 
 	int32 numCollisions = 0;

From 5b9b865b088cc44041f28fa9df607dd8d7e54832 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Mon, 29 Jan 2024 07:58:19 -0800
Subject: [PATCH 31/60] solver iterateSphereParticles is added for testing
 (without particle insertion)

---
 CMakeLists.txt                                |  2 +-
 solvers/CMakeLists.txt                        |  6 +-
 solvers/iterateSphereParticles/CMakeLists.txt |  7 ++
 .../createDEMComponents.hpp                   | 25 ++++++
 .../iterateSphereParticles.cpp                | 89 +++++++++++++++++++
 5 files changed, 125 insertions(+), 4 deletions(-)
 create mode 100644 solvers/iterateSphereParticles/CMakeLists.txt
 create mode 100755 solvers/iterateSphereParticles/createDEMComponents.hpp
 create mode 100755 solvers/iterateSphereParticles/iterateSphereParticles.cpp

diff --git a/CMakeLists.txt b/CMakeLists.txt
index 8cd85bfa..927c1ec2 100644
--- a/CMakeLists.txt
+++ b/CMakeLists.txt
@@ -71,7 +71,7 @@ include_directories(src/setHelpers src/demComponent "${PROJECT_BINARY_DIR}")
 
 add_subdirectory(src)
 
-#add_subdirectory(solvers)
+add_subdirectory(solvers)
 
 add_subdirectory(utilities)
 
diff --git a/solvers/CMakeLists.txt b/solvers/CMakeLists.txt
index 45bc40aa..4cd77431 100644
--- a/solvers/CMakeLists.txt
+++ b/solvers/CMakeLists.txt
@@ -1,7 +1,7 @@
 
 
-#add_subdirectory(iterateSphereParticles)
+add_subdirectory(iterateSphereParticles)
 
-add_subdirectory(iterateGeometry)
+#add_subdirectory(iterateGeometry)
 
-add_subdirectory(sphereGranFlow)
+#add_subdirectory(sphereGranFlow)
diff --git a/solvers/iterateSphereParticles/CMakeLists.txt b/solvers/iterateSphereParticles/CMakeLists.txt
new file mode 100644
index 00000000..59700110
--- /dev/null
+++ b/solvers/iterateSphereParticles/CMakeLists.txt
@@ -0,0 +1,7 @@
+
+set(source_files
+iterateSphereParticles.cpp
+)
+set(link_lib  Particles)
+
+pFlow_make_executable_install(iterateSphereParticles source_files link_lib)
diff --git a/solvers/iterateSphereParticles/createDEMComponents.hpp b/solvers/iterateSphereParticles/createDEMComponents.hpp
new file mode 100755
index 00000000..85cb798a
--- /dev/null
+++ b/solvers/iterateSphereParticles/createDEMComponents.hpp
@@ -0,0 +1,25 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+//
+REPORT(0)<<"\nReading sphere particles . . ."<<END_REPORT;
+sphereParticles sphParticles(Control, proprties);
+
+WARNING<<"Particle insertion has not been set yet!"<<END_WARNING;
diff --git a/solvers/iterateSphereParticles/iterateSphereParticles.cpp b/solvers/iterateSphereParticles/iterateSphereParticles.cpp
new file mode 100755
index 00000000..fee9c6a5
--- /dev/null
+++ b/solvers/iterateSphereParticles/iterateSphereParticles.cpp
@@ -0,0 +1,89 @@
+
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+/** 
+ * \file sphereGranFlow.cpp
+ * \brief sphereGranFlow solver 
+ *
+ * This solver simulate granular flow of cohesion-less, spherical particles. 
+ * Particle insertion can be activated in the solver to gradually insert 
+ * particles into the simulation. Geometry can be defined generally with 
+ * built-in features of the code or through ASCII stl files or a combination
+ * of both. For more information refer to [tutorials/sphereGranFlow/]
+ * (https://github.com/PhasicFlow/phasicFlow/tree/main/tutorials/sphereGranFlow) folder.
+ */
+
+#include "vocabs.hpp"
+#include "property.hpp"
+#include "sphereParticles.hpp"
+#include "systemControl.hpp"
+#include "commandLine.hpp"
+
+using namespace pFlow;
+
+/**
+ * DEM solver for simulating granular flow of cohesion-less particles.
+ *
+ * In the root case directory just simply enter the following command to 
+ * run the simulation. For command line options use flag -h. 
+ */
+int main( int argc, char* argv[])
+{
+
+commandLine cmds(
+		"sphereGranFlow",
+		"DEM solver for non-cohesive spherical particles with particle insertion "
+		"mechanism and moving geometry");
+
+bool isCoupling = false;
+
+if(!cmds.parse(argc, argv)) return 0;
+
+// this should be palced in each main 
+processors::initProcessors(argc, argv);
+initialize_pFlowProcessors();
+#include "initialize_Control.hpp"
+	
+	#include "setProperty.hpp"
+
+	#include "createDEMComponents.hpp"
+	
+	REPORT(0)<<"\nStart of time loop . . .\n"<<END_REPORT;
+
+	do 
+	{
+		
+		sphParticles.beforeIteration();
+	
+		sphParticles.iterate();
+
+		sphParticles.afterIteration();		
+
+	}while(Control++);
+
+	REPORT(0)<<"\nEnd of time loop.\n"<<END_REPORT;
+
+// this should be palced in each main 
+#include "finalize.hpp"
+processors::finalizeProcessors();
+
+
+}	
+

From 40d74c846f59a79f30582520e469c7566b09b351 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Tue, 30 Jan 2024 22:51:42 -0800
Subject: [PATCH 32/60] output message has been removed

---
 src/phasicFlow/structuredData/pointStructure/pointStructure.cpp | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
index f73481ef..8fcbe2b8 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
@@ -212,6 +212,5 @@ bool pFlow::pointStructure::write
     const IOPattern& iop
 )const
 {
-    output<<"bool pFlow::pointStructure::write bool pFlow::pointStructure::write bool pFlow::pointStructure::write"<<endl;
     return internalPoints::write(os, iop);
 }

From e10ee2b6b5f10769085bac793bba1dd31f4c5331 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Thu, 1 Feb 2024 12:32:15 -0800
Subject: [PATCH 33/60] periodic boundary condition is added to pointStructure

---
 src/phasicFlow/CMakeLists.txt                 |   3 +
 src/phasicFlow/Kokkos/KokkosTypes.hpp         |  21 ++-
 .../containers/VectorHD/VectorSingle.cpp      |   9 +-
 .../containers/VectorHD/VectorSingle.hpp      |   6 +-
 .../pointField/periodicBoundaryField.cpp      |  29 ++++
 .../pointField/periodicBoundaryField.hpp      |  83 ++++++++++
 .../containers/pointField/pointFields.cpp     |  34 ++--
 .../boundaries/boundaryBase/boundaryBase.cpp  | 145 ++++++++++++++++--
 .../boundaries/boundaryBase/boundaryBase.hpp  |  28 +++-
 .../boundaryBase/boundaryBaseKernels.cpp      |  90 +++++++++++
 .../boundaryBase/boundaryBaseKernels.hpp      |  46 ++++++
 .../boundaries/boundaryExit/boundaryExit.cpp  |  86 +----------
 .../boundaries/boundaryList.cpp               |  12 +-
 .../boundaryPeriodic/boundaryPeriodic.cpp     | 125 +++++++++++++++
 .../boundaryPeriodic/boundaryPeriodic.hpp     |  76 +++++++++
 .../domain/regularSimulationDomain.cpp        |  24 ++-
 .../domain/simulationDomain.cpp               |  15 +-
 .../domain/simulationDomain.hpp               |   5 +
 .../pointStructure/internalPoints.cpp         |  49 ++++++
 .../pointStructure/internalPoints.hpp         |  27 ++++
 .../pointStructure/internalPointsKernels.cpp  |  44 ++++++
 .../pointStructure/internalPointsKernels.hpp  |  31 ++++
 .../pointStructure/pointFlag.hpp              |  41 ++++-
 .../pointStructure/pointFlagKernels.hpp       |  78 +++++++++-
 .../pointStructure/pointStructure.hpp         |  16 +-
 25 files changed, 988 insertions(+), 135 deletions(-)
 create mode 100644 src/phasicFlow/containers/pointField/periodicBoundaryField.cpp
 create mode 100644 src/phasicFlow/containers/pointField/periodicBoundaryField.hpp
 create mode 100644 src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.cpp
 create mode 100644 src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.hpp
 create mode 100644 src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp
 create mode 100644 src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp
 create mode 100644 src/phasicFlow/structuredData/pointStructure/internalPointsKernels.cpp
 create mode 100644 src/phasicFlow/structuredData/pointStructure/internalPointsKernels.hpp

diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 2afe777f..29ec8261 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -71,11 +71,14 @@ structuredData/plane/plane.cpp
 structuredData/domain/domain.cpp
 structuredData/domain/simulationDomain.cpp
 structuredData/domain/regularSimulationDomain.cpp
+structuredData/pointStructure/internalPointsKernels.cpp
 structuredData/pointStructure/internalPoints.cpp
 structuredData/pointStructure/pointStructure.cpp
 structuredData/boundaries/boundaryBase/boundaryBase.cpp
+structuredData/boundaries/boundaryBase/boundaryBaseKernels.cpp
 structuredData/boundaries/boundaryExit/boundaryExit.cpp
 structuredData/boundaries/boundaryNone/boundaryNone.cpp
+structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp
 structuredData/boundaries/boundaryList.cpp
 structuredData/pointStructure/selectors/pStructSelector/pStructSelector.cpp
 structuredData/pointStructure/selectors/selectBox/selectBox.cpp
diff --git a/src/phasicFlow/Kokkos/KokkosTypes.hpp b/src/phasicFlow/Kokkos/KokkosTypes.hpp
index 3d8cac38..d58df4cb 100644
--- a/src/phasicFlow/Kokkos/KokkosTypes.hpp
+++ b/src/phasicFlow/Kokkos/KokkosTypes.hpp
@@ -39,13 +39,6 @@ Licence:
 namespace pFlow
 {
 
-///********DEP
-class DeviceSide{};
-class HostSide{};
-
-template<typename side>
-struct selectSide{};
-/*********///
 
 /// Host memory space 
 using HostSpace 	= Kokkos::HostSpace;
@@ -71,6 +64,20 @@ using DefaultHostExecutionSpace 	= Kokkos::DefaultHostExecutionSpace;
 using DefaultExecutionSpace 		= Kokkos::DefaultExecutionSpace;
 
 
+using deviceRPolicyStatic = 
+	Kokkos::RangePolicy<
+			Kokkos::DefaultExecutionSpace,
+			Kokkos::Schedule<Kokkos::Static>,
+			Kokkos::IndexType<pFlow::uint32> >;
+
+
+using hostRPolicyStatic = 
+	Kokkos::RangePolicy<
+			Kokkos::DefaultExecutionSpace,
+			Kokkos::Schedule<Kokkos::Static>,
+			Kokkos::IndexType<pFlow::uint32> >;
+
+
 /// Pair of two variables
 template<typename T1, typename T2>
 using Pair 	= Kokkos::pair<T1,T2>;
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
index 0fe5d251..451c091a 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
@@ -232,7 +232,14 @@ pFlow::VectorSingle<T,MemorySpace>::VectorField()const
 
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H 
-auto pFlow::VectorSingle<T,MemorySpace>::deviceViewAll() const
+const auto& pFlow::VectorSingle<T,MemorySpace>::deviceViewAll() const
+{
+    return view_;
+}
+
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H 
+auto& pFlow::VectorSingle<T,MemorySpace>::deviceViewAll()
 {
     return view_;
 }
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index f0185cb9..7f32e1e3 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -191,7 +191,11 @@ public:
 
 		/// Device view range [0,capcity)
 		INLINE_FUNCTION_H 
-		auto deviceViewAll() const;
+		auto& deviceViewAll();
+
+		/// Device view range [0,capcity)
+		INLINE_FUNCTION_H 
+		const auto& deviceViewAll() const;
 
 		///  Device view range [0, size)
 		INLINE_FUNCTION_H 
diff --git a/src/phasicFlow/containers/pointField/periodicBoundaryField.cpp b/src/phasicFlow/containers/pointField/periodicBoundaryField.cpp
new file mode 100644
index 00000000..16f7f965
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/periodicBoundaryField.cpp
@@ -0,0 +1,29 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+template<class T, class MemorySpace>
+    pFlow::periodicBoundaryField<T, MemorySpace>::periodicBoundaryField
+(
+	const boundaryBase& boundary, 
+	InternalFieldType& internal
+)
+:
+    BoundaryFieldType(boundary, internal)
+{}
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/periodicBoundaryField.hpp b/src/phasicFlow/containers/pointField/periodicBoundaryField.hpp
new file mode 100644
index 00000000..9890d55d
--- /dev/null
+++ b/src/phasicFlow/containers/pointField/periodicBoundaryField.hpp
@@ -0,0 +1,83 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __periodicBoundaryField_hpp__
+#define __periodicBoundaryField_hpp__
+
+#include "boundaryField.hpp"
+
+namespace pFlow
+{
+
+template< class T, class MemorySpace = void>
+class periodicBoundaryField
+:
+    public boundaryField<T, MemorySpace> 
+{
+public:
+	
+    using periodicBoundaryFieldType = periodicBoundaryField<T, MemorySpace>;
+
+	using BoundaryFieldType = boundaryField<T, MemorySpace>;
+
+	using InternalFieldType = typename BoundaryFieldType::InternalFieldType;
+
+	using memory_space 		= typename BoundaryFieldType::memory_space;
+
+	using execution_space 	= typename BoundaryFieldType::execution_space;
+
+   
+
+public:
+
+	TypeInfo("boundaryField<periodic>");
+
+	periodicBoundaryField(
+		const boundaryBase& boundary, 
+		InternalFieldType& internal);
+		
+
+	add_vCtor
+	(
+		BoundaryFieldType,
+		periodicBoundaryFieldType,
+		boundaryBase
+	);
+
+
+	bool hearChanges
+	(
+		real t,
+		real dt,
+		uint32 iter,
+		const message& msg, 
+    	const anyList& varList
+	) override
+    {
+		notImplementedFunction;
+		return false;
+	}
+
+};
+
+}
+
+#include "periodicBoundaryField.cpp"
+
+#endif
diff --git a/src/phasicFlow/containers/pointField/pointFields.cpp b/src/phasicFlow/containers/pointField/pointFields.cpp
index 8e90019f..09a979b1 100644
--- a/src/phasicFlow/containers/pointField/pointFields.cpp
+++ b/src/phasicFlow/containers/pointField/pointFields.cpp
@@ -21,69 +21,73 @@ Licence:
 
 #include "pointFields.hpp"
 #include "createBoundaryFields.hpp"
+#include "periodicBoundaryField.hpp"
 
+#define createAllBoundary(DataType, MemorySpaceType)          \
+    template class pFlow::exitBoundaryField<DataType, MemorySpaceType>; \
+    template class pFlow::periodicBoundaryField<DataType, MemorySpaceType>;
 
 template class pFlow::pointField<pFlow::int8, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::int8, pFlow::HostSpace);
-createBoundary(pFlow::int8, pFlow::HostSpace, exit);
+createAllBoundary(pFlow::int8, pFlow::HostSpace);
 
 template class pFlow::pointField<pFlow::int8>; 
 createBaseBoundary(pFlow::int8, void);
-createBoundary(pFlow::int8, void, exit);
+createAllBoundary(pFlow::int8, void);
 
 
 template class pFlow::pointField<pFlow::uint8, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::uint8, pFlow::HostSpace);
-createBoundary(pFlow::uint8, pFlow::HostSpace, exit);
+createAllBoundary(pFlow::uint8, pFlow::HostSpace);
 
 template class pFlow::pointField<pFlow::uint8>; 
 createBaseBoundary(pFlow::uint8, void);
-createBoundary(pFlow::uint8, void, exit);
+createAllBoundary(pFlow::uint8, void);
 
 template class pFlow::pointField<pFlow::int32, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::int32, pFlow::HostSpace);
-createBoundary(pFlow::int32, pFlow::HostSpace, exit);
+createAllBoundary(pFlow::int32, pFlow::HostSpace);
 
 template class pFlow::pointField<pFlow::int32>; 
 createBaseBoundary(pFlow::int32, void);
-createBoundary(pFlow::int32, void, exit);
+createAllBoundary(pFlow::int32, void);
 
 template class pFlow::pointField<pFlow::uint32, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::uint32, pFlow::HostSpace);
-createBoundary(pFlow::uint32, pFlow::HostSpace, exit);
+createAllBoundary(pFlow::uint32, pFlow::HostSpace);
 
 template class pFlow::pointField<pFlow::uint32>; 
 createBaseBoundary(pFlow::uint32, void);
-createBoundary(pFlow::uint32, void, exit);
+createAllBoundary(pFlow::uint32, void);
 
 template class pFlow::pointField<pFlow::real, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::real, pFlow::HostSpace);
-createBoundary(pFlow::real, pFlow::HostSpace, exit);
+createAllBoundary(pFlow::real, pFlow::HostSpace);
 
 
 template class pFlow::pointField<pFlow::real>; 
 createBaseBoundary(pFlow::real, void);
-createBoundary(pFlow::real, void, exit);
+createAllBoundary(pFlow::real, void);
 
 template class pFlow::pointField<pFlow::realx3, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::realx3, pFlow::HostSpace);
-createBoundary(pFlow::realx3, pFlow::HostSpace, exit);
+createAllBoundary(pFlow::realx3, pFlow::HostSpace);
 
 
 template class pFlow::pointField<pFlow::realx3>; 
 createBaseBoundary(pFlow::realx3, void);
-createBoundary(pFlow::realx3, void, exit);
+createAllBoundary(pFlow::realx3, void);
 
 
 template class pFlow::pointField<pFlow::realx4, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::realx4, pFlow::HostSpace);
-createBoundary(pFlow::realx4, pFlow::HostSpace, exit);
+createAllBoundary(pFlow::realx4, pFlow::HostSpace);
 
 
 template class pFlow::pointField<pFlow::realx4>; 
 createBaseBoundary(pFlow::realx4, void);
-createBoundary(pFlow::realx4, void, exit);
+createAllBoundary(pFlow::realx4, void);
 
 template class pFlow::pointField<pFlow::word, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::word, pFlow::HostSpace);
-createBoundary(pFlow::word, pFlow::HostSpace, exit);
\ No newline at end of file
+createAllBoundary(pFlow::word, pFlow::HostSpace);
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
index cc11e502..d6821ca9 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
@@ -22,6 +22,8 @@ Licence:
 #include "dictionary.hpp"
 #include "internalPoints.hpp"
 
+#include "boundaryBaseKernels.hpp"
+
 /*pFlow::boundaryBase::boundaryBase
 (
 	const plane& 		bplane,
@@ -48,21 +50,142 @@ void pFlow::boundaryBase::setNewIndices
 {
 	auto newSize = newIndices.size();
 	setSize(static_cast<uint32>(newSize));
-	copy(indexList_.deviceView(), newIndices);
+	if(newSize>0u)
+	{
+		copy(indexList_.deviceView(), newIndices);
+	}
 }
 
-pFlow::boundaryBase::boundaryBase(
+void pFlow::boundaryBase::appendNewIndices
+(
+	deviceViewType1D<uint32> newIndices
+)
+{
+	auto s = static_cast<uint32>(newIndices.size());
+	if(s == 0) return;
+
+	uint32 oldS = size();
+	uint32 newSize = oldS + s; 
+
+	setSize(newSize);
+	auto appendView = Kokkos::subview(
+		indexList_.deviceViewAll(),
+		Kokkos::make_pair<uint32>(oldS, newSize));
+	copy(appendView, newIndices);
+	
+	// TODO: notify observers about this change 
+
+	// the index list should be sorted  
+	//sort(indexList_.deviceViewAll(), 0, newSize);
+}
+
+
+
+bool pFlow::boundaryBase::removeIndices
+(
+	uint32 numRemove,
+	deviceViewType1D<uint32> removeMask
+)
+{
+    if(removeMask.size() != size()+1 )
+	{
+		fatalErrorInFunction<<"size mismatch"<<endl;
+		return false;
+	}
+
+	deviceViewType1D<uint32> removeIndices("removeIndices", 1);
+	deviceViewType1D<uint32> keepIndices("keepIndices",1);
+
+	pFlow::boundaryBaseKernels::createRemoveKeepIndices
+	(
+		indexList_.deviceView(),
+		numRemove,
+		removeMask,
+		removeIndices,
+		keepIndices
+	);
+	
+	if(!internal_.deletePoints(removeIndices))
+	{
+		fatalErrorInFunction<<
+		"error in deleting points from boundary "<< name()<<endl;
+		return false;
+	}
+
+	setNewIndices(keepIndices);
+
+	//TODO: notify observers about changes 
+
+	return false;
+}
+
+bool pFlow::boundaryBase::transferPoints
+(
+	uint32 numTransfer, 
+	deviceViewType1D<uint32> transferMask, 
+	uint32 transferBoundaryIndex, 
+	realx3 transferVector
+)
+{
+	if(transferMask.size() != size()+1 )
+	{
+		fatalErrorInFunction<<"size mismatch"<<endl;
+		return false;
+	}
+
+	deviceViewType1D<uint32> transferIndices("transferIndices",1);
+	deviceViewType1D<uint32> keepIndices("keepIndices",1);
+
+	pFlow::boundaryBaseKernels::createRemoveKeepIndices
+	(
+		indexList_.deviceView(),
+		numTransfer,
+		transferMask,
+		transferIndices,
+		keepIndices
+	);
+
+	// third, remove the indices from this list 
+	setNewIndices(keepIndices);
+
+	// first, change the flags in the internalPoints
+	if( !internal_.changePointsFlag(
+		transferIndices, 
+		transferBoundaryIndex) ) 
+	{
+		return false;
+	}
+
+	// second, change the position of points 
+	if(!internal_.changePointsPoisition(
+		transferIndices,
+		transferVector))
+	{
+		return false;
+	}
+
+	// fourth, add the indices to the mirror boundary 
+	internal_.boundary(transferBoundaryIndex).
+		appendNewIndices(transferIndices);
+	
+    return true;
+}
+
+pFlow::boundaryBase::boundaryBase
+(
     const dictionary &dict,
     const plane &bplane,
-    internalPoints &internal)
-    : subscriber(dict.name()),
-      boundaryPlane_(bplane),
-      indexList_(groupNames(dict.name(), "indexList")),
-      neighborLength_(dict.getVal<real>("neighborLength")),
-      internal_(internal),
-      mirrorProcessoNo_(dict.getVal<uint32>("mirrorProcessorNo")),
-      name_(dict.name()),
-      type_(dict.getVal<word>("type"))
+    internalPoints &internal
+)
+: 
+	subscriber(dict.name()),
+	boundaryPlane_(bplane),
+	indexList_(groupNames(dict.name(), "indexList")),
+	neighborLength_(dict.getVal<real>("neighborLength")),
+	internal_(internal),
+	mirrorProcessoNo_(dict.getVal<uint32>("mirrorProcessorNo")),
+	name_(dict.name()),
+	type_(dict.getVal<word>("type"))
 {
 }
 
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
index 4974174d..038114e7 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
@@ -69,6 +69,19 @@ protected:
 
 	void setNewIndices(deviceViewType1D<uint32> newIndices);
 
+	void appendNewIndices(deviceViewType1D<uint32> newIndices);
+	
+	bool removeIndices(
+		uint32 numRemove, 
+		deviceViewType1D<uint32> removeMask);
+	
+	bool transferPoints(
+		uint32 numTransfer, 
+		deviceViewType1D<uint32> transferMask,
+		uint32 transferBoundaryIndex,
+		realx3 transferVector);
+	
+	
 public:
 
 	TypeInfo("boundaryBase");
@@ -102,12 +115,17 @@ public:
 		(dict, bplane, internal)
 	);
 
-	inline 
-	auto neighborLength()const
+	virtual 
+	real neighborLength()const
 	{
 		return neighborLength_;
 	}
 
+	virtual 
+	realx3 boundaryExtensionLength()const
+	{
+		return {0,0,0};
+	}
 
 	const word& type()const
 	{
@@ -129,6 +147,7 @@ public:
 		return indexList_.size();
 	}
 
+	virtual 
 	const plane& boundaryPlane()const
 	{
 		return boundaryPlane_;
@@ -168,11 +187,6 @@ public:
 		return indexList_;
 	}
 
-	/*auto& indexList()
-	{
-		return indexList_;
-	}*/
-
     pointFieldAccessType thisPoints();
 
     virtual
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.cpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.cpp
new file mode 100644
index 00000000..ff31ba02
--- /dev/null
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.cpp
@@ -0,0 +1,90 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "boundaryBaseKernels.hpp"
+
+void pFlow::boundaryBaseKernels::createRemoveKeepLists
+(
+    uint32 numTotal, 
+    uint32 numRemove, 
+    deviceViewType1D<uint32> removeMask, 
+    deviceViewType1D<uint32>& removeList, 
+    deviceViewType1D<uint32>& keepList
+)
+{
+    uint32 numKeep = numTotal - numRemove;
+    deviceViewType1D<uint32> rList("rList",numRemove);
+    deviceViewType1D<uint32> kList("kList",numKeep);
+
+    exclusiveScan(removeMask, 0u, numTotal+1, removeMask, 0u);
+
+    Kokkos::parallel_for
+    (
+        "pFlow::boundaryBaseKernels::createRemoveKeepLists",
+        deviceRPolicyStatic(0, numTotal),
+        LAMBDA_HD(uint32 i)
+		{
+			if(removeMask(i)!= removeMask(i+1))
+				rList(removeMask(i)) = i;
+            else
+                kList(i-removeMask(i)) = i;
+		}
+    );
+    Kokkos::fence();
+
+    removeList = rList;
+    keepList = kList;
+
+}
+
+
+void pFlow::boundaryBaseKernels::createRemoveKeepIndices
+(
+    deviceViewType1D<uint32> indices,
+    uint32 numRemove,
+    deviceViewType1D<uint32> removeMask, 
+    deviceViewType1D<uint32>& removeIndices, 
+    deviceViewType1D<uint32>& keepIndices
+)
+{
+    uint32 numTotal = indices.size();
+    uint32 numKeep = numTotal - numRemove;
+    deviceViewType1D<uint32> rIndices("rIndices",numRemove);
+    deviceViewType1D<uint32> kIndices("kIndices",numKeep);
+
+    exclusiveScan(removeMask, 0u, numTotal+1, removeMask, 0u);
+
+    Kokkos::parallel_for
+    (
+        "pFlow::boundaryBaseKernels::createRemoveKeepLists",
+        deviceRPolicyStatic(0, numTotal),
+        LAMBDA_HD(uint32 i)
+		{
+			if(removeMask(i)!= removeMask(i+1))
+				rIndices(removeMask(i)) = indices(i);
+            else
+                kIndices(i-removeMask(i)) = indices(i);
+		}
+    );
+    Kokkos::fence();
+
+    removeIndices = rIndices;
+    keepIndices = kIndices;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.hpp
new file mode 100644
index 00000000..e3166721
--- /dev/null
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.hpp
@@ -0,0 +1,46 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __boundaryBaseKernels_hpp__
+#define __boundaryBaseKernels_hpp__
+
+#include "phasicFlowKokkos.hpp"
+
+namespace pFlow::boundaryBaseKernels
+{
+
+void createRemoveKeepLists(
+    uint32 numTotal, 
+    uint32 numRemove, 
+    deviceViewType1D<uint32> removeMask, 
+    deviceViewType1D<uint32>& removeList, 
+    deviceViewType1D<uint32>& keepList);
+
+void createRemoveKeepIndices(
+    deviceViewType1D<uint32> indices,
+    uint32 numRemove,
+    deviceViewType1D<uint32> removeMask, 
+    deviceViewType1D<uint32>& removeIndices, 
+    deviceViewType1D<uint32>& keepIndices);
+
+
+}
+
+#endif //__boundaryBaseKernels_hpp__
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
index 9c0706d4..b48e80ca 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
@@ -52,106 +52,36 @@ bool pFlow::boundaryExit::beforeIteration
 	}
 
 	uint32 s = size();
-	deviceViewType1D<uint32> delFlags("delFlags",s+1); 
-	deviceViewType1D<uint32> keepFlags("keepFlags", s+1);
-	fill(delFlags, 0, s+1, 0u);
-	fill(keepFlags, 0, s+1, 0u);
-
-	using policy = Kokkos::RangePolicy<
-			pFlow::DefaultExecutionSpace,
-			Kokkos::Schedule<Kokkos::Static>,
-			Kokkos::IndexType<pFlow::uint32>>;
+	deviceViewType1D<uint32> deleteFlags("deleteFlags",s+1); 
+	fill(deleteFlags, 0, s+1, 0u);
 
 	auto points = thisPoints();
-	uint32 numDeleted = 0;
 	auto p = boundaryPlane().infPlane();
-	
+
+	uint32 numDeleted = 0;	
 
 	Kokkos::parallel_reduce
 	(
 		"boundaryExit::beforeIteration",
-		policy(0,s),
+		deviceRPolicyStatic(0,s),
 		LAMBDA_HD(uint32 i, uint32& delToUpdate)
 		{
 			if(p.pointInNegativeSide(points(i)))
 			{
-				delFlags(i)=1;
+				deleteFlags(i)=1;
 				delToUpdate++;
 			}
-			else
-			{
-				keepFlags(i) = 1;
-			}
 		}, 
 		numDeleted
 	);
-	
-	
+		
 	// no point is deleted
 	if(numDeleted == 0 )
 	{
 		return true;
 	}
 
-	exclusiveScan(delFlags, 0u, s+1, delFlags, 0u);
-	exclusiveScan(keepFlags, 0u, s+1, keepFlags, 0u);
-	
-	deviceViewType1D<uint32> deleteList("deleteList", numDeleted);
-
-	Kokkos::parallel_for
-	(
-		"boundaryExit::parllel_for",
-		policy(0, size()),
-		LAMBDA_HD(uint32 i)
-		{
-			if(delFlags(i)!= delFlags(i+1))
-				deleteList(delFlags(i)) = i;
-		}	
-	);
-	Kokkos::fence();
-
-	deviceScatteredFieldAccess<uint32> deleteIndices(
-			numDeleted, 
-			deleteList,
-			indexList().deviceViewAll());
-	
-	// tell internal to remove these points from its list 
-	if(!internal().deletePoints(deleteIndices))
-	{
-		fatalErrorInFunction<<
-		"error in deleting points from boundary "<< name()<<endl;
-		return false;
-	}
-
-	// delete these indices from your list 
-	if(numDeleted == s )
-	{
-		setSize(0u);
-	}
-	else
-	{
-		uint32 newSize = s-numDeleted;
-		deviceViewType1D<uint32> newIndices("newIndices", newSize);
-		auto oldIndices = indexList().deviceViewAll();
-
-		Kokkos::parallel_for(
-			"fillIndices",
-			policy(0,s),
-			LAMBDA_HD(uint32 i)
-			{
-				if(keepFlags(i)!= keepFlags(i+1))
-				{
-					newIndices(keepFlags(i)) = oldIndices(i);
-				}
-			}
-		);
-		Kokkos::fence();
-		setNewIndices(newIndices);
-	}
-
-	//TODO: notify observers about changes 
-	
-	return true;
+	return this->removeIndices(numDeleted, deleteFlags);
 }
 
 bool pFlow::boundaryExit::iterate
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryList.cpp b/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
index 8cd8864f..2e6d20dc 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
@@ -40,9 +40,19 @@ bool pFlow::boundaryList::updateLists()
 	dist[4] = boundary(4).neighborLength();
 	dist[5] = boundary(5).neighborLength();
 
+	realx3 lowerExt = 
+		boundary(0).boundaryExtensionLength() + 
+		boundary(2).boundaryExtensionLength() + 
+		boundary(4).boundaryExtensionLength();
 	
+	realx3 upperExt = 
+		boundary(1).boundaryExtensionLength()+
+		boundary(3).boundaryExtensionLength()+
+		boundary(5).boundaryExtensionLength();
+
+	auto extDomain = pStruct_.simDomain().extendThisDomain(lowerExt, upperExt);
 	pStruct_.updateFlag(
-			pStruct_.simDomain().thisDomain(),
+			extDomain,
 			dist);
 	const auto& maskD = pStruct_.activePointsMaskDevice();
 	boundary(0).setSize( maskD.leftSize() );
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp
new file mode 100644
index 00000000..51fc7ab3
--- /dev/null
+++ b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp
@@ -0,0 +1,125 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "boundaryPeriodic.hpp"
+#include "internalPoints.hpp"
+#include "dictionary.hpp"
+
+
+pFlow::boundaryPeriodic::boundaryPeriodic
+(
+	const dictionary& dict,
+	const plane&      bplane,
+	internalPoints&   internal
+)
+:
+	boundaryBase(dict, bplane, internal),
+	mirrorBoundaryIndex_(dict.getVal<uint32>("mirrorBoundaryIndex"))
+{
+	extendedPlane_ = boundaryBase::boundaryPlane().parallelPlane(-boundaryBase::neighborLength());
+}
+
+pFlow::real pFlow::boundaryPeriodic::neighborLength() const
+{
+    return 2.0*boundaryBase::neighborLength();
+}
+
+pFlow::realx3 pFlow::boundaryPeriodic::boundaryExtensionLength() const
+{
+    return -neighborLength()*boundaryBase::boundaryPlane().normal();
+}
+
+const pFlow::plane &pFlow::boundaryPeriodic::boundaryPlane() const
+{
+    return extendedPlane_;
+}
+
+bool pFlow::boundaryPeriodic::beforeIteration(
+    uint32 iterNum,
+    real t,
+    real dt)
+{
+	// nothing have to be done
+	if(empty())
+	{
+		return true;
+	}
+
+	uint32 s = size();
+	deviceViewType1D<uint32> transferFlags("transferFlags",s+1); 
+	fill(transferFlags, 0, s+1, 0u);
+	
+	auto points = thisPoints();
+	auto p = boundaryPlane().infPlane();
+	uint32 numTransfered = 0;
+
+	Kokkos::parallel_reduce
+	(
+		"boundaryPeriodic::beforeIteration",
+		deviceRPolicyStatic(0u,s),
+		LAMBDA_HD(uint32 i, uint32& trnasToUpdate)
+		{
+			if(p.pointInNegativeSide(points(i)))
+			{
+				transferFlags(i)=1;
+				trnasToUpdate++;
+			}
+		}, 
+		numTransfered
+	);
+	
+	// no point to be transfered 
+	if(numTransfered == 0 )
+	{
+		return true;
+	}
+	
+	// to obtain the transfer vector 
+	const auto& thisP = boundaryPlane();
+	const auto& mirrorP = internal().boundary(mirrorBoundaryIndex_).boundaryPlane();
+	realx3 transferVec = thisP.normal()*(thisP.d() + mirrorP.d());
+
+	return transferPoints
+	(
+		numTransfered,
+		transferFlags, 
+		mirrorBoundaryIndex_, 
+		transferVec
+	);
+
+}
+
+bool pFlow::boundaryPeriodic::iterate
+(
+	uint32 iterNum, 
+	real t
+)
+{
+	return true;
+}
+
+bool pFlow::boundaryPeriodic::afterIteration
+(
+	uint32 iterNum, 
+	real t
+)
+{
+	return true;
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp
new file mode 100644
index 00000000..01223885
--- /dev/null
+++ b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp
@@ -0,0 +1,76 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __boundaryPeriodic_hpp__
+#define __boundaryPeriodic_hpp__
+
+
+#include "boundaryBase.hpp"
+
+namespace pFlow
+{
+
+class boundaryPeriodic
+:
+ 	public boundaryBase
+{
+private:
+
+	uint32 mirrorBoundaryIndex_;
+
+	plane extendedPlane_;
+
+public:
+
+	TypeInfo("boundary<periodic>");
+
+	boundaryPeriodic(
+		const dictionary& 	dict,
+		const plane&    	bplane,
+		internalPoints& 	internal);
+
+	virtual 
+	~boundaryPeriodic() override= default;
+	
+	add_vCtor
+	(
+		boundaryBase,
+		boundaryPeriodic,
+		dictionary
+	);
+
+	real neighborLength()const override;
+
+	realx3 boundaryExtensionLength()const override;
+
+	const plane& boundaryPlane()const override;
+
+	bool beforeIteration(uint32 iterNum, real t, real dt) override;
+
+	bool iterate(uint32 iterNum, real t) override;
+
+	bool afterIteration(uint32 iterNum, real t) override;
+
+
+};
+
+}
+
+#endif
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp b/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
index 5cc3c6fb..59ba7aa1 100644
--- a/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
+++ b/src/phasicFlow/structuredData/domain/regularSimulationDomain.cpp
@@ -8,8 +8,8 @@ bool pFlow::regularSimulationDomain::createBoundaryDicts()
 {
     auto& boundaries = this->subDict("boundaries");
     
-    this->addDict("regularSimulationDomainBoundaries", boundaries);
-    auto& rbBoundaries = this->subDict("regularSimulationDomainBoundaries");
+    this->addDict("regularBoundaries", boundaries);
+    auto& rbBoundaries = this->subDict("regularBoundaries");
     
 	real neighborLength = boundaries.getVal<real>("neighborLength");
 
@@ -37,7 +37,25 @@ bool pFlow::regularSimulationDomain::createBoundaryDicts()
 			" in dictionary "<< boundaries.globalName()<<endl;
 			return false;
 		}
+		auto bType = bDict.getVal<word>("type");
+		uint32 mirrorIndex = 0;
+		if(bType == "periodic")
+		{
+			if(bName == bundaryName(0)) mirrorIndex = 1;
+			if(bName == bundaryName(1)) mirrorIndex = 0;
+			if(bName == bundaryName(2)) mirrorIndex = 3;
+			if(bName == bundaryName(3)) mirrorIndex = 2;
+			if(bName == bundaryName(4)) mirrorIndex = 5;
+			if(bName == bundaryName(5)) mirrorIndex = 4;
 
+			if(! bDict.addOrReplace("mirrorBoundaryIndex", mirrorIndex))
+			{
+				fatalErrorInFunction<<
+				"canno add entry mirroBoundaryIndex to dictionary "<<
+				bDict.globalName()<<endl;
+				return false;
+			}
+		}
 	}
     
     
@@ -168,7 +186,7 @@ bool pFlow::regularSimulationDomain::initialTransferBlockData
 
 const pFlow::dictionary &pFlow::regularSimulationDomain::thisBoundaryDict() const
 {
-    return this->subDict("regularSimulationDomainBoundaries");
+    return this->subDict("regularBoundaries");
 }
 
 bool pFlow::regularSimulationDomain::requiresDataTransfer()const
diff --git a/src/phasicFlow/structuredData/domain/simulationDomain.cpp b/src/phasicFlow/structuredData/domain/simulationDomain.cpp
index 232706c8..cf4201a6 100644
--- a/src/phasicFlow/structuredData/domain/simulationDomain.cpp
+++ b/src/phasicFlow/structuredData/domain/simulationDomain.cpp
@@ -41,8 +41,19 @@ pFlow::simulationDomain::simulationDomain(systemControl& control)
     
 }
 
-pFlow::uniquePtr<pFlow::simulationDomain> 
-    pFlow::simulationDomain::create(systemControl& control)
+pFlow::domain pFlow::simulationDomain::extendThisDomain
+(
+	const realx3 &lowerPointExtension, 
+	const realx3 &upperPointExtension
+) const
+{
+    realx3 minP = thisDomain().domainBox().minPoint() + lowerPointExtension;
+	realx3 maxP = thisDomain().domainBox().maxPoint() + upperPointExtension;
+	return domain({minP, maxP});
+}
+
+pFlow::uniquePtr<pFlow::simulationDomain>
+pFlow::simulationDomain::create(systemControl &control)
 {
 	word sType = angleBracketsNames(
         "simulationDomain", 
diff --git a/src/phasicFlow/structuredData/domain/simulationDomain.hpp b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
index 35718798..af49ee21 100644
--- a/src/phasicFlow/structuredData/domain/simulationDomain.hpp
+++ b/src/phasicFlow/structuredData/domain/simulationDomain.hpp
@@ -162,6 +162,11 @@ public:
 		return thisDomain_;
 	}
 
+	
+	domain extendThisDomain(
+		const realx3& lowerPointExtension, 
+		const realx3& upperPointExtension)const;
+
 	inline 
 	const auto& globalBoundaryDict()const
 	{
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
index 3f727513..e9508076 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
@@ -22,6 +22,7 @@ Licence:
 #include "internalPoints.hpp"
 #include "domain.hpp"
 #include "Vectors.hpp"
+#include "internalPointsKernels.hpp"
 
 void pFlow::internalPoints::syncPFlag()const
 {
@@ -32,6 +33,54 @@ void pFlow::internalPoints::syncPFlag()const
 	}
 }
 
+bool pFlow::internalPoints::deletePoints(deviceViewType1D<uint32> delPoints)
+{
+    if(!pFlagsD_.deletePoints(delPoints))
+	{
+		fatalErrorInFunction<<
+		"Error in deleting points from internal points"<<endl;
+		return false;
+	}
+	pFlagSync_ = false;
+	WARNING<<"Notify the observersin in internalPoints"<<END_WARNING;
+	return true;
+}
+
+bool pFlow::internalPoints::changePointsFlag
+(
+	deviceViewType1D<uint32> changePoints, 
+	uint32 boundaryIndex
+)
+{
+	if(boundaryIndex>5)
+	{
+		fatalErrorInFunction<<
+		"Invalid boundary index "<< boundaryIndex<<endl;
+		return false;
+	}
+	
+	pFlagsD_.changeFlags(changePoints, boundaryIndex);
+    pFlagSync_ = false;
+	WARNING<<"NOTIFY About transfering the data "<<END_WARNING;
+	return true;
+}
+
+bool pFlow::internalPoints::changePointsPoisition
+(
+	deviceViewType1D<uint32> changePoints, 
+	realx3 transferVector
+)
+{
+	pFlow::internalPointsKernels::changePosition
+	(
+		pointPosition_.deviceViewAll(),
+		changePoints,
+		transferVector
+	);
+	WARNING<<"Notify about the change in the position of points"<<END_WARNING;
+    return true;
+}
+
 pFlow::internalPoints::internalPoints()
 :
 	subscriber("internalPoints"),
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
index 5a0d81a0..a521ae20 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
@@ -31,6 +31,8 @@ namespace pFlow
 {
 
 class domain;
+class boundaryBase;
+class Time; 
 
 class internalPoints
 :
@@ -70,6 +72,19 @@ protected:
 
 		void syncPFlag()const;
 
+		friend boundaryBase;
+		
+
+		bool deletePoints(deviceViewType1D<uint32> delPoints);
+
+		bool changePointsFlag(
+			deviceViewType1D<uint32> changePoints, 
+			uint32 boundaryIndex);
+
+		bool changePointsPoisition(
+			deviceViewType1D<uint32> changePoints,
+			realx3 transferVector);
+
 public:
 
 	//friend class dynamicinternalPoints;
@@ -165,6 +180,18 @@ public:
 		{
 			return pFlagsD_.activeRange();
 		}
+		
+		virtual 
+		Time& time() = 0;
+
+		virtual
+		const Time& time() const = 0;
+
+		virtual 
+		boundaryBase& boundary(size_t boundaryIndex ) = 0;
+
+		virtual 
+		const boundaryBase& boundary(size_t boundaryIndex ) const = 0;
 
 		///@brief delete points at indices given in delPoints.
 		/// The default is that delPoints contains sorted indices 
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPointsKernels.cpp b/src/phasicFlow/structuredData/pointStructure/internalPointsKernels.cpp
new file mode 100644
index 00000000..e5061d2a
--- /dev/null
+++ b/src/phasicFlow/structuredData/pointStructure/internalPointsKernels.cpp
@@ -0,0 +1,44 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "internalPointsKernels.hpp"
+
+void pFlow::internalPointsKernels::changePosition
+(
+    deviceViewType1D<realx3> points,
+    deviceViewType1D<uint32> indices, 
+    realx3 transferVector
+)
+{
+    auto s = static_cast<uint32>(indices.size());
+    if(s==0u)return;
+
+    Kokkos::parallel_for
+    (
+        "internalPointsKernels::changePosition",
+        deviceRPolicyStatic(0u, s),
+        LAMBDA_HD(uint32 i)
+        {   
+            points[indices[i]] += transferVector;
+        }
+    );
+    Kokkos::fence();
+    
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPointsKernels.hpp b/src/phasicFlow/structuredData/pointStructure/internalPointsKernels.hpp
new file mode 100644
index 00000000..2b31f294
--- /dev/null
+++ b/src/phasicFlow/structuredData/pointStructure/internalPointsKernels.hpp
@@ -0,0 +1,31 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "phasicFlowKokkos.hpp"
+
+namespace pFlow::internalPointsKernels
+{
+
+void changePosition(
+    deviceViewType1D<realx3> points,
+    deviceViewType1D<uint32> indices,
+    realx3 transferVector);
+
+}
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
index f39b702d..ef91ccff 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
@@ -51,6 +51,10 @@ class pointFlag
 
 	using device_type 		= typename viewType::device_type;
 
+	using rPolicy = Kokkos::RangePolicy<
+		execution_space,  
+		Kokkos::IndexType<uint32>>;
+
 protected:
 	
 	viewType 	flags_;
@@ -75,7 +79,34 @@ protected:
 
 	//- Protected methods 
 
-	
+	uint8 getBoundaryFlag(uint32 index)const
+	{
+		uint8 flg;
+		switch (index){
+			case 0u:
+				flg = Flag::LEFT;
+				break;
+			case 1u:
+				flg = Flag::RIGHT;
+				break;
+			case 2u:
+				flg = Flag::BOTTOM;
+				break;
+			case 3u:
+				flg = Flag::TOP;
+				break;
+			case 4u:
+				flg = Flag::REAR;
+				break;
+			case 5u:
+				flg = Flag::FRONT;
+				break;
+			default:
+				flg=0;
+		}
+
+		return flg;
+	}
 
 public:
 
@@ -255,9 +286,15 @@ public:
 		const box& validBox,
 		ViewType1D<realx3, memory_space> points);
 
-	
 	bool deletePoints(
 		scatteredFieldAccess<uint32, memory_space> points);
+
+	bool deletePoints(
+		ViewType1D<uint32, memory_space> points);
+	
+	bool changeFlags(
+		ViewType1D<uint32, memory_space> changePoints, 
+		uint32 boundaryIndex);
 	
 	/// @brief mark points based on their position in the domain.
 	/// This should be the first method to be called when updating
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
index 88e3d145..aad7ff6e 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
@@ -158,12 +158,59 @@ bool pFlow::pointFlag<ExecutionSpace>::deletePoints
 {
 	if(points.empty())return true;
 	
-	uint32 minIndex = points.getFirstCopy();
-	uint32 maxIndex = points.getLastCopy();
+	//uint32 minIndex = points.getFirstCopy();
+	//uint32 maxIndex = points.getLastCopy();
 	
-	if(maxIndex<minIndex) return false;
-	if(maxIndex>activeRange_.end())return false;
-	if(minIndex<activeRange_.start())return false;
+	//if(maxIndex<minIndex) return false;
+	//if(maxIndex>activeRange_.end())return false;
+	//if(minIndex<activeRange_.start())return false;
+
+	using policy = Kokkos::RangePolicy<
+		execution_space,  
+		Kokkos::IndexType<uint32>>;
+
+	uint32 numDeleted = 0;
+	Kokkos::parallel_reduce
+	(
+		"pointFlagKernels::deletePoints",
+		policy(0u, points.size()),
+		CLASS_LAMBDA_HD(uint32 i, uint32& valDelUpdate)
+		{
+			uint32 n = points(i);
+			if(isActive(n))
+			{
+				valDelUpdate++;
+				flags_[n] = Flag::DELETED;
+			}
+		},
+		numDeleted
+	);	
+
+	if(numDeleted >= numActive_)
+	{
+		activeRange_ = {0, 0};
+		numDeleted == numActive_;
+	}
+		
+	numActive_ 	= numActive_ - numDeleted;
+	isAllActive_ = 
+		(activeRange_.numElements() == numActive_)&& numActive_>0;
+	
+	return true;
+}
+template<typename ExecutionSpace>
+bool pFlow::pointFlag<ExecutionSpace>::deletePoints
+(
+	ViewType1D<uint32, memory_space> points
+)
+{
+
+	uint32 s = points.size();
+	if(s==0u)return true;
+	
+	//if(maxIndex<minIndex) return false;
+	//if(maxIndex>activeRange_.end())return false;
+	//if(minIndex<activeRange_.start())return false;
 
 	using policy = Kokkos::RangePolicy<
 		execution_space,  
@@ -200,6 +247,27 @@ bool pFlow::pointFlag<ExecutionSpace>::deletePoints
 }
 
 
+template<typename ExecutionSpace>
+bool pFlow::pointFlag<ExecutionSpace>::changeFlags
+(
+	ViewType1D<uint32, memory_space> changePoints, 
+	uint32 boundaryIndex
+)
+{
+	auto flg = getBoundaryFlag(boundaryIndex);
+	Kokkos::parallel_for
+	(
+		"pointFlag::changeFlags",
+		rPolicy(0, changePoints.size()),
+		LAMBDA_HD(uint32 i)
+		{
+			flags_[changePoints(i)] = flg;
+		}
+	);
+	Kokkos::fence();
+	return true;
+}
+
 template<typename ExecutionSpace>
 pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markPointRegions
 (
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
index 216d5585..be5b6998 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
@@ -119,12 +119,23 @@ public:
             return boundaries_;
         }
 
-        auto& boundary(size_t i )
+		
+		Time& time() override
+		{
+			return demComponent::time();
+		}
+
+		const Time& time() const override
+		{
+			return demComponent::time();
+		}
+
+        boundaryBase& boundary(size_t i ) override
         {
             return boundaries_[i];
         }
 
-        auto& boundary(size_t i)const
+        const boundaryBase& boundary(size_t i)const override
         {
             return boundaries_[i];
         }
@@ -134,6 +145,7 @@ public:
 			return simulationDomain_();
 		}
 
+		
 	// - IO methods 
 
 		/// @brief read the point structure from the input stream.

From fd039f234fc0e7ffd4cf34127b195e5c8387daa0 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sat, 3 Feb 2024 11:49:07 -0800
Subject: [PATCH 34/60] geometryPhasicFlow-pass1 and triSurface and
 multiTriSurface tested

---
 src/phasicFlow/CMakeLists.txt                 |   7 +-
 src/phasicFlow/containers/Field/Fields.hpp    |   4 +
 src/phasicFlow/containers/Vector/Vectors.hpp  |   2 +
 .../containers/VectorHD/VectorSingle.cpp      |  27 +-
 .../containers/VectorHD/VectorSingle.hpp      |   6 +-
 .../trisurfaceStructure/bitTransfer.hpp       |  71 -----
 .../trisurfaceStructure/triSurface.cpp        | 234 --------------
 .../trisurfaceStructure/triSurface.hpp        | 288 ------------------
 .../multiTriSurface.cpp                       | 101 +++---
 .../multiTriSurface.hpp                       |  77 ++---
 .../stlFile.cpp                               |   0
 .../stlFile.hpp                               |   0
 src/phasicFlow/triSurface/subSurface.cpp      |  26 ++
 src/phasicFlow/triSurface/subSurface.hpp      | 105 +++++++
 src/phasicFlow/triSurface/triSurface.cpp      | 262 ++++++++++++++++
 src/phasicFlow/triSurface/triSurface.hpp      | 177 +++++++++++
 .../triSurfaceKernels.hpp                     |   0
 .../triangleFunctions.hpp                     |  29 +-
 src/phasicFlow/types/triple/triple.hpp        |  18 +-
 utilities/CMakeLists.txt                      |   2 +-
 utilities/Utilities/CMakeLists.txt            |   8 +-
 utilities/geometryPhasicFlow/CMakeLists.txt   |   2 +-
 .../geometryPhasicFlow/geometryPhasicFlow.cpp |  75 ++---
 23 files changed, 788 insertions(+), 733 deletions(-)
 delete mode 100644 src/phasicFlow/structuredData/trisurfaceStructure/bitTransfer.hpp
 delete mode 100644 src/phasicFlow/structuredData/trisurfaceStructure/triSurface.cpp
 delete mode 100644 src/phasicFlow/structuredData/trisurfaceStructure/triSurface.hpp
 rename src/phasicFlow/{structuredData/trisurfaceStructure => triSurface}/multiTriSurface.cpp (79%)
 rename src/phasicFlow/{structuredData/trisurfaceStructure => triSurface}/multiTriSurface.hpp (67%)
 rename src/phasicFlow/{structuredData/trisurfaceStructure => triSurface}/stlFile.cpp (100%)
 rename src/phasicFlow/{structuredData/trisurfaceStructure => triSurface}/stlFile.hpp (100%)
 create mode 100644 src/phasicFlow/triSurface/subSurface.cpp
 create mode 100644 src/phasicFlow/triSurface/subSurface.hpp
 create mode 100644 src/phasicFlow/triSurface/triSurface.cpp
 create mode 100644 src/phasicFlow/triSurface/triSurface.hpp
 rename src/phasicFlow/{structuredData/trisurfaceStructure => triSurface}/triSurfaceKernels.hpp (100%)
 rename src/phasicFlow/{structuredData/trisurfaceStructure => triSurface}/triangleFunctions.hpp (70%)

diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 29ec8261..e5a14d00 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -63,7 +63,7 @@ Timer/Timer.cpp
 Timer/Timers.cpp
 
 
-
+structuredData/zAxis/zAxis.cpp
 structuredData/box/box.cpp
 structuredData/line/line.cpp
 structuredData/infinitePlane/infinitePlane.cpp
@@ -85,6 +85,11 @@ structuredData/pointStructure/selectors/selectBox/selectBox.cpp
 structuredData/pointStructure/selectors/selectRange/selectRange.cpp 
 structuredData/pointStructure/selectors/selectRandom/selectRandom.cpp
 
+triSurface/subSurface.cpp
+triSurface/triSurface.cpp
+triSurface/multiTriSurface.cpp
+
+
 commandLine/commandLine.cpp
 
 
diff --git a/src/phasicFlow/containers/Field/Fields.hpp b/src/phasicFlow/containers/Field/Fields.hpp
index abe589fe..a0b8d192 100644
--- a/src/phasicFlow/containers/Field/Fields.hpp
+++ b/src/phasicFlow/containers/Field/Fields.hpp
@@ -54,6 +54,10 @@ using uint64Field_D 		= Field<uint64>;
 
 using uint64Field_H 		= Field<uint64, HostSpace> ;
 
+using uint32x3Field_D   = Field<uint32x3>;
+
+using uint32x3Field_H   = Field<uint32x3, HostSpace>;
+
 using realField_D 		= Field<real>;
 
 using realField_H 		= Field<real, HostSpace> ;
diff --git a/src/phasicFlow/containers/Vector/Vectors.hpp b/src/phasicFlow/containers/Vector/Vectors.hpp
index 523444e4..ff1c1db7 100644
--- a/src/phasicFlow/containers/Vector/Vectors.hpp
+++ b/src/phasicFlow/containers/Vector/Vectors.hpp
@@ -41,6 +41,8 @@ using uint32Vector   = Vector<uint32>;
 
 using uint64Vector   = Vector<uint64>;
 
+using uint32x3Vector = Vector<uint32x3>;
+
 using realVector 	= Vector<real> 	;
 
 using realx3Vector 	= Vector<realx3>;
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
index 451c091a..72f2790b 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
@@ -1,3 +1,4 @@
+#include "VectorSingle.hpp"
 /*------------------------------- phasicFlow ---------------------------------
       O        C enter of
      O O       E ngineering and
@@ -434,9 +435,29 @@ void pFlow::VectorSingle<T,MemorySpace>::assign(const VectorTypeHost& src)
 	copy(deviceView(), src.hostView());
 }
 
-template<typename T, typename MemorySpace>
-INLINE_FUNCTION_H
-auto pFlow::VectorSingle<T,MemorySpace>::getSpan()
+template <typename T, typename MemorySpace>
+void pFlow::VectorSingle<T, MemorySpace>::append
+(
+    const std::vector<T> &appVec
+)
+{
+    if(appVec.empty())return;
+
+    auto srcSize = appVec.size();
+    uint32 oldSize = size();
+    uint32 newSize = srcSize + oldSize;
+    
+    changeSize(newSize);
+    
+    hostViewType1D<const T> temp(appVec.data(), srcSize );
+    auto dest = Kokkos::subview(view_, Kokkos::make_pair<uint32>(oldSize,newSize));
+
+    copy(dest, temp);
+
+}
+
+template <typename T, typename MemorySpace>
+INLINE_FUNCTION_H auto pFlow::VectorSingle<T, MemorySpace>::getSpan()
 {
     return span<T>(view_.data(), size());
 }
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 7f32e1e3..137d3a46 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -282,6 +282,9 @@ public:
 		/// The capacity of *this becomes the capacity of src.
 		INLINE_FUNCTION_H
 		void assign(const VectorTypeHost& src);
+
+		INLINE_FUNCTION_H
+		void append(const std::vector<T>& appVec);
 		
 		INLINE_FUNCTION_H
 		auto getSpan();
@@ -493,7 +496,8 @@ inline iOstream& operator << (iOstream& os, const VectorSingle<T, MemorySpace>&
 #endif //__VectorSingle_hpp__
 
 
-/*INLINE_FUNCTION_H
+/*
+INLINE_FUNCTION_H
 		bool append(const deviceViewType1D<T>& dVec, size_t numElems)
 		{
 
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/bitTransfer.hpp b/src/phasicFlow/structuredData/trisurfaceStructure/bitTransfer.hpp
deleted file mode 100644
index 720a2eb3..00000000
--- a/src/phasicFlow/structuredData/trisurfaceStructure/bitTransfer.hpp
+++ /dev/null
@@ -1,71 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-
-#ifndef __bitTransfer_hpp__
-#define __bitTransfer_hpp__
-
-
-#include "types.hpp"
-#include "Vectors.hpp"
-
-namespace pFlow
-{
-
-// a simple functor that transfers 3 integers into a long variable and 
-// transfer the long to 3 integers
-
-class bitTransfer
-{
-protected:
-
-	static const int numBits_ = 21;
-	static const int numBits2_ = 2 * numBits_;
-	static const unsigned long mask1_ = 0x000000000001FFFFF;
-	static const unsigned long mask2_ = 0x0000003FFFFE00000;
-	static const unsigned long mask3_ = 0x07FFFFC0000000000;
-
-public:
-
-	bitTransfer(){}
-
-	inline unsigned long operator()(const unit3& int3 )
-	{
-		return 
-			static_cast<long>(int3.x()) |
-			static_cast<long>(int3.y()) << numBits_ |
-			static_cast<long>(int3.z()) << numBits2_;
-	}
-
-	inline unit3 operator() (const unsigned long& ul )
-	{
-		return unit3
-			(
-				 ul & mask1_,
-				(ul & mask2_)>> numBits_,
-				(ul & mask3_)>> numBits2_
-			);
-	}
-};
-
-}
-
-
-#endif
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.cpp b/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.cpp
deleted file mode 100644
index 83507bad..00000000
--- a/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.cpp
+++ /dev/null
@@ -1,234 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-
-#include "triSurface.hpp"
-#include "error.hpp"
-#include "iOstream.hpp"
-#include "triSurfaceKernels.hpp"
-
-
-pFlow::int32  pFlow::triSurface::addTriangle
-(
-	const realx3x3 & tri,
-	realx3Vector& points,
-	int32x3Vector& vertices
-)
-{
-	int32x3 newTri;
-
-		// first point
-	if ( int32 i = find(points, tri.x()) ; i > -1)
-	{ 
-		newTri.x() = i; // existing point 
-	}
-	else
-	{ 
-		points.push_back(tri.x());  // new point
-		newTri.x() = static_cast<int32>(points.size()) - 1;
-	}
-	
-	// second point
-	
-	if ( int32 j = find(points, tri.y()) ; j > -1)
-	{ 
-		newTri.y() = j; // existing point 
-	}
-	else
-	{ 
-		points.push_back(tri.y());  // new point
-		newTri.y() = static_cast<int32>(points.size()) - 1;
-	}
-	
-	// third point 
-	
-	if ( int32 k = find(points, tri.z()) ; k > -1)
-	{ 
-		newTri.z() = k; // existing point 
-	}
-	else
-	{ 
-		points.push_back(tri.z());  // new point
-		newTri.z() = static_cast<int32>(points.size()) - 1;
-	}
-	
-	// adds the new tirple vertices to the list
-	vertices.push_back( newTri );
-
-	//output<< " points " <<points << endl;
-	//output<< " vertices "<<vertices <<endl;
-
-	return static_cast<int32>(vertices.size()) -1;
-}
-
-pFlow::int32 pFlow::triSurface::calcMaxIndex()const
-{
-
-	int32 maxIdx = -1;
-
-	if(vertices_.size()>0)
-	{
-		auto verDeviceVec = vertices_.deviceViewAll();
-		
-		Kokkos::parallel_reduce(
-			"triSurface::calcMaxIndex",
-			vertices_.size(),
-			LAMBDA_HD(int32 i, int32& valueToUpdate){
-				valueToUpdate = max(valueToUpdate, max(verDeviceVec[i]));
-			},
-			Kokkos::Max<int32>( maxIdx )
-			);
-	}
-
-	return maxIdx;
-}
-
-bool pFlow::triSurface::check()
-{
-
-	auto maxIdx = calcMaxIndex();
-	maxIndex_ = maxIdx;
-	if( maxIdx >= static_cast<int32>(points_.size())) return false;
-	return true;
-}
-
-
-// * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *//
-pFlow::triSurface::triSurface()
-:
-	points_("points"),
-	vertices_("vertices"),
-	area_("area"),
-	maxIndex_(-1)
-{}
-
-pFlow::triSurface::triSurface
-(
-	const realx3Vector& points,
-	const int32x3Vector& vertices
-)
-:
-	points_("points", "points", points),
-	vertices_("vertices", "vertices", vertices),
-	area_("area", "area"),
-	maxIndex_(-1)
-{
-	if( check() )
-	{
-		fatalErrorInFunction<<
-		"the indices and number of points do not match. \n";
-		fatalExit;
-	}
-
-	area_.reallocate(vertices_.capacity(), vertices_.size());
-
-	pFlow::triSurfaceKernels::calculateArea(points_, vertices_, area_);
-
-}
-
-
-pFlow::triSurface::triSurface
-(
-	const realx3x3Vector& triangles
-)
-:
-	points_("points"),
-	vertices_("vertices"),
-	area_("area")
-{
-
-	Vector<realx3> points;
-	Vector<int32x3> vertices;
-	
-	points.clear();
-	vertices.clear();
-
-	for( const auto& tr: triangles)
-	{
-		if(auto i= addTriangle(tr, points, vertices); i < 0 )
-		{
-			fatalErrorInFunction <<
-			"failed to insert a triangle into triSurface. \n";
-			fatalExit;
-		}
-	}
-
-	points_.assign(points);
-
-	vertices_.assign(vertices);
-
-	area_.reallocate(vertices_.capacity(), vertices_.size());
-
-	pFlow::triSurfaceKernels::calculateArea(points_, vertices_, area_);
-
-	if( !check() )
-	{
-		fatalErrorInFunction<<
-		"the indices and number of points do not match. \n";
-		fatalExit;
-	}
-}
-
-
-bool pFlow::triSurface::readTriSurface
-(
-	iIstream& is
-)
-{
-
-	std::cout<<"triSurface file is binary "<< is.isBinary()<<std::endl;
-
-	is.fatalCheck(FUNCTION_NAME);
-
-	// from start of file
-	if(!points_.read(is)) return false;
-	
-	// from the current position
-	if(!vertices_.read(is, true)) return false;
-	
-	if( !check() )
-	{
-		ioErrorInFile( is.name(), is.lineNumber() ) <<
-		"the indices and number of points do not match. \n";
-		return false;
-	}
-
-	area_.reallocate(vertices_.capacity(), vertices_.size());
-
-	pFlow::triSurfaceKernels::calculateArea(points_, vertices_, area_);
-
-	return true;
-}
-
-bool pFlow::triSurface::writeTriSurface
-(
-	iOstream& os
-)const
-{
-	
-	os << points_;
-	os << vertices_;
-
-	return os.check(FUNCTION_NAME);;
-}
-
-
-
-
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.hpp b/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.hpp
deleted file mode 100644
index 1ab89bbf..00000000
--- a/src/phasicFlow/structuredData/trisurfaceStructure/triSurface.hpp
+++ /dev/null
@@ -1,288 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-
-#ifndef __triSurface_hpp__
-#define __triSurface_hpp__
-
-#include "eventSubscriber.hpp"
-#include "types.hpp"
-#include "Vectors.hpp"
-#include "VectorSingles.hpp"
-#include "Fields.hpp"
-
-namespace pFlow
-{
-
-
-class iIstream;
-class iOstream;
-
-class triSurface
-:
-	public eventSubscriber
-{
-public:
-	
-	class triangleAccessor
-	{
-	public:
-
-	protected:
-		int32 		numPoints_;
-		
-		int32 		numTriangles_;
-
-		deviceViewType1D<realx3> dPoints_;
-		
-		deviceViewType1D<int32x3>  dVectices_;
-	public:
-
-		INLINE_FUNCTION_H
-		triangleAccessor(
-			int32 	numPoints,
-			deviceViewType1D<realx3> points,
-			int32 	numTrianlges,
-			deviceViewType1D<int32x3> vertices )
-		:
-			numPoints_(numPoints),
-			numTriangles_(numTrianlges),
-			dPoints_(points),
-			dVectices_(vertices)
-		{}
-
-		INLINE_FUNCTION_HD
-		triangleAccessor(const triangleAccessor&)= default;
-
-		INLINE_FUNCTION_HD
-		triangleAccessor& operator=(const triangleAccessor&)= default;
-
-		INLINE_FUNCTION_HD
-		triangleAccessor(triangleAccessor&&)= default;
-
-		INLINE_FUNCTION_HD
-		triangleAccessor& operator=(triangleAccessor&&)= default;
-
-		INLINE_FUNCTION_HD
-		~triangleAccessor()=default;
-
-		INLINE_FUNCTION_HD
-		realx3x3 triangle(int32 i)const	{
-			auto v = dVectices_[i];
-			return realx3x3(
-					dPoints_[v.x_],
-					dPoints_[v.y_],
-					dPoints_[v.z_]);
-		}
-
-		INLINE_FUNCTION_HD
-		realx3x3 operator()(int32 i)const { return triangle(i);	}
-
-		INLINE_FUNCTION_HD
-		realx3x3 operator[](int32 i)const {	return triangle(i);	}
-
-		INLINE_FUNCTION_HD
-		int32 numPoints()const { return numPoints_; }
-
-		INLINE_FUNCTION_HD
-		int32 numTrianlges()const { return numTriangles_;}
-	};
-
-protected:
-
-	/// points of triangles
-	realx3Field_D points_;
-
-	/// vectices indices of triangles 
-	int32x3Field_D vertices_;
-
-	/// area of each triangle 
-	realField_D  	area_;
-
-	int32 maxIndex_ = -1; 
-
-	
-	// protected methods 
-
-
-		int32 addTriangle(const realx3x3 & tri, realx3Vector& points, int32x3Vector& vertices);
-
-		// - check if the range of indices in vectors match 
-		bool check();
-
-public:
-
-	// - type info
-	TypeInfo("triSurface");
-
-	//// - Constructors
-
-		// - empty
-		triSurface();
-
-		// - construct from components
-		triSurface(const realx3Vector& points, const int32x3Vector& vertices);
-
-		// - construct from vertices of triangles 
-		triSurface(const realx3x3Vector& triangles);
-
-		virtual ~triSurface() = default;
-
-	//// - Methods
-		size_t numPoints() const
-		{
-			return points_.size();
-		}
-
-		size_t numTriangles()const
-		{
-			return vertices_.size();
-		}
-
-		size_t size()const
-		{
-			return numTriangles();
-		}
-
-		size_t capacity()const
-		{
-			return vertices_.capacity();
-		}
-
-		int32 maxIndex()const
-		{
-			return maxIndex_;
-		}
-
-		auto getTriangleAccessor()const
-		{
-			return triangleAccessor(
-				numPoints(),
-				points_.deviceViewAll(),
-				numTriangles(),
-				vertices_.deviceViewAll()
-				);
-		}
-
-		const realx3Vector_D& points() const
-		{
-			return points_;
-		}
-
-		realx3Vector_D& points()
-		{
-			return points_;
-		}
-
-		const realVector_D& area()const
-		{
-			return area_;
-		}
-
-		realVector_D& area()
-		{
-			return area_;
-		}		
-
-		const realx3* pointsData_D()const
-		{
-			return points_.deviceViewAll().data();
-		}
-
-		realx3* pointsData_D()
-		{
-			return points_.deviceViewAll().data();
-		}
-
-		const int32x3Vector_D& vertices() const
-		{
-			return vertices_;
-		}
-
-		int32x3Vector_D& vertices()
-		{
-			return vertices_;
-		}
-
-		int32x3* verticesData_D()
-		{
-			return vertices_.deviceViewAll().data();
-		}
-
-		const int32x3* verticesData_D()const
-		{
-			return vertices_.deviceViewAll().data();
-		}
-
-		void clear()
-		{
-			points_.clear();
-			vertices_.clear();
-			area_.clear();
-		}
-
-		int32 calcMaxIndex()const;
-		
-	//// - IO operations 
-
-		bool readTriSurface(iIstream& is);
-
-		bool writeTriSurface(iOstream& os)const;
-
-		bool read(iIstream& is)
-		{
-			return readTriSurface(is);
-		}
-
-		bool write(iOstream& os)const
-		{
-			return writeTriSurface(os);
-		}
-
-};
-
-inline iIstream& operator >> (iIstream & is, triSurface & tri )
-{
-	if(!tri.readTriSurface(is))
-	{
-	 	ioErrorInFile(is.name(), is.lineNumber())<<
-	 	"  error in reading triSurface from file.\n";
-	 	fatalExit;
-	}
-	return is;
-}
-
-inline iOstream& operator << (iOstream& os, const triSurface& tri)
-{
-	if( !tri.writeTriSurface(os) )
-	{
-		ioErrorInFile(os.name(), os.lineNumber())<<
-	 	"  error in writing triSurface to file.\n";
-	 	fatalExit;
-	}
-	return os;
-}
-
-
-} // pFlow
-
-
-
-#endif
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/multiTriSurface.cpp b/src/phasicFlow/triSurface/multiTriSurface.cpp
similarity index 79%
rename from src/phasicFlow/structuredData/trisurfaceStructure/multiTriSurface.cpp
rename to src/phasicFlow/triSurface/multiTriSurface.cpp
index 247748db..043919cd 100644
--- a/src/phasicFlow/structuredData/trisurfaceStructure/multiTriSurface.cpp
+++ b/src/phasicFlow/triSurface/multiTriSurface.cpp
@@ -21,7 +21,7 @@ Licence:
 
 #include "multiTriSurface.hpp"
 
-void pFlow::multiTriSurface::calculateVars()
+/*void pFlow::multiTriSurface::calculateVars()
 {
 	numSurfaces_ = surfaceNames_.size();
 
@@ -80,9 +80,9 @@ void pFlow::multiTriSurface::calculateVars()
 	verticesStartPos_.syncViews();
 	
 
-}
+}*/
 
-pFlow::multiTriSurface::multiTriSurface()
+/*pFlow::multiTriSurface::multiTriSurface()
 :
 	triSurface(),
 	lastPointIndex_("lastPointIndex", "lastPointIndex"),
@@ -90,9 +90,9 @@ pFlow::multiTriSurface::multiTriSurface()
 	surfaceNames_("surfaceNames", "surfaceNames")
 {
 	calculateVars();
-}
+}*/
 
-bool pFlow::multiTriSurface::addTriSurface
+/*bool pFlow::multiTriSurface::addTriSurface
 (
 	const word& name,
 	const triSurface& tSurf
@@ -152,17 +152,63 @@ bool pFlow::multiTriSurface::addTriSurface
 
 	return true;
 
+}*/
+
+pFlow::multiTriSurface::multiTriSurface
+(
+	const objectFile &obj, 
+	repository *owner
+)
+:
+	triSurface(obj, owner)
+{
+	if( !IOobject::readObject() )
+    {
+        fatalErrorInFunction<<
+        "Error in reading from file "<<IOobject::path()<<endl;
+        fatalExit;
+    }
 }
 
-bool pFlow::multiTriSurface::addTriSurface
+bool pFlow::multiTriSurface::appendTriSurface
 (
-	const word& name,
-	const realx3x3Vector& vertices
+	const word &name, 
+	const realx3x3Vector &triangles
 )
 {
-	triSurface newSurf(vertices);
+	uint32 start = size();
+	uint32 pointStart = numPoints();
 
-	return addTriSurface(name, newSurf);
+	if(!triSurface::appendTriSurface(triangles))
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+	uint32 end = size();
+	uint32 pointEnd = numPoints();
+	subSurfaces_.emplace_back(name, start, end, pointStart, pointEnd);
+
+    return true;
+}
+
+bool pFlow::multiTriSurface::read(iIstream &is, const IOPattern &iop)
+{
+    return false;
+}
+
+bool pFlow::multiTriSurface::write
+(
+    iOstream &os,
+    const IOPattern &iop
+) const
+{	
+	if( iop.thisProcWriteData() )
+	{
+		os.writeWordEntry("subSurfaces", subSurfaces_);
+		if(!os.check(FUNCTION_NAME))return false;
+	}
+	
+	return triSurface::write(os,iop);
 }
 
 /*pFlow::real3*
@@ -205,37 +251,4 @@ const pFlow::real3*
 {
 	if(i>=numSurfaces())return points_.data()+numPoints();
 	return points_.data()+lastPointIndex_[i]+1;
-}*/
-
-bool pFlow::multiTriSurface::readMultiTriSurface
-(
-	iIstream& is
-)
-{
-	if( !readTriSurface(is) )return false;
-
-	// from current position
-	if(!lastPointIndex_.read(is, true)) return false;
-
-	if(!lastVertexIndex_.read(is, true) ) return false;
-
-	if( !surfaceNames_.read(is, true)) return false;
-
-	calculateVars();
-
-	return true;
-}
-
-bool pFlow::multiTriSurface::writeMultiTriSurface
-(
-	iOstream& os
-)const
-{
-	if(!writeTriSurface(os)) return false;
-
-	os << lastPointIndex_;
-	os << lastVertexIndex_;
-	os << surfaceNames_;
-
-	return os.check(FUNCTION_NAME);
-}
\ No newline at end of file
+}*/
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/multiTriSurface.hpp b/src/phasicFlow/triSurface/multiTriSurface.hpp
similarity index 67%
rename from src/phasicFlow/structuredData/trisurfaceStructure/multiTriSurface.hpp
rename to src/phasicFlow/triSurface/multiTriSurface.hpp
index 8791be86..95dc9280 100644
--- a/src/phasicFlow/structuredData/trisurfaceStructure/multiTriSurface.hpp
+++ b/src/phasicFlow/triSurface/multiTriSurface.hpp
@@ -24,7 +24,8 @@ Licence:
 
 
 #include "triSurface.hpp"
-#include "VectorDuals.hpp"
+#include "subSurface.hpp"
+
 
 namespace pFlow
 {
@@ -34,70 +35,64 @@ class multiTriSurface
 :
 	public triSurface
 {
-protected:
+private:
+
+	subSurfaceList subSurfaces_;
 
 	// - the index of last point of each triSurface 
-	int32Field_HD 	lastPointIndex_;
+	
 
-	// - the index of the last vertex of each triSurface 
-	int32Field_HD   lastVertexIndex_;
+	
 
-	// - name of each surface 
-	wordField 		surfaceNames_;
+	
 
-	int32Field_HD 	surfaceNumPoints_;
-
-	int32Vector_HD  pointsStartPos_;
-
-	int32Field_HD   surfaceNumVertices_;
-
-	int32Vector_HD  verticesStartPos_;
-
-	int32 			numSurfaces_ = 0;
-
-	void        calculateVars();
+	//void        calculateVars();
 
 public:
 
 	// - type info
-	TypeInfoNV("multiTriSurface");
+	TypeInfo("multiTriSurface");
 
 	//// - Constructors
 
 		// - emtpy
-		multiTriSurface();
+		multiTriSurface(const objectFile& obj, repository* owner);
 
-		multiTriSurface(const multiTriSurface&) = default;
+		/*multiTriSurface(const multiTriSurface&) = default;
 
 		multiTriSurface& operator = (const multiTriSurface&) = default;
 
 		multiTriSurface(multiTriSurface&&) = delete;
 
-		multiTriSurface& operator = (multiTriSurface&&) = delete;		
+		multiTriSurface& operator = (multiTriSurface&&) = delete;	*/	
 
-		~multiTriSurface() = default;
+		~multiTriSurface() override = default;
 
 	//// - Methods
 
-		bool addTriSurface(const word& name, const triSurface& tSurf);
+		//bool addTriSurface(const word& name, const triSurface& tSurf);
 
-		bool addTriSurface(const word& name, const realx3x3Vector& vertices);
+		bool appendTriSurface(const word& name, const realx3x3Vector& vertices);
 
-		int32 numSurfaces()const
+		uint32 numSurfaces()const
 		{
-			return numSurfaces_;
+			return subSurfaces_.size();
 		}
 
-		void clear()
+		const subSurfaceList& subSurfaces()const
+		{
+			return subSurfaces_;
+		}
+		/*void clear()
 		{
 			triSurface::clear();
 
 			lastPointIndex_.clear();
 			surfaceNames_.clear();
-		}
+		}*/
 
 		
-		const auto& pointsStartPos()const
+		/*const auto& pointsStartPos()const
 		{
 			return pointsStartPos_;
 		}
@@ -135,27 +130,21 @@ public:
 		word surfaceName(int32 i)const
 		{
 			return surfaceNames_[i];
-		}
+		}*/
 
 	//// - IO operations
 
-		bool readMultiTriSurface(iIstream& is);
+		
 
-		bool writeMultiTriSurface(iOstream& os)const;
+		bool read(iIstream& is, const IOPattern& iop)override;
 
-		bool read(iIstream& is)
-		{
-			return readMultiTriSurface(is);
-		}
 
-		bool write(iOstream& os)const
-		{
-			return writeMultiTriSurface(os);
-		}
+		bool write(iOstream& os, const IOPattern& iop)const override;
+		
 
 };
 
-inline iIstream& operator >> (iIstream & is, multiTriSurface & tri )
+/*inline iIstream& operator >> (iIstream & is, multiTriSurface & tri )
 {
 	if(!tri.readMultiTriSurface(is))
 	{
@@ -164,11 +153,11 @@ inline iIstream& operator >> (iIstream & is, multiTriSurface & tri )
 	 	fatalExit;
 	}
 	return is;
-}
+}*/
 
 inline iOstream& operator << (iOstream& os, const multiTriSurface& tri)
 {
-	if( !tri.writeMultiTriSurface(os) )
+	if( !tri.write(os, IOPattern::AllProcessorsDifferent) )
 	{
 		ioErrorInFile(os.name(), os.lineNumber())<<
 	 	"  error in writing multiTriSurface to file.\n";
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/stlFile.cpp b/src/phasicFlow/triSurface/stlFile.cpp
similarity index 100%
rename from src/phasicFlow/structuredData/trisurfaceStructure/stlFile.cpp
rename to src/phasicFlow/triSurface/stlFile.cpp
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/stlFile.hpp b/src/phasicFlow/triSurface/stlFile.hpp
similarity index 100%
rename from src/phasicFlow/structuredData/trisurfaceStructure/stlFile.hpp
rename to src/phasicFlow/triSurface/stlFile.hpp
diff --git a/src/phasicFlow/triSurface/subSurface.cpp b/src/phasicFlow/triSurface/subSurface.cpp
new file mode 100644
index 00000000..9fbd406b
--- /dev/null
+++ b/src/phasicFlow/triSurface/subSurface.cpp
@@ -0,0 +1,26 @@
+#include "subSurface.hpp"
+
+pFlow::iOstream& pFlow::operator<<(iOstream &str, const subSurface &sub)
+{
+    
+    str.beginSquare()<<sub.name_<<token::SPACE<<
+    sub.start_<<token::SPACE<<sub.end_<<token::SPACE<<
+    sub.pointStart_<<token::SPACE<<sub.pointEnd_;
+    str.endSquare();  
+	str.check(FUNCTION_NAME);
+    return str;
+
+}
+
+pFlow::iIstream& pFlow::operator>>(iIstream &str, subSurface &sub)
+{
+    str.readBeginSquare("subSurface");
+    str >> sub.name_;
+    str >> sub.start_;
+    str >> sub.end_;
+    str >> sub.pointStart_;
+    str >> sub.pointEnd_;
+    str.readEndSquare("subSurface");
+    str.check(FUNCTION_NAME);
+    return str;
+}
diff --git a/src/phasicFlow/triSurface/subSurface.hpp b/src/phasicFlow/triSurface/subSurface.hpp
new file mode 100644
index 00000000..f6cdc75f
--- /dev/null
+++ b/src/phasicFlow/triSurface/subSurface.hpp
@@ -0,0 +1,105 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "types.hpp"
+#include "List.hpp"
+
+namespace pFlow
+{
+
+class subSurface
+{
+private:
+    uint32  start_= 0;
+
+    uint32  end_ =  0;
+
+    uint32  pointStart_ = 0;
+
+    uint32  pointEnd_=0;
+
+    word    name_;
+
+public:
+    subSurface()=default;
+
+    subSurface(const word& name, uint32 start, uint32 end, uint32 pointStart, uint32 pointEnd)
+    :
+        start_(start),
+        end_(end),
+        pointStart_(pointStart),
+        pointEnd_(pointEnd),
+        name_(name)
+    {}
+
+    subSurface(const subSurface&) = default;
+
+    subSurface& operator = (const subSurface&) = default;
+
+    ~subSurface()=default;
+
+    uint32 operator()(uint32 i)const
+    {
+        return start_ + i;
+    }
+    uint32 start()const
+    {
+        return start_;
+    }
+
+    uint32 end()const
+    {
+        return end_;
+    }
+
+    uint32 pointStart()const
+    {
+        return pointStart_;
+    }
+
+    uint32 pointEnd()const
+    {
+        return pointEnd_;
+    }
+    
+    const auto& name()const
+    {
+        return name_;
+    }
+
+    uint32 size()const
+    {
+        return end_-start_;
+    }
+
+    friend iOstream& operator<< (iOstream& str, const subSurface & sub);
+		
+		/// >> operator 
+	friend iIstream& operator >> (iIstream & str, subSurface & sub);
+};
+
+iOstream& operator<< (iOstream& str, const subSurface & sub);
+
+iIstream& operator >> (iIstream & str, subSurface & sub);
+
+using subSurfaceList = List<subSurface>;
+
+
+}
\ No newline at end of file
diff --git a/src/phasicFlow/triSurface/triSurface.cpp b/src/phasicFlow/triSurface/triSurface.cpp
new file mode 100644
index 00000000..846046f5
--- /dev/null
+++ b/src/phasicFlow/triSurface/triSurface.cpp
@@ -0,0 +1,262 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#include "triSurface.hpp"
+#include "Vectors.hpp"
+#include "triangleFunctions.hpp"
+#include "error.hpp"
+#include "iOstream.hpp"
+
+//#include "triSurfaceKernels.hpp"
+
+namespace pFlow
+{
+bool convertToTriSurfaceComponents
+(
+	uint32 basePointIndex,
+	span<realx3x3> tris, 
+	realx3Vector& points,
+	uint32x3Vector& vertices,
+	realVector& area,
+	realx3Vector& normal
+)
+{
+	auto nt = tris.size();
+
+	points.clear();
+	points.reserve(nt);
+	
+	vertices.clear();
+	vertices.resize(nt);
+
+	area.clear();
+	area.resize(nt);
+
+	normal.clear();
+	normal.resize(nt);
+
+	for(auto i=0; i<nt; i++)
+	{
+		uint32x3 newTri;
+		const auto& tri = tris[i];
+		if(!pFlow::triangle::valid(tri.comp1(),tri.comp2(), tri.comp3()))
+		{
+			fatalErrorInFunction<<
+			"Invalid triangle "<< tri << endl;
+			return false;
+		}
+
+		if(auto np = find(points, tri.comp1()); np<0 )
+		{
+			points.push_back(tri.comp1());  // new point
+			newTri.comp1() = static_cast<uint32>( basePointIndex + points.size() - 1);
+		}
+		else
+		{
+			newTri.comp1() = basePointIndex+static_cast<uint32>(np);
+		}
+
+		if(auto np = find(points, tri.comp2()); np<0 )
+		{
+			points.push_back(tri.comp2());  // new point
+			newTri.comp2() = static_cast<uint32>( basePointIndex + points.size() - 1);
+		}
+		else
+		{
+			newTri.comp2() = basePointIndex+static_cast<uint32>(np);
+		}
+
+		if(auto np = find(points, tri.comp3()); np<0 )
+		{
+			points.push_back(tri.comp3());  // new point
+			newTri.comp3() = static_cast<uint32>( basePointIndex + points.size() - 1);
+		}
+		else
+		{
+			newTri.comp3() = basePointIndex+static_cast<uint32>(np);
+		}
+
+		vertices[i] = newTri;
+		normal[i] = triangle::normal(tri.comp1(), tri.comp2(), tri.comp3());
+		area[i] = triangle::surface(tri.comp1(), tri.comp2(), tri.comp3());
+	}
+	
+	return true;
+}
+
+}
+
+
+pFlow::triSurface::triSurface
+(
+	const objectFile &obj, 
+	repository *owner
+)
+:
+	IOobject
+	(
+		obj,
+		IOPattern::AllProcessorsSimilar,
+		owner
+	),
+	points_("points", "points"),
+	vertices_("vertices", "vertices"),
+	area_("area", "area"),
+	normals_("normals","normals")
+{
+}
+
+pFlow::triSurface::triSurface
+(
+	const realx3x3Field_H &triangles,
+	repository* owner
+)
+:
+	IOobject
+	(
+		objectFile
+		(
+			triangles.name(),
+			"",
+			IOobject::READ_NEVER,
+			IOobject::WRITE_ALWAYS
+		),
+		IOPattern::AllProcessorsSimilar,
+		owner
+	),
+	points_("points", "points"),
+	vertices_("vertices", "vertices"),
+	area_("area", "area"),
+	normals_("normals","normals")
+{
+	if( !appendTriSurface(triangles) )
+	{
+		fatalExit;
+	}
+
+}
+
+bool pFlow::triSurface::appendTriSurface
+(
+	const realx3x3Field_H &triangles
+)
+{
+	uint32 basePointIndex = numPoints();
+
+	auto triData = triangles.getSpan();
+
+	realx3Vector points("points");
+	uint32x3Vector vertices("vertices");
+	realVector area("area");
+	realx3Vector normal("normal");
+
+	if( !convertToTriSurfaceComponents(
+		basePointIndex, 
+		triData,
+		points,
+		vertices,
+		area,
+		normal))
+	{
+		fatalErrorInFunction<<
+		"Error in constructing triSuface from raw data "<<triangles.name()<<endl;
+		return false;
+	}
+
+	points_.append(points);
+	vertices_.append(vertices);
+	area_.append(area);
+	normals_.append(normal);
+
+    return true;
+}
+
+bool pFlow::triSurface::appendTriSurface(const realx3x3Vector &triangles)
+{
+    uint32 basePointIndex = numPoints();
+
+	auto triData = triangles.getSpan();
+
+	realx3Vector points("points");
+	uint32x3Vector vertices("vertices");
+	realVector area("area");
+	realx3Vector normal("normal");
+
+	if( !convertToTriSurfaceComponents(
+		basePointIndex, 
+		triData,
+		points,
+		vertices,
+		area,
+		normal))
+	{
+		fatalErrorInFunction<<
+		"Error in constructing triSuface from raw data "<<triangles.name()<<endl;
+		return false;
+	}
+
+	points_.append(points);
+	vertices_.append(vertices);
+	area_.append(area);
+	normals_.append(normal);
+
+    return true;
+}
+
+bool pFlow::triSurface::read(iIstream &is, const IOPattern &iop)
+{
+	points_.clear();
+	if(!points_.read(is, iop))
+	{
+		ioErrorInFile(is.name(), is.lineNumber())<<
+		" when reading field "<< points_.name()<<endl;
+		return false;
+	}
+
+	vertices_.clear();
+	if(!vertices_.read(is, iop))
+	{
+		ioErrorInFile(is.name(), is.lineNumber())<<
+		" when reading field "<< vertices_.name()<<endl;
+		return false;
+	}
+
+    return true;
+}
+
+bool pFlow::triSurface::write(iOstream &os, const IOPattern &iop) const
+{
+	if( !points_.write(os, iop))
+	{
+		ioErrorInFile(os.name(), os.lineNumber())<<
+		"when writing field "<<points_.name()<<endl;
+		return false;
+	}
+
+	if( !vertices_.write(os,iop) )
+	{
+		ioErrorInFile(os.name(), os.lineNumber())<<
+		"when writing field "<<vertices_.name()<<endl;
+		return false;
+	}
+
+    return true;
+}
diff --git a/src/phasicFlow/triSurface/triSurface.hpp b/src/phasicFlow/triSurface/triSurface.hpp
new file mode 100644
index 00000000..ee67573e
--- /dev/null
+++ b/src/phasicFlow/triSurface/triSurface.hpp
@@ -0,0 +1,177 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#ifndef __triSurface_hpp__
+#define __triSurface_hpp__
+
+
+#include "Vectors.hpp"
+#include "Fields.hpp"
+#include "IOobject.hpp"
+
+namespace pFlow
+{
+
+
+class iIstream;
+class iOstream;
+class repository;
+
+class triSurface
+:
+	public IOobject
+{
+private:
+
+	/// points of triangles
+	realx3Field_D 		points_;
+
+	/// vectices indices of triangles 
+	uint32x3Field_D 	vertices_;
+
+	/// area of each triangle 
+	realField_D  		area_;
+
+	/// normal vector of triangles 
+	realx3Field_D 		normals_;
+
+protected:
+
+	triSurface(const objectFile& obj, repository* owner);
+
+public:
+
+	// - type info
+	TypeInfo("triSurface");
+
+	//// - Constructors
+		
+		// - construct from vertices of triangles 
+		explicit triSurface(const realx3x3Field_H& triangles, repository* owner=nullptr);
+
+		// - construct from components
+		//triSurface(const realx3Vector& points, const uint32x3Vector& vertices);		
+
+		~triSurface() override = default;
+
+		bool appendTriSurface(const realx3x3Field_H& triangles);
+
+		bool appendTriSurface(const realx3x3Vector& triangles);
+
+	//// - Methods
+		uint32 numPoints() const
+		{
+			return points_.size();
+		}
+
+		uint32 size()const
+		{
+			return vertices_.size();
+		}
+
+		uint32 capacity()const
+		{
+			return vertices_.capacity();
+		}
+
+		const auto& points() const
+		{
+			return points_;
+		}
+
+		auto& points()
+		{
+			return points_;
+		}
+
+		const auto& area()const
+		{
+			return area_;
+		}
+
+		auto& area()
+		{
+			return area_;
+		}		
+
+		const auto& vertices() const
+		{
+			return vertices_;
+		}
+
+		auto& vertices()
+		{
+			return vertices_;
+		}
+
+		auto& normals()
+		{
+			return normals_;
+		}
+
+		const auto& normals()const
+		{
+			return normals_;
+		}
+
+		void clear()
+		{
+			points_.clear();
+			vertices_.clear();
+			area_.clear();
+			normals_.clear();
+		}
+		
+	//// - IO operations 
+		
+		bool read(iIstream& is, const IOPattern& iop) override;
+
+		bool write(iOstream& os, const IOPattern& iop)const override;
+};
+
+inline iIstream& operator >> (iIstream & is, triSurface & tri )
+{
+	if(!tri.read(is, IOPattern::AllProcessorsDifferent))
+	{
+	 	ioErrorInFile(is.name(), is.lineNumber())<<
+	 	"  error in reading triSurface from file.\n";
+	 	fatalExit;
+	}
+	return is;
+}
+
+inline iOstream& operator << (iOstream& os, const triSurface& tri)
+{
+	if( !tri.write(os, IOPattern::AllProcessorsDifferent) )
+	{
+		ioErrorInFile(os.name(), os.lineNumber())<<
+	 	"  error in writing triSurface to file.\n";
+	 	fatalExit;
+	}
+	return os;
+}
+
+
+} // pFlow
+
+
+
+#endif
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/triSurfaceKernels.hpp b/src/phasicFlow/triSurface/triSurfaceKernels.hpp
similarity index 100%
rename from src/phasicFlow/structuredData/trisurfaceStructure/triSurfaceKernels.hpp
rename to src/phasicFlow/triSurface/triSurfaceKernels.hpp
diff --git a/src/phasicFlow/structuredData/trisurfaceStructure/triangleFunctions.hpp b/src/phasicFlow/triSurface/triangleFunctions.hpp
similarity index 70%
rename from src/phasicFlow/structuredData/trisurfaceStructure/triangleFunctions.hpp
rename to src/phasicFlow/triSurface/triangleFunctions.hpp
index a78e555c..62c1c076 100644
--- a/src/phasicFlow/structuredData/trisurfaceStructure/triangleFunctions.hpp
+++ b/src/phasicFlow/triSurface/triangleFunctions.hpp
@@ -23,17 +23,40 @@ Licence:
 
 #include "types.hpp"
 
-namespace pFlow::triangleFunctions
+namespace pFlow::triangle
 {
 
 INLINE_FUNCTION_HD
-real triangleSurface( const realx3& p1, const realx3& p2, const realx3& p3)
+real surface( const realx3& p1, const realx3& p2, const realx3& p3)
 {
 	realx3 V1 = p2 - p1;
 	realx3 V2 = p3 - p1;
-	return abs((cross(V1,V2)).length() / static_cast<real>(2.0));	
+	return abs((cross(V1,V2)).length()/2.0);	
 }
 
+INLINE_FUNCTION_HD
+realx3 normal(const realx3& p1, const realx3& p2, const realx3& p3)
+{
+	auto n = cross(p2-p1, p3-p1);
+	if( equal(n.length(), 0.0) )
+    	return zero3;
+	else
+		return normalize(n);
+}
+
+INLINE_FUNCTION_HD
+bool valid
+(
+	const realx3& p1, 
+	const realx3& p2, 
+	const realx3& p3
+)
+{
+  	return !equal(cross(p2-p1, p3-p1).length(), 0.0);
+}
+
+
+
 }
 
 #endif 
diff --git a/src/phasicFlow/types/triple/triple.hpp b/src/phasicFlow/types/triple/triple.hpp
index 34b12176..c11154a0 100644
--- a/src/phasicFlow/types/triple/triple.hpp
+++ b/src/phasicFlow/types/triple/triple.hpp
@@ -146,7 +146,23 @@ struct triple
 		/// access component
 		INLINE_FUNCTION_HD const T & z()const { return z_; }
 
-        INLINE_FUNCTION_HD const T& comp(uint32 i) const {return *(this+i);}
+        /// access component
+		INLINE_FUNCTION_HD T & comp1(){ return x_; }
+
+		/// access component
+		INLINE_FUNCTION_HD const T & comp1()const { return x_; }
+		
+		/// access component
+		INLINE_FUNCTION_HD T & comp2(){ return y_; }
+		
+		/// access component
+		INLINE_FUNCTION_HD const T & comp2()const { return y_; }
+
+		/// access component
+		INLINE_FUNCTION_HD T & comp3(){ return z_; }
+		
+		/// access component
+		INLINE_FUNCTION_HD const T & comp3()const { return z_; }
 
 	//// methods
 
diff --git a/utilities/CMakeLists.txt b/utilities/CMakeLists.txt
index 4216d45b..db9fee8b 100644
--- a/utilities/CMakeLists.txt
+++ b/utilities/CMakeLists.txt
@@ -3,7 +3,7 @@
 
 add_subdirectory(particlesPhasicFlow)
 
-#add_subdirectory(geometryPhasicFlow)
+add_subdirectory(geometryPhasicFlow)
 
 #add_subdirectory(pFlowToVTK)
 
diff --git a/utilities/Utilities/CMakeLists.txt b/utilities/Utilities/CMakeLists.txt
index ddb55b6f..47124ab0 100644
--- a/utilities/Utilities/CMakeLists.txt
+++ b/utilities/Utilities/CMakeLists.txt
@@ -3,11 +3,11 @@ set(SourceFiles
 readFromTimeFolder.cpp
 readControlDict.cpp
 #vtkFile/vtkFile.cpp
-#geometryPhasicFlow/Wall/Wall.cpp 
-#geometryPhasicFlow/planeWall/planeWall.cpp 
+geometryPhasicFlow/Wall/Wall.cpp 
+geometryPhasicFlow/planeWall/planeWall.cpp 
 #geometryPhasicFlow/stlWall/stlWall.cpp
-#geometryPhasicFlow/cylinderWall/cylinderWall.cpp
-#geometryPhasicFlow/cuboidWall/cuboidWall.cpp
+geometryPhasicFlow/cylinderWall/cylinderWall.cpp
+geometryPhasicFlow/cuboidWall/cuboidWall.cpp
 )
 
 #set(link_libs Kokkos::kokkos phasicFlow Particles Geometry)
diff --git a/utilities/geometryPhasicFlow/CMakeLists.txt b/utilities/geometryPhasicFlow/CMakeLists.txt
index 6fe0358e..11040b23 100644
--- a/utilities/geometryPhasicFlow/CMakeLists.txt
+++ b/utilities/geometryPhasicFlow/CMakeLists.txt
@@ -2,6 +2,6 @@
 set(source_files 
 geometryPhasicFlow.cpp
 )
-set(link_lib phasicFlow Geometry Kokkos::kokkos Utilities)
+set(link_lib phasicFlow Kokkos::kokkos Utilities)
 
 pFlow_make_executable_install(geometryPhasicFlow source_files link_lib)
diff --git a/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp b/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp
index f6967f92..282de86a 100755
--- a/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp
+++ b/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp
@@ -18,26 +18,19 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-
+#include "vocabs.hpp"
 #include "systemControl.hpp"
+#include "fileDictionary.hpp"
 #include "Wall.hpp"
 #include "Vectors.hpp"
+#include "VectorSingles.hpp"
 #include "multiTriSurface.hpp"
-#include "geometryMotion.hpp"
+//#include "geometryMotion.hpp"
 #include "commandLine.hpp"
-#include "readControlDict.hpp"
+//#include "readControlDict.hpp"
 
-using pFlow::output;
-using pFlow::endl;
-using pFlow::IOobject;
-using pFlow::dictionary;
-using pFlow::objectFile;
-using pFlow::wordVector;
-using pFlow::Wall;
-using pFlow::geometry;
-using pFlow::realx3x3Vector;
-using pFlow::multiTriSurface;
-using pFlow::commandLine;
+
+using namespace pFlow;
 
 int main( int argc, char* argv[] )
 {
@@ -59,11 +52,10 @@ int main( int argc, char* argv[] )
 // this should be palced in each main 
 #include "initialize_Control.hpp"
 
-	#include "setProperty.hpp"
+	//#include "setProperty.hpp"
 
-	REPORT(0)<<"\nReading "<<"createGeometryDict"<<" . . ."<<endREPORT;
-	auto objDict = IOobject::make<dictionary>
-	(
+	REPORT(0)<<"\nReading "<<"geometryDict"<<" . . ."<<END_REPORT;
+	auto geometryDict = fileDictionary(
 		objectFile
 		(
 			"geometryDict",
@@ -71,46 +63,55 @@ int main( int argc, char* argv[] )
 			objectFile::READ_ALWAYS,
 			objectFile::WRITE_NEVER
 		),
-		"geometryDict",
-		true
+		nullptr
 	);
-
-	auto& geometryDict = objDict().getObject<dictionary>();
-
+	
 	auto& surfacesDict = geometryDict.subDict("surfaces");
 
 	auto wallsDictName = surfacesDict.dictionaryKeywords();
 
 	
 
-	multiTriSurface surface;
-	wordVector materials;
-	wordVector motion;
+	multiTriSurface surface
+	(
+		objectFile
+		(
+			triSurfaceFile__,
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_ALWAYS
+		),
+		&Control.geometry()
+	);
+	
+	//wordVector materials;
+	//wordVector motion;
 	
 	for(auto& name:wallsDictName)
 	{
-		REPORT(1)<<"Creating wall "<<greenText(name)<<" from file dictionary . . . "<<endREPORT;
+		REPORT(1)<<"Creating wall "<<Green_Text(name)<<" from dictionary "<<surfacesDict.globalName() <<END_REPORT;
 		auto wallPtr = Wall::create( surfacesDict.subDict(name));
 		auto& wall = wallPtr();
-		REPORT(1)<<"wall type is "<<greenText(wall.typeName())<<'\n'<<endREPORT;		
+		REPORT(1)<<"wall type is "<<Green_Text(wall.typeName())<<'\n'<<END_REPORT;		
 
-		realx3x3Vector trinalges(wall.name());
-		trinalges = wall.triangles();
-		surface.addTriSurface(wall.name(), trinalges);
-		materials.push_back(wall.materialName());
-		motion.push_back(wall.motionName());
+		realx3x3Vector trinalges(wall.name(), wall.triangles());
+		
+		surface.appendTriSurface(wall.name(), trinalges);
+		/*materials.push_back(wall.materialName());
+		motion.push_back(wall.motionName());*/
 	}
 
-	REPORT(1)<<"Selected wall materials are "<<cyanText(materials)<<'\n'<<endREPORT;
+	output<<surface<<endl;
+	//REPORT(1)<<"Selected wall materials are "<<cyanText(materials)<<'\n'<<endREPORT;
 		
-	REPORT(0)<< "\nCreating geometry . . ."<<endREPORT;
+	/*REPORT(0)<< "\nCreating geometry . . ."<<endREPORT;
 	auto geomPtr = geometry::create(Control, proprties, geometryDict, surface, motion, materials);
 	REPORT(1)<< "geometry type is "<< greenText(geomPtr().typeName())<<endREPORT;
 	
 	REPORT(1)<< "Writing geometry to folder "<< geomPtr().path()<<endREPORT;
-	geomPtr().write();
+	geomPtr().write();*/
 
-	REPORT(0)<< greenText("\nFinished successfully.\n");
+	REPORT(0)<< Green_Text("\nFinished successfully.\n")<<END_REPORT;
 
 // this should be palced in each main 
 #include "finalize.hpp"

From 80b61d4d734dd911e6272e36406d101f15cde494 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 4 Feb 2024 23:58:57 -0800
Subject: [PATCH 35/60] MotionModel CRTP, rotatingAxis and vibrating

---
 src/CMakeLists.txt                            |   2 +-
 src/MotionModel/CMakeLists.txt                |  13 +-
 src/MotionModel/MotionModel/MotionModel.cpp   | 147 ++++++++++
 src/MotionModel/MotionModel/MotionModel.hpp   | 249 +++++++++++++++++
 .../entities/rotatingAxis/rotatingAxis.cpp    |   3 +-
 .../entities/rotatingAxis/rotatingAxis.hpp    |  26 +-
 .../entities/rotatingAxis/rotatingAxisFwd.hpp |  11 +-
 .../entities/rotatingAxis/rotatingAxisI.hpp   |  17 +-
 .../entities/vibrating/vibrating.hpp          |  10 +-
 .../rotatingAxisMotion-old.cpp                | 170 ++++++++++++
 .../rotatingAxisMotion-old.hpp                | 247 +++++++++++++++++
 .../rotatingAxisMotion/rotatingAxisMotion.cpp | 155 ++---------
 .../rotatingAxisMotion/rotatingAxisMotion.hpp | 199 ++------------
 .../vibratingMotion/vibratingMotion-old.cpp   | 167 +++++++++++
 .../vibratingMotion/vibratingMotion-old.hpp   | 259 ++++++++++++++++++
 .../vibratingMotion/vibratingMotion.cpp       | 171 ++----------
 .../vibratingMotion/vibratingMotion.hpp       | 203 ++------------
 src/Property/property.hpp                     |   2 -
 src/phasicFlow/eventManagement/message.hpp    |   6 +-
 src/phasicFlow/eventManagement/observer.cpp   |  14 +-
 src/phasicFlow/eventManagement/observer.hpp   |  15 +-
 src/phasicFlow/eventManagement/subscriber.cpp |  44 ++-
 src/phasicFlow/eventManagement/subscriber.hpp |  24 +-
 src/phasicFlow/triSurface/multiTriSurface.cpp |   3 +-
 src/phasicFlow/triSurface/multiTriSurface.hpp |  17 +-
 25 files changed, 1463 insertions(+), 711 deletions(-)
 create mode 100644 src/MotionModel/MotionModel/MotionModel.cpp
 create mode 100644 src/MotionModel/MotionModel/MotionModel.hpp
 create mode 100644 src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.cpp
 create mode 100644 src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.hpp
 create mode 100644 src/MotionModel/vibratingMotion/vibratingMotion-old.cpp
 create mode 100644 src/MotionModel/vibratingMotion/vibratingMotion-old.hpp

diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt
index 235f17a2..6f339f58 100644
--- a/src/CMakeLists.txt
+++ b/src/CMakeLists.txt
@@ -9,7 +9,7 @@ add_subdirectory(Particles)
 
 #add_subdirectory(Interaction)
 
-#add_subdirectory(MotionModel)
+add_subdirectory(MotionModel)
 
 #add_subdirectory(Geometry)
 
diff --git a/src/MotionModel/CMakeLists.txt b/src/MotionModel/CMakeLists.txt
index 9438c2ab..6f74b231 100644
--- a/src/MotionModel/CMakeLists.txt
+++ b/src/MotionModel/CMakeLists.txt
@@ -1,13 +1,16 @@
 
 list(APPEND SourceFiles 
-entities/rotatingAxis/rotatingAxis.cpp
-entities/multiRotatingAxis/multiRotatingAxis.cpp
 entities/timeInterval/timeInterval.cpp
-entities/vibrating/vibrating.cpp
-fixedWall/fixedWall.cpp
+entities/rotatingAxis/rotatingAxis.cpp
 rotatingAxisMotion/rotatingAxisMotion.cpp
-multiRotatingAxisMotion/multiRotatingAxisMotion.cpp
+
+
+entities/vibrating/vibrating.cpp
 vibratingMotion/vibratingMotion.cpp
+#fixedWall/fixedWall.cpp
+#entities/multiRotatingAxis/multiRotatingAxis.cpp
+#multiRotatingAxisMotion/multiRotatingAxisMotion.cpp
+
 )
 
 set(link_libs Kokkos::kokkos phasicFlow)
diff --git a/src/MotionModel/MotionModel/MotionModel.cpp b/src/MotionModel/MotionModel/MotionModel.cpp
new file mode 100644
index 00000000..6a530eaa
--- /dev/null
+++ b/src/MotionModel/MotionModel/MotionModel.cpp
@@ -0,0 +1,147 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+template<typename Model, typename Component>
+inline
+bool pFlow::MotionModel<Model, Component>::impl_nameToIndex(const word& name, uint32& indx)const
+{
+	if( auto i = componentNames_.findi(name); i == -1)
+	{
+		return false;
+	}
+	else
+	{
+		indx = static_cast<uint32>(i);
+		return true;
+	}
+	
+}
+
+template<typename Model, typename Component>
+inline
+bool pFlow::MotionModel<Model, Component>::impl_indexToName(uint32 i, word& name)const
+{
+	if(i < numComponents_ )
+	{
+		name = componentNames_[i];
+		return true;
+	}
+	else
+	{
+		return false;
+	}
+}
+
+template<typename Model, typename Component>
+inline
+bool pFlow::MotionModel<Model, Component>::impl_readDictionary
+(
+	const dictionary& dict
+)
+{
+	
+	auto modelName = dict.getVal<word>("motionModel");
+
+	if(modelName != getTypeName<ModelComponent>())
+	{
+		fatalErrorInFunction<<
+		"  motionModel should be "<< Yellow_Text(getTypeName<ModelComponent>())<<
+		", but found "<< Yellow_Text(modelName)<<endl;
+		return false;
+	}
+
+	auto& motionInfo = dict.subDict(modelName+"Info");
+	auto compNames = motionInfo.dictionaryKeywords();
+	
+	Vector<ModelComponent> components(
+		"Read::modelComponent", 
+		compNames.size()+1, 
+		0, 
+		RESERVE());
+	
+	componentNames_.clear();
+
+		
+	for(auto& cName: compNames)
+	{
+		auto& compDict = motionInfo.subDict(cName);
+		
+		if(auto compPtr = makeUnique<ModelComponent>(compDict); compPtr)
+		{
+			components.push_back(compPtr());
+			componentNames_.push_back(cName);
+		}
+	}
+
+	if( !componentNames_.search("none") )
+	{
+		components.push_back
+		(
+			impl_noneComponent()
+		);
+		componentNames_.push_back("none");	
+	}
+
+	motionComponents_.assign(components);
+	numComponents_ = motionComponents_.size();
+
+	return true;
+}
+
+
+template<typename Model, typename Component>
+inline
+bool pFlow::MotionModel<Model, Component>::impl_writeDictionary
+(
+	dictionary& dict
+)const
+{
+	word modelName = getTypeName<ModelComponent>();
+
+	dict.add("motionModel", modelName );
+
+	auto modelDictName = modelName+"Info";
+
+	auto& motionInfo = dict.subDictOrCreate(modelDictName);
+	auto hostComponents = motionComponents_.hostView();
+
+	ForAll(i, motionComponents_)
+	{
+		
+		auto& axDict = motionInfo.subDictOrCreate(componentNames_[i]);
+		if( !hostComponents[i].write(axDict))
+		{
+			fatalErrorInFunction<<
+			"  error in writing axis "<< componentNames_[i] << " to dicrionary "
+			<< motionInfo.globalName()<<endl;
+			return false;
+		}
+	}
+
+	return true;
+}
+
+
+template<typename Model, typename Component>
+pFlow::MotionModel<Model, Component>::MotionModel()
+:
+	motionComponents_("motionComponents")
+{}
\ No newline at end of file
diff --git a/src/MotionModel/MotionModel/MotionModel.hpp b/src/MotionModel/MotionModel/MotionModel.hpp
new file mode 100644
index 00000000..a6a2b2ab
--- /dev/null
+++ b/src/MotionModel/MotionModel/MotionModel.hpp
@@ -0,0 +1,249 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __MotionModel_hpp__
+#define __MotionModel_hpp__
+
+
+
+#include "VectorSingles.hpp"
+#include "Vector.hpp"
+#include "List.hpp"
+#include "dictionary.hpp"
+
+
+namespace pFlow
+{
+
+
+template<typename Model, typename Component>
+class MotionModel
+{
+public:
+
+	using ModelType = Model;
+
+	using ModelComponent = Component;
+	
+	using ComponentVector_D = VectorSingle<ModelComponent>;
+
+	/** Motion model class to be passed to computational units/kernels for
+	 *  transfing points and returning velocities at various positions
+	 */
+	class ModelInterface
+	{
+	private:
+		
+		deviceViewType1D<ModelComponent> 	components_;
+
+		uint32 							numComponents_=0;
+
+	public:
+
+		INLINE_FUNCTION_HD
+		ModelInterface
+		(
+			deviceViewType1D<ModelComponent> Comps, 
+			uint32 numComp
+		):
+			components_(Comps),
+			numComponents_(numComp)
+		{}
+
+		INLINE_FUNCTION_HD
+		ModelInterface(const ModelInterface&) = default;
+		
+		INLINE_FUNCTION_HD
+		ModelInterface& operator=(const ModelInterface&) = default;
+
+		INLINE_FUNCTION_HD
+		ModelInterface(ModelInterface&&) noexcept = default;
+
+		INLINE_FUNCTION_HD
+		ModelInterface& operator=(ModelInterface&&) noexcept= default;
+		
+		INLINE_FUNCTION_HD
+		~ModelInterface()=default;
+
+		INLINE_FUNCTION_HD
+		realx3 pointVelocity(uint32 n, const realx3& p)const
+		{
+			return components_[n].linVelocityPoint(p);
+		}
+
+		INLINE_FUNCTION_HD
+		realx3 operator()(uint32 n, const realx3& p)const
+		{
+			return pointVelocity(n,p);
+		}
+
+		INLINE_FUNCTION_HD
+		realx3 transferPoint(uint32 n, const realx3 p, real dt)const
+		{
+			return components_[n].transferPoint(p, dt); 
+		}
+
+		INLINE_FUNCTION_HD 
+		uint32 size()const
+		{
+			return numComponents_;
+		}
+	};
+
+private:
+
+	// friends
+	friend ModelType;
+
+	/// Number of axes components
+	uint32  			numComponents_= 0;
+
+	/// Vector to store motion components 
+	ComponentVector_D 	motionComponents_;
+	
+	/// Names of compoenents
+	wordList  			componentNames_;
+
+protected:
+	
+	inline
+	auto& getModel()
+	{
+		return static_cast<ModelType&>(*this);
+	}
+
+	inline
+	const auto& getModel()const
+	{
+		return static_cast<const ModelType&>(*this);
+	}
+
+	// implementation details goes here
+	inline
+	auto impl_noneComponent()const
+	{
+		return ModelType::noneComponent();
+	}
+	
+	/// name of the compoenent to index of the component 
+	bool impl_nameToIndex(const word& name, uint32& idx)const;
+	
+	/// Component index to motion component name
+	 
+	bool impl_indexToName(uint32 i, word& name)const;
+
+	
+	bool impl_isMoving()const
+	{
+		return false;
+	}
+
+	bool impl_move(uint32, real, real)const
+	{
+		return true;
+	}
+
+	auto impl_getModelInterface(uint32 iter, real t, real dt)const
+	{
+		return ModelInterface(
+			motionComponents_.deviceViewAll(), 
+			numComponents_);
+	}
+
+	/// Read from dictionary 
+	bool impl_readDictionary(const dictionary& dict);
+
+	bool impl_writeDictionary(dictionary& dict)const;
+
+public:
+
+	// - Constructors 
+	
+		/// Empty
+		MotionModel();
+
+		/// Copy constructor 
+		MotionModel(const MotionModel&) = default;
+
+		/// Move constructor 
+		MotionModel(MotionModel&&) = default;
+
+		/// Copy assignment
+		MotionModel& operator=(const MotionModel&) = default;
+
+		/// No move assignment
+		MotionModel& operator=(MotionModel&&) = default;
+
+		/// Destructor 
+		~MotionModel() = default;
+
+	// - Methods
+		/// Return the motion model at time t 
+		/*Model getModel(real t)
+		{
+			for(int32 i= 0; i<numAxis_; i++ )
+			{
+				axis_[i].setTime(t);
+			}
+			axis_.modifyOnHost();
+			axis_.syncViews();
+
+			return Model(axis_.deviceVector(), numAxis_);
+		}*/
+
+		/// Motion component name to index
+	
+		/// name of the compoenent to index of the component 
+		bool nameToIndex(const word& name, uint32& idx)const
+		{
+			return getModel().impl_nameToIndex(name, idx);
+		}
+	
+		/// Component index to motion component name 
+		bool indexToName(uint32 idx, word& name)const
+		{
+			return getModel().impl_indexToName(idx, name);
+		}
+		
+		/// Are walls moving 
+		bool isMoving()const
+		{
+			return getModel().impl_isMoving();
+		}
+
+		/// Move 
+		bool move(uint32 iter, real t, real dt)
+		{
+			return getModel().impl_move(iter, t, dt);
+		}
+
+		auto getModelInterface(uint32 iter, real t, real dt)const
+		{
+			return getModel().impl_getModelInterface(iter, t, dt);
+		}
+
+};
+
+} // pFlow
+
+#include "MotionModel.cpp"
+
+
+#endif //__MotionModel_hpp__
diff --git a/src/MotionModel/entities/rotatingAxis/rotatingAxis.cpp b/src/MotionModel/entities/rotatingAxis/rotatingAxis.cpp
index dbb9206e..d5aa3ca2 100644
--- a/src/MotionModel/entities/rotatingAxis/rotatingAxis.cpp
+++ b/src/MotionModel/entities/rotatingAxis/rotatingAxis.cpp
@@ -28,7 +28,6 @@ pFlow::rotatingAxis::rotatingAxis
 	const dictionary& dict
 )
 {
-
 	if(!read(dict))
 	{
 		fatalErrorInFunction<<
@@ -73,7 +72,7 @@ bool pFlow::rotatingAxis::read
 	if(!timeInterval::read(dict))return false;
 	if(!line::read(dict)) return false;
 		
-	real omega = dict.getValOrSet("omega", static_cast<real>(0.0));
+	real omega = dict.getValOrSet("omega", 0.0);
 	
 	setOmega(omega);
 	return true;
diff --git a/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp b/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp
index ee37eba9..1f023e1c 100644
--- a/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp
+++ b/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp
@@ -24,13 +24,12 @@ Licence:
 #include "timeInterval.hpp"
 #include "line.hpp"
 
+#include "rotatingAxisFwd.hpp"
+
 namespace pFlow
 {
 
 class dictionary;
-class rotatingAxis;
-
-#include "rotatingAxisFwd.hpp"
 
 /**
  * An axis which rotates around itself at specified speed
@@ -64,7 +63,7 @@ class rotatingAxis
 	public timeInterval,
 	public line
 {
-protected:
+private:
 	
 	/// rotation speed 
 	real 	omega_ = 0;
@@ -78,11 +77,11 @@ public:
 
 	/// Empty constructor
 	FUNCTION_HD
-	rotatingAxis(){}
+	rotatingAxis()=default;
 
 	/// Construct from dictionary
 	FUNCTION_H
-	rotatingAxis(const dictionary& dict);
+	explicit rotatingAxis(const dictionary& dict);
 	
 	/// Construct from components
 	FUNCTION_HD
@@ -92,9 +91,19 @@ public:
 	FUNCTION_HD
 	rotatingAxis(const rotatingAxis&) = default;
 
+	FUNCTION_HD
+	rotatingAxis(rotatingAxis&&) = default;
+
 	/// Copy asssignment
 	rotatingAxis& operator=(const rotatingAxis&) = default;
 
+	/// Copy asssignment
+	rotatingAxis& operator=(rotatingAxis&&) = default;
+
+	/// destructor 
+	~rotatingAxis()=default;
+
+
 	/// Set omega
 	FUNCTION_HD
 	real setOmega(real omega);
@@ -115,7 +124,10 @@ public:
 
 	/// Linear tangential velocity at point p
 	INLINE_FUNCTION_HD
-	realx3 linTangentialVelocityPoint(const realx3 &p)const;
+	realx3 linVelocityPoint(const realx3 &p)const;
+
+	INLINE_FUNCTION_HD
+	realx3 transferPoint(const realx3 p, real dt);
 
 	// - IO operation
 
diff --git a/src/MotionModel/entities/rotatingAxis/rotatingAxisFwd.hpp b/src/MotionModel/entities/rotatingAxis/rotatingAxisFwd.hpp
index 8cbfe593..140411c5 100755
--- a/src/MotionModel/entities/rotatingAxis/rotatingAxisFwd.hpp
+++ b/src/MotionModel/entities/rotatingAxis/rotatingAxisFwd.hpp
@@ -18,6 +18,11 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
+namespace pFlow
+{
+
+class rotatingAxis;
+
 INLINE_FUNCTION_HD
 realx3 rotate(const realx3 &p, const line& ln, real theta);
 
@@ -25,10 +30,10 @@ INLINE_FUNCTION_HD
 realx3 rotate(const realx3& p, const rotatingAxis& ax, real dt);
 
 INLINE_FUNCTION_HD
-void rotate(realx3* p, size_t n, const line& ln, real theta);
+void rotate(realx3* p, uint32 n, const line& ln, real theta);
 
 INLINE_FUNCTION_HD
-void rotate(realx3* p, size_t n, const rotatingAxis& ax, real dt);
-
+void rotate(realx3* p, uint32 n, const rotatingAxis& ax, real dt);
 
+}
 
diff --git a/src/MotionModel/entities/rotatingAxis/rotatingAxisI.hpp b/src/MotionModel/entities/rotatingAxis/rotatingAxisI.hpp
index c7563020..5ade50c2 100755
--- a/src/MotionModel/entities/rotatingAxis/rotatingAxisI.hpp
+++ b/src/MotionModel/entities/rotatingAxis/rotatingAxisI.hpp
@@ -1,3 +1,4 @@
+#include "rotatingAxis.hpp"
 /*------------------------------- phasicFlow ---------------------------------
       O        C enter of
      O O       E ngineering and
@@ -19,7 +20,7 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 INLINE_FUNCTION_HD
-pFlow::realx3 pFlow::rotatingAxis::linTangentialVelocityPoint(const realx3 &p)const
+pFlow::realx3 pFlow::rotatingAxis::linVelocityPoint(const realx3 &p)const
 {
 	
 	if(!inTimeRange()) return {0,0,0};
@@ -28,6 +29,12 @@ pFlow::realx3 pFlow::rotatingAxis::linTangentialVelocityPoint(const realx3 &p)co
 	return cross(omega_*unitVector(),L);
 }
 
+INLINE_FUNCTION_HD 
+pFlow::realx3 pFlow::rotatingAxis::transferPoint(const realx3 p, real dt)
+{
+    return  rotate(p, *this, dt);
+}
+
 INLINE_FUNCTION_HD
 pFlow::realx3 pFlow::rotate(const realx3& p, const rotatingAxis& ax, real dt)
 {
@@ -97,7 +104,7 @@ pFlow::realx3 pFlow::rotate(const realx3 &p, const line& ln, real theta)
 }
 
 INLINE_FUNCTION_HD
-void pFlow::rotate(realx3* p, size_t n, const line& ln, real theta)
+void pFlow::rotate(realx3* p, uint32 n, const line& ln, real theta)
 {
 	realx3 nv = ln.unitVector();
 	real cos_tet = cos(theta);
@@ -110,7 +117,7 @@ void pFlow::rotate(realx3* p, size_t n, const line& ln, real theta)
 	// (a(v2+w2) - u( bv + cw - ux - vy - wz)) (1-cos_tet) + x cos_tet + (- cv + bw - wy + vz) sin_tet 
 	realx3 res;
 
-	for(label i=0; i<n; i++ )
+	for(uint32 i=0; i<n; i++ )
 	{
 		res.x_ = (lp1.x_*(v2 + w2) - (nv.x_*(lp1.y_*nv.y_ + lp1.z_*nv.z_ - nv.x_*p[i].x_ - nv.y_*p[i].y_ - nv.z_*p[i].z_)))*(1 - cos_tet) +
 			p[i].x_ * cos_tet +
@@ -133,7 +140,7 @@ void pFlow::rotate(realx3* p, size_t n, const line& ln, real theta)
 }
 
 INLINE_FUNCTION_HD
-void pFlow::rotate(realx3* p, size_t n, const rotatingAxis& ax, real dt)
+void pFlow::rotate(realx3* p, uint32 n, const rotatingAxis& ax, real dt)
 {
 	if(!ax.inTimeRange()) return;
 	
@@ -148,7 +155,7 @@ void pFlow::rotate(realx3* p, size_t n, const rotatingAxis& ax, real dt)
 	// (a(v2+w2) - u( bv + cw - ux - vy - wz)) (1-cos_tet) + x cos_tet + (- cv + bw - wy + vz) sin_tet 
 	realx3 res;
 
-	for(label i=0; i<n; i++ )
+	for(uint32 i=0; i<n; i++ )
 	{
 		res.x_ = (lp1.x_*(v2 + w2) - (nv.x_*(lp1.y_*nv.y_ + lp1.z_*nv.z_ - nv.x_*p[i].x_ - nv.y_*p[i].y_ - nv.z_*p[i].z_)))*(1 - cos_tet) +
 			p[i].x_ * cos_tet +
diff --git a/src/MotionModel/entities/vibrating/vibrating.hpp b/src/MotionModel/entities/vibrating/vibrating.hpp
index 4ece54a2..610fd0f7 100644
--- a/src/MotionModel/entities/vibrating/vibrating.hpp
+++ b/src/MotionModel/entities/vibrating/vibrating.hpp
@@ -67,7 +67,7 @@ class vibrating
 	public timeInterval
 {
 
-protected:
+private:
 	
 	// rotation speed 
 	realx3	angularFreq_{0,0,0};
@@ -95,10 +95,10 @@ protected:
 public:
 
 	FUNCTION_HD
-	vibrating(){}
+	vibrating()=default;
 
 	FUNCTION_H
-	vibrating(const dictionary& dict);
+	explicit vibrating(const dictionary& dict);
 	
 
 	FUNCTION_HD
@@ -115,7 +115,7 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	realx3 linTangentialVelocityPoint(const realx3 &p)const
+	realx3 linTangentialVelocityPoint(const realx3 &)const
 	{
 		return velocity_;
 	}
@@ -124,7 +124,7 @@ public:
 	realx3 transferPoint(const realx3& p, real dt)
 	{
 		if(!inTimeRange()) return p;
-		return p + static_cast<real>(0.5)*dt*(velocity0_+velocity_);
+		return p + 0.5*dt*(velocity0_+velocity_);
 	}
 
 	// - IO operation
diff --git a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.cpp b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.cpp
new file mode 100644
index 00000000..9ef21e44
--- /dev/null
+++ b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.cpp
@@ -0,0 +1,170 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "rotatingAxisMotion.hpp"
+#include "dictionary.hpp"
+#include "vocabs.hpp"
+
+
+bool pFlow::rotatingAxisMotion::readDictionary
+(
+	const dictionary& dict
+)
+{
+
+	auto motionModel = dict.getVal<word>("motionModel");
+
+	if(motionModel != "rotatingAxisMotion")
+	{
+		fatalErrorInFunction<<
+		"  motionModel should be rotatingAxisMotion, but found "
+		 << motionModel <<endl;
+		return false;
+	}
+
+	auto& motionInfo = dict.subDict("rotatingAxisMotionInfo");
+	auto axisNames = motionInfo.dictionaryKeywords();
+	
+	axis_.reserve(axisNames.size()+1);
+	
+	
+	axis_.clear();
+	axisName_.clear();
+
+		
+	for(auto& aName: axisNames)
+	{
+		auto& axDict = motionInfo.subDict(aName);
+		
+		if(auto axPtr = makeUnique<rotatingAxis>(axDict); axPtr)
+		{
+			axis_.push_back(axPtr());
+			axisName_.push_back(aName);
+		}
+		else
+		{
+			fatalErrorInFunction<<
+			"could not read rotating axis from "<< axDict.globalName()<<endl;
+			return false;
+		}
+	}
+
+
+
+	if( !axisName_.search("none") )
+	{
+		axis_.push_back
+		(
+			rotatingAxis(
+				realx3(0.0,0.0,0.0),
+				realx3(1.0,0.0,0.0),
+				0.0
+				)
+		);
+		axisName_.push_back("none");	
+	}
+
+	axis_.syncViews();
+	numAxis_ = axis_.size();
+
+	return true;
+}
+
+bool pFlow::rotatingAxisMotion::writeDictionary
+(
+	dictionary& dict
+)const
+{
+	dict.add("motionModel", "rotatingAxisMotion");
+
+	auto& motionInfo = dict.subDictOrCreate("rotatingAxisMotionInfo");
+	
+	ForAll(i, axis_)
+	{
+		
+		auto& axDict = motionInfo.subDictOrCreate(axisName_[i]);
+		if( !axis_.hostVectorAll()[i].write(axDict))
+		{
+			fatalErrorInFunction<<
+			"  error in writing axis "<< axisName_[i] << " to dicrionary "
+			<< motionInfo.globalName()<<endl;
+			return false;
+		}
+	}
+
+	return true;
+}
+
+pFlow::rotatingAxisMotion::rotatingAxisMotion()
+{}
+
+pFlow::rotatingAxisMotion::rotatingAxisMotion
+(
+	const dictionary& dict
+)
+{
+	if(! readDictionary(dict) )
+	{
+		fatalExit;
+	}
+}
+
+bool pFlow::rotatingAxisMotion::read
+(
+	iIstream& is
+)
+{
+	// create an empty file dictionary
+	dictionary motionInfo(motionModelFile__, true);
+
+	// read dictionary from stream
+	if( !motionInfo.read(is) )
+	{
+		ioErrorInFile(is.name(), is.lineNumber()) <<
+		"  error in reading dictionray " << motionModelFile__ <<" from file. \n";
+		return false;
+	}
+
+	if( !readDictionary(motionInfo) ) return false;
+	
+	return true;
+}
+
+bool pFlow::rotatingAxisMotion::write
+(
+	iOstream& os
+)const
+{
+	// create an empty file dictionary
+	dictionary motionInfo(motionModelFile__, true);
+
+	if( !writeDictionary(motionInfo))
+	{
+		return false;
+	}
+
+	if( !motionInfo.write(os) )
+	{
+		ioErrorInFile( os.name(), os.lineNumber() )<<
+		"  error in writing dictionray to file. \n";
+		return false;
+	}
+	return true;
+}
\ No newline at end of file
diff --git a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.hpp b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.hpp
new file mode 100644
index 00000000..eacf7ca3
--- /dev/null
+++ b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.hpp
@@ -0,0 +1,247 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __rotatingAxisMotion_hpp__
+#define __rotatingAxisMotion_hpp__
+
+
+#include "types.hpp"
+#include "typeInfo.hpp"
+#include "VectorDual.hpp"
+#include "Vectors.hpp"
+#include "List.hpp"
+#include "rotatingAxis.hpp"
+
+
+namespace pFlow
+{
+
+class dictionary;
+
+/**
+ * Rotating axis motion model for walls
+ * 
+ * This class is used for simulaiton that at least one wall components 
+ * is moving according to rotatingAxis motion mode. One or more than one
+ * motion components can be defined in rotatingAxisMotionInfo dictionary
+ * 
+\verbatim
+// In geometryDict file, this will defines rotating walls during simulation
+...
+motionModel rotatingAxisMotion;
+
+rotatingAxisMotionInfo
+{
+	rotationAxis1
+	{
+		// the definition based on class rotatingAxis
+	}
+	rotatoinAxis2
+	{
+		// the definition based on calss rotatingAxis
+	}
+}
+...
+\endverbatim
+ *
+ */
+class rotatingAxisMotion
+{
+public:
+	
+	/** Motion model class to be passed to computational units/kernels for
+	 *  transfing points and returning velocities at various positions
+	 */
+	class Model
+	{
+	protected:
+		
+		deviceViewType1D<rotatingAxis> 	axis_;
+		int32 							numAxis_=0;
+
+	public:
+
+		INLINE_FUNCTION_HD
+		Model(deviceViewType1D<rotatingAxis> axis, int32 numAxis):
+			axis_(axis),
+			numAxis_(numAxis)
+		{}
+
+		INLINE_FUNCTION_HD
+		Model(const Model&) = default;
+		
+		
+		INLINE_FUNCTION_HD
+		Model& operator=(const Model&) = default;
+
+
+		INLINE_FUNCTION_HD
+		realx3 pointVelocity(int32 n, const realx3& p)const
+		{
+			return axis_[n].linTangentialVelocityPoint(p);
+		}
+
+		INLINE_FUNCTION_HD
+		realx3 operator()(int32 n, const realx3& p)const
+		{
+			return pointVelocity(n,p);
+		}
+
+		INLINE_FUNCTION_HD
+		realx3 transferPoint(int32 n, const realx3 p, real dt)const
+		{
+			return rotate(p, axis_[n], dt);	
+		}
+
+		INLINE_FUNCTION_HD int32 numComponents()const
+		{
+			return numAxis_;
+		}
+	};
+
+protected:
+
+	using axisVector_HD = VectorDual<rotatingAxis>;
+
+	/// Vector to store axes 
+	axisVector_HD 	axis_;
+	
+	/// Names of axes
+	wordList  		axisName_;
+
+	/// Number of axes components
+	label  			numAxis_= 0;
+
+	/// Read from dictionary 
+	bool readDictionary(const dictionary& dict);
+
+	/// Write to dictionary
+	bool writeDictionary(dictionary& dict)const;
+
+public:
+	
+	/// Type info
+	TypeInfoNV("rotatingAxisMotion");
+
+	// - Constructors 
+	
+		/// Empty
+		FUNCTION_H
+		rotatingAxisMotion();
+
+		/// Construct with dictionary 
+		FUNCTION_H
+		rotatingAxisMotion(const dictionary& dict);
+
+		/// Copy constructor 
+		FUNCTION_H
+		rotatingAxisMotion(const rotatingAxisMotion&) = default;
+
+		/// No move constructor 
+		rotatingAxisMotion(rotatingAxisMotion&&) = delete;
+
+		/// Copy assignment
+		FUNCTION_H
+		rotatingAxisMotion& operator=(const rotatingAxisMotion&) = default;
+
+		/// No move assignment
+		rotatingAxisMotion& operator=(rotatingAxisMotion&&) = delete;
+
+		/// Destructor 
+		FUNCTION_H
+		~rotatingAxisMotion() = default;
+
+	// - Methods
+		/// Return the motion model at time t 
+		Model getModel(real t)
+		{
+			for(int32 i= 0; i<numAxis_; i++ )
+			{
+				axis_[i].setTime(t);
+			}
+			axis_.modifyOnHost();
+			axis_.syncViews();
+
+			return Model(axis_.deviceVector(), numAxis_);
+		}
+
+		/// Motion component name to index
+		INLINE_FUNCTION_H
+		int32 nameToIndex(const word& name)const
+		{
+			if( auto i = axisName_.findi(name); i == -1)
+			{
+				fatalErrorInFunction<<
+				"axis name " << name << " does not exist. \n";
+				fatalExit;
+				return i;
+			}
+			else
+			{
+				return i;
+			}
+			
+		}
+
+		/// Motion index to motion component name 
+		INLINE_FUNCTION_H
+		word indexToName(label i)const
+		{
+			if(i < numAxis_ )
+				return axisName_[i];
+			else
+			{
+				fatalErrorInFunction<<
+				"out of range access to the list of axes " << i <<endl<<
+				" size of axes_ is "<<numAxis_<<endl;
+				fatalExit;
+				return "";
+			}
+		}
+
+		
+		/// Are walls moving 
+		INLINE_FUNCTION_HD
+		bool isMoving()const
+		{
+			return true;
+		}
+
+		/// Move 
+		INLINE_FUNCTION_H
+		bool move(real t, real dt)
+		{
+			return true;
+		}
+
+	// - IO operation 
+		/// Read from input stream is 
+		FUNCTION_H
+		bool read(iIstream& is);
+
+		/// Write to output stream os
+		FUNCTION_H
+		bool write(iOstream& os)const;
+
+};
+
+} // pFlow
+
+#endif //__rotatingAxisMotion_hpp__
diff --git a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp
index 9ef21e44..47cae148 100644
--- a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp
+++ b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp
@@ -19,152 +19,41 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "rotatingAxisMotion.hpp"
-#include "dictionary.hpp"
-#include "vocabs.hpp"
 
 
-bool pFlow::rotatingAxisMotion::readDictionary
-(
-	const dictionary& dict
-)
-{
-
-	auto motionModel = dict.getVal<word>("motionModel");
-
-	if(motionModel != "rotatingAxisMotion")
-	{
-		fatalErrorInFunction<<
-		"  motionModel should be rotatingAxisMotion, but found "
-		 << motionModel <<endl;
-		return false;
-	}
-
-	auto& motionInfo = dict.subDict("rotatingAxisMotionInfo");
-	auto axisNames = motionInfo.dictionaryKeywords();
-	
-	axis_.reserve(axisNames.size()+1);
-	
-	
-	axis_.clear();
-	axisName_.clear();
-
-		
-	for(auto& aName: axisNames)
-	{
-		auto& axDict = motionInfo.subDict(aName);
-		
-		if(auto axPtr = makeUnique<rotatingAxis>(axDict); axPtr)
-		{
-			axis_.push_back(axPtr());
-			axisName_.push_back(aName);
-		}
-		else
-		{
-			fatalErrorInFunction<<
-			"could not read rotating axis from "<< axDict.globalName()<<endl;
-			return false;
-		}
-	}
-
-
-
-	if( !axisName_.search("none") )
-	{
-		axis_.push_back
-		(
-			rotatingAxis(
-				realx3(0.0,0.0,0.0),
-				realx3(1.0,0.0,0.0),
-				0.0
-				)
-		);
-		axisName_.push_back("none");	
-	}
-
-	axis_.syncViews();
-	numAxis_ = axis_.size();
-
-	return true;
-}
-
-bool pFlow::rotatingAxisMotion::writeDictionary
-(
-	dictionary& dict
-)const
-{
-	dict.add("motionModel", "rotatingAxisMotion");
-
-	auto& motionInfo = dict.subDictOrCreate("rotatingAxisMotionInfo");
-	
-	ForAll(i, axis_)
-	{
-		
-		auto& axDict = motionInfo.subDictOrCreate(axisName_[i]);
-		if( !axis_.hostVectorAll()[i].write(axDict))
-		{
-			fatalErrorInFunction<<
-			"  error in writing axis "<< axisName_[i] << " to dicrionary "
-			<< motionInfo.globalName()<<endl;
-			return false;
-		}
-	}
-
-	return true;
-}
-
-pFlow::rotatingAxisMotion::rotatingAxisMotion()
-{}
-
 pFlow::rotatingAxisMotion::rotatingAxisMotion
 (
-	const dictionary& dict
+	const objectFile &objf, 
+	repository *owner
 )
+:
+	fileDictionary(objf, owner)
 {
-	if(! readDictionary(dict) )
+
+	if(! getModel().impl_readDictionary(*this) )
 	{
+		fatalErrorInFunction;
 		fatalExit;
 	}
 }
 
-bool pFlow::rotatingAxisMotion::read
-(
-	iIstream& is
-)
-{
-	// create an empty file dictionary
-	dictionary motionInfo(motionModelFile__, true);
-
-	// read dictionary from stream
-	if( !motionInfo.read(is) )
-	{
-		ioErrorInFile(is.name(), is.lineNumber()) <<
-		"  error in reading dictionray " << motionModelFile__ <<" from file. \n";
-		return false;
-	}
-
-	if( !readDictionary(motionInfo) ) return false;
-	
-	return true;
-}
-
 bool pFlow::rotatingAxisMotion::write
 (
-	iOstream& os
-)const
+	iOstream &os, 
+	const IOPattern &iop
+) const
 {
-	// create an empty file dictionary
-	dictionary motionInfo(motionModelFile__, true);
-
-	if( !writeDictionary(motionInfo))
+	// a global dictionary
+	dictionary newDict(fileDictionary::dictionary::name(), true);
+	if( iop.thisProcWriteData() )
 	{
-		return false;
+		if( !this->impl_writeDictionary(newDict) || 
+			!newDict.write(os))
+		{
+			fatalErrorInFunction<<
+			" error in writing to dictionary "<< newDict.globalName()<<endl;
+			return false;
+		}
 	}
-
-	if( !motionInfo.write(os) )
-	{
-		ioErrorInFile( os.name(), os.lineNumber() )<<
-		"  error in writing dictionray to file. \n";
-		return false;
-	}
-	return true;
-}
\ No newline at end of file
+    return true;
+}
diff --git a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp
index eacf7ca3..33a0f81f 100644
--- a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp
+++ b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp
@@ -22,19 +22,13 @@ Licence:
 #define __rotatingAxisMotion_hpp__
 
 
-#include "types.hpp"
-#include "typeInfo.hpp"
-#include "VectorDual.hpp"
-#include "Vectors.hpp"
-#include "List.hpp"
+#include "MotionModel.hpp"
 #include "rotatingAxis.hpp"
-
+#include "fileDictionary.hpp"
 
 namespace pFlow
 {
 
-class dictionary;
-
 /**
  * Rotating axis motion model for walls
  * 
@@ -45,9 +39,9 @@ class dictionary;
 \verbatim
 // In geometryDict file, this will defines rotating walls during simulation
 ...
-motionModel rotatingAxisMotion;
+motionModel rotatingAxis;
 
-rotatingAxisMotionInfo
+rotatingAxisInfo
 {
 	rotationAxis1
 	{
@@ -63,185 +57,34 @@ rotatingAxisMotionInfo
  *
  */
 class rotatingAxisMotion
+:
+    public fileDictionary,
+    public MotionModel<rotatingAxisMotion, rotatingAxis>
 {
-public:
-	
-	/** Motion model class to be passed to computational units/kernels for
-	 *  transfing points and returning velocities at various positions
-	 */
-	class Model
-	{
-	protected:
-		
-		deviceViewType1D<rotatingAxis> 	axis_;
-		int32 							numAxis_=0;
-
-	public:
-
-		INLINE_FUNCTION_HD
-		Model(deviceViewType1D<rotatingAxis> axis, int32 numAxis):
-			axis_(axis),
-			numAxis_(numAxis)
-		{}
-
-		INLINE_FUNCTION_HD
-		Model(const Model&) = default;
-		
-		
-		INLINE_FUNCTION_HD
-		Model& operator=(const Model&) = default;
-
-
-		INLINE_FUNCTION_HD
-		realx3 pointVelocity(int32 n, const realx3& p)const
-		{
-			return axis_[n].linTangentialVelocityPoint(p);
-		}
-
-		INLINE_FUNCTION_HD
-		realx3 operator()(int32 n, const realx3& p)const
-		{
-			return pointVelocity(n,p);
-		}
-
-		INLINE_FUNCTION_HD
-		realx3 transferPoint(int32 n, const realx3 p, real dt)const
-		{
-			return rotate(p, axis_[n], dt);	
-		}
-
-		INLINE_FUNCTION_HD int32 numComponents()const
-		{
-			return numAxis_;
-		}
-	};
-
 protected:
 
-	using axisVector_HD = VectorDual<rotatingAxis>;
-
-	/// Vector to store axes 
-	axisVector_HD 	axis_;
+	bool impl_isMoving()const
+	{
+		return true;
+	}
 	
-	/// Names of axes
-	wordList  		axisName_;
-
-	/// Number of axes components
-	label  			numAxis_= 0;
-
-	/// Read from dictionary 
-	bool readDictionary(const dictionary& dict);
-
-	/// Write to dictionary
-	bool writeDictionary(dictionary& dict)const;
-
 public:
-	
-	/// Type info
-	TypeInfoNV("rotatingAxisMotion");
 
-	// - Constructors 
-	
-		/// Empty
-		FUNCTION_H
-		rotatingAxisMotion();
+    TypeInfo("rotatingAxisMotion");
 
-		/// Construct with dictionary 
-		FUNCTION_H
-		rotatingAxisMotion(const dictionary& dict);
+    rotatingAxisMotion(const objectFile& objf, repository* owner);
 
-		/// Copy constructor 
-		FUNCTION_H
-		rotatingAxisMotion(const rotatingAxisMotion&) = default;
 
-		/// No move constructor 
-		rotatingAxisMotion(rotatingAxisMotion&&) = delete;
-
-		/// Copy assignment
-		FUNCTION_H
-		rotatingAxisMotion& operator=(const rotatingAxisMotion&) = default;
-
-		/// No move assignment
-		rotatingAxisMotion& operator=(rotatingAxisMotion&&) = delete;
-
-		/// Destructor 
-		FUNCTION_H
-		~rotatingAxisMotion() = default;
-
-	// - Methods
-		/// Return the motion model at time t 
-		Model getModel(real t)
-		{
-			for(int32 i= 0; i<numAxis_; i++ )
-			{
-				axis_[i].setTime(t);
-			}
-			axis_.modifyOnHost();
-			axis_.syncViews();
-
-			return Model(axis_.deviceVector(), numAxis_);
-		}
-
-		/// Motion component name to index
-		INLINE_FUNCTION_H
-		int32 nameToIndex(const word& name)const
-		{
-			if( auto i = axisName_.findi(name); i == -1)
-			{
-				fatalErrorInFunction<<
-				"axis name " << name << " does not exist. \n";
-				fatalExit;
-				return i;
-			}
-			else
-			{
-				return i;
-			}
-			
-		}
-
-		/// Motion index to motion component name 
-		INLINE_FUNCTION_H
-		word indexToName(label i)const
-		{
-			if(i < numAxis_ )
-				return axisName_[i];
-			else
-			{
-				fatalErrorInFunction<<
-				"out of range access to the list of axes " << i <<endl<<
-				" size of axes_ is "<<numAxis_<<endl;
-				fatalExit;
-				return "";
-			}
-		}
-
-		
-		/// Are walls moving 
-		INLINE_FUNCTION_HD
-		bool isMoving()const
-		{
-			return true;
-		}
-
-		/// Move 
-		INLINE_FUNCTION_H
-		bool move(real t, real dt)
-		{
-			return true;
-		}
-
-	// - IO operation 
-		/// Read from input stream is 
-		FUNCTION_H
-		bool read(iIstream& is);
-
-		/// Write to output stream os
-		FUNCTION_H
-		bool write(iOstream& os)const;
+    bool write(iOstream& os, const IOPattern& iop)const override;
 
+	static
+    auto noneComponent()
+    {
+      return rotatingAxis({0,0,0}, {1,0,0}, 0.0);
+    }
 };
 
 } // pFlow
 
-#endif //__rotatingAxisMotion_hpp__
+
+#endif // __rotatingAxisMotion_hpp__
\ No newline at end of file
diff --git a/src/MotionModel/vibratingMotion/vibratingMotion-old.cpp b/src/MotionModel/vibratingMotion/vibratingMotion-old.cpp
new file mode 100644
index 00000000..1cc472a8
--- /dev/null
+++ b/src/MotionModel/vibratingMotion/vibratingMotion-old.cpp
@@ -0,0 +1,167 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "vibratingMotion.hpp"
+#include "dictionary.hpp"
+#include "vocabs.hpp"
+
+
+bool pFlow::vibratingMotion::readDictionary
+(
+	const dictionary& dict
+)
+{
+
+	auto motionModel = dict.getVal<word>("motionModel");
+
+	if(motionModel != "vibratingMotion")
+	{
+		fatalErrorInFunction<<
+		"  motionModel should be vibratingMotion, but found "
+		 << motionModel <<endl;
+		return false;
+	}
+
+	auto& motionInfo = dict.subDict("vibratingMotionInfo");
+	auto compNames = motionInfo.dictionaryKeywords();
+	
+	components_.reserve(compNames.size()+1);
+	
+	
+	components_.clear();
+	componentName_.clear();
+
+		
+	for(auto& cName: compNames)
+	{
+		auto& compDict = motionInfo.subDict(cName);
+		
+		if(auto compPtr = makeUnique<vibrating>(compDict); compPtr)
+		{
+			components_.push_back(compPtr());
+			componentName_.push_back(cName);
+		}
+		else
+		{
+			fatalErrorInFunction<<
+			"could not read vibrating motion from "<< compDict.globalName()<<endl;
+			return false;
+		}
+	}
+
+
+
+	if( !componentName_.search("none") )
+	{
+		components_.push_back
+		(
+			vibrating()
+		);
+		componentName_.push_back("none");	
+	}
+
+	components_.syncViews();
+	numComponents_ = components_.size();
+	
+
+	return true;
+}
+
+bool pFlow::vibratingMotion::writeDictionary
+(
+	dictionary& dict
+)const
+{
+	dict.add("motionModel", "vibratingMotion");
+
+	auto& motionInfo = dict.subDictOrCreate("vibratingMotionInfo");
+	
+	ForAll(i, components_)
+	{
+		
+		auto& compDict = motionInfo.subDictOrCreate(componentName_[i]);
+		if( !components_.hostVectorAll()[i].write(compDict))
+		{
+			fatalErrorInFunction<<
+			"  error in writing motion compoonent "<< componentName_[i] << " to dicrionary "
+			<< motionInfo.globalName()<<endl;
+			return false;
+		}
+	}
+
+	return true;
+}
+
+pFlow::vibratingMotion::vibratingMotion()
+{}
+
+pFlow::vibratingMotion::vibratingMotion
+(
+	const dictionary& dict
+)
+{
+	if(! readDictionary(dict) )
+	{
+		fatalExit;
+	}
+}
+
+bool pFlow::vibratingMotion::read
+(
+	iIstream& is
+)
+{
+	// create an empty file dictionary
+	dictionary motionInfo(motionModelFile__, true);
+
+	// read dictionary from stream
+	if( !motionInfo.read(is) )
+	{
+		ioErrorInFile(is.name(), is.lineNumber()) <<
+		"  error in reading dictionray " << motionModelFile__ <<" from file. \n";
+		return false;
+	}
+
+	if( !readDictionary(motionInfo) ) return false;
+	
+	return true;
+}
+
+bool pFlow::vibratingMotion::write
+(
+	iOstream& os
+)const
+{
+	// create an empty file dictionary
+	dictionary motionInfo(motionModelFile__, true);
+
+	if( !writeDictionary(motionInfo))
+	{
+		return false;
+	}
+
+	if( !motionInfo.write(os) )
+	{
+		ioErrorInFile( os.name(), os.lineNumber() )<<
+		"  error in writing dictionray to file. \n";
+		return false;
+	}
+	return true;
+}
\ No newline at end of file
diff --git a/src/MotionModel/vibratingMotion/vibratingMotion-old.hpp b/src/MotionModel/vibratingMotion/vibratingMotion-old.hpp
new file mode 100644
index 00000000..4392ed09
--- /dev/null
+++ b/src/MotionModel/vibratingMotion/vibratingMotion-old.hpp
@@ -0,0 +1,259 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __vibratingMotion_hpp__
+#define __vibratingMotion_hpp__
+
+
+#include "types.hpp"
+#include "typeInfo.hpp"
+#include "VectorDual.hpp"
+#include "Vectors.hpp"
+#include "List.hpp"
+#include "vibrating.hpp"
+
+
+
+namespace pFlow
+{
+
+// forward
+class dictionary;
+
+/**
+ * Vibrating motion model for walls
+ * 
+ * This class is used for simulaiton that at least one wall components 
+ * are moving according to a sinoidal viration defined in class vibrating.
+ * One or more than one motion components can be defined in 
+ * vibratingMotionInfo dictionary
+ * 
+\verbatim
+// In geometryDict file, this will defines vibrating walls during simulation
+...
+motionModel vibratingMotion;
+
+vibratingMotionInfo
+{
+	vibComponent1
+	{
+		// the definition based on class vibrating
+	}
+	vibComponent2
+	{
+		// the definition based on calss vibrating
+	}
+}
+...
+\endverbatim
+ *
+ */
+class vibratingMotion
+{
+public:
+	
+	/** Motion model class to be passed to computational units/kernels for
+	 *  transfing points and returning velocities at various positions
+	 */
+	class Model
+	{
+	protected:
+		
+		deviceViewType1D<vibrating> 	components_;
+		int32 							numComponents_=0;
+
+	public:
+
+		INLINE_FUNCTION_HD
+		Model(deviceViewType1D<vibrating> comps, int32 numComps):
+			components_(comps),
+			numComponents_(numComps)
+		{}
+
+		INLINE_FUNCTION_HD
+		Model(const Model&) = default;
+		
+		
+		INLINE_FUNCTION_HD
+		Model& operator=(const Model&) = default;
+
+
+		INLINE_FUNCTION_HD
+		realx3 pointVelocity(int32 n, const realx3& p)const
+		{
+			return components_[n].linTangentialVelocityPoint(p);
+		}
+
+		INLINE_FUNCTION_HD
+		realx3 operator()(int32 n, const realx3& p)const
+		{
+			return pointVelocity(n,p);
+		}
+
+		INLINE_FUNCTION_HD
+		realx3 transferPoint(int32 n, const realx3 p, real dt)const
+		{
+			return components_[n].transferPoint(p, dt);	
+		}
+
+		INLINE_FUNCTION_HD int32 numComponents()const
+		{
+			return numComponents_;
+		}
+	};
+
+protected:
+
+	using axisVector_HD = VectorDual<vibrating>;
+
+	/// Vibrating motion components 
+	axisVector_HD 	components_;
+	
+	/// Names of components
+	wordList  		componentName_;
+
+	/// Number of components
+	label  			numComponents_= 0;
+
+	/// Read from a dictionary
+	bool readDictionary(const dictionary& dict);
+
+	/// Write to a dictionary 
+	bool writeDictionary(dictionary& dict)const;
+
+public:
+	
+	/// Type info
+	TypeInfoNV("vibratingMotion");
+
+	/// Empty
+	FUNCTION_H
+	vibratingMotion();
+
+	/// Construct with dictionary 
+	FUNCTION_H
+	vibratingMotion(const dictionary& dict);
+
+	/// Copy constructor 
+	FUNCTION_H
+	vibratingMotion(const vibratingMotion&) = default;
+
+	/// No move 
+	vibratingMotion(vibratingMotion&&) = delete;
+
+	/// Copy assignment 
+	FUNCTION_H
+	vibratingMotion& operator=(const vibratingMotion&) = default;
+
+	/// No Move assignment 
+	vibratingMotion& operator=(vibratingMotion&&) = delete;
+
+	/// Destructor 
+	FUNCTION_H
+	~vibratingMotion() = default;
+
+	/// Return motion model at time t 
+	Model getModel(real t)
+	{
+		for(int32  i= 0; i<numComponents_; i++ )
+		{
+			components_[i].setTime(t);
+		}
+		components_.modifyOnHost();
+		components_.syncViews();
+
+		return Model(components_.deviceVectorAll(), numComponents_);
+	}
+
+	/// Name to component index 
+	INLINE_FUNCTION_H
+	int32 nameToIndex(const word& name)const
+	{
+		if( auto i = componentName_.findi(name); i == -1)
+		{
+			fatalErrorInFunction<<
+			"component name " << name << " does not exist. \n";
+			fatalExit;
+			return i;
+		}
+		else
+		{
+			return i;
+		}
+		
+	}
+
+	/// Index to name 
+	INLINE_FUNCTION_H
+	word indexToName(label i)const
+	{
+		if(i < numComponents_ )
+			return componentName_[i];
+		else
+		{
+			fatalErrorInFunction<<
+			"out of range access to the list of axes " << i <<endl<<
+			" size of components_ is "<<numComponents_<<endl;
+			fatalExit;
+			return "";
+		}
+	}
+
+	/// velocity at point p according to motion component n	
+	INLINE_FUNCTION_H
+	realx3 pointVelocity(label n, const realx3& p)const 
+	{
+		return components_.hostVectorAll()[n].linTangentialVelocityPoint(p);
+	}
+
+	/// Transfer point p for dt seconds based on motion component n 
+	INLINE_FUNCTION_H
+	realx3 transferPoint(label n, const realx3 p, real dt)const
+	{
+		return components_.hostVectorAll()[n].transferPoint(p, dt);
+	}
+
+	/// Is moving 
+	INLINE_FUNCTION_HD
+	bool isMoving()const
+	{
+		return true;
+	}
+
+	/// Move ponits at time t for dt seconds 
+	INLINE_FUNCTION_H
+	bool move(real t, real dt)
+	{
+		return true;
+	}
+
+	/// Read from input stream is 
+	FUNCTION_H
+	bool read(iIstream& is);
+
+	/// Write to output stream os
+	FUNCTION_H
+	bool write(iOstream& os)const;
+
+};
+
+} // pFlow
+
+#endif //__rotatingAxisMotion_hpp__
diff --git a/src/MotionModel/vibratingMotion/vibratingMotion.cpp b/src/MotionModel/vibratingMotion/vibratingMotion.cpp
index 1cc472a8..12039b60 100644
--- a/src/MotionModel/vibratingMotion/vibratingMotion.cpp
+++ b/src/MotionModel/vibratingMotion/vibratingMotion.cpp
@@ -1,167 +1,32 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
 #include "vibratingMotion.hpp"
-#include "dictionary.hpp"
-#include "vocabs.hpp"
-
-
-bool pFlow::vibratingMotion::readDictionary
-(
-	const dictionary& dict
-)
-{
-
-	auto motionModel = dict.getVal<word>("motionModel");
-
-	if(motionModel != "vibratingMotion")
-	{
-		fatalErrorInFunction<<
-		"  motionModel should be vibratingMotion, but found "
-		 << motionModel <<endl;
-		return false;
-	}
-
-	auto& motionInfo = dict.subDict("vibratingMotionInfo");
-	auto compNames = motionInfo.dictionaryKeywords();
-	
-	components_.reserve(compNames.size()+1);
-	
-	
-	components_.clear();
-	componentName_.clear();
-
-		
-	for(auto& cName: compNames)
-	{
-		auto& compDict = motionInfo.subDict(cName);
-		
-		if(auto compPtr = makeUnique<vibrating>(compDict); compPtr)
-		{
-			components_.push_back(compPtr());
-			componentName_.push_back(cName);
-		}
-		else
-		{
-			fatalErrorInFunction<<
-			"could not read vibrating motion from "<< compDict.globalName()<<endl;
-			return false;
-		}
-	}
-
-
-
-	if( !componentName_.search("none") )
-	{
-		components_.push_back
-		(
-			vibrating()
-		);
-		componentName_.push_back("none");	
-	}
-
-	components_.syncViews();
-	numComponents_ = components_.size();
-	
-
-	return true;
-}
-
-bool pFlow::vibratingMotion::writeDictionary
-(
-	dictionary& dict
-)const
-{
-	dict.add("motionModel", "vibratingMotion");
-
-	auto& motionInfo = dict.subDictOrCreate("vibratingMotionInfo");
-	
-	ForAll(i, components_)
-	{
-		
-		auto& compDict = motionInfo.subDictOrCreate(componentName_[i]);
-		if( !components_.hostVectorAll()[i].write(compDict))
-		{
-			fatalErrorInFunction<<
-			"  error in writing motion compoonent "<< componentName_[i] << " to dicrionary "
-			<< motionInfo.globalName()<<endl;
-			return false;
-		}
-	}
-
-	return true;
-}
-
-pFlow::vibratingMotion::vibratingMotion()
-{}
 
 pFlow::vibratingMotion::vibratingMotion
 (
-	const dictionary& dict
-)
+    const objectFile &objf, 
+    repository *owner
+):
+    fileDictionary(objf, owner)
 {
-	if(! readDictionary(dict) )
+    if(! getModel().impl_readDictionary(*this) )
 	{
+		fatalErrorInFunction;
 		fatalExit;
 	}
 }
 
-bool pFlow::vibratingMotion::read
-(
-	iIstream& is
-)
+bool pFlow::vibratingMotion::write(iOstream &os, const IOPattern &iop) const
 {
-	// create an empty file dictionary
-	dictionary motionInfo(motionModelFile__, true);
-
-	// read dictionary from stream
-	if( !motionInfo.read(is) )
+    // a global dictionary
+	dictionary newDict(fileDictionary::dictionary::name(), true);
+	if( iop.thisProcWriteData() )
 	{
-		ioErrorInFile(is.name(), is.lineNumber()) <<
-		"  error in reading dictionray " << motionModelFile__ <<" from file. \n";
-		return false;
+		if( !getModel().impl_writeDictionary(newDict) || 
+			!newDict.write(os))
+		{
+			fatalErrorInFunction<<
+			" error in writing to dictionary "<< newDict.globalName()<<endl;
+			return false;
+		}
 	}
-
-	if( !readDictionary(motionInfo) ) return false;
-	
-	return true;
+    return true;
 }
-
-bool pFlow::vibratingMotion::write
-(
-	iOstream& os
-)const
-{
-	// create an empty file dictionary
-	dictionary motionInfo(motionModelFile__, true);
-
-	if( !writeDictionary(motionInfo))
-	{
-		return false;
-	}
-
-	if( !motionInfo.write(os) )
-	{
-		ioErrorInFile( os.name(), os.lineNumber() )<<
-		"  error in writing dictionray to file. \n";
-		return false;
-	}
-	return true;
-}
\ No newline at end of file
diff --git a/src/MotionModel/vibratingMotion/vibratingMotion.hpp b/src/MotionModel/vibratingMotion/vibratingMotion.hpp
index 4392ed09..d97b2380 100644
--- a/src/MotionModel/vibratingMotion/vibratingMotion.hpp
+++ b/src/MotionModel/vibratingMotion/vibratingMotion.hpp
@@ -22,20 +22,16 @@ Licence:
 #define __vibratingMotion_hpp__
 
 
-#include "types.hpp"
-#include "typeInfo.hpp"
-#include "VectorDual.hpp"
-#include "Vectors.hpp"
-#include "List.hpp"
+#include "MotionModel.hpp"
 #include "vibrating.hpp"
+#include "fileDictionary.hpp"
+
 
 
 
 namespace pFlow
 {
 
-// forward
-class dictionary;
 
 /**
  * Vibrating motion model for walls
@@ -66,194 +62,39 @@ vibratingMotionInfo
  *
  */
 class vibratingMotion
+:
+    public fileDictionary,
+    public MotionModel<vibratingMotion, vibrating>
 {
-public:
-	
-	/** Motion model class to be passed to computational units/kernels for
-	 *  transfing points and returning velocities at various positions
-	 */
-	class Model
-	{
-	protected:
-		
-		deviceViewType1D<vibrating> 	components_;
-		int32 							numComponents_=0;
-
-	public:
-
-		INLINE_FUNCTION_HD
-		Model(deviceViewType1D<vibrating> comps, int32 numComps):
-			components_(comps),
-			numComponents_(numComps)
-		{}
-
-		INLINE_FUNCTION_HD
-		Model(const Model&) = default;
-		
-		
-		INLINE_FUNCTION_HD
-		Model& operator=(const Model&) = default;
-
-
-		INLINE_FUNCTION_HD
-		realx3 pointVelocity(int32 n, const realx3& p)const
-		{
-			return components_[n].linTangentialVelocityPoint(p);
-		}
-
-		INLINE_FUNCTION_HD
-		realx3 operator()(int32 n, const realx3& p)const
-		{
-			return pointVelocity(n,p);
-		}
-
-		INLINE_FUNCTION_HD
-		realx3 transferPoint(int32 n, const realx3 p, real dt)const
-		{
-			return components_[n].transferPoint(p, dt);	
-		}
-
-		INLINE_FUNCTION_HD int32 numComponents()const
-		{
-			return numComponents_;
-		}
-	};
 
 protected:
 
-	using axisVector_HD = VectorDual<vibrating>;
-
-	/// Vibrating motion components 
-	axisVector_HD 	components_;
-	
-	/// Names of components
-	wordList  		componentName_;
-
-	/// Number of components
-	label  			numComponents_= 0;
-
-	/// Read from a dictionary
-	bool readDictionary(const dictionary& dict);
-
-	/// Write to a dictionary 
-	bool writeDictionary(dictionary& dict)const;
+	bool impl_isMoving()const
+	{
+		return true;
+	}
 
 public:
 	
 	/// Type info
-	TypeInfoNV("vibratingMotion");
-
-	/// Empty
-	FUNCTION_H
-	vibratingMotion();
-
-	/// Construct with dictionary 
-	FUNCTION_H
-	vibratingMotion(const dictionary& dict);
-
-	/// Copy constructor 
-	FUNCTION_H
-	vibratingMotion(const vibratingMotion&) = default;
-
-	/// No move 
-	vibratingMotion(vibratingMotion&&) = delete;
-
-	/// Copy assignment 
-	FUNCTION_H
-	vibratingMotion& operator=(const vibratingMotion&) = default;
-
-	/// No Move assignment 
-	vibratingMotion& operator=(vibratingMotion&&) = delete;
+	TypeInfo("vibratingMotion");
+	
+	vibratingMotion(const objectFile& objf, repository* owner);
 
 	/// Destructor 
-	FUNCTION_H
-	~vibratingMotion() = default;
+	~vibratingMotion()override = default;
 
-	/// Return motion model at time t 
-	Model getModel(real t)
-	{
-		for(int32  i= 0; i<numComponents_; i++ )
-		{
-			components_[i].setTime(t);
-		}
-		components_.modifyOnHost();
-		components_.syncViews();
+    
+	bool write(iOstream& os, const IOPattern& iop)const override;
 
-		return Model(components_.deviceVectorAll(), numComponents_);
-	}
-
-	/// Name to component index 
-	INLINE_FUNCTION_H
-	int32 nameToIndex(const word& name)const
-	{
-		if( auto i = componentName_.findi(name); i == -1)
-		{
-			fatalErrorInFunction<<
-			"component name " << name << " does not exist. \n";
-			fatalExit;
-			return i;
-		}
-		else
-		{
-			return i;
-		}
-		
-	}
-
-	/// Index to name 
-	INLINE_FUNCTION_H
-	word indexToName(label i)const
-	{
-		if(i < numComponents_ )
-			return componentName_[i];
-		else
-		{
-			fatalErrorInFunction<<
-			"out of range access to the list of axes " << i <<endl<<
-			" size of components_ is "<<numComponents_<<endl;
-			fatalExit;
-			return "";
-		}
-	}
-
-	/// velocity at point p according to motion component n	
-	INLINE_FUNCTION_H
-	realx3 pointVelocity(label n, const realx3& p)const 
-	{
-		return components_.hostVectorAll()[n].linTangentialVelocityPoint(p);
-	}
-
-	/// Transfer point p for dt seconds based on motion component n 
-	INLINE_FUNCTION_H
-	realx3 transferPoint(label n, const realx3 p, real dt)const
-	{
-		return components_.hostVectorAll()[n].transferPoint(p, dt);
-	}
-
-	/// Is moving 
-	INLINE_FUNCTION_HD
-	bool isMoving()const
-	{
-		return true;
-	}
-
-	/// Move ponits at time t for dt seconds 
-	INLINE_FUNCTION_H
-	bool move(real t, real dt)
-	{
-		return true;
-	}
-
-	/// Read from input stream is 
-	FUNCTION_H
-	bool read(iIstream& is);
-
-	/// Write to output stream os
-	FUNCTION_H
-	bool write(iOstream& os)const;
+	static
+    auto noneComponent()
+    {
+      return vibrating();
+    }
 
 };
 
 } // pFlow
 
-#endif //__rotatingAxisMotion_hpp__
+#endif //__vibratingMotion_hpp__
diff --git a/src/Property/property.hpp b/src/Property/property.hpp
index e60cbbbf..81222d16 100644
--- a/src/Property/property.hpp
+++ b/src/Property/property.hpp
@@ -28,8 +28,6 @@ Licence:
 namespace pFlow
 {
 
-// forward 
-class dictionary;
 
 /** 
  * property holds the pure properties of materials.
diff --git a/src/phasicFlow/eventManagement/message.hpp b/src/phasicFlow/eventManagement/message.hpp
index 05a9de37..2ef7ff17 100644
--- a/src/phasicFlow/eventManagement/message.hpp
+++ b/src/phasicFlow/eventManagement/message.hpp
@@ -40,12 +40,14 @@ public:
 		ITEM_DELETE	 	= 3,
 		ITEM_INSERT  	= 4,
 		RANGE_CHANGED   = 5,
-		ITEM_REARRANGE 	= 6	
+		ITEM_REARRANGE 	= 6,
+		ITEM_TRANSFER   = 7,
+		RESET_COUNTERS  = 8	
 	};
 
 protected:
 
-	static constexpr size_t numberOfEvents_ = 8;
+	static constexpr size_t numberOfEvents_ = 9;
 
 	std::bitset<numberOfEvents_> events_{0x0000};
 	
diff --git a/src/phasicFlow/eventManagement/observer.cpp b/src/phasicFlow/eventManagement/observer.cpp
index d47fef24..7d131d75 100644
--- a/src/phasicFlow/eventManagement/observer.cpp
+++ b/src/phasicFlow/eventManagement/observer.cpp
@@ -19,11 +19,17 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "observer.hpp"
-#include "subscriber.hpp" 
+#include "subscriber.hpp"
 
-pFlow::observer::observer(message msg):
-	subscriber_(nullptr),
-	message_(msg)
+const pFlow::subscriber *pFlow::observer::changeSubscriber(const subscriber *newSub)
+{
+	const subscriber* old = subscriber_;
+	subscriber_ = newSub;
+    return old;
+}
+
+pFlow::observer::observer(message msg) : subscriber_(nullptr),
+                                         message_(msg)
 {}
 
 pFlow::observer::observer
diff --git a/src/phasicFlow/eventManagement/observer.hpp b/src/phasicFlow/eventManagement/observer.hpp
index 6b8fca11..8a830c60 100644
--- a/src/phasicFlow/eventManagement/observer.hpp
+++ b/src/phasicFlow/eventManagement/observer.hpp
@@ -32,7 +32,7 @@ class anyList;
 
 class observer
 {
-protected:
+private:
 	
 
 	/// pointer to subscriber 
@@ -41,6 +41,14 @@ protected:
 	/// list of events in the message 
 	message 			message_;
 
+	friend subscriber;
+	
+	const subscriber* changeSubscriber(const subscriber* newSub);
+
+	inline void invalidateSubscriber()
+	{
+		subscriber_ = nullptr;
+	}
 
 public:
 
@@ -69,10 +77,7 @@ public:
 
 	bool addToSubscriber(const subscriber& subscriber);
 	
-	inline void invalidateSubscriber()
-	{
-		subscriber_ = nullptr;
-	}
+	
 
 	static
 	constexpr auto numEvents()
diff --git a/src/phasicFlow/eventManagement/subscriber.cpp b/src/phasicFlow/eventManagement/subscriber.cpp
index db8009bd..6393e974 100644
--- a/src/phasicFlow/eventManagement/subscriber.cpp
+++ b/src/phasicFlow/eventManagement/subscriber.cpp
@@ -24,6 +24,48 @@ Licence:
 #include "observer.hpp"
 #include "message.hpp"
 
+pFlow::subscriber::subscriber(const subscriber & src)
+:
+	subName_(src.subName_)
+{
+}
+
+pFlow::subscriber::subscriber(subscriber && src)
+:
+	observerList_(std::move(src.observerList_)),
+	subName_(std::move(src.subName_))
+{
+	
+	for(size_t i=0; i<observerList_.size(); i++)
+	{
+		for( auto obsvr: observerList_[i] )
+		{
+			if(obsvr) obsvr->changeSubscriber(this);
+		}
+	}
+}
+
+pFlow::subscriber &pFlow::subscriber::operator=(const subscriber & rhs)
+{
+    this->subName_ = rhs.subName_;
+	return *this;
+}
+
+pFlow::subscriber &pFlow::subscriber::operator=(subscriber && rhs)
+{
+    this->subName_ = std::move(rhs.subName_);
+	this->observerList_ = std::move(rhs.observerList_);
+
+	for(size_t i=0; i<observerList_.size(); i++)
+	{
+		for( auto obsvr: observerList_[i] )
+		{
+			if(obsvr) obsvr->changeSubscriber(this);
+		}
+	}
+
+	return *this;
+}	
 
 pFlow::subscriber::~subscriber()
 {
@@ -82,9 +124,9 @@ bool pFlow::subscriber::unsubscribe
 
 bool pFlow::subscriber::notify
 (
+	uint32 iter,
 	real t,
 	real dt,
-	uint32 iter,
 	const message msg, 
 	const anyList& varList
 )
diff --git a/src/phasicFlow/eventManagement/subscriber.hpp b/src/phasicFlow/eventManagement/subscriber.hpp
index 48143f18..6507de01 100644
--- a/src/phasicFlow/eventManagement/subscriber.hpp
+++ b/src/phasicFlow/eventManagement/subscriber.hpp
@@ -35,7 +35,7 @@ class anyList;
 
 class subscriber
 {
-protected:
+private:
 
 	// - list of subsribed objectd that recieve updage messages 
 	mutable std::array<List<observer*>,message::numEvents()> observerList_;
@@ -49,13 +49,19 @@ public:
 		subName_(name)
 	{}
 
-	subscriber(const subscriber&) = delete;
+	/// Copy constructor, only copies the name, not the list 
+	subscriber(const subscriber&);
 
-	subscriber(subscriber&&) = default;
+	/// @brief Move constructor, moves the name and the list,
+	/// also change the subriber of the object in the list 
+	subscriber(subscriber&&);
 
-	subscriber& operator = (const subscriber&) = delete;
+	/// Copy assignemnt, only assign the name, do not assign the list 
+	subscriber& operator = (const subscriber&);
 
-	subscriber& operator = (subscriber&&) = default;
+	/// @brief Move assignment, move assign name and list,
+	/// also change the subcriber of the object in the list 
+	subscriber& operator = (subscriber&&);
 
 	virtual ~subscriber();
 
@@ -63,16 +69,10 @@ public:
 
 	virtual bool unsubscribe(observer* obsevr)const;
 
-	//bool notify(const eventMessage& msg);
-
-	//bool notify(const eventMessage& msg, const List<eventObserver*>& exclutionList );
-
-
-	
 	bool notify(
+		uint32 iter,
 		real t,
 		real dt,
-		uint32 iter,
 		const message msg, 
 		const anyList& varList);
 	
diff --git a/src/phasicFlow/triSurface/multiTriSurface.cpp b/src/phasicFlow/triSurface/multiTriSurface.cpp
index 043919cd..8b62fa18 100644
--- a/src/phasicFlow/triSurface/multiTriSurface.cpp
+++ b/src/phasicFlow/triSurface/multiTriSurface.cpp
@@ -160,7 +160,8 @@ pFlow::multiTriSurface::multiTriSurface
 	repository *owner
 )
 :
-	triSurface(obj, owner)
+	triSurface(obj, owner),
+	subscriber("multiTriSurface")
 {
 	if( !IOobject::readObject() )
     {
diff --git a/src/phasicFlow/triSurface/multiTriSurface.hpp b/src/phasicFlow/triSurface/multiTriSurface.hpp
index 95dc9280..7b7360b8 100644
--- a/src/phasicFlow/triSurface/multiTriSurface.hpp
+++ b/src/phasicFlow/triSurface/multiTriSurface.hpp
@@ -22,18 +22,18 @@ Licence:
 #ifndef __multiTriSurface_hpp__
 #define __multiTriSurface_hpp__
 
-
+#include "subscriber.hpp"
 #include "triSurface.hpp"
 #include "subSurface.hpp"
 
-
 namespace pFlow
 {
 
 
 class multiTriSurface
 :
-	public triSurface
+	public triSurface,
+	public subscriber
 {
 private:
 
@@ -41,11 +41,6 @@ private:
 
 	// - the index of last point of each triSurface 
 	
-
-	
-
-	
-
 	//void        calculateVars();
 
 public:
@@ -55,16 +50,16 @@ public:
 
 	//// - Constructors
 
-		// - emtpy
+		//
 		multiTriSurface(const objectFile& obj, repository* owner);
 
-		/*multiTriSurface(const multiTriSurface&) = default;
+		multiTriSurface(const multiTriSurface&) = default;
 
 		multiTriSurface& operator = (const multiTriSurface&) = default;
 
 		multiTriSurface(multiTriSurface&&) = delete;
 
-		multiTriSurface& operator = (multiTriSurface&&) = delete;	*/	
+		multiTriSurface& operator = (multiTriSurface&&) = delete;
 
 		~multiTriSurface() override = default;
 

From 9dfe98eea2914b7455a9ba8742ba6d9cad501623 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Mon, 5 Feb 2024 01:29:45 -0800
Subject: [PATCH 36/60] triSurfaceField refactored

---
 src/phasicFlow/CMakeLists.txt                 |   1 +
 src/phasicFlow/containers/Field/Field.hpp     |   8 +
 .../triSurfaceField/triSurfaceField.cpp       | 151 +++++++++++++++++-
 .../triSurfaceField/triSurfaceField.hpp       | 121 ++++++--------
 .../triSurfaceField/triSurfaceFields.cpp      |   6 +-
 .../triSurfaceField/triSurfaceFields.hpp      |  10 +-
 6 files changed, 214 insertions(+), 83 deletions(-)

diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index e5a14d00..822f5cc6 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -55,6 +55,7 @@ containers/VectorHD/VectorSingles.cpp
 containers/Field/Fields.cpp
 containers/List/anyList/anyList.cpp
 containers/pointField/pointFields.cpp
+containers/triSurfaceField/triSurfaceFields.cpp
 
 setFieldList/setFieldList.cpp
 setFieldList/setFieldEntry.cpp
diff --git a/src/phasicFlow/containers/Field/Field.hpp b/src/phasicFlow/containers/Field/Field.hpp
index 8c1ac98c..e1eb18c2 100644
--- a/src/phasicFlow/containers/Field/Field.hpp
+++ b/src/phasicFlow/containers/Field/Field.hpp
@@ -106,6 +106,14 @@ public:
 			fieldKey_(fieldKey)
 		{}
 
+		Field(const word& name, const word& fieldKey, size_t capacity, size_t len, const T& val)
+		:
+			VectorType(name, len, len, RESERVE()),
+			fieldKey_(fieldKey)
+		{
+			VectorType::fill(val);
+		}
+
 		/// Construct a field with name, fieldKey, capacity and len
 		Field(const word& name, const word& fieldKey, size_t capacity, size_t len, RESERVE)
 		:
diff --git a/src/phasicFlow/containers/triSurfaceField/triSurfaceField.cpp b/src/phasicFlow/containers/triSurfaceField/triSurfaceField.cpp
index 26830089..8ba0abf4 100644
--- a/src/phasicFlow/containers/triSurfaceField/triSurfaceField.cpp
+++ b/src/phasicFlow/containers/triSurfaceField/triSurfaceField.cpp
@@ -1,3 +1,4 @@
+#include "triSurfaceField.hpp"
 /*------------------------------- phasicFlow ---------------------------------
       O        C enter of
      O O       E ngineering and
@@ -18,7 +19,153 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
+template<class T, class MemorySpace>
+pFlow::triSurfaceField<T,MemorySpace>::triSurfaceField
+( 
+	const objectFile& objf,
+	multiTriSurface& surface, 
+	const T& defVal
+)
+:
+	triSurfaceField
+	(
+		objf,
+		surface.owner(),
+		surface,
+		defVal
+	)
+{
+
+}
+
+template<class T, class MemorySpace>
+pFlow::triSurfaceField<T,MemorySpace>::triSurfaceField
+( 
+	const objectFile& objf,
+	repository* owner,
+	multiTriSurface& surface, 
+	const T& defVal
+)
+:
+	IOobject
+	(
+		objf,
+		IOPattern::AllProcessorsSimilar,
+		owner
+	),
+	observer
+	(
+		&surface,
+		message::Default()
+	),
+	field_
+	(
+		objf.name(),
+		"value",
+		surface.capacity(),
+		surface.size(),
+		RESERVE()
+	),
+	surface_(surface),
+	defaultValue_(defVal)
+{
+	if(IOobject::implyRead())
+    {
+        REPORT(1)<< "Reading triSurfaceField "<< Green_Text(IOobject::name())<<
+        " from "<<IOobject::path()<<END_REPORT;
+    }
+    else
+    {
+        REPORT(1)<< "Creating triSurfaceField "<< Green_Text(IOobject::name())<<END_REPORT;
+    }
+    if( !IOobject::readObject() )
+    {
+        fatalErrorInFunction<<
+        "Error in reading from file "<<IOobject::path()<<endl;
+        fatalExit;
+    }
+} 
+
+template <class T, class MemorySpace>
+pFlow::triSurfaceField<T, MemorySpace>::triSurfaceField
+(
+	const objectFile &objf, 
+	multiTriSurface &surface, 
+	const T &val, 
+	const T &defVal
+)
+:
+	triSurfaceField
+	(
+		objf,
+		surface.owner(),
+		surface,
+		val, 
+		defVal
+	)	
+{}
+
+template <class T, class MemorySpace>
+pFlow::triSurfaceField<T, MemorySpace>::triSurfaceField
+(
+	const objectFile &objf, 
+	repository *owner, 
+	multiTriSurface &surface, 
+	const T &val, 
+	const T &defVal
+)
+:
+	IOobject
+	(
+		objectFile
+		(
+			objf.name(),
+			objf.localPath(),
+			objectFile::READ_NEVER,
+			objf.wFlag()
+		),
+		IOPattern::AllProcessorsSimilar,
+		owner
+	),
+	observer
+	(
+		&surface,
+		message::Default()
+	),
+	field_
+	(
+		objf.name(),
+		"value",
+		surface.capacity(),
+		surface.size(),
+		val
+	),
+	surface_(surface),
+	defaultValue_(defVal)
+{
+}
+
+template <class T, class MemorySpace>
+bool pFlow::triSurfaceField<T, MemorySpace>::write
+(
+	iOstream &is, 
+	const IOPattern &iop
+) const
+{
+	return field_.write(is, iop);
+}
+
+template <class T, class MemorySpace>
+bool pFlow::triSurfaceField<T, MemorySpace>::read
+(
+	iIstream &is, 
+	const IOPattern &iop
+)
+{
+    return field_.read(is, iop);
+}
+
+/*template<template<class, class> class VectorField, class T, class MemorySpace>
 pFlow::triSurfaceField<VectorField, T, MemorySpace>::triSurfaceField
 (
 	const triSurface& surface,
@@ -116,4 +263,4 @@ bool pFlow::triSurfaceField<VectorField, T, MemorySpace>::writeTriSurfaceField
 )const
 {
 	return FieldType::write(os);
-}
\ No newline at end of file
+}*/
\ No newline at end of file
diff --git a/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp b/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp
index 8dc2899b..37a17c38 100644
--- a/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp
+++ b/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp
@@ -22,7 +22,8 @@ Licence:
 #define __trieSurfaceField_hpp__
 
 #include "Field.hpp"
-#include "triSurface.hpp"
+#include "multiTriSurface.hpp"
+#include "observer.hpp"
 #include "error.hpp"
 
 
@@ -30,119 +31,93 @@ namespace pFlow
 {
 
 
-template<template<class, class> class VectorField, class T, class MemorySpace=void>
+template<class T, class MemorySpace=void>
 class triSurfaceField
 :
-	public eventObserver,	
-	public Field<VectorField, T, MemorySpace>
+	public IOobject,
+	public observer
 {
 public:
 	
-	using triSurfaceFieldType 	= triSurfaceField<VectorField, T, MemorySpace>;
+	using triSurfaceFieldType 	= triSurfaceField<T, MemorySpace>;
 	
-	using FieldType         	= Field<VectorField, T, MemorySpace>;
+	using FieldType         	= Field<T, MemorySpace>;
   	
   	using VectorType  			= typename FieldType::VectorType;
 
-	using iterator        = typename FieldType::iterator;
+	using memory_space 			= typename FieldType::memory_space;
 
-  	using constIterator   = typename FieldType::constIterator;
+	using execution_space 		= typename FieldType::execution_space;
 
-	using reference       = typename FieldType::reference;
-  	
-  	using constReference  = typename FieldType::constReference;
-
-	using valueType       = typename FieldType::valueType;
-  	
-  	using pointer         = typename FieldType::pointer;
-  	
-  	using constPointer    = typename FieldType::constPointer;
-
-protected:
+private:
 
 	////- data members
-		const triSurface& surface_;
+
+		FieldType 				field_;
+
+		const multiTriSurface& 	surface_;
 
 		// - value when a new item is added to field
-		T 	defaultValue_;
+		T 						defaultValue_;
 
 
 public:
 	
 	// - type info
-	TypeInfoTemplateNV2("triSurfaceField", T, VectorType::memoerySpaceName());
+	TypeInfoTemplate111("triSurfaceField", T, VectorType::memoerySpaceName());
 
 	
 	//// CONSTRUCTORS
 
 		// - construct a field from tirSurface and set defaultValue_ and field value to defVal
-		triSurfaceField( const triSurface& surface, const T& defVal, bool subscribe = true);
+		triSurfaceField( 
+			const objectFile& objf,
+			multiTriSurface& surface, 
+			const T& defVal);
+
+		triSurfaceField( 
+			const objectFile& objf,
+			repository* owner,
+			multiTriSurface& surface, 
+			const T& defVal);
 
 		// - construct from iIOEntity, tirSurface and a value
-		triSurfaceField( const triSurface& surface, const T& val, const T& defVal, bool subscribe = true);
+		triSurfaceField( 
+			const objectFile& objf,
+			multiTriSurface& surface, 
+			const T& val, 
+			const T& defVal);
 
-		// - construct from another triSurfaceField
-		//   subscribe to events if true
-		triSurfaceField( const triSurfaceField& src, bool subscribe);
+		triSurfaceField( 
+			const objectFile& objf,
+			repository* owner,
+			multiTriSurface& surface, 
+			const T& val, 
+			const T& defVal);
 
+		~triSurfaceField()override = default;
 
-		// - copy construct 
-		triSurfaceField(const triSurfaceField& src);
-
-		// - no move construct
-		triSurfaceField(triSurfaceField&& src) = delete;
-
-
-		// assignment, only assign the VectorField and preserve other parts of this 
-		triSurfaceField& operator = (const triSurfaceField& rhs);
-
-		// no move assignment 
-		triSurfaceField& operator = (triSurfaceField&&) = delete;		
-
-
-		inline uniquePtr<triSurfaceFieldType> clone() const
-		{
-			return makeUnique<triSurfaceFieldType>(*this);
-		}
-
-		inline triSurfaceFieldType* clonePtr()const
-		{
-			return new triSurfaceFieldType(*this);
-		}
+			
 
 	//// - Methods
 
-		inline const triSurface& surface()const {
+		inline 
+		const auto& surface()const 
+		{
 			return surface_;
 		}
 
-		auto getTriangleAccessor()const
-		{
-			return surface_.getTriangleAccessor();
-		}
-
-		bool update(const eventMessage& msg);
-
+		
 
 	//// -  IO operations
-		bool readTriSurfacceField(iIstream& is);
+		bool write(iOstream& is, const IOPattern& iop)const override;
 
-		bool writeTriSurfaceField(iOstream& os)const;
-
-
-		bool read(iIstream& is)
-		{
-			return readTriSurfacceField(is);
-		}
-
-		bool write(iOstream& os)const
-		{
-			return writeTriSurfaceField(os);
-		}
+    
+        bool read(iIstream& is, const IOPattern& iop) override;
 
 };
 
-template<template<class, class> class VectorField, class T, class MemorySpace>
+/*template<template<class, class> class VectorField, class T, class MemorySpace>
 iIstream& operator >> (iIstream & is, triSurfaceField<VectorField, T, MemorySpace> & tsF )
 {
 	if( !tsF.read(is))
@@ -168,7 +143,7 @@ iOstream& operator << (iOstream& os, const triSurfaceField<VectorField, T, Memor
 	}
 
 	return os;
-}
+}*/
 
 }
 
diff --git a/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.cpp b/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.cpp
index 742b7aaa..95b75805 100644
--- a/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.cpp
+++ b/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.cpp
@@ -21,9 +21,9 @@ Licence:
 #include "triSurfaceFields.hpp"
 
 
-template class pFlow::triSurfaceField<pFlow::VectorSingle, pFlow::real>;
+template class pFlow::triSurfaceField<pFlow::real>;
 
-template class pFlow::triSurfaceField<pFlow::VectorSingle, pFlow::real, pFlow::HostSpace>;
+/*template class pFlow::triSurfaceField<pFlow::VectorSingle, pFlow::real, pFlow::HostSpace>;
 
 template class pFlow::triSurfaceField<pFlow::VectorSingle, pFlow::realx3>;
 
@@ -31,4 +31,4 @@ template class pFlow::triSurfaceField<pFlow::VectorSingle, pFlow::realx3, pFlow:
 
 template class pFlow::triSurfaceField<pFlow::VectorDual, pFlow::real>;
 
-template class pFlow::triSurfaceField<pFlow::VectorDual, pFlow::realx3>;
\ No newline at end of file
+template class pFlow::triSurfaceField<pFlow::VectorDual, pFlow::realx3>;*/
\ No newline at end of file
diff --git a/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.hpp b/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.hpp
index c3cd6bd9..cf3f6ffa 100644
--- a/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.hpp
+++ b/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.hpp
@@ -21,15 +21,15 @@ Licence:
 #ifndef __triSurfaceFields_hpp__ 
 #define __triSurfaceFields_hpp__
 
-#include "VectorSingle.hpp"
-#include "VectorDual.hpp"
-#include "triSurfaceField.hpp"
 #include "types.hpp"
+#include "VectorSingle.hpp"
+#include "triSurfaceField.hpp"
+
 
 namespace pFlow
 {
 
-using realTriSurfaceField_D 	= triSurfaceField<VectorSingle, real> ;
+/*using realTriSurfaceField_D 	= triSurfaceField<VectorSingle, real> ;
 
 using realTriSurfaceField_H 	= triSurfaceField<VectorSingle, real, HostSpace> ;
 
@@ -52,7 +52,7 @@ using int8TriSurfaceField_H 	= triSurfaceField<VectorSingle, int8, HostSpace> ;
 using int8TriSurfaceField_HD 	= triSurfaceField<VectorDual, int8> ;
 
 using int8TriSurfaceField 		= triSurfaceField<Vector, int8, vecAllocator<real>> ;
-
+*/
 
 }
 

From 5b4a524afe9fc634668e4ebe40141bce89d15aff Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Mon, 5 Feb 2024 21:27:24 -0800
Subject: [PATCH 37/60] Motion models integrated into geometryMotion,
 stationaryWall is added

---
 src/CMakeLists.txt                            |   4 +-
 src/Geometry/geometry/geometry.cpp            | 366 +++++++++++++-----
 src/Geometry/geometry/geometry.hpp            | 194 ++++++----
 .../geometryMotion/geometryMotion.cpp         | 359 +++++++++--------
 .../geometryMotion/geometryMotion.hpp         |  57 +--
 .../geometryMotion/geometryMotions.hpp        |  12 +-
 .../geometryMotionsInstantiate.cpp            |   8 +-
 src/MotionModel/CMakeLists.txt                |   7 +-
 src/MotionModel/MotionModel/MotionModel.hpp   |  11 +-
 .../entities/rotatingAxis/rotatingAxis.hpp    |   2 +
 .../entities/stationary/stationary.cpp        |  57 +++
 .../entities/stationary/stationary.hpp        | 104 +++++
 .../entities/vibrating/vibrating.hpp          |   2 +
 src/MotionModel/fixedWall/fixedWall.cpp       | 110 ------
 src/MotionModel/fixedWall/fixedWall.hpp       | 206 ----------
 .../rotatingAxisMotion/rotatingAxisMotion.cpp |  16 +
 .../rotatingAxisMotion/rotatingAxisMotion.hpp |  11 +-
 .../stationaryWall/stationaryWall.cpp         |  75 ++++
 .../stationaryWall/stationaryWall.hpp         |  69 ++++
 .../vibratingMotion/vibratingMotion.cpp       |  16 +
 .../vibratingMotion/vibratingMotion.hpp       |   5 +
 src/phasicFlow/containers/Field/Field.cpp     |   3 +
 src/phasicFlow/containers/Field/Field.hpp     |   6 +-
 src/phasicFlow/containers/Vector/Vector.hpp   |   3 +
 src/phasicFlow/containers/Vector/VectorI.hpp  |  13 +-
 .../containers/VectorHD/VectorSingle.cpp      |  10 +-
 .../triSurfaceField/triSurfaceField.hpp       |  32 ++
 .../triSurfaceField/triSurfaceFields.hpp      |  23 +-
 src/phasicFlow/dictionary/dictionary.cpp      |   7 +
 src/phasicFlow/dictionary/dictionary.hpp      |   2 +
 src/phasicFlow/dictionary/fileDictionary.cpp  |  24 ++
 src/phasicFlow/dictionary/fileDictionary.hpp  |   5 +-
 .../repository/IOobject/IOobject.cpp          |   3 +
 .../repository/repository/repository.cpp      |   2 +-
 src/phasicFlow/triSurface/multiTriSurface.cpp |  29 +-
 src/phasicFlow/triSurface/multiTriSurface.hpp |  28 ++
 src/phasicFlow/triSurface/triSurface.cpp      |  40 +-
 src/phasicFlow/triSurface/triSurface.hpp      |   5 +
 src/phasicFlow/typeSelection/typeInfo.hpp     |   3 +-
 39 files changed, 1203 insertions(+), 726 deletions(-)
 create mode 100644 src/MotionModel/entities/stationary/stationary.cpp
 create mode 100644 src/MotionModel/entities/stationary/stationary.hpp
 delete mode 100644 src/MotionModel/fixedWall/fixedWall.cpp
 delete mode 100644 src/MotionModel/fixedWall/fixedWall.hpp
 create mode 100644 src/MotionModel/stationaryWall/stationaryWall.cpp
 create mode 100644 src/MotionModel/stationaryWall/stationaryWall.hpp

diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt
index 6f339f58..6f4967e6 100644
--- a/src/CMakeLists.txt
+++ b/src/CMakeLists.txt
@@ -7,11 +7,13 @@ add_subdirectory(Property)
 
 add_subdirectory(Particles)
 
+add_subdirectory(Geometry)
+
 #add_subdirectory(Interaction)
 
 add_subdirectory(MotionModel)
 
-#add_subdirectory(Geometry)
+
 
 
 #add_subdirectory(MPIParallelization)
diff --git a/src/Geometry/geometry/geometry.cpp b/src/Geometry/geometry/geometry.cpp
index 4d7edc04..0875dbd6 100644
--- a/src/Geometry/geometry/geometry.cpp
+++ b/src/Geometry/geometry/geometry.cpp
@@ -19,33 +19,41 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "geometry.hpp"
+#include "systemControl.hpp"
 #include "vocabs.hpp"
 
 
-bool pFlow::geometry::findPropertyId()
+bool pFlow::geometry::createPropertyId()
 {
-
-	int8Vector propId(0, surface().capacity(),RESERVE());
-	propId.clear();
-
-	uint32 pId;
-	ForAll(matI, materialName_)
+	if(materialName_.size() != numSurfaces() )
 	{
+		fatalErrorInFunction<<
+		"number of subSurface and material names do not match"<<endl;
+		return false;
+	}
+
+	uint32Vector propId(
+		"propId", 
+		surface().capacity(), 
+		surface().size(),
+		RESERVE());
+
+	ForAll(i, materialName_)
+	{
+		uint32 pIdx =0;
 		
-		if( !wallProperty_.nameToIndex( materialName_[matI], pId ) )
+		if( !wallProperty_.nameToIndex(materialName_[i], pIdx) )
 		{
-		 	fatalErrorInFunction<<
-		 	"material name for the geometry is invalid: "<< materialName_[matI]<<endl;
-		 	return false;
+			fatalErrorInFunction<<
+			"Property/material name is invalid "<<materialName_[i]<<
+			". A list of valid names are \n"<< wallProperty_.materials()<<endl;
+			return false;
 		}
-
-		int32 surfSize = surface().surfNumTriangles(matI);
-
-		for(int32 i=0; i<surfSize; i++)
-		{
-			propId.push_back(pId);
-		}
-	}	
+		
+		auto triRange = subSurfaceRange(i);
+		propId.fill(triRange.start(), triRange.end(), pIdx);
+		
+	}
 
 	propertyId_.assign(propId);
 
@@ -59,77 +67,245 @@ pFlow::geometry::geometry
 	const property& prop
 )
 :
-	demGeometry(control),
+	multiTriSurface
+	(
+		objectFile
+		(
+			triSurfaceFile__,
+			"",
+			objectFile::READ_ALWAYS,
+			objectFile::WRITE_ALWAYS
+		),
+		&control.geometry()
+	),
+	demComponent
+	(
+		"geometry",
+		control
+	),
 	wallProperty_(prop),
-	geometryRepository_(control.geometry()),
-	triSurface_(
-		control.geometry().emplaceObject<multiTriSurface>(
-			objectFile(
-				"triSurface",
-				"",
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_ALWAYS
-				)
-			)
+	motionComponentName_
+	(
+		"motionComponentName",
+		"motionComponentName"
+	),
+	materialName_
+	(
+		"materialName",
+		"materialName"
+	),
+	propertyId_
+	(
+		objectFile
+		(
+			"propertyId",
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_NEVER
 		),
-	motionComponentName_(
-		control.geometry().emplaceObject<wordField>(
-			objectFile(
-				"motionComponentName",
-				"",
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_ALWAYS	
-				),
-			"motionNamesList"
-			)
+		*this,
+		0u
+	),
+	contactForceWall_
+	(
+		objectFile
+		(
+			"contactForcWall",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_NEVER
 		),
-	materialName_(
-		control.geometry().emplaceObject<wordField>(
-			objectFile(
-				"materialName",
-				"",
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_ALWAYS
-				),
-			"materialNamesList"
-			)
+		*this,
+		zero3
+	),
+	normalStressWall_
+	(
+		objectFile
+		(
+			"normalStressWall",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_NEVER
 		),
-	propertyId_(
-		control.geometry().emplaceObject<int8TriSurfaceField_D>(
-			objectFile(
-				"propertyId",
-				"",
-				objectFile::READ_NEVER,
-				objectFile::WRITE_NEVER),
-			surface(),
-			0 ) ),
-	contactForceWall_(
-		control.geometry().emplaceObject<realx3TriSurfaceField_D>(
-			objectFile(
-				"contactForceWall",
-				"",
-				objectFile::READ_IF_PRESENT,
-				objectFile::WRITE_ALWAYS),
-			surface(),
-			zero3) ),
-	stressWall_(
-		control.geometry().emplaceObject<realx3TriSurfaceField_D>(
-			objectFile(
-				"stressWall",
-				"",
-				objectFile::READ_IF_PRESENT,
-				objectFile::WRITE_ALWAYS),
-			surface(),
-			zero3) )
+		*this,
+		zero3
+	),
+	shearStressWall_
+	(
+		objectFile
+		(
+			"shearStressWall",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_NEVER
+		),
+		*this,
+		zero3
+	)
 {
 
-	if(!findPropertyId())
+	readWholeObject_ = false;
+	if( !IOobject::readObject() )
+    {
+        fatalErrorInFunction<<
+        "Error in reading from file "<<IOobject::path()<<endl;
+        fatalExit;
+    }
+	readWholeObject_ = true;
+
+	if( this->numSurfaces() != motionComponentName_.size() )
+	{
+		fatalErrorInFunction<<
+		"Number of surfaces is not equal to number of motion component names"<<endl;
+		fatalExit;
+	}
+	
+	if(!createPropertyId())
 	{
 		fatalExit;
 	}
 }
 
 pFlow::geometry::geometry
+(
+	systemControl &control, 
+	const property &prop, 
+	multiTriSurface &surf, 
+	const wordVector &motionCompName, 
+	const wordVector &materialName,
+	const dictionary& motionDict
+)
+:
+	multiTriSurface
+	(
+		objectFile
+		(
+			triSurfaceFile__,
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_ALWAYS
+		),
+		&control.geometry(),
+		surf
+	),
+	demComponent
+	(
+		"geometry",
+		control
+	),
+	wallProperty_
+	(
+		prop
+	),
+	motionComponentName_
+	(
+		"motionComponentName",
+		"motionComponentName"
+	),
+	materialName_
+	(
+		"materialName",
+		"materialName"
+	),
+	propertyId_
+	(
+		objectFile
+		(
+			"propertyId",
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_NEVER
+		),
+		*this,
+		0u
+	),
+	contactForceWall_
+	(
+		objectFile
+		(
+			"contactForcWall",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_NEVER
+		),
+		*this,
+		zero3
+	),
+	normalStressWall_
+	(
+		objectFile
+		(
+			"normalStressWall",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_NEVER
+		),
+		*this,
+		zero3
+	),
+	shearStressWall_
+	(
+		objectFile
+		(
+			"shearStressWall",
+			"",
+			objectFile::READ_IF_PRESENT,
+			objectFile::WRITE_NEVER
+		),
+		*this,
+		zero3
+	)
+	
+{
+	motionComponentName_.assign(motionCompName);
+	materialName_.assign(materialName);
+
+
+	if( this->numSurfaces() != motionComponentName_.size() )
+	{
+		fatalErrorInFunction<<
+		"Number of surfaces is not equal to number of motion component names"<<endl;
+		fatalExit;
+	}
+
+	if(!createPropertyId())
+	{
+		fatalExit;
+	}
+}
+
+bool pFlow::geometry::read(iIstream &is, const IOPattern &iop)
+{
+	motionComponentName_.read(is, iop);
+	materialName_.read(is, iop);
+	
+	if( readWholeObject_ )
+	{
+		return multiTriSurface::read(is, iop);
+	}
+
+    return true;
+}
+
+bool pFlow::geometry::write(iOstream &os, const IOPattern &iop) const
+{
+    
+	if( !motionComponentName_.write(os, iop) )
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+	if( !materialName_.write(os,iop))
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+	
+	return multiTriSurface::write(os,iop);
+}
+
+/*pFlow::geometry::geometry
 (
 	systemControl& control,
 	const property& prop,
@@ -296,23 +472,25 @@ bool pFlow::geometry::afterIteration()
 	Kokkos::fence();
 	return true;
 	
-}
+}*/
 
 pFlow::uniquePtr<pFlow::geometry> 
-	pFlow::geometry::create(
-			systemControl& control,
-			const property& prop,
-			const dictionary& dict,
-			const multiTriSurface& triSurface,
-			const wordVector& motionCompName,
-			const wordVector& propName)
+	pFlow::geometry::create
+	(
+		systemControl& control, 
+		const property& prop,
+		multiTriSurface& surf,
+		const wordVector& motionCompName,
+		const wordVector& materialName,
+		const dictionary& motionDic
+	)
 {
 
-	word model = dict.getVal<word>("motionModel");
+	word model = motionDic.getVal<word>("motionModel");
 
 	auto geomModel = angleBracketsNames("geometry", model);
 
-	REPORT(1)<< "Selecting geometry model . . ."<<endREPORT;
+	REPORT(1)<< "Selecting geometry model . . ."<<END_REPORT;
 
 	if( dictionaryvCtorSelector_.search(geomModel) )
 	{
@@ -320,19 +498,19 @@ pFlow::uniquePtr<pFlow::geometry>
 			(
 				control,
 				prop, 
-				dict,
-				triSurface,
+				surf,
 				motionCompName,
-				propName
+				materialName,
+				motionDic
 			);
-		REPORT(2)<<"Model "<< greenText(geomModel)<<" is created.\n"<<endREPORT;
+		REPORT(2)<<"Model "<< Green_Text(geomModel)<<" is created.\n"<<END_REPORT;
 		return objPtr;
 	}
 	else
 	{
 		printKeys
 		( 
-			fatalError << "Ctor Selector "<< yellowText(geomModel) << " dose not exist. \n"
+			fatalError << "Ctor Selector "<< Yellow_Text(geomModel) << " dose not exist. \n"
 			<<"Avaiable ones are: \n\n"
 			,
 			dictionaryvCtorSelector_
@@ -340,4 +518,4 @@ pFlow::uniquePtr<pFlow::geometry>
 		fatalExit;
 	}
 	return nullptr;
-}
\ No newline at end of file
+}
diff --git a/src/Geometry/geometry/geometry.hpp b/src/Geometry/geometry/geometry.hpp
index a8296700..bc1016b0 100644
--- a/src/Geometry/geometry/geometry.hpp
+++ b/src/Geometry/geometry/geometry.hpp
@@ -23,13 +23,14 @@ Licence:
 
 
 #include "virtualConstructor.hpp"
-#include "demGeometry.hpp"
+#include "demComponent.hpp"
 #include "property.hpp"
-#include "Fields.hpp"
-#include "Vectors.hpp"
 #include "multiTriSurface.hpp"
 #include "triSurfaceFields.hpp"
-#include "dictionary.hpp"
+//#include "Fields.hpp"
+//#include "Vectors.hpp"
+
+
 
 namespace pFlow
 {
@@ -42,47 +43,48 @@ namespace pFlow
  */
 class geometry
 :
-	public demGeometry
+	public multiTriSurface,
+	public demComponent
 {
-protected:
+private:
 
 	// - Protected members 
 
 		/// Const reference to physical property of materials 
 		const property& 	wallProperty_;
 
-		/// Repository to store geometry data at each simulation moment
-		repository&  		geometryRepository_;
-
-		/// All triangles in the set of wall surfaces 
-		multiTriSurface&  	triSurface_;
-
 		/// The name of motion component of each wall surface 
-		wordField& 			motionComponentName_;
+		wordField_H 		motionComponentName_;
 
 		/// Material name of each wall surface  
-		wordField&   		materialName_;
+		wordField_H   		materialName_;
 		
 		/// Property id of each triangle in the set of wall surfaces
-		int8TriSurfaceField_D& 		propertyId_;
+		uint32TriSurfaceField_D 		propertyId_;
 
 		/// Contact force on each triangle in the set of wall surfaces
-		realx3TriSurfaceField_D& 	contactForceWall_;
+		realx3TriSurfaceField_D 		contactForceWall_;
 
-		/// Stress on ech triangle in the set of wall surfaces 
-		realx3TriSurfaceField_D&    stressWall_;
+		/// Stress on each triangle in the set of wall surfaces 
+		realx3TriSurfaceField_D 		normalStressWall_;
+
+		/// Stress on each triangle in the set of wall surfaces 
+		realx3TriSurfaceField_D 		shearStressWall_;
+
+
+		bool readWholeObject_ = true; 			
 
 	// - Protected member functions
 	
 		/// Find property id of each triangle based on the supplied material name
 		/// and the surface wall that the triangle belongs to. 
-		bool findPropertyId();
+		bool createPropertyId();
 
 		/// Initialize contact force to zero 
-		void zeroForce()
+		/*void zeroForce()
 		{
 			contactForceWall_.fill(zero3);
-		}
+		}*/
 
 
 public:
@@ -95,8 +97,15 @@ public:
 		/// Construct from controlSystem and property, for reading from file
 		geometry(systemControl& control, const property& prop);
 
+		geometry(systemControl& control, 
+			const property& prop,
+			multiTriSurface& surf,
+			const wordVector& motionCompName,
+			const wordVector& materialName,
+			const dictionary& motionDict);
+
 		/// Construct from components
-		geometry(systemControl& control,
+		/*geometry(systemControl& control,
 				 const property& prop,
 				 const multiTriSurface& triSurface,
 				 const wordVector& motionCompName,
@@ -110,13 +119,13 @@ public:
 				 const dictionary& dict,
 				 const multiTriSurface& triSurface,
 				 const wordVector& motionCompName,
-				 const wordVector& propName);
+				 const wordVector& propName);*/
 
 		/// Destructor
 		virtual ~geometry() = default;
 
 		/// Virtual constructor 
-		create_vCtor
+		/*create_vCtor
 		(
 			geometry,
 			systemControl,
@@ -125,37 +134,24 @@ public:
 				const property& prop
 			),
 			(control, prop)
-		);
+		);*/
 
 		/// Virtual constructor 
 		create_vCtor
 		(
 			geometry,
 			dictionary,
-			(systemControl& control,
-			 const property& prop,
-			 const dictionary& dict,
-			 const multiTriSurface& triSurface,
-			 const wordVector& motionCompName,
-			 const wordVector& propName),
-			(control, prop, dict, triSurface, motionCompName, propName)
+			(
+				systemControl& control, 
+				const property& prop,
+				multiTriSurface& surf,
+				const wordVector& motionCompName,
+				const wordVector& materialName,
+				const dictionary& motionDic),
+			(control, prop, surf, motionCompName, materialName, motionDic)
 		);
 
-	//- Methods 
-
-		/// Size of tri-surface 
-		inline
-		auto size()const
-		{
-			return triSurface_.size();
-		}
-
-		/// Number of points in the set of surface walls 
-		inline
-		auto numPoints()const
-		{
-			return triSurface_.numPoints();
-		}
+	//- Methods 	
 
 		/// Number of triangles in the set of surface walls 
 		inline
@@ -165,39 +161,47 @@ public:
 		}
 
 		/// Access to the points
-		inline
+		/*inline
 		const auto& points()const
 		{
 			return triSurface_.points();
-		}
+		}*/
 
 		/// Access to the vertices 
-		inline
+		/*inline
 		const auto& vertices()const
 		{
 			return triSurface_.vertices();
-		}
+		}*/
 
 		/// Obtain an object for accessing triangles 
-		inline auto getTriangleAccessor()const
+		/*inline auto getTriangleAccessor()const
 		{
 			return triSurface_.getTriangleAccessor();
+		}*/
+
+		/// Surface 
+		inline 
+		auto& surface()
+		{
+			return static_cast<multiTriSurface&>(*this);
 		}
 
 		/// Surface 
-		inline auto& surface()
+		inline 
+		const auto& surface()const
 		{
-			return triSurface_;
+			return static_cast<const multiTriSurface&>(*this);
 		}
 
-		/// Surface 
-		inline const auto& surface()const
+		inline 
+		const auto& motionComponentName()const
 		{
-			return triSurface_;
+			return motionComponentName_;
 		}
-
+		
 		/// Access to contact force
-		inline
+		/*inline
 		realx3TriSurfaceField_D& contactForceWall()
 		{
 			return contactForceWall_;
@@ -214,34 +218,34 @@ public:
 		inline const auto& wallProperty()const
 		{
 			return wallProperty_;
-		}
+		}*/
 
 		/// Owner repository
-		inline
+		/*inline
 		const repository& owner()const
 		{
 			return geometryRepository_;
-		}
+		}*/
 
 		/// Owner repository
-		inline
+		/*inline
 		repository& owner()
 		{
 			return geometryRepository_;
-		}
+		}*/
 
 		/// Path to the repository folder 
-		inline auto path()
+		/*inline auto path()
 		{
 			return owner().path();
-		}
+		}*/
 
 		/// The name of motion model 
-		virtual 
-		word motionModelTypeName()const = 0;
+		/*virtual 
+		word motionModelTypeName()const = 0;*/
 
 		/// Motion model index of triangles 
-		virtual
+		/*virtual
 		const int8Vector_HD& 			triMotionIndex() const =0;
 
 		/// Motion model index of points 
@@ -252,36 +256,58 @@ public:
 		const int8TriSurfaceField_D& 	propertyId() const
 		{
 			return propertyId_;
-		}
+		}*/
 
 		/// Operations before each iteration 
-		bool beforeIteration() override;
+		//bool beforeIteration() override;
 
 		/// Operations after each iteration
-		bool afterIteration() override;
+		//bool afterIteration() override;
+
+		
+		bool beforeIteration() override
+		{
+			notImplementedFunction;
+			return true;
+		}
+
+		/// This is called in time loop. Perform the main calculations 
+		/// when the component should evolve along time.
+		bool iterate() override
+		{
+			notImplementedFunction;
+			return true;
+		}
+
+		/// This is called in time loop, after iterate.
+		bool afterIteration() override
+		{
+			notImplementedFunction;
+			return true;
+		}
 
 	//- IO
 
+		bool read(iIstream& is, const IOPattern& iop) override;
+
 		/// write 
-		bool write()const
-		{
-			return owner().write();
-		}
+		bool write( iOstream& os, const IOPattern& iop )const override;
+		
 
 
 	//- Static members 
 
-		static
-		uniquePtr<geometry> create(systemControl& control, const property& prop);
+		/*static
+		uniquePtr<geometry> create(systemControl& control, const property& prop);*/
 
 		static
 		uniquePtr<geometry> create(
-				systemControl& control,
-				const property& prop,
-				const dictionary& dict,
-				const multiTriSurface& triSurface,
-				const wordVector& motionCompName,
-				const wordVector& propName);
+			systemControl& control, 
+			const property& prop,
+			multiTriSurface& surf,
+			const wordVector& motionCompName,
+			const wordVector& materialName,
+			const dictionary& motionDic);
 
 };
 
diff --git a/src/Geometry/geometryMotion/geometryMotion.cpp b/src/Geometry/geometryMotion/geometryMotion.cpp
index ece859df..53f3509d 100644
--- a/src/Geometry/geometryMotion/geometryMotion.cpp
+++ b/src/Geometry/geometryMotion/geometryMotion.cpp
@@ -1,3 +1,4 @@
+#include "geometryMotion.hpp"
 /*------------------------------- phasicFlow ---------------------------------
       O        C enter of
      O O       E ngineering and
@@ -21,37 +22,49 @@ Licence:
 template<typename MotionModel>
 bool pFlow::geometryMotion<MotionModel>::findMotionIndex()
 {
-	motionIndex_.clear();
-	triMotionIndex_.reserve( this->surface().capacity() );
-	triMotionIndex_.clear();
-
-	ForAll( surfI, motionComponentName_)
+	
+	if(motionComponentName().size() != numSurfaces() )
 	{
-		auto mName = motionComponentName_[surfI];
-		auto mInd = motionModel_.nameToIndex(mName);
-		motionIndex_.push_back(mInd);
-		// fill motionIndex for triangles of the surface
-		int32 surfSize = this->surface().surfNumTriangles(surfI);
-		for(int32 i=0; i<surfSize; i++)
+		fatalErrorInFunction<<
+		"size of motion component names in the triSurface is not"<<
+		" equal to size of number of sub-surfaces"<<endl;
+		 return false;
+	}
+
+	uint32Vector surfMotionIndex("surfMotionIndex");
+	uint32Vector triMotionIndex("triMotionIndex");
+	uint32Vector pointMotionIndex("pointMotionIndex");
+
+	ForAll( surfI, motionComponentName())
+	{
+		auto mName = motionComponentName()[surfI];
+		uint32 mInd=0;
+		
+		if( !motionModel_.nameToIndex(mName, mInd) )
 		{
-			triMotionIndex_.push_back(mInd);
+			fatalErrorInFunction<<
+			mName<< " does not exist in the list of motion names -> "<<
+			motionModel_.componentNames();
+		}
+		surfMotionIndex.push_back(mInd);
+		
+		auto surfRange = this->surface().subSurfaceRange(surfI);
+		
+		for(uint32 i=0; i<surfRange.numElements(); i++)
+		{
+			triMotionIndex.push_back(mInd);
+		}
+
+		auto pointRange = this->surface().subSurfacePointRange(surfI);
+		for(uint32 n=0; n<pointRange.numElements(); n++)
+		{
+			pointMotionIndex.push_back(mInd);
 		}
 	}
-	motionIndex_.syncViews();
-	triMotionIndex_.syncViews();
-
-	pointMotionIndex_.reserve(triSurface_.numPoints());
-	pointMotionIndex_.clear();
-
-	ForAll(surfI, motionIndex_)
-	{
-		auto nP = triSurface_.surfNumPoints(surfI);
-		for(int32 i=0; i<nP; i++)
-		{
-			pointMotionIndex_.push_back(motionIndex_[surfI]);
-		}
-	}
-	pointMotionIndex_.syncViews();
+	
+	surfMotionIndex_.assign(surfMotionIndex);
+	triMotionIndex_.assign(triMotionIndex);
+	pointMotionIndex_.assign(pointMotionIndex);
 
 	return true;
 }
@@ -65,144 +78,188 @@ pFlow::geometryMotion<MotionModel>::geometryMotion
 )
 :
 	geometry(control, prop),
-	motionModel_(
-		this->owner().template emplaceObject<MotionModel>(
-			objectFile(
-				motionModelFile__,
-				"",
-				objectFile::READ_ALWAYS,
-				objectFile::WRITE_ALWAYS
-				)
-			)
+	motionModel_
+	(
+		objectFile
+		(
+			motionModelFile__,
+			"",
+			objectFile::READ_ALWAYS,
+			objectFile::WRITE_ALWAYS
 		),
+		owner()
+	),
 	moveGeomTimer_("move geometry", &this->timers())
 {
-	findMotionIndex();
-}
-
-template<typename MotionModel>
-pFlow::geometryMotion<MotionModel>::geometryMotion
-(
-	systemControl& control,
-	const property& prop,
-	const multiTriSurface& triSurface,
-	const wordVector& motionCompName,
-	const wordVector& propName,
-	const MotionModel& motionModel
-)
-:
-	geometry(
-		control,
-		prop,
-		triSurface,
-		motionCompName,
-		propName
-		),
-	motionModel_(
-		this->owner().template emplaceObject<MotionModel>(
-			objectFile(
-				motionModelFile__,
-				"",
-				objectFile::READ_NEVER,
-				objectFile::WRITE_ALWAYS
-				),
-			motionModel
-			)
-		),
-	moveGeomTimer_("move geometry", &this->timers())
-{
-	findMotionIndex();
-}
-
-template<typename MotionModel>
-pFlow::geometryMotion<MotionModel>::geometryMotion
-(
-	systemControl& control,
-	const property& prop,
-	const dictionary& dict,
-	const multiTriSurface& triSurface,
-	const wordVector& motionCompName,
-	const wordVector& propName
-)
-:
-	geometry(
-		control,
-		prop,
-		dict,
-		triSurface,
-		motionCompName,
-		propName
-		),
-	motionModel_(
-		this->owner().template emplaceObject<MotionModel>(
-			objectFile(
-				motionModelFile__,
-				"",
-				objectFile::READ_NEVER,
-				objectFile::WRITE_ALWAYS
-				),
-			dict
-			)
-		),
-	moveGeomTimer_("move geometry", &this->timers())
-{
-	findMotionIndex();
-}
-
-template<typename MotionModel>
-bool pFlow::geometryMotion<MotionModel>::beforeIteration() 
-{ 
-	geometry::beforeIteration();
-	return true;
-}
-
-template<typename MotionModel>
-bool pFlow::geometryMotion<MotionModel>::iterate()
-{
-	if( motionModel_.isMoving() )
+	if(!findMotionIndex())
 	{
-		moveGeomTimer_.start();
-		moveGeometry();
-		moveGeomTimer_.end();
+		fatalExit;
 	}
-	return true;
 }
 
-template<typename MotionModel>
-bool pFlow::geometryMotion<MotionModel>::afterIteration() 
+template <typename MotionModelType>
+pFlow::geometryMotion<MotionModelType>::geometryMotion
+(
+	systemControl &control, 
+	const property &prop, 
+	multiTriSurface &surf, 
+	const wordVector &motionCompName, 
+	const wordVector &materialName, 
+	const dictionary &motionDict
+)
+:
+	geometry
+	(
+		control, 
+		prop, 
+		surf, 
+		motionCompName, 
+		materialName,
+        motionDict
+	),
+	motionModel_
+	(
+		objectFile
+		(
+			motionModelFile__,
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_ALWAYS
+		),
+		motionDict,
+		owner()
+	),
+	moveGeomTimer_("move geometry", &this->timers())
 {
-	geometry::afterIteration();
-	return true;
-}
+	if(!findMotionIndex())
+	{
+		fatalExit;
+	}
+} 
 
-template<typename MotionModel>
-bool pFlow::geometryMotion<MotionModel>::moveGeometry()
-{
+/*template<typename MotionModel>
+ pFlow::geometryMotion<MotionModel>::geometryMotion
+ (
+     systemControl& control,
+     const property& prop,
+     const multiTriSurface& triSurface,
+     const wordVector& motionCompName,
+     const wordVector& propName,
+     const MotionModel& motionModel
+ )
+ :
+     geometry(
+         control,
+         prop,
+         triSurface,
+         motionCompName,
+         propName
+         ),
+     motionModel_(
+         this->owner().template emplaceObject<MotionModel>(
+             objectFile(
+                 motionModelFile__,
+                 "",
+                 objectFile::READ_NEVER,
+                 objectFile::WRITE_ALWAYS
+                 ),
+             motionModel
+             )
+         ),
+     moveGeomTimer_("move geometry", &this->timers())
+ {
+     findMotionIndex();
+ }
 
-	real dt = this->dt();
-	real t = this->currentTime();
+ template<typename MotionModel>
+ pFlow::geometryMotion<MotionModel>::geometryMotion
+ (
+     systemControl& control,
+     const property& prop,
+     const dictionary& dict,
+     const multiTriSurface& triSurface,
+     const wordVector& motionCompName,
+     const wordVector& propName
+ )
+ :
+     geometry(
+         control,
+         prop,
+         dict,
+         triSurface,
+         motionCompName,
+         propName
+         ),
+     motionModel_(
+         this->owner().template emplaceObject<MotionModel>(
+             objectFile(
+                 motionModelFile__,
+                 "",
+                 objectFile::READ_NEVER,
+                 objectFile::WRITE_ALWAYS
+                 ),
+             dict
+             )
+         ),
+     moveGeomTimer_("move geometry", &this->timers())
+ {
+     findMotionIndex();
+ }
 
-	auto pointMIndex= pointMotionIndex_.deviceVector();
-	auto mModel = motionModel_.getModel(t);
-	realx3* points = triSurface_.pointsData_D();
-	auto numPoints = triSurface_.numPoints();
+ template<typename MotionModel>
+ bool pFlow::geometryMotion<MotionModel>::beforeIteration()
+ {
+     geometry::beforeIteration();
+     return true;
+ }
+
+ template<typename MotionModel>
+ bool pFlow::geometryMotion<MotionModel>::iterate()
+ {
+     if( motionModel_.isMoving() )
+     {
+         moveGeomTimer_.start();
+         moveGeometry();
+         moveGeomTimer_.end();
+     }
+     return true;
+ }
+
+ template<typename MotionModel>
+ bool pFlow::geometryMotion<MotionModel>::afterIteration()
+ {
+     geometry::afterIteration();
+     return true;
+ }
+
+ template<typename MotionModel>
+ bool pFlow::geometryMotion<MotionModel>::moveGeometry()
+ {
+
+     real dt = this->dt();
+     real t = this->currentTime();
+
+     auto pointMIndex= pointMotionIndex_.deviceVector();
+     auto mModel = motionModel_.getModel(t);
+     realx3* points = triSurface_.pointsData_D();
+     auto numPoints = triSurface_.numPoints();
 
 
-	Kokkos::parallel_for(
-		"geometryMotion<MotionModel>::movePoints",
-		numPoints,
-		LAMBDA_HD(int32 i){
-			auto newPos = mModel.transferPoint(pointMIndex[i], points[i], dt);
-			points[i] = newPos;
-		});
+     Kokkos::parallel_for(
+         "geometryMotion<MotionModel>::movePoints",
+         numPoints,
+         LAMBDA_HD(int32 i){
+             auto newPos = mModel.transferPoint(pointMIndex[i], points[i], dt);
+             points[i] = newPos;
+         });
 
-	Kokkos::fence();
+     Kokkos::fence();
 
-	// move the motion components 
-	motionModel_.move(t,dt);
+     // move the motion components
+     motionModel_.move(t,dt);
 
-	// end of calculations 
-	moveGeomTimer_.end();
+     // end of calculations
+     moveGeomTimer_.end();
 
-	return true;
-}
\ No newline at end of file
+     return true;
+ }*/
\ No newline at end of file
diff --git a/src/Geometry/geometryMotion/geometryMotion.hpp b/src/Geometry/geometryMotion/geometryMotion.hpp
index cf47c613..a7b0c3bc 100644
--- a/src/Geometry/geometryMotion/geometryMotion.hpp
+++ b/src/Geometry/geometryMotion/geometryMotion.hpp
@@ -20,9 +20,8 @@ Licence:
 #ifndef __geometryMotion_hpp__
 #define __geometryMotion_hpp__
 
-
+#include "vocabs.hpp"
 #include "geometry.hpp"
-#include "VectorDuals.hpp"
 
 namespace pFlow
 {
@@ -38,22 +37,22 @@ class	geometryMotion
 	public geometry
 {
 public:
-	
-	using MotionModel = MotionModelType;
 
-protected: 
+	using ModelComponent = typename MotionModelType::ModelComponent;
+
+private: 
 	
 	/// Ref to motion model 
-	MotionModel& 		motionModel_;
+	MotionModelType 	motionModel_;
 	
 	/// motion indext mapped on each surface 
-	int32Vector_HD  	motionIndex_;
+	uint32Field_D  		surfMotionIndex_{"triMotionIndex"};
 
 	/// motion index mapped on each triangle 
-	int8Vector_HD 		triMotionIndex_; 
+	uint32Field_D 		triMotionIndex_ {"surfMotionIndex"}; 
 
 	/// motion index mapped on each point 
-	int8Vector_HD		pointMotionIndex_;
+	uint32Field_D		pointMotionIndex_{"pointMotionIndex"};
 
 	/// timer for moveGeometry
 	Timer 				moveGeomTimer_;			
@@ -64,37 +63,45 @@ protected:
 public:
 
 	/// Type info
-	TypeInfoTemplate("geometry", MotionModel);
+	TypeInfoTemplate11("geometry", ModelComponent);
 
 	// - Constructors
 		
 		geometryMotion(systemControl& control, const property& prop);
 
-		
 		geometryMotion(
+			systemControl& control, 
+			const property& prop,
+			multiTriSurface& surf,
+			const wordVector& motionCompName,
+			const wordVector& materialName,
+			const dictionary& motionDict);
+
+					
+		/*geometryMotion(
 			systemControl& control,
 			const property& prop,
 			const multiTriSurface& triSurface,
 			const wordVector& motionCompName,
 			const wordVector& propName,
-			const MotionModel& motionModel);
+			const MotionModel& motionModel);*/
 
 		/// Construct from components and dictionary that contains 
 		/// motionModel
-		geometryMotion(systemControl& control,
+		/*geometryMotion(systemControl& control,
 				 const property& prop,
 				 const dictionary& dict,
 				 const multiTriSurface& triSurface,
 				 const wordVector& motionCompName,
-				 const wordVector& propName);
+				 const wordVector& propName);*/
 
 		/// Add virtual constructor 
-		add_vCtor
+		/*add_vCtor
 		(
 			geometry,
 			geometryMotion,
 			systemControl
-		);
+		);*/
 
 		/// Add virtual constructor 
 		add_vCtor
@@ -107,19 +114,19 @@ public:
 	// - Methods
 
 		/// Obtain motion model at time t 
-		auto getModel(real t)const
+		/*auto getModel(real t)const
 		{
 			return motionModel_.getModel(t);
-		}
+		}*/
 
 		/// TypeName / TypeInfo of motion model 
-		word motionModelTypeName()const override
+		/*word motionModelTypeName()const override
 		{
 			return motionModel_.typeName();
-		}
+		}*/
 
 		/// Access to motion model index of triangles 
-		const int8Vector_HD& triMotionIndex()const override
+		/*const auto& triMotionIndex()const override
 		{
 			return triMotionIndex_;
 		}
@@ -128,19 +135,19 @@ public:
 		const int8Vector_HD& pointMotionIndex()const override
 		{
 			return pointMotionIndex_;
-		}
+		}*/
 
 		/// Operations before each iteration 
-		bool beforeIteration() override;
+		/*bool beforeIteration() override;
 
 		/// Iterate geometry one time step  
 		bool iterate() override ;
 
 		/// Operations after each iteration 
-		bool afterIteration() override;
+		bool afterIteration() override;*/
 
 		/// Move geometry 
-		bool moveGeometry();
+		//bool moveGeometry();
 
 };
 
diff --git a/src/Geometry/geometryMotion/geometryMotions.hpp b/src/Geometry/geometryMotion/geometryMotions.hpp
index cd636ae6..e0c109a1 100644
--- a/src/Geometry/geometryMotion/geometryMotions.hpp
+++ b/src/Geometry/geometryMotion/geometryMotions.hpp
@@ -22,22 +22,22 @@ Licence:
 #define __geometryMotions_hpp__
 
 #include "geometryMotion.hpp"
-#include "fixedWall.hpp"
+#include "stationaryWall.hpp"
 #include "rotatingAxisMotion.hpp"
-#include "multiRotatingAxisMotion.hpp"
+//#include "multiRotatingAxisMotion.hpp"
 #include "vibratingMotion.hpp"
 
 
 namespace pFlow
 {
 
-typedef geometryMotion<vibratingMotion> vibratingMotionGeometry;
+using vibratingMotionGeometry = geometryMotion<vibratingMotion>;
 
-typedef geometryMotion<rotatingAxisMotion> rotationAxisMotionGeometry;
+using rotationAxisMotionGeometry = geometryMotion<rotatingAxisMotion>;
 
-typedef geometryMotion<multiRotatingAxisMotion> multiRotationAxisMotionGeometry;
+//typedef geometryMotion<multiRotatingAxisMotion> multiRotationAxisMotionGeometry;
 
-typedef geometryMotion<fixedWall> fixedGeometry;
+typedef geometryMotion<stationaryWall> stationaryGeometry;
 
 
 
diff --git a/src/Geometry/geometryMotion/geometryMotionsInstantiate.cpp b/src/Geometry/geometryMotion/geometryMotionsInstantiate.cpp
index a8ec4fd9..334e2aad 100644
--- a/src/Geometry/geometryMotion/geometryMotionsInstantiate.cpp
+++ b/src/Geometry/geometryMotion/geometryMotionsInstantiate.cpp
@@ -18,15 +18,15 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-#include "fixedWall.hpp"
+#include "stationaryWall.hpp"
 #include "rotatingAxisMotion.hpp"
-#include "multiRotatingAxisMotion.hpp"
+//#include "multiRotatingAxisMotion.hpp"
 #include "vibratingMotion.hpp"
 
-template class pFlow::geometryMotion<pFlow::fixedWall>;
+template class pFlow::geometryMotion<pFlow::stationaryWall>;
 
 template class pFlow::geometryMotion<pFlow::rotatingAxisMotion>;
 
-template class pFlow::geometryMotion<pFlow::multiRotatingAxisMotion>;
+//template class pFlow::geometryMotion<pFlow::multiRotatingAxisMotion>;
 
 template class pFlow::geometryMotion<pFlow::vibratingMotion>;
diff --git a/src/MotionModel/CMakeLists.txt b/src/MotionModel/CMakeLists.txt
index 6f74b231..b0b084fd 100644
--- a/src/MotionModel/CMakeLists.txt
+++ b/src/MotionModel/CMakeLists.txt
@@ -1,13 +1,16 @@
 
 list(APPEND SourceFiles 
 entities/timeInterval/timeInterval.cpp
+
 entities/rotatingAxis/rotatingAxis.cpp
 rotatingAxisMotion/rotatingAxisMotion.cpp
 
-
 entities/vibrating/vibrating.cpp
 vibratingMotion/vibratingMotion.cpp
-#fixedWall/fixedWall.cpp
+
+stationaryWall/stationaryWall.cpp
+entities/stationary/stationary.cpp
+
 #entities/multiRotatingAxis/multiRotatingAxis.cpp
 #multiRotatingAxisMotion/multiRotatingAxisMotion.cpp
 
diff --git a/src/MotionModel/MotionModel/MotionModel.hpp b/src/MotionModel/MotionModel/MotionModel.hpp
index a6a2b2ab..db1cdf46 100644
--- a/src/MotionModel/MotionModel/MotionModel.hpp
+++ b/src/MotionModel/MotionModel/MotionModel.hpp
@@ -149,7 +149,11 @@ protected:
 	 
 	bool impl_indexToName(uint32 i, word& name)const;
 
-	
+	const wordList& impl_componentNames()const
+	{
+		return componentNames_;
+	}
+
 	bool impl_isMoving()const
 	{
 		return false;
@@ -221,6 +225,11 @@ public:
 		{
 			return getModel().impl_indexToName(idx, name);
 		}
+
+		const wordList& componentNames()const
+		{
+			return getModel().impl_componentNames();
+		}
 		
 		/// Are walls moving 
 		bool isMoving()const
diff --git a/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp b/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp
index 1f023e1c..2625ad30 100644
--- a/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp
+++ b/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp
@@ -75,6 +75,8 @@ public:
 
 	// - Constructor
 
+	TypeInfoNV("rotatingAxis");
+
 	/// Empty constructor
 	FUNCTION_HD
 	rotatingAxis()=default;
diff --git a/src/MotionModel/entities/stationary/stationary.cpp b/src/MotionModel/entities/stationary/stationary.cpp
new file mode 100644
index 00000000..def835df
--- /dev/null
+++ b/src/MotionModel/entities/stationary/stationary.cpp
@@ -0,0 +1,57 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "stationary.hpp"
+
+
+
+FUNCTION_H
+pFlow::stationary::stationary(const dictionary& dict)
+{
+}
+
+
+
+FUNCTION_H
+bool pFlow::stationary::read(const dictionary& dict)
+{	
+	return true;
+}
+
+FUNCTION_H
+bool pFlow::stationary::write(dictionary& dict) const
+{
+	
+	return true;
+}
+
+FUNCTION_H
+bool pFlow::stationary::read(iIstream& is)
+{
+	
+	notImplementedFunction;
+	return true;
+}
+
+FUNCTION_H
+bool pFlow::stationary::write(iOstream& os)const
+{
+  return true;
+}
\ No newline at end of file
diff --git a/src/MotionModel/entities/stationary/stationary.hpp b/src/MotionModel/entities/stationary/stationary.hpp
new file mode 100644
index 00000000..43dd495f
--- /dev/null
+++ b/src/MotionModel/entities/stationary/stationary.hpp
@@ -0,0 +1,104 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __stationary_hpp__
+#define __stationary_hpp__
+
+
+#include "types.hpp"
+#include "typeInfo.hpp"
+#include "streams.hpp"
+
+namespace pFlow
+{
+
+// forward
+class dictionary;
+
+
+/**
+ * stationary model for a wall
+ * 
+ */
+class stationary
+{
+public:
+
+	TypeInfoNV("stationary");
+
+	FUNCTION_HD
+	stationary()=default;
+
+	FUNCTION_H
+	explicit stationary(const dictionary& dict);
+	
+
+	FUNCTION_HD
+	stationary(const stationary&) = default;
+
+	stationary& operator=(const stationary&) = default;
+
+	INLINE_FUNCTION_HD
+	void setTime(real t)
+	{}
+
+	INLINE_FUNCTION_HD
+	realx3 linTangentialVelocityPoint(const realx3 &)const
+	{
+		return zero3;
+	}
+
+	INLINE_FUNCTION_HD
+	realx3 transferPoint(const realx3& p, real dt)
+	{
+		return p;
+	}
+
+	// - IO operation
+	FUNCTION_H 
+	bool read(const dictionary& dict);
+
+	FUNCTION_H
+	bool write(dictionary& dict) const;
+
+	FUNCTION_H
+	bool read(iIstream& is);
+
+	FUNCTION_H
+	bool write(iOstream& os)const;
+
+};
+
+inline iOstream& operator <<(iOstream& os, const stationary& obj)
+{
+	
+	return os;
+}
+
+inline iIstream& operator >>(iIstream& is, stationary& obj)
+{
+	
+	return is;
+}
+
+}
+
+
+#endif
diff --git a/src/MotionModel/entities/vibrating/vibrating.hpp b/src/MotionModel/entities/vibrating/vibrating.hpp
index 610fd0f7..f7c3f56b 100644
--- a/src/MotionModel/entities/vibrating/vibrating.hpp
+++ b/src/MotionModel/entities/vibrating/vibrating.hpp
@@ -94,6 +94,8 @@ private:
 
 public:
 
+	TypeInfoNV("vibrating");
+
 	FUNCTION_HD
 	vibrating()=default;
 
diff --git a/src/MotionModel/fixedWall/fixedWall.cpp b/src/MotionModel/fixedWall/fixedWall.cpp
deleted file mode 100644
index 6c3dba2e..00000000
--- a/src/MotionModel/fixedWall/fixedWall.cpp
+++ /dev/null
@@ -1,110 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#include "fixedWall.hpp"
-#include "dictionary.hpp"
-#include "vocabs.hpp"
-
-bool pFlow::fixedWall::readDictionary
-(
-	const dictionary& dict
-)
-{
-
-	auto motionModel = dict.getVal<word>("motionModel");
-
-	if(motionModel != "fixedWall")
-	{
-		fatalErrorInFunction<<
-		"  motionModel should be fixedWall, but found " << motionModel <<endl;
-		return false;
-	}
-		
-	return true;
-}
-
-bool pFlow::fixedWall::writeDictionary
-(
-	dictionary& dict
-)const
-{
-	dict.add("motionModel", "fixedWall");
-
-	auto& motionInfo = dict.subDictOrCreate("fixedWallInfo");
-
-	return true;
-}
-
-pFlow::fixedWall::fixedWall()
-{}
-
-pFlow::fixedWall::fixedWall
-(
-	const dictionary& dict
-)
-{
-	if(! readDictionary(dict) )
-	{
-		fatalExit;
-	}
-}
-
-bool pFlow::fixedWall::read
-(
-	iIstream& is
-)
-{
-	// create an empty file dictionary
-	dictionary motionInfo(motionModelFile__, true);
-
-	// read dictionary from stream
-	if( !motionInfo.read(is) )
-	{
-		ioErrorInFile(is.name(), is.lineNumber()) <<
-		"  error in reading dictionray " << motionModelFile__ <<" from file. \n";
-		return false;
-	}
-
-	if( !readDictionary(motionInfo) ) return false;
-	
-	return true;
-}
-
-bool pFlow::fixedWall::write
-(
-	iOstream& os
-)const
-{
-	// create an empty file dictionary
-	dictionary motionInfo(motionModelFile__, true);
-
-	if( !writeDictionary(motionInfo))
-	{
-		return false;
-	}
-
-	if( !motionInfo.write(os) )
-	{
-		ioErrorInFile( os.name(), os.lineNumber() )<<
-		"  error in writing dictionray to file. \n";
-		return false;
-	}
-	return true;
-}
\ No newline at end of file
diff --git a/src/MotionModel/fixedWall/fixedWall.hpp b/src/MotionModel/fixedWall/fixedWall.hpp
deleted file mode 100644
index 5c8b4760..00000000
--- a/src/MotionModel/fixedWall/fixedWall.hpp
+++ /dev/null
@@ -1,206 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#ifndef __fixedWall_hpp__
-#define __fixedWall_hpp__
-
-
-#include "types.hpp"
-#include "typeInfo.hpp"
-#include "Vectors.hpp"
-#include "uniquePtr.hpp"
-
-
-
-namespace pFlow
-{
-
-class dictionary;
-
-/**
- * Fixed wall motion model for walls
- * 
- * This class is used for geometries that are fixed during simulation.
- * 
- * 
-\verbatim
-// In geometryDict file, this will defines fixed walls during simulation
-...
-motionModel fixedWall; 
-...
-\endverbatim
- */
-class fixedWall
-{
-public:
-
-	/** Motion model class to be passed to computational units/kernels for
-	 *  transfing points and returning velocities at various positions
-	 */
-	class Model
-	{
-
-	public:
-
-		INLINE_FUNCTION_HD
-		Model(){}
-
-		INLINE_FUNCTION_HD
-		Model(const Model&) = default;
-		
-		INLINE_FUNCTION_HD
-		Model& operator=(const Model&) = default;
-
-
-		INLINE_FUNCTION_HD
-		realx3 pointVelocity(int32 n, const realx3 p)const
-		{
-			return 0.0;
-		}
-
-		INLINE_FUNCTION_HD
-		realx3 operator()(int32 n, const realx3& p)const
-		{
-			return 0.0;
-		}
-
-		INLINE_FUNCTION_HD
-		realx3 transferPoint(int32 n, const realx3 p, real dt)const
-		{
-			return p;
-		}
-
-		INLINE_FUNCTION_HD int32 numComponents()const
-		{
-			return 0;
-		}
-	};
-
-protected:
-	
-	/// Name
-	const word name_ = "none";
-
-
-	/// Read from a dictionary 
-	bool readDictionary(const dictionary& dict);
-
-	/// write to a dictionary
-	bool writeDictionary(dictionary& dict)const;
-
-public:
-	
-	/// Type info
-	TypeInfoNV("fixedWall");
-
-	// - Constructors 
-
-		/// Empty
-		fixedWall();
-
-		/// Constructor with dictionary 
-		fixedWall(const dictionary& dict);
-
-		/// Copy constructor
-		fixedWall(const fixedWall&) = default;
-
-		/// Move constructor
-		fixedWall(fixedWall&&) = default;
-
-		/// Copy assignment
-		fixedWall& operator=(const fixedWall&) = default;
-
-		/// Move assignment 
-		fixedWall& operator=(fixedWall&&) = default;
-
-		/// Destructor 
-		~fixedWall() = default;
-
-	// - Methods 
-
-		/// Return motion model
-		/// t is the current simulation time 
-		Model getModel(real t)const
-		{
-			return Model();
-		}
-
-		/// Name of the motion component to index 
-		int32 nameToIndex(const word& name)const
-		{
-			return 0;
-		}
-
-		/// Index of motion component to name 
-		word indexToName(label i)const
-		{
-			return name_;
-		}
-
-		/// Velocity at point p
-		INLINE_FUNCTION_HD
-		realx3 pointVelocity(label n, const realx3& p)const 
-		{
-			return zero3;
-		}
-
-		
-		/// Transfer point p for dt seconds according to motion component n
-		INLINE_FUNCTION_HD
-		realx3 transferPoint(label n, const realx3 p, real dt)const
-		{
-			return p;
-		}
-
-		/// Transfer a vector of point pVec for dt seconds according to motion
-		/// component n
-		INLINE_FUNCTION_HD
-		bool transferPoint(label n, realx3* pVec, size_t numP, real dt)
-		{
-			return true;		
-		}
-
-		/// Are walls moving 
-		INLINE_FUNCTION_HD
-		bool isMoving()const
-		{
-			return false;
-		}
-
-		/// Move points
-		bool move(real t, real dt)
-		{
-			return true;
-		}
-
-	// - IO operations 
-
-		/// Read from input stream is 
-		FUNCTION_H
-		bool read(iIstream& is);
-
-		/// Write to output stream os 
-		FUNCTION_H
-		bool write(iOstream& os)const;	
-};
-
-} // pFlow
-
-#endif //__fixed_hpp__
diff --git a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp
index 47cae148..70b1d26d 100644
--- a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp
+++ b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp
@@ -37,6 +37,22 @@ pFlow::rotatingAxisMotion::rotatingAxisMotion
 	}
 }
 
+pFlow::rotatingAxisMotion::rotatingAxisMotion
+(
+	const objectFile &objf, 
+	const dictionary &dict, 
+	repository *owner
+)
+:
+	fileDictionary(objf, dict, owner)
+{
+	if(! getModel().impl_readDictionary(*this) )
+	{
+		fatalErrorInFunction;
+		fatalExit;
+	}
+}
+
 bool pFlow::rotatingAxisMotion::write
 (
 	iOstream &os, 
diff --git a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp
index 33a0f81f..95df979e 100644
--- a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp
+++ b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp
@@ -70,12 +70,17 @@ protected:
 	
 public:
 
-    TypeInfo("rotatingAxisMotion");
+	TypeInfo("rotatingAxisMotion");
 
-    rotatingAxisMotion(const objectFile& objf, repository* owner);
+	rotatingAxisMotion(const objectFile& objf, repository* owner);
+
+	rotatingAxisMotion(
+		const objectFile& objf, 
+		const dictionary& dict, 
+		repository* owner);
 
 
-    bool write(iOstream& os, const IOPattern& iop)const override;
+	bool write(iOstream& os, const IOPattern& iop)const override;
 
 	static
     auto noneComponent()
diff --git a/src/MotionModel/stationaryWall/stationaryWall.cpp b/src/MotionModel/stationaryWall/stationaryWall.cpp
new file mode 100644
index 00000000..1440c094
--- /dev/null
+++ b/src/MotionModel/stationaryWall/stationaryWall.cpp
@@ -0,0 +1,75 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "stationaryWall.hpp"
+
+
+pFlow::stationaryWall::stationaryWall
+(
+	const objectFile &objf, 
+	repository *owner
+)
+:
+	fileDictionary(objf, owner)
+{
+
+	if(! getModel().impl_readDictionary(*this) )
+	{
+		fatalErrorInFunction;
+		fatalExit;
+	}
+}
+
+pFlow::stationaryWall::stationaryWall
+(
+	const objectFile &objf, 
+	const dictionary &dict, 
+	repository *owner
+)
+:
+	fileDictionary(objf, dict, owner)
+{
+	if(! getModel().impl_readDictionary(*this) )
+	{
+		fatalErrorInFunction;
+		fatalExit;
+	}
+}
+
+bool pFlow::stationaryWall::write
+(
+	iOstream &os, 
+	const IOPattern &iop
+) const
+{
+	// a global dictionary
+	dictionary newDict(fileDictionary::dictionary::name(), true);
+	if( iop.thisProcWriteData() )
+	{
+		if( !this->impl_writeDictionary(newDict) || 
+			!newDict.write(os))
+		{
+			fatalErrorInFunction<<
+			" error in writing to dictionary "<< newDict.globalName()<<endl;
+			return false;
+		}
+	}
+    return true;
+}
diff --git a/src/MotionModel/stationaryWall/stationaryWall.hpp b/src/MotionModel/stationaryWall/stationaryWall.hpp
new file mode 100644
index 00000000..f440cfdd
--- /dev/null
+++ b/src/MotionModel/stationaryWall/stationaryWall.hpp
@@ -0,0 +1,69 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __stationaryWall_hpp__
+#define __stationaryWall_hpp__
+
+
+#include "MotionModel.hpp"
+#include "stationary.hpp"
+#include "fileDictionary.hpp"
+
+namespace pFlow
+{
+
+
+class stationaryWall
+:
+    public fileDictionary,
+    public MotionModel<stationaryWall, stationary>
+{
+protected:
+
+	bool impl_isMoving()const
+	{
+		return false;
+	}
+	
+public:
+
+	TypeInfo("stationaryWall");
+
+	stationaryWall(const objectFile& objf, repository* owner);
+
+	stationaryWall(
+		const objectFile& objf, 
+		const dictionary& dict, 
+		repository* owner);
+
+
+	bool write(iOstream& os, const IOPattern& iop)const override;
+
+	static
+    auto noneComponent()
+    {
+      return stationary();
+    }
+};
+
+} // pFlow
+
+
+#endif // __stationaryWall_hpp__
\ No newline at end of file
diff --git a/src/MotionModel/vibratingMotion/vibratingMotion.cpp b/src/MotionModel/vibratingMotion/vibratingMotion.cpp
index 12039b60..1226384c 100644
--- a/src/MotionModel/vibratingMotion/vibratingMotion.cpp
+++ b/src/MotionModel/vibratingMotion/vibratingMotion.cpp
@@ -14,6 +14,22 @@ pFlow::vibratingMotion::vibratingMotion
 	}
 }
 
+pFlow::vibratingMotion::vibratingMotion
+(
+	const objectFile &objf, 
+	const dictionary &dict, 
+	repository *owner
+)
+:
+	fileDictionary(objf,dict,owner)
+{
+	if(! getModel().impl_readDictionary(*this) )
+	{
+		fatalErrorInFunction;
+		fatalExit;
+	}
+}
+
 bool pFlow::vibratingMotion::write(iOstream &os, const IOPattern &iop) const
 {
     // a global dictionary
diff --git a/src/MotionModel/vibratingMotion/vibratingMotion.hpp b/src/MotionModel/vibratingMotion/vibratingMotion.hpp
index d97b2380..65b9e3c2 100644
--- a/src/MotionModel/vibratingMotion/vibratingMotion.hpp
+++ b/src/MotionModel/vibratingMotion/vibratingMotion.hpp
@@ -81,6 +81,11 @@ public:
 	
 	vibratingMotion(const objectFile& objf, repository* owner);
 
+	vibratingMotion(
+		const objectFile& objf, 
+		const dictionary& dict, 
+		repository* owner);
+
 	/// Destructor 
 	~vibratingMotion()override = default;
 
diff --git a/src/phasicFlow/containers/Field/Field.cpp b/src/phasicFlow/containers/Field/Field.cpp
index dd4506e4..335fbe49 100644
--- a/src/phasicFlow/containers/Field/Field.cpp
+++ b/src/phasicFlow/containers/Field/Field.cpp
@@ -118,7 +118,10 @@ bool pFlow::Field<T, MemorySpace>::write
 	if(!VectorType::write(os, iop)) return false;
 
 	if(iop.thisProcWriteData())
+	{
 		os.endEntry();
+		os.newLine();
+	}	
 
 	if(!os.check(FUNCTION_NAME))return false;
 
diff --git a/src/phasicFlow/containers/Field/Field.hpp b/src/phasicFlow/containers/Field/Field.hpp
index e1eb18c2..405cf68e 100644
--- a/src/phasicFlow/containers/Field/Field.hpp
+++ b/src/phasicFlow/containers/Field/Field.hpp
@@ -82,7 +82,11 @@ public:
 			VectorType()
 		{}
 
-		
+		Field(const word& name)
+		:
+			VectorType(name)
+		{}
+
 		/// Construct an empty field with name and fieldKey 
 		Field(const word& name, const word& fieldKey)
 		:
diff --git a/src/phasicFlow/containers/Vector/Vector.hpp b/src/phasicFlow/containers/Vector/Vector.hpp
index f2511fd5..6b6eda77 100644
--- a/src/phasicFlow/containers/Vector/Vector.hpp
+++ b/src/phasicFlow/containers/Vector/Vector.hpp
@@ -289,6 +289,9 @@ public:
 		// - fill the whole content of vector, [begin, end), with val 
 		void fill( const T& val);
 
+		/// fill the content in range [start, end)
+		void fill( uint32 start, uint32 end, const T& val);
+
 		inline
 		auto getSpan()
 		{
diff --git a/src/phasicFlow/containers/Vector/VectorI.hpp b/src/phasicFlow/containers/Vector/VectorI.hpp
index c4426169..38c7a5fd 100644
--- a/src/phasicFlow/containers/Vector/VectorI.hpp
+++ b/src/phasicFlow/containers/Vector/VectorI.hpp
@@ -1,3 +1,4 @@
+#include "Vector.hpp"
 /*------------------------------- phasicFlow ---------------------------------
       O        C enter of
      O O       E ngineering and
@@ -24,9 +25,17 @@ inline void pFlow::Vector<T, Allocator>::fill( const T& val)
 	std::fill(this->begin(), this->end(), val);
 }
 
+template <typename T, typename Allocator>
+inline void pFlow::Vector<T, Allocator>::fill(uint32 start, uint32 end, const T &val)
+{
+	
+	for(uint32 i=start; i<end; i++)
+	{
+		this->at(i) = val;
+	}
+}
 #pragma hd_warning_disable 
-template<typename T, typename Allocator>
-inline void pFlow::Vector<T, Allocator>::operator +=( const T& val)
+template < typename T, typename Allocator> inline void pFlow::Vector < T, Allocator> ::operator+= (const T &val)
 {
 	for( auto& v:(*this) )
 	{
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
index 72f2790b..b4d9079a 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
@@ -362,6 +362,7 @@ void pFlow::VectorSingle<T,MemorySpace>::fill
     const T& val
 )
 {
+    changeSize(r.end());
     pFlow::fill(view_, r, val);
 }
 
@@ -373,6 +374,7 @@ void pFlow::VectorSingle<T,MemorySpace>::assign
     const T& val
 )
 {
+    
     if( n > capacity() )
     {
         reallocateCapacitySize(evalCapacity(n), n);
@@ -392,11 +394,13 @@ void pFlow::VectorSingle<T,MemorySpace>::assign
     uint32 cap
 ) 
 {
+    // make sure that vector has enough capacity
+    uint32 newCap = max(static_cast<uint32>(src.size()), cap);
     uint32 srcSize = src.size();
     
-    if(cap != capacity())
+    if(newCap != capacity())
     {
-        reallocateCapacitySize(cap, srcSize);
+        reallocateCapacitySize(newCap, srcSize);
     }
     else
     {
@@ -415,7 +419,7 @@ void pFlow::VectorSingle<T,MemorySpace>::assign
     const std::vector<T>& src
 ) 
 {
-    assign(src, src.capacity());
+    assign(src, this->capacity());
 }
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H 
diff --git a/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp b/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp
index 37a17c38..9659ab66 100644
--- a/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp
+++ b/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp
@@ -107,7 +107,39 @@ public:
 			return surface_;
 		}
 
+		inline 
+		auto size()const
+		{
+			return field_.size();
+		}
+
+		inline
+		auto capacity()const
+		{
+			return field_.capacity();
+		}
+
+		inline 
+		void assign(const std::vector<T>& vals)
+		{
+			if(vals.size() != surface_.size())
+			{
+				fatalErrorInFunction;
+				fatalExit;	
+			}
+			field_.assign(vals, surface_.capacity());
+		}
 		
+		bool hearChanges(
+		real t,
+		real dt,
+		uint32 iter,
+		const message& msg, 
+		const anyList& varList) override
+		{
+			notImplementedFunction;
+			return false;
+		}
 
 	//// -  IO operations
 		bool write(iOstream& is, const IOPattern& iop)const override;
diff --git a/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.hpp b/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.hpp
index cf3f6ffa..15311602 100644
--- a/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.hpp
+++ b/src/phasicFlow/containers/triSurfaceField/triSurfaceFields.hpp
@@ -29,30 +29,19 @@ Licence:
 namespace pFlow
 {
 
-/*using realTriSurfaceField_D 	= triSurfaceField<VectorSingle, real> ;
+using uint32TriSurfaceField_D 	= triSurfaceField<uint32> ;
 
-using realTriSurfaceField_H 	= triSurfaceField<VectorSingle, real, HostSpace> ;
+using uint32TriSurfaceField_H 	= triSurfaceField<uint32, HostSpace> ;
 
-using realx3TriSurfaceField_D 	= triSurfaceField<VectorSingle, realx3> ;
+using realTriSurfaceField_D 	= triSurfaceField<real> ;
 
-using realx3TriSurfaceField_H 	= triSurfaceField<VectorSingle, realx3, HostSpace> ;
+using realTriSurfaceField_H 	= triSurfaceField<real, HostSpace> ;
 
-using realTriSurfaceField_HD 	= triSurfaceField<VectorDual, real> ;
+using realx3TriSurfaceField_D 	= triSurfaceField<realx3> ;
 
-using realx3TriSurfaceField_HD 	= triSurfaceField<VectorDual, realx3> ;
+using realx3TriSurfaceField_H 	= triSurfaceField<realx3, HostSpace> ;
 
-using realTriSurfaceField 		= triSurfaceField<Vector, real, vecAllocator<real>> ;
 
-using realx3TriSurfaceField 	= triSurfaceField<Vector, realx3, vecAllocator<realx3>> ;
-
-using int8TriSurfaceField_D 	= triSurfaceField<VectorSingle, int8> ;
-
-using int8TriSurfaceField_H 	= triSurfaceField<VectorSingle, int8, HostSpace> ;
-
-using int8TriSurfaceField_HD 	= triSurfaceField<VectorDual, int8> ;
-
-using int8TriSurfaceField 		= triSurfaceField<Vector, int8, vecAllocator<real>> ;
-*/
 
 }
 
diff --git a/src/phasicFlow/dictionary/dictionary.cpp b/src/phasicFlow/dictionary/dictionary.cpp
index 156f99a2..58a76958 100644
--- a/src/phasicFlow/dictionary/dictionary.cpp
+++ b/src/phasicFlow/dictionary/dictionary.cpp
@@ -299,6 +299,13 @@ pFlow::dictionary::dictionary
 
 }
 
+pFlow::dictionary::dictionary(const dictionary &src, bool global)
+:
+	dictionary(src)
+{
+	isGlobal_ = global;
+}
+
 pFlow::dictionary& pFlow::dictionary::operator=
 (
 	const dictionary& rhs
diff --git a/src/phasicFlow/dictionary/dictionary.hpp b/src/phasicFlow/dictionary/dictionary.hpp
index d09c03bc..9baba109 100644
--- a/src/phasicFlow/dictionary/dictionary.hpp
+++ b/src/phasicFlow/dictionary/dictionary.hpp
@@ -144,6 +144,8 @@ public:
 		/// entries_ are copied smoothly. set parrent dict to nullDict
 		dictionary(const dictionary& );
 
+		dictionary(const dictionary& src, bool global);
+
 
 		/// assignment preserve name of this dictionary 
 		/// only entries are transfered with ownership
diff --git a/src/phasicFlow/dictionary/fileDictionary.cpp b/src/phasicFlow/dictionary/fileDictionary.cpp
index 62bd3b2d..0b4eb37c 100644
--- a/src/phasicFlow/dictionary/fileDictionary.cpp
+++ b/src/phasicFlow/dictionary/fileDictionary.cpp
@@ -43,6 +43,30 @@ pFlow::fileDictionary::fileDictionary(const word &keyword, const fileSystem &fil
     )
 {}
 
+pFlow::fileDictionary::fileDictionary
+(
+    const objectFile &objf, 
+    const dictionary &dict, 
+    repository *owner
+)
+:
+    IOobject
+    (
+        objectFile
+        (
+            objf.name(),
+            objf.localPath(),
+            objectFile::READ_NEVER,
+            objf.wFlag()
+        ), 
+        IOPattern::AllProcessorsSimilar, 
+        owner
+    ),
+    dictionary(dict, true)
+{
+    dictionary::name_ = IOobject::path().wordPath();
+}
+
 bool pFlow::fileDictionary::read(iIstream &is, const IOPattern &iop)
 {
     return dictionary::read(is);
diff --git a/src/phasicFlow/dictionary/fileDictionary.hpp b/src/phasicFlow/dictionary/fileDictionary.hpp
index 2fdc9fe2..b8685dfd 100644
--- a/src/phasicFlow/dictionary/fileDictionary.hpp
+++ b/src/phasicFlow/dictionary/fileDictionary.hpp
@@ -41,7 +41,10 @@ public:
 	/// construct a dictionary with name and read it from file 
 	fileDictionary(const word& keyword, const fileSystem& file);
 
-
+  fileDictionary(
+    const objectFile& objf, 
+    const dictionary& dict, 
+    repository* owner=nullptr);
 
     /// read from stream 
     bool read(iIstream& is, const IOPattern& iop) override;
diff --git a/src/phasicFlow/repository/IOobject/IOobject.cpp b/src/phasicFlow/repository/IOobject/IOobject.cpp
index 6745ad0b..052d2afb 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.cpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.cpp
@@ -36,6 +36,9 @@ pFlow::IOobject::IOobject
     
     if(owner_&& !owner->addToRepository(this))
     {
+        fatalErrorInFunction<<
+        "failed to add object "<< objf.name()<< 
+        " to repository "<< owner->name()<<endl;
         fatalExit;
     }
 }
diff --git a/src/phasicFlow/repository/repository/repository.cpp b/src/phasicFlow/repository/repository/repository.cpp
index b555eab3..8329673b 100644
--- a/src/phasicFlow/repository/repository/repository.cpp
+++ b/src/phasicFlow/repository/repository/repository.cpp
@@ -144,7 +144,7 @@ bool pFlow::repository::addToRepository(IOobject* io)
     if( !objects_.insertIf(io->name(), io ) )
 	{
 		warningInFunction<<
-    	"Failed to add repository " << io->name() <<
+    	"Failed to add object " << io->name() <<
     	" to repository " << this->name() << 
     	". It is already in this repository. \n";
     	return false;
diff --git a/src/phasicFlow/triSurface/multiTriSurface.cpp b/src/phasicFlow/triSurface/multiTriSurface.cpp
index 8b62fa18..b2c04995 100644
--- a/src/phasicFlow/triSurface/multiTriSurface.cpp
+++ b/src/phasicFlow/triSurface/multiTriSurface.cpp
@@ -171,6 +171,20 @@ pFlow::multiTriSurface::multiTriSurface
     }
 }
 
+pFlow::multiTriSurface::multiTriSurface
+(
+	const objectFile &objf, 
+	repository *owner, 
+	const multiTriSurface &surf
+)
+:
+	triSurface(objf, owner, surf),
+	subscriber("multiTriSurface"),
+	subSurfaces_(surf.subSurfaces_)
+{
+	
+}
+
 bool pFlow::multiTriSurface::appendTriSurface
 (
 	const word &name, 
@@ -193,8 +207,17 @@ bool pFlow::multiTriSurface::appendTriSurface
 }
 
 bool pFlow::multiTriSurface::read(iIstream &is, const IOPattern &iop)
-{
-    return false;
+{	
+	subSurfaces_.clear();
+
+	if( !is.findKeywordAndVal("subSurfaces", subSurfaces_ ) )
+	{
+		fatalErrorInFunction<<
+		"Error in reading subSurfaces from stream "<< is.name()<<endl;
+		return false;
+	}
+
+    return triSurface::read(is, iop);
 }
 
 bool pFlow::multiTriSurface::write
@@ -203,6 +226,8 @@ bool pFlow::multiTriSurface::write
     const IOPattern &iop
 ) const
 {	
+
+	
 	if( iop.thisProcWriteData() )
 	{
 		os.writeWordEntry("subSurfaces", subSurfaces_);
diff --git a/src/phasicFlow/triSurface/multiTriSurface.hpp b/src/phasicFlow/triSurface/multiTriSurface.hpp
index 7b7360b8..d00130a7 100644
--- a/src/phasicFlow/triSurface/multiTriSurface.hpp
+++ b/src/phasicFlow/triSurface/multiTriSurface.hpp
@@ -53,6 +53,11 @@ public:
 		//
 		multiTriSurface(const objectFile& obj, repository* owner);
 
+		multiTriSurface(
+			const objectFile& objf, 
+			repository* owner, 
+			const multiTriSurface& surf);
+
 		multiTriSurface(const multiTriSurface&) = default;
 
 		multiTriSurface& operator = (const multiTriSurface&) = default;
@@ -78,6 +83,29 @@ public:
 		{
 			return subSurfaces_;
 		}
+		
+		rangeU32 subSurfaceRange(uint32 nSub)
+		{
+			if( !(nSub < numSurfaces() ) )
+			{
+				fatalErrorInFunction;
+				fatalExit;
+			}
+			return {subSurfaces_[nSub].start(),subSurfaces_[nSub].end()};
+		}
+
+		rangeU32 subSurfacePointRange(uint32 nSub)const
+		{
+			if( !(nSub < numSurfaces() ) )
+			{
+				fatalErrorInFunction;
+				fatalExit;
+			}
+			return {
+				subSurfaces_[nSub].pointStart(),
+				subSurfaces_[nSub].pointEnd()};
+		}
+
 		/*void clear()
 		{
 			triSurface::clear();
diff --git a/src/phasicFlow/triSurface/triSurface.cpp b/src/phasicFlow/triSurface/triSurface.cpp
index 846046f5..6d3fea97 100644
--- a/src/phasicFlow/triSurface/triSurface.cpp
+++ b/src/phasicFlow/triSurface/triSurface.cpp
@@ -126,26 +126,44 @@ pFlow::triSurface::triSurface
 
 pFlow::triSurface::triSurface
 (
-	const realx3x3Field_H &triangles,
-	repository* owner
+	const objectFile &objf,
+	repository* owner, 
+	const triSurface &surf
 )
 :
 	IOobject
 	(
 		objectFile
 		(
-			triangles.name(),
-			"",
-			IOobject::READ_NEVER,
-			IOobject::WRITE_ALWAYS
+			objf.name(),
+			objf.localPath(),
+			objectFile::READ_NEVER,
+			objf.wFlag()
 		),
 		IOPattern::AllProcessorsSimilar,
 		owner
 	),
-	points_("points", "points"),
-	vertices_("vertices", "vertices"),
-	area_("area", "area"),
-	normals_("normals","normals")
+	points_(surf.points_),
+	vertices_(surf.vertices_),
+	area_(surf.area_),
+	normals_(surf.normals_)
+{}
+
+pFlow::triSurface::triSurface(
+    const realx3x3Field_H &triangles,
+    repository *owner)
+    : IOobject(
+          objectFile(
+              triangles.name(),
+              "",
+              IOobject::READ_NEVER,
+              IOobject::WRITE_ALWAYS),
+          IOPattern::AllProcessorsSimilar,
+          owner),
+      points_("points", "points"),
+      vertices_("vertices", "vertices"),
+      area_("area", "area"),
+      normals_("normals", "normals")
 {
 	if( !appendTriSurface(triangles) )
 	{
@@ -238,6 +256,8 @@ bool pFlow::triSurface::read(iIstream &is, const IOPattern &iop)
 		" when reading field "<< vertices_.name()<<endl;
 		return false;
 	}
+	
+	WARNING<<"You should calculate area and normal after reading "<<END_WARNING;
 
     return true;
 }
diff --git a/src/phasicFlow/triSurface/triSurface.hpp b/src/phasicFlow/triSurface/triSurface.hpp
index ee67573e..6a6585f7 100644
--- a/src/phasicFlow/triSurface/triSurface.hpp
+++ b/src/phasicFlow/triSurface/triSurface.hpp
@@ -62,6 +62,11 @@ public:
 	// - type info
 	TypeInfo("triSurface");
 
+	triSurface(
+		const objectFile& objf, 
+		repository* owner, 
+		const triSurface& surf);
+
 	//// - Constructors
 		
 		// - construct from vertices of triangles 
diff --git a/src/phasicFlow/typeSelection/typeInfo.hpp b/src/phasicFlow/typeSelection/typeInfo.hpp
index 74794729..24f568a9 100644
--- a/src/phasicFlow/typeSelection/typeInfo.hpp
+++ b/src/phasicFlow/typeSelection/typeInfo.hpp
@@ -145,10 +145,9 @@ namespace pFlow
 
 
 #define TypeInfoTemplate11(tName, Type)										\
-	has_static_member(TYPENAME);											\
 	inline static word TYPENAME()											\
 	{ 																		\
-		return word(tName)+"<"+getTypeName<Type1>()+">";					\
+		return word(tName)+"<"+getTypeName<Type>()+">";						\
 	}																		\
 	virtual word typeName() const { return TYPENAME();}
 

From c0cf200fa897d1b526fd3e43765f71918d9d65f8 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Mon, 5 Feb 2024 21:28:30 -0800
Subject: [PATCH 38/60] iterateGeometry and geometryPhasicFlow refactor

---
 solvers/CMakeLists.txt                        |  2 +-
 solvers/iterateGeometry/iterateGeometry.cpp   | 23 ++++----
 utilities/geometryPhasicFlow/CMakeLists.txt   |  2 +-
 .../geometryPhasicFlow/geometryPhasicFlow.cpp | 53 +++++++++++--------
 4 files changed, 47 insertions(+), 33 deletions(-)

diff --git a/solvers/CMakeLists.txt b/solvers/CMakeLists.txt
index 4cd77431..aa711841 100644
--- a/solvers/CMakeLists.txt
+++ b/solvers/CMakeLists.txt
@@ -2,6 +2,6 @@
 
 add_subdirectory(iterateSphereParticles)
 
-#add_subdirectory(iterateGeometry)
+add_subdirectory(iterateGeometry)
 
 #add_subdirectory(sphereGranFlow)
diff --git a/solvers/iterateGeometry/iterateGeometry.cpp b/solvers/iterateGeometry/iterateGeometry.cpp
index a43212c1..4bf81abd 100755
--- a/solvers/iterateGeometry/iterateGeometry.cpp
+++ b/solvers/iterateGeometry/iterateGeometry.cpp
@@ -28,13 +28,15 @@ Licence:
  * (https://github.com/PhasicFlow/phasicFlow/tree/main/tutorials/iterateGeometry)
  * folder.
  */
- 
-#include "systemControl.hpp"
-#include "geometryMotion.hpp"
-#include "commandLine.hpp"
-#include "readControlDict.hpp"
 
-using pFlow::commandLine;
+#include "vocabs.hpp"
+#include "systemControl.hpp"
+#include "geometry.hpp"
+//#include "geometryMotion.hpp"
+#include "commandLine.hpp"
+//#include "readControlDict.hpp"
+
+using namespace pFlow;
 
 int main( int argc, char* argv[] )
 {
@@ -57,14 +59,15 @@ commandLine cmds(
 #include "initialize_Control.hpp"
 	
 	#include "setProperty.hpp"
-	#include "setSurfaceGeometry.hpp"
+	//#include "setSurfaceGeometry.hpp"
 
-	
-	do
+	WARNING<<"Code should be changed "<<END_WARNING;
+  auto geom = geometry(Control, proprties);
+	/*do
 	{
 		surfGeometry.iterate();
 
-	}while( Control++);
+	}while( Control++);*/
 
 // this should be palced in each main 
 #include "finalize.hpp"
diff --git a/utilities/geometryPhasicFlow/CMakeLists.txt b/utilities/geometryPhasicFlow/CMakeLists.txt
index 11040b23..0700a50b 100644
--- a/utilities/geometryPhasicFlow/CMakeLists.txt
+++ b/utilities/geometryPhasicFlow/CMakeLists.txt
@@ -2,6 +2,6 @@
 set(source_files 
 geometryPhasicFlow.cpp
 )
-set(link_lib phasicFlow Kokkos::kokkos Utilities)
+set(link_lib phasicFlow Kokkos::kokkos Geometry Utilities)
 
 pFlow_make_executable_install(geometryPhasicFlow source_files link_lib)
diff --git a/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp b/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp
index 282de86a..84d10f97 100755
--- a/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp
+++ b/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp
@@ -20,12 +20,10 @@ Licence:
 
 #include "vocabs.hpp"
 #include "systemControl.hpp"
-#include "fileDictionary.hpp"
 #include "Wall.hpp"
+#include "Lists.hpp"
 #include "Vectors.hpp"
-#include "VectorSingles.hpp"
-#include "multiTriSurface.hpp"
-//#include "geometryMotion.hpp"
+#include "geometry.hpp"
 #include "commandLine.hpp"
 //#include "readControlDict.hpp"
 
@@ -52,7 +50,7 @@ int main( int argc, char* argv[] )
 // this should be palced in each main 
 #include "initialize_Control.hpp"
 
-	//#include "setProperty.hpp"
+	#include "setProperty.hpp"
 
 	REPORT(0)<<"\nReading "<<"geometryDict"<<" . . ."<<END_REPORT;
 	auto geometryDict = fileDictionary(
@@ -71,22 +69,25 @@ int main( int argc, char* argv[] )
 	auto wallsDictName = surfacesDict.dictionaryKeywords();
 
 	
-
+	word mSurfaceName = word("geometryPhasicFlow_")+word(triSurfaceFile__);
 	multiTriSurface surface
 	(
 		objectFile
 		(
-			triSurfaceFile__,
+			mSurfaceName,
 			"",
 			objectFile::READ_NEVER,
 			objectFile::WRITE_ALWAYS
 		),
-		&Control.geometry()
+		nullptr
 	);
 	
-	//wordVector materials;
-	//wordVector motion;
-	
+	wordVector materials;
+	wordList materialsList;
+
+	wordVector motion;
+	wordList motionList;
+
 	for(auto& name:wallsDictName)
 	{
 		REPORT(1)<<"Creating wall "<<Green_Text(name)<<" from dictionary "<<surfacesDict.globalName() <<END_REPORT;
@@ -97,19 +98,29 @@ int main( int argc, char* argv[] )
 		realx3x3Vector trinalges(wall.name(), wall.triangles());
 		
 		surface.appendTriSurface(wall.name(), trinalges);
-		/*materials.push_back(wall.materialName());
-		motion.push_back(wall.motionName());*/
+		materials.push_back(wall.materialName());
+		materialsList.push_back(wall.materialName());
+
+		motion.push_back(wall.motionName());
+		motionList.push_back(wall.motionName());
 	}
 
-	output<<surface<<endl;
-	//REPORT(1)<<"Selected wall materials are "<<cyanText(materials)<<'\n'<<endREPORT;
-		
-	/*REPORT(0)<< "\nCreating geometry . . ."<<endREPORT;
-	auto geomPtr = geometry::create(Control, proprties, geometryDict, surface, motion, materials);
-	REPORT(1)<< "geometry type is "<< greenText(geomPtr().typeName())<<endREPORT;
 	
-	REPORT(1)<< "Writing geometry to folder "<< geomPtr().path()<<endREPORT;
-	geomPtr().write();*/
+	REPORT(1)<<"Selected wall materials are "<<Cyan_Text(materialsList)<<'\n'<<END_REPORT;
+	REPORT(1)<<"Selected wall motion components are "<<Cyan_Text(motionList)<<'\n'<<END_REPORT;
+		
+	REPORT(0)<< "\nCreating geometry . . ."<<END_REPORT;
+	auto geomPtr = geometry::create(
+		Control, 
+		proprties, 
+		surface, 
+		motion, 
+		materials, 
+		geometryDict);
+	
+	REPORT(1)<< "geometry type is "<< Green_Text(geomPtr().typeName())<<END_REPORT;
+
+	Control.time().write(true);
 
 	REPORT(0)<< Green_Text("\nFinished successfully.\n")<<END_REPORT;
 

From c13231f4f09a3438a1bf81ef68c5eb51e41a638d Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Tue, 19 Mar 2024 07:33:56 -0700
Subject: [PATCH 39/60] Correction for non-trivially-copyable data type on host
 memory

---
 .../containers/VectorHD/VectorSingle.cpp      | 143 ++++++++++++++++--
 .../containers/VectorHD/VectorSingle.hpp      |   4 +-
 2 files changed, 132 insertions(+), 15 deletions(-)

diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
index b4d9079a..0f9e4638 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
@@ -56,14 +56,34 @@ void pFlow::VectorSingle<T,MemorySpace>::changeCapacity
     bool withInit
 )
 {
-    if(withInit)
+    if constexpr( isTriviallyCopyable_ )
     {
-        resizeInit(view_, actualCap);
+        if(withInit)
+        {
+            resizeInit(view_, actualCap);
+        }
+        else
+        {
+            resizeNoInit(view_, actualCap);
+        }
+    }
+    else if constexpr( isHostAccessible_ )
+    {
+        viewType newView(view_.label(), actualCap);
+
+        for(auto i=0u; i<min(size_,actualCap); i++)
+        {
+            newView(i) = view_(i);
+        }
+
+        view_ = newView;
+
     }
     else
     {
-        resizeNoInit(view_, actualCap);
+        static_assert("changeCapacity is not a valid operation for non-trivially-copyable data type on device memory");
     }
+    
 }
 
 template<typename T, typename MemorySpace>
@@ -74,7 +94,16 @@ pFlow::uint32 pFlow::VectorSingle<T,MemorySpace>::reallocateCapacitySize
     uint32 s
 )
 {
-    reallocNoInit(view_, cap);
+    if constexpr (isTriviallyCopyable_)
+    {
+        reallocNoInit(view_, cap);
+    }
+    else
+    {
+        viewType newView(view_.label(), cap);
+        view_ = newView;
+    }
+    
     return setSize(s);
 }
 
@@ -183,7 +212,21 @@ pFlow::VectorSingle<T,MemorySpace>::VectorSingle
 :
     VectorSingle(name, src.capacity(), src.size(), RESERVE())
 {
-    copy(deviceView(), src.deviceView());	
+    if constexpr(isTriviallyCopyable_)
+    {
+        copy(deviceView(), src.deviceView());
+    }
+    else if constexpr( isHostAccessible_)
+    {
+        for(auto i=0u; i<src.size(); i++)
+        {
+            view_[i] = src.view_[i];
+        }
+    }
+    else
+    {
+        static_assert("This constructor is not valid for non-trivially copyable data type on device memory");
+    }
 }
 
 template<typename T, typename MemorySpace>
@@ -259,7 +302,18 @@ INLINE_FUNCTION_H
 auto pFlow::VectorSingle<T,MemorySpace>::hostViewAll()const
 {
     auto hView = Kokkos::create_mirror_view(view_);
-    copy(hView, view_);
+    if constexpr(isTriviallyCopyable_)
+    {
+        copy(hView, view_);
+    }
+    else if constexpr( isHostAccessible_ )
+    {
+        // nothing to be done, since it is already a host memory
+    }
+    else
+    {
+        static_assert("hostViewAll is not valid for non-trivially copyable data type on device memory");
+    }
     return hView;
 }
 
@@ -268,7 +322,19 @@ INLINE_FUNCTION_H
 auto pFlow::VectorSingle<T,MemorySpace>::hostView()const
 {
     auto hView = Kokkos::create_mirror_view(deviceView());
-    copy(hView, deviceView());
+    if constexpr(isTriviallyCopyable_)
+    {
+        copy(hView, deviceView());
+    }
+    else if constexpr( isHostAccessible_ )
+    {
+        // nothing to be done, since it is already a host memory
+    }
+    else
+    {
+        static_assert("hostView is not valid for non-trivially copyable data type on device memory");
+    }
+    
     return hView;
 }
 
@@ -351,7 +417,7 @@ INLINE_FUNCTION_H
 void pFlow::VectorSingle<T,MemorySpace>::fill(const T& val)
 {
     if(empty())return;
-    pFlow::fill(view_, rangeU32(0 ,size_) ,val);
+    pFlow::fill(view_, rangeU32(0 ,size_) ,val);    
 }
 
 template<typename T, typename MemorySpace>
@@ -407,9 +473,28 @@ void pFlow::VectorSingle<T,MemorySpace>::assign
         setSize(srcSize);
     }
     
-    // - unmanaged view in the host
-    hostViewType1D<const T> temp(src.data(), srcSize );
-    copy(deviceView(), temp);
+    
+    
+    if constexpr( isTriviallyCopyable_ )
+    {
+        // - unmanaged view in the host
+        hostViewType1D<const T> temp(src.data(), srcSize );
+        copy(deviceView(), temp);
+    }
+    else if constexpr( isHostAccessible_)
+    {
+        
+        for(auto i=0u; i<srcSize; i++)
+        {
+            view_[i] = src[i];
+        }
+        
+    }
+    else
+    {
+        static_assert("Not a valid operation for this data type on memory device");
+    }
+    
 }
 
 template<typename T, typename MemorySpace>
@@ -421,6 +506,7 @@ void pFlow::VectorSingle<T,MemorySpace>::assign
 {
     assign(src, this->capacity());
 }
+
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H 
 void pFlow::VectorSingle<T,MemorySpace>::assign(const VectorTypeHost& src)
@@ -436,7 +522,22 @@ void pFlow::VectorSingle<T,MemorySpace>::assign(const VectorTypeHost& src)
     {
         setSize(srcSize);
     }
-	copy(deviceView(), src.hostView());
+	
+    if constexpr(isTriviallyCopyable_)
+    {
+        copy(deviceView(), src.hostView());
+    }
+    else if constexpr( isHostAccessible_)
+    {
+        for(auto i=0u; i<src.size(); i++)
+        {
+            view_[i] = src.view_[i];
+        }
+    }
+    else
+    {
+        static_assert("Not a valid operation for this data type on device memory");
+    }
 }
 
 template <typename T, typename MemorySpace>
@@ -456,8 +557,22 @@ void pFlow::VectorSingle<T, MemorySpace>::append
     hostViewType1D<const T> temp(appVec.data(), srcSize );
     auto dest = Kokkos::subview(view_, Kokkos::make_pair<uint32>(oldSize,newSize));
 
-    copy(dest, temp);
-
+    if constexpr( isTriviallyCopyable_)
+    {
+        copy(dest, temp);
+    }
+    else if constexpr( isHostAccessible_)
+    {
+        for(auto i=0u; i<appVec.size(); i++)
+        {
+            dest[i] = appVec[i];
+        }
+    }
+    else
+    {
+        static_assert("not a valid operation for this data type on device memory");
+    }
+    
 }
 
 template <typename T, typename MemorySpace>
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 137d3a46..1461503f 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -102,6 +102,9 @@ private:
 		static constexpr
 		bool isDeviceAccessible_ = isDeviceAccessible<execution_space>();
 
+		static constexpr
+		bool isTriviallyCopyable_ = std::is_trivially_copyable_v<T>;
+
 	  	/// Evaluate capacity based on the input size 
 		static INLINE_FUNCTION_H uint32 evalCapacity(uint32 n)
 		{
@@ -397,7 +400,6 @@ public:
 		{
 			std::vector<T> vecFromFile;
 			if(! readStdVector(is, vecFromFile, iop)) return false;
-
 			this->assign(vecFromFile);
 
 			return true;

From df8bea213d1a296da982035db109145a6df7d246 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Tue, 19 Mar 2024 22:29:31 -0700
Subject: [PATCH 40/60] triSurface folder content is finalized

---
 src/phasicFlow/triSurface/multiTriSurface.cpp | 179 +-----------------
 src/phasicFlow/triSurface/multiTriSurface.hpp | 107 +++++------
 src/phasicFlow/triSurface/triSurface.cpp      | 155 ++++++++-------
 src/phasicFlow/triSurface/triSurface.hpp      |  96 +++++++++-
 .../triSurface/triSurfaceKernels.hpp          |  40 +++-
 5 files changed, 259 insertions(+), 318 deletions(-)

diff --git a/src/phasicFlow/triSurface/multiTriSurface.cpp b/src/phasicFlow/triSurface/multiTriSurface.cpp
index b2c04995..e73f4382 100644
--- a/src/phasicFlow/triSurface/multiTriSurface.cpp
+++ b/src/phasicFlow/triSurface/multiTriSurface.cpp
@@ -21,139 +21,6 @@ Licence:
 
 #include "multiTriSurface.hpp"
 
-/*void pFlow::multiTriSurface::calculateVars()
-{
-	numSurfaces_ = surfaceNames_.size();
-
-	// make sure the host and device are sync
-	lastPointIndex_.syncViews();
-
-	surfaceNumPoints_.clear();
-	
-	int32 last = 0;
-	for(auto& pi:lastPointIndex_) 
-	{
-		surfaceNumPoints_.push_back(pi+1-last);
-		last = pi+1;
-	}
-	
-	// update views
-	surfaceNumPoints_.syncViews();
-
-	surfaceNumVertices_.clear();
-	last = 0;
-
-	lastVertexIndex_.syncViews();
-	
-
-	for(auto& vi:lastVertexIndex_)
-	{
-		surfaceNumVertices_.push_back(vi+1-last);
-		last = vi+1;
-	}
-	surfaceNumVertices_.syncViews();
-	
-	pointsStartPos_.reallocate(surfaceNumPoints_.capacity());
-	pointsStartPos_.clear();
-	
-	pointsStartPos_.push_back(0);
-
-	ForAll( i, surfaceNumPoints_)
-	{
-		if(i==0)continue;
-
-		pointsStartPos_.push_back( pointsStartPos_[i-1] + surfaceNumPoints_[i-1] );
-	}
-
-	pointsStartPos_.syncViews();
-	
-
-	verticesStartPos_.reallocate(surfaceNumVertices_.capacity());
-	verticesStartPos_.clear();
-
-	verticesStartPos_.push_back(0);
-	ForAll(i, surfaceNumVertices_)
-	{
-		if(i==0)continue;
-		verticesStartPos_.push_back(verticesStartPos_[i-1] + surfaceNumVertices_[i-1]);
-	}
-	verticesStartPos_.syncViews();
-	
-
-}*/
-
-/*pFlow::multiTriSurface::multiTriSurface()
-:
-	triSurface(),
-	lastPointIndex_("lastPointIndex", "lastPointIndex"),
-	lastVertexIndex_("lastVertexIndex", "lastVertexIndex"),
-	surfaceNames_("surfaceNames", "surfaceNames")
-{
-	calculateVars();
-}*/
-
-/*bool pFlow::multiTriSurface::addTriSurface
-(
-	const word& name,
-	const triSurface& tSurf
-)
-{
-
-	const auto& newPoints = tSurf.points();
-	const auto& newVertices = tSurf.vertices();
-	const auto& newAreas = tSurf.area();
-	
-	// 
-	
-	
-	points_.append(newPoints);
-	
-	
-	// add new vertices to the existing one
-	auto vOldSize = vertices_.size();
-	auto vNewSize =  vOldSize + newVertices.size();
-	vertices_.resize(vNewSize);
-	area_.resize(vNewSize);
-	
-	auto verVec = vertices_.deviceViewAll();
-	auto areaVec = area_.deviceViewAll();
-
-	auto newVerVec = newVertices.deviceViewAll();
-	auto newArea = newAreas.deviceViewAll();
-
-	auto maxIdx = maxIndex();
-
-	Kokkos::parallel_for(
-		"multiTriSurface::addTriSurface",
-		newVertices.size(),
-		LAMBDA_HD(int32 i){
-			verVec[vOldSize+i] = newVerVec[i]+(maxIdx+1);
-			areaVec[vOldSize+i] = newArea[i];
-		}
-		);
-	Kokkos::fence();
-
-	if( !check() )
-	{
-		fatalErrorInFunction<<
-		"the indices and number of points do not match. \n";
-		return false;
-	}
-
-	lastPointIndex_.push_back(points_.size()-1);
-	lastPointIndex_.syncViews();
-	
-	lastVertexIndex_.push_back(vertices_.size()-1);
-	lastVertexIndex_.syncViews();
-
-	surfaceNames_.push_back(name);
-
-	calculateVars();
-
-	return true;
-
-}*/
-
 pFlow::multiTriSurface::multiTriSurface
 (
 	const objectFile &obj, 
@@ -185,7 +52,7 @@ pFlow::multiTriSurface::multiTriSurface
 	
 }
 
-bool pFlow::multiTriSurface::appendTriSurface
+bool pFlow::multiTriSurface::appendSurface
 (
 	const word &name, 
 	const realx3x3Vector &triangles
@@ -194,7 +61,7 @@ bool pFlow::multiTriSurface::appendTriSurface
 	uint32 start = size();
 	uint32 pointStart = numPoints();
 
-	if(!triSurface::appendTriSurface(triangles))
+	if(!triSurface::append(triangles))
 	{
 		fatalErrorInFunction;
 		return false;
@@ -236,45 +103,3 @@ bool pFlow::multiTriSurface::write
 	
 	return triSurface::write(os,iop);
 }
-
-/*pFlow::real3*
-	pFlow::multiTriSurface::beginSurfacePoint
-(
-	unit i
-)
-{
-	if(i== 0) return points_.data();
-	if(i>=numSurfaces())return points_.data()+numPoints();
-	return points_.data()+lastPointIndex_[i-1]+1;
-}
-
-const pFlow::real3*
-	pFlow::multiTriSurface::beginSurfacePoint
-(
-	unit i
-)const
-{
-	if(i== 0) return points_.data();
-	if(i>=numSurfaces())return points_.data()+numPoints();
-	return points_.data()+lastPointIndex_[i-1]+1;
-}
-
-pFlow::real3* 
-	pFlow::multiTriSurface::endSurfacePoint
-(
-	unit i
-)
-{
-	if(i>=numSurfaces())return points_.data()+numPoints();
-	return points_.data()+lastPointIndex_[i]+1;
-}
-
-const pFlow::real3*
-	pFlow::multiTriSurface::endSurfacePoint
-(
-	unit i
-)const
-{
-	if(i>=numSurfaces())return points_.data()+numPoints();
-	return points_.data()+lastPointIndex_[i]+1;
-}*/
\ No newline at end of file
diff --git a/src/phasicFlow/triSurface/multiTriSurface.hpp b/src/phasicFlow/triSurface/multiTriSurface.hpp
index d00130a7..b95977d3 100644
--- a/src/phasicFlow/triSurface/multiTriSurface.hpp
+++ b/src/phasicFlow/triSurface/multiTriSurface.hpp
@@ -29,7 +29,6 @@ Licence:
 namespace pFlow
 {
 
-
 class multiTriSurface
 :
 	public triSurface,
@@ -39,10 +38,6 @@ private:
 
 	subSurfaceList subSurfaces_;
 
-	// - the index of last point of each triSurface 
-	
-	//void        calculateVars();
-
 public:
 
 	// - type info
@@ -50,33 +45,42 @@ public:
 
 	//// - Constructors
 
-		//
+		/// @brief  Construct from objectFile and owner repository.
+		/// This is mainly used for reading from file.
+		/// @param obj object file 
+		/// @param owner owner repository 
 		multiTriSurface(const objectFile& obj, repository* owner);
 
+		/// @brief Construct from another multiTriSurface 
 		multiTriSurface(
 			const objectFile& objf, 
 			repository* owner, 
 			const multiTriSurface& surf);
 
+		/// @brief Copy construct (default)
 		multiTriSurface(const multiTriSurface&) = default;
 
+		/// @brief Copy assignment (default)
 		multiTriSurface& operator = (const multiTriSurface&) = default;
 
+		/// @brief  No move construct
 		multiTriSurface(multiTriSurface&&) = delete;
 
+		/// @brief No move assignment 
 		multiTriSurface& operator = (multiTriSurface&&) = delete;
 
+		/// @brief  default destructor 
 		~multiTriSurface() override = default;
 
 	//// - Methods
 
-		//bool addTriSurface(const word& name, const triSurface& tSurf);
-
-		bool appendTriSurface(const word& name, const realx3x3Vector& vertices);
+		bool appendSurface(
+			const word& name, 
+			const realx3x3Vector& vertices);
 
 		uint32 numSurfaces()const
 		{
-			return subSurfaces_.size();
+			return static_cast<uint32>(subSurfaces_.size());
 		}
 
 		const subSurfaceList& subSurfaces()const
@@ -84,7 +88,7 @@ public:
 			return subSurfaces_;
 		}
 		
-		rangeU32 subSurfaceRange(uint32 nSub)
+		rangeU32 subSurfaceRange(uint32 nSub)const
 		{
 			if( !(nSub < numSurfaces() ) )
 			{
@@ -106,55 +110,50 @@ public:
 				subSurfaces_[nSub].pointEnd()};
 		}
 
-		/*void clear()
+		/// @brief Clear the content of object
+		void clear()
 		{
 			triSurface::clear();
-
-			lastPointIndex_.clear();
-			surfaceNames_.clear();
-		}*/
+			subSurfaces_.clear();
+		}
 
 		
-		/*const auto& pointsStartPos()const
+		uint32 subSurfaceSize(uint32 nSub)const
 		{
-			return pointsStartPos_;
+			if(nSub<numSurfaces())
+			{
+				return subSurfaceRange(nSub).numElements();
+			}
+			else
+			{
+				return 0;
+			}
 		}
 
-		const auto& verticesStartPos()const
+		uint32 subSurfaceNumPoints(uint32 nSub)const
 		{
-			return verticesStartPos_;
+			if(nSub<numSurfaces())
+			{
+				return subSurfacePointRange(nSub).numElements();
+			}
+			else
+			{
+				return 0;
+			}
 		}
-
-		const auto& surfaceNumPoints()const
+		
+		word subSurfaceName(uint32 nSub)const
 		{
-			return surfaceNumPoints_;
+			if(nSub<numSurfaces())
+			{
+				return subSurfaces_[nSub].name();
+			}
+			else
+			{
+				return "";
+			}
 		}
 
-		auto& surfaceNumPoints()
-		{
-			return surfaceNumPoints_;
-		}
-
-		int32 surfNumPoints(int32 i)const
-		{
-			return surfaceNumPoints_[i];
-		}
-
-		int32 surfNumTriangles(int32 i)const
-		{
-			return surfaceNumVertices_[i];
-		}
-
-		int32 surfSize(int32 i)const
-		{
-			return surfNumTriangles(i);
-		}
-
-		word surfaceName(int32 i)const
-		{
-			return surfaceNames_[i];
-		}*/
-
 	//// - IO operations
 
 		
@@ -167,16 +166,6 @@ public:
 
 };
 
-/*inline iIstream& operator >> (iIstream & is, multiTriSurface & tri )
-{
-	if(!tri.readMultiTriSurface(is))
-	{
-	 	ioErrorInFile(is.name(), is.lineNumber())<<
-	 	"  error in reading multiTriSurface from file.\n";
-	 	fatalExit;
-	}
-	return is;
-}*/
 
 inline iOstream& operator << (iOstream& os, const multiTriSurface& tri)
 {
@@ -189,7 +178,7 @@ inline iOstream& operator << (iOstream& os, const multiTriSurface& tri)
 	return os;
 }
 
-}
+} // pFlow
 
 
 #endif
diff --git a/src/phasicFlow/triSurface/triSurface.cpp b/src/phasicFlow/triSurface/triSurface.cpp
index 6d3fea97..4daf1387 100644
--- a/src/phasicFlow/triSurface/triSurface.cpp
+++ b/src/phasicFlow/triSurface/triSurface.cpp
@@ -20,12 +20,12 @@ Licence:
 
 
 #include "triSurface.hpp"
-#include "Vectors.hpp"
-#include "triangleFunctions.hpp"
 #include "error.hpp"
 #include "iOstream.hpp"
+#include "Vectors.hpp"
+#include "triSurfaceKernels.hpp"
+
 
-//#include "triSurfaceKernels.hpp"
 
 namespace pFlow
 {
@@ -104,75 +104,23 @@ bool convertToTriSurfaceComponents
 
 }
 
-
-pFlow::triSurface::triSurface
-(
-	const objectFile &obj, 
-	repository *owner
-)
-:
-	IOobject
-	(
-		obj,
-		IOPattern::AllProcessorsSimilar,
-		owner
-	),
-	points_("points", "points"),
-	vertices_("vertices", "vertices"),
-	area_("area", "area"),
-	normals_("normals","normals")
+bool pFlow::triSurface::calculateNormals()
 {
+    return pFlow::triSurfaceKernels::calculateNormals(
+		points_, 
+		vertices_, 
+		normals_);
 }
 
-pFlow::triSurface::triSurface
-(
-	const objectFile &objf,
-	repository* owner, 
-	const triSurface &surf
-)
-:
-	IOobject
-	(
-		objectFile
-		(
-			objf.name(),
-			objf.localPath(),
-			objectFile::READ_NEVER,
-			objf.wFlag()
-		),
-		IOPattern::AllProcessorsSimilar,
-		owner
-	),
-	points_(surf.points_),
-	vertices_(surf.vertices_),
-	area_(surf.area_),
-	normals_(surf.normals_)
-{}
-
-pFlow::triSurface::triSurface(
-    const realx3x3Field_H &triangles,
-    repository *owner)
-    : IOobject(
-          objectFile(
-              triangles.name(),
-              "",
-              IOobject::READ_NEVER,
-              IOobject::WRITE_ALWAYS),
-          IOPattern::AllProcessorsSimilar,
-          owner),
-      points_("points", "points"),
-      vertices_("vertices", "vertices"),
-      area_("area", "area"),
-      normals_("normals", "normals")
+bool pFlow::triSurface::calculateArea()
 {
-	if( !appendTriSurface(triangles) )
-	{
-		fatalExit;
-	}
-
+    return pFlow::triSurfaceKernels::calculateArea(
+		points_,
+		vertices_,
+		area_);
 }
 
-bool pFlow::triSurface::appendTriSurface
+bool pFlow::triSurface::append
 (
 	const realx3x3Field_H &triangles
 )
@@ -207,7 +155,7 @@ bool pFlow::triSurface::appendTriSurface
     return true;
 }
 
-bool pFlow::triSurface::appendTriSurface(const realx3x3Vector &triangles)
+bool pFlow::triSurface::append(const realx3x3Vector &triangles)
 {
     uint32 basePointIndex = numPoints();
 
@@ -239,6 +187,73 @@ bool pFlow::triSurface::appendTriSurface(const realx3x3Vector &triangles)
     return true;
 }
 
+pFlow::triSurface::triSurface
+(
+    const objectFile &obj,
+    repository *owner
+)
+: 
+	IOobject
+	(
+        obj,
+        IOPattern::AllProcessorsSimilar,
+        owner
+	) 
+{
+	// this constructor is used by multiTrisurface and read operation is 
+	// done in that class 
+}
+
+pFlow::triSurface::triSurface
+(
+	const objectFile &objf,
+	repository* owner, 
+	const triSurface &surf
+)
+:
+	IOobject
+	(
+		objectFile
+		(
+			objf.name(),
+			objf.localPath(),
+			objectFile::READ_NEVER,
+			objf.wFlag()
+		),
+		IOPattern::AllProcessorsSimilar,
+		owner
+	),
+	points_(surf.points_),
+	vertices_(surf.vertices_),
+	area_(surf.area_),
+	normals_(surf.normals_)
+{}
+
+pFlow::triSurface::triSurface
+(
+    const realx3x3Field_H &triangles,
+    repository *owner
+)
+: 
+	IOobject
+	(
+        objectFile(
+            triangles.name(),
+            "",
+            IOobject::READ_NEVER,
+            IOobject::WRITE_ALWAYS),
+        IOPattern::AllProcessorsSimilar,
+        owner
+	)
+{
+	if( !append(triangles) )
+	{
+		fatalExit;
+	}
+}
+
+
+
 bool pFlow::triSurface::read(iIstream &is, const IOPattern &iop)
 {
 	points_.clear();
@@ -257,8 +272,10 @@ bool pFlow::triSurface::read(iIstream &is, const IOPattern &iop)
 		return false;
 	}
 	
-	WARNING<<"You should calculate area and normal after reading "<<END_WARNING;
-
+	normals_.reallocate(vertices_.capacity(), vertices_.size());
+	area_.reallocate(vertices_.capacity(), vertices_.size());
+	calculateArea();
+	calculateNormals();
     return true;
 }
 
diff --git a/src/phasicFlow/triSurface/triSurface.hpp b/src/phasicFlow/triSurface/triSurface.hpp
index 6a6585f7..09a572a0 100644
--- a/src/phasicFlow/triSurface/triSurface.hpp
+++ b/src/phasicFlow/triSurface/triSurface.hpp
@@ -35,6 +35,71 @@ class iIstream;
 class iOstream;
 class repository;
 
+
+class triangleAccessor
+{
+private:
+	uint32 		numPoints_;
+	
+	uint32 		numTriangles_;
+
+	deviceViewType1D<realx3> dPoints_;
+	
+	deviceViewType1D<uint32x3>  dVectices_;
+public:
+
+	INLINE_FUNCTION_H
+	triangleAccessor(
+		uint32 	numPoints,
+		deviceViewType1D<realx3> points,
+		uint32 	numTrianlges,
+		deviceViewType1D<uint32x3> vertices )
+	:
+		numPoints_(numPoints),
+		numTriangles_(numTrianlges),
+		dPoints_(points),
+		dVectices_(vertices)
+	{}
+
+	INLINE_FUNCTION_HD
+	triangleAccessor(const triangleAccessor&)= default;
+
+	INLINE_FUNCTION_HD
+	triangleAccessor& operator=(const triangleAccessor&)= default;
+
+	INLINE_FUNCTION_HD
+	triangleAccessor(triangleAccessor&&)= default;
+
+	INLINE_FUNCTION_HD
+	triangleAccessor& operator=(triangleAccessor&&)= default;
+
+	INLINE_FUNCTION_HD
+	~triangleAccessor()=default;
+
+	INLINE_FUNCTION_HD
+	realx3x3 triangle(uint32 i)const	{
+		auto v = dVectices_[i];
+		return realx3x3(
+				dPoints_[v.x_],
+				dPoints_[v.y_],
+				dPoints_[v.z_]);
+	}
+
+	INLINE_FUNCTION_HD
+	realx3x3 operator()(uint32 i)const { return triangle(i);	}
+
+	INLINE_FUNCTION_HD
+	realx3x3 operator[](uint32 i)const { return triangle(i);	}
+
+	INLINE_FUNCTION_HD
+	uint32 numPoints()const { return numPoints_; }
+
+	INLINE_FUNCTION_HD
+	uint32 numTrianlges()const { return numTriangles_;}
+};
+
+
+
 class triSurface
 :
 	public IOobject
@@ -42,19 +107,29 @@ class triSurface
 private:
 
 	/// points of triangles
-	realx3Field_D 		points_;
+	realx3Field_D 		points_{"points", "points"};
 
 	/// vectices indices of triangles 
-	uint32x3Field_D 	vertices_;
+	uint32x3Field_D 	vertices_{"vertices", "vertices"};
 
 	/// area of each triangle 
-	realField_D  		area_;
+	realField_D  		area_{"area", "area"};
 
 	/// normal vector of triangles 
-	realx3Field_D 		normals_;
+	realx3Field_D 		normals_{"normals", "normals"};
 
 protected:
+	
+	bool calculateNormals();
 
+	bool calculateArea();
+
+	bool append(const realx3x3Field_H& triangles);
+
+	bool append(const realx3x3Vector& triangles);
+
+
+	// to be used by multiTriSurface
 	triSurface(const objectFile& obj, repository* owner);
 
 public:
@@ -77,9 +152,6 @@ public:
 
 		~triSurface() override = default;
 
-		bool appendTriSurface(const realx3x3Field_H& triangles);
-
-		bool appendTriSurface(const realx3x3Vector& triangles);
 
 	//// - Methods
 		uint32 numPoints() const
@@ -144,6 +216,16 @@ public:
 			area_.clear();
 			normals_.clear();
 		}
+
+		/// Obtain an object for accessing triangles 
+		auto getTriangleAccessor()const
+		{
+			return triangleAccessor( 
+				points_.size(),
+				points_.deviceViewAll(),
+				vertices_.size(),
+				vertices_.deviceViewAll());
+		}
 		
 	//// - IO operations 
 		
diff --git a/src/phasicFlow/triSurface/triSurfaceKernels.hpp b/src/phasicFlow/triSurface/triSurfaceKernels.hpp
index fbb1d7d6..7f79d06a 100644
--- a/src/phasicFlow/triSurface/triSurfaceKernels.hpp
+++ b/src/phasicFlow/triSurface/triSurfaceKernels.hpp
@@ -29,19 +29,47 @@ namespace pFlow::triSurfaceKernels
 {
 
 INLINE_FUNCTION_H
-bool calculateArea(const realx3Field_D& points, const int32x3Field_D& vertices, realField_D& area)
+bool calculateArea(
+	const realx3Field_D& points, 
+	const uint32x3Field_D& vertices, 
+	realField_D& area)
 {
 	auto numTri = vertices.size();
-	auto areaD = area.deviceViewAll();
-	auto pointsD = points.deviceViewAll();
-	auto verticesD = vertices.deviceViewAll();
+	auto& areaD = area.deviceViewAll();
+	auto& pointsD = points.deviceViewAll();
+	auto& verticesD = vertices.deviceViewAll();
 
 	Kokkos::parallel_for(
 		"pFlow::triSurfaceKernels::calculateArea",
 		numTri,
-		LAMBDA_HD(int32 i){
+		LAMBDA_HD(uint32 i){
 			auto v = verticesD[i];
-			areaD[i] = pFlow::triangleFunctions::triangleSurface(
+			areaD[i] = pFlow::triangle::surface(
+				pointsD[v.x()],
+				pointsD[v.y()],
+				pointsD[v.z()]);
+		});
+
+	return true;
+}
+
+INLINE_FUNCTION_H
+bool calculateNormals(
+	const realx3Field_D& points, 
+	const uint32x3Field_D& vertices, 
+	realx3Field_D& normals)
+{
+	auto numTri = vertices.size();
+	auto& normalsD = normals.deviceViewAll();
+	auto& pointsD = points.deviceViewAll();
+	auto& verticesD = vertices.deviceViewAll();
+
+	Kokkos::parallel_for(
+		"pFlow::triSurfaceKernels::calculateNormals",
+		numTri,
+		LAMBDA_HD(uint32 i){
+			auto v = verticesD[i];
+			normalsD[i] = pFlow::triangle::normal(
 				pointsD[v.x()],
 				pointsD[v.y()],
 				pointsD[v.z()]);

From acfaacfe4adf46da630cd96bac9262f2ae8a7858 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Wed, 20 Mar 2024 00:50:58 -0700
Subject: [PATCH 41/60] Geometry folder is finalized

---
 src/Geometry/geometry/geometry.cpp            | 245 ++++++++++--------
 src/Geometry/geometry/geometry.hpp            | 151 +++--------
 .../geometryMotion/geometryMotion.cpp         | 159 +++---------
 .../geometryMotion/geometryMotion.hpp         |  55 ++--
 .../geometryMotion/geometryMotions.cpp        |  12 +-
 .../geometryMotion/geometryMotions.hpp        |   3 +-
 .../geometryMotionsInstantiate.cpp            |  32 ---
 7 files changed, 235 insertions(+), 422 deletions(-)
 delete mode 100644 src/Geometry/geometryMotion/geometryMotionsInstantiate.cpp

diff --git a/src/Geometry/geometry/geometry.cpp b/src/Geometry/geometry/geometry.cpp
index 0875dbd6..00855156 100644
--- a/src/Geometry/geometry/geometry.cpp
+++ b/src/Geometry/geometry/geometry.cpp
@@ -34,8 +34,8 @@ bool pFlow::geometry::createPropertyId()
 
 	uint32Vector propId(
 		"propId", 
-		surface().capacity(), 
-		surface().size(),
+		capacity(), 
+		size(),
 		RESERVE());
 
 	ForAll(i, materialName_)
@@ -61,6 +61,11 @@ bool pFlow::geometry::createPropertyId()
 
 }
 
+void pFlow::geometry::zeroForce()
+{
+	contactForceWall_.fill(zero3);
+}
+
 pFlow::geometry::geometry
 (
 	systemControl& control,
@@ -84,16 +89,6 @@ pFlow::geometry::geometry
 		control
 	),
 	wallProperty_(prop),
-	motionComponentName_
-	(
-		"motionComponentName",
-		"motionComponentName"
-	),
-	materialName_
-	(
-		"materialName",
-		"materialName"
-	),
 	propertyId_
 	(
 		objectFile
@@ -197,16 +192,6 @@ pFlow::geometry::geometry
 	(
 		prop
 	),
-	motionComponentName_
-	(
-		"motionComponentName",
-		"motionComponentName"
-	),
-	materialName_
-	(
-		"materialName",
-		"materialName"
-	),
 	propertyId_
 	(
 		objectFile
@@ -274,9 +259,47 @@ pFlow::geometry::geometry
 	}
 }
 
+bool pFlow::geometry::beforeIteration()
+{
+	zeroForce();
+    return true;
+}
+
+bool pFlow::geometry::iterate()
+{
+    return true;
+}
+
+bool pFlow::geometry::afterIteration()
+{
+	auto numTris = size();
+	auto& normalsD = normals().deviceViewAll();
+	auto& areaD = area().deviceViewAll();
+	auto& cForceD = contactForceWall_.deviceViewAll();
+	auto& sStressD = shearStressWall_.deviceViewAll();
+	auto& nStressD = normalStressWall_.deviceViewAll();
+
+	Kokkos::parallel_for(
+		"pFlow::geometry::afterIteration",
+		deviceRPolicyStatic(0, numTris),
+		LAMBDA_HD(uint32 i)
+		{	
+			realx3 n = normalsD[i];
+			real A = max(areaD[i],smallValue);
+			realx3 nF = dot(cForceD[i],n)*n;
+			realx3 sF = cForceD[i] - nF;
+			nStressD[i] = nF/A;
+			sStressD[i] = sF/A;
+		});
+	Kokkos::fence();
+    
+	return true;
+}
+
 bool pFlow::geometry::read(iIstream &is, const IOPattern &iop)
 {
 	motionComponentName_.read(is, iop);
+	
 	materialName_.read(is, iop);
 	
 	if( readWholeObject_ )
@@ -305,6 +328,93 @@ bool pFlow::geometry::write(iOstream &os, const IOPattern &iop) const
 	return multiTriSurface::write(os,iop);
 }
 
+
+pFlow::uniquePtr<pFlow::geometry> 
+	pFlow::geometry::create
+(
+	systemControl& control,
+	const property& prop
+)
+{
+	
+	//
+	fileDictionary dict( motionModelFile__, control.time().geometry().path());
+
+	word model = dict.getVal<word>("motionModel");
+	
+	auto geomModel = angleBracketsNames("geometry", model);
+
+	REPORT(1)<< "Selecting geometry model . . ."<<END_REPORT;
+	if( systemControlvCtorSelector_.search(geomModel) )
+	{
+		auto objPtr = systemControlvCtorSelector_[geomModel] (control, prop);
+		REPORT(2)<<"Model "<< Green_Text(geomModel)<<" is created.\n"<<END_REPORT;
+		return objPtr;
+	}
+	else
+	{
+		printKeys
+		( 
+			fatalError << "Ctor Selector "<< Yellow_Text(geomModel) << " dose not exist. \n"
+			<<"Avaiable ones are: \n\n"
+			,
+			systemControlvCtorSelector_
+		);
+		fatalExit;
+	}
+
+	return nullptr;
+}
+
+pFlow::uniquePtr<pFlow::geometry> 
+	pFlow::geometry::create
+	(
+		systemControl& control, 
+		const property& prop,
+		multiTriSurface& surf,
+		const wordVector& motionCompName,
+		const wordVector& materialName,
+		const dictionary& motionDic
+	)
+{
+
+	word model = motionDic.getVal<word>("motionModel");
+
+	auto geomModel = angleBracketsNames("geometry", model);
+
+	REPORT(1)<< "Selecting geometry model . . ."<<END_REPORT;
+
+	if( dictionaryvCtorSelector_.search(geomModel) )
+	{
+		auto objPtr = dictionaryvCtorSelector_[geomModel] 
+			(
+				control,
+				prop, 
+				surf,
+				motionCompName,
+				materialName,
+				motionDic
+			);
+		REPORT(2)<<"Model "<< Green_Text(geomModel)<<" is created.\n"<<END_REPORT;
+		return objPtr;
+	}
+	else
+	{
+		printKeys
+		( 
+			fatalError << "Ctor Selector "<< Yellow_Text(geomModel) << " dose not exist. \n"
+			<<"Avaiable ones are: \n\n"
+			,
+			dictionaryvCtorSelector_
+		);
+		fatalExit;
+	}
+	return nullptr;
+}
+
+
+
+
 /*pFlow::geometry::geometry
 (
 	systemControl& control,
@@ -400,52 +510,7 @@ pFlow::geometry::geometry
 {}
 
 
-pFlow::uniquePtr<pFlow::geometry> 
-	pFlow::geometry::create
-(
-	systemControl& control,
-	const property& prop
-)
-{
-	//motionModelFile__
-	auto motionDictPtr = IOobject::make<dictionary>
-	(
-		objectFile
-		(
-			motionModelFile__,
-			control.geometry().path(),
-			objectFile::READ_ALWAYS,
-			objectFile::WRITE_NEVER
-		),
-		motionModelFile__,
-		true
-	);
 
-	word model = motionDictPtr().getObject<dictionary>().getVal<word>("motionModel");
-	
-	auto geomModel = angleBracketsNames("geometry", model);
-
-	REPORT(1)<< "Selecting geometry model . . ."<<endREPORT;
-	if( systemControlvCtorSelector_.search(geomModel) )
-	{
-		auto objPtr = systemControlvCtorSelector_[geomModel] (control, prop);
-		REPORT(2)<<"Model "<< greenText(geomModel)<<" is created.\n"<<endREPORT;
-		return objPtr;
-	}
-	else
-	{
-		printKeys
-		( 
-			fatalError << "Ctor Selector "<< yellowText(geomModel) << " dose not exist. \n"
-			<<"Avaiable ones are: \n\n"
-			,
-			systemControlvCtorSelector_
-		);
-		fatalExit;
-	}
-
-	return nullptr;
-}
 
 bool pFlow::geometry::beforeIteration()
 { 
@@ -473,49 +538,3 @@ bool pFlow::geometry::afterIteration()
 	return true;
 	
 }*/
-
-pFlow::uniquePtr<pFlow::geometry> 
-	pFlow::geometry::create
-	(
-		systemControl& control, 
-		const property& prop,
-		multiTriSurface& surf,
-		const wordVector& motionCompName,
-		const wordVector& materialName,
-		const dictionary& motionDic
-	)
-{
-
-	word model = motionDic.getVal<word>("motionModel");
-
-	auto geomModel = angleBracketsNames("geometry", model);
-
-	REPORT(1)<< "Selecting geometry model . . ."<<END_REPORT;
-
-	if( dictionaryvCtorSelector_.search(geomModel) )
-	{
-		auto objPtr = dictionaryvCtorSelector_[geomModel] 
-			(
-				control,
-				prop, 
-				surf,
-				motionCompName,
-				materialName,
-				motionDic
-			);
-		REPORT(2)<<"Model "<< Green_Text(geomModel)<<" is created.\n"<<END_REPORT;
-		return objPtr;
-	}
-	else
-	{
-		printKeys
-		( 
-			fatalError << "Ctor Selector "<< Yellow_Text(geomModel) << " dose not exist. \n"
-			<<"Avaiable ones are: \n\n"
-			,
-			dictionaryvCtorSelector_
-		);
-		fatalExit;
-	}
-	return nullptr;
-}
diff --git a/src/Geometry/geometry/geometry.hpp b/src/Geometry/geometry/geometry.hpp
index bc1016b0..c336cbf2 100644
--- a/src/Geometry/geometry/geometry.hpp
+++ b/src/Geometry/geometry/geometry.hpp
@@ -54,10 +54,14 @@ private:
 		const property& 	wallProperty_;
 
 		/// The name of motion component of each wall surface 
-		wordField_H 		motionComponentName_;
+		wordField_H 		motionComponentName_{
+								"motionComponentName",	
+								"motionComponentName"};
 
 		/// Material name of each wall surface  
-		wordField_H   		materialName_;
+		wordField_H   		materialName_{
+								"materialName",
+								"materialName"};
 		
 		/// Property id of each triangle in the set of wall surfaces
 		uint32TriSurfaceField_D 		propertyId_;
@@ -81,12 +85,8 @@ private:
 		bool createPropertyId();
 
 		/// Initialize contact force to zero 
-		/*void zeroForce()
-		{
-			contactForceWall_.fill(zero3);
-		}*/
-
-
+		void zeroForce();
+		
 public:
 
 	/// Type info
@@ -122,10 +122,10 @@ public:
 				 const wordVector& propName);*/
 
 		/// Destructor
-		virtual ~geometry() = default;
+		~geometry()override = default;
 
 		/// Virtual constructor 
-		/*create_vCtor
+		create_vCtor
 		(
 			geometry,
 			systemControl,
@@ -134,7 +134,7 @@ public:
 				const property& prop
 			),
 			(control, prop)
-		);*/
+		);
 
 		/// Virtual constructor 
 		create_vCtor
@@ -152,48 +152,6 @@ public:
 		);
 
 	//- Methods 	
-
-		/// Number of triangles in the set of surface walls 
-		inline
-		auto numTriangles()const
-		{
-			return size();
-		}
-
-		/// Access to the points
-		/*inline
-		const auto& points()const
-		{
-			return triSurface_.points();
-		}*/
-
-		/// Access to the vertices 
-		/*inline
-		const auto& vertices()const
-		{
-			return triSurface_.vertices();
-		}*/
-
-		/// Obtain an object for accessing triangles 
-		/*inline auto getTriangleAccessor()const
-		{
-			return triSurface_.getTriangleAccessor();
-		}*/
-
-		/// Surface 
-		inline 
-		auto& surface()
-		{
-			return static_cast<multiTriSurface&>(*this);
-		}
-
-		/// Surface 
-		inline 
-		const auto& surface()const
-		{
-			return static_cast<const multiTriSurface&>(*this);
-		}
-
 		inline 
 		const auto& motionComponentName()const
 		{
@@ -201,91 +159,54 @@ public:
 		}
 		
 		/// Access to contact force
-		/*inline
-		realx3TriSurfaceField_D& contactForceWall()
+		inline
+		auto& contactForceWall()
 		{
 			return contactForceWall_;
 		}
 
 		/// Access to contact force
 		inline
-		const realx3TriSurfaceField_D& contactForceWall() const
+		const auto& contactForceWall() const
 		{
 			return contactForceWall_;
 		}
 
+		/// Property ide of triangles 
+		inline
+		const auto& propertyId()const
+		{
+			return propertyId_;
+		}
+
 		/// Access to property 
 		inline const auto& wallProperty()const
 		{
 			return wallProperty_;
-		}*/
-
-		/// Owner repository
-		/*inline
-		const repository& owner()const
-		{
-			return geometryRepository_;
-		}*/
-
-		/// Owner repository
-		/*inline
-		repository& owner()
-		{
-			return geometryRepository_;
-		}*/
-
-		/// Path to the repository folder 
-		/*inline auto path()
-		{
-			return owner().path();
-		}*/
+		}
 
 		/// The name of motion model 
-		/*virtual 
-		word motionModelTypeName()const = 0;*/
+		virtual 
+		word motionModelTypeName()const = 0;
 
 		/// Motion model index of triangles 
-		/*virtual
-		const int8Vector_HD& 			triMotionIndex() const =0;
+		virtual
+		const uint32Field_D& triMotionIndex() const =0;
 
 		/// Motion model index of points 
 		virtual 
-		const int8Vector_HD& 			pointMotionIndex()const = 0;
-
-		/// Property ide of triangles 
-		const int8TriSurfaceField_D& 	propertyId() const
-		{
-			return propertyId_;
-		}*/
-
-		/// Operations before each iteration 
-		//bool beforeIteration() override;
-
-		/// Operations after each iteration
-		//bool afterIteration() override;
+		const uint32Field_D& pointMotionIndex()const = 0;
 
 		
-		bool beforeIteration() override
-		{
-			notImplementedFunction;
-			return true;
-		}
-
+		bool beforeIteration() override;
+		
 		/// This is called in time loop. Perform the main calculations 
 		/// when the component should evolve along time.
-		bool iterate() override
-		{
-			notImplementedFunction;
-			return true;
-		}
-
+		bool iterate() override;
+		
 		/// This is called in time loop, after iterate.
-		bool afterIteration() override
-		{
-			notImplementedFunction;
-			return true;
-		}
-
+		bool afterIteration() override;
+		
 	//- IO
 
 		bool read(iIstream& is, const IOPattern& iop) override;
@@ -297,8 +218,10 @@ public:
 
 	//- Static members 
 
-		/*static
-		uniquePtr<geometry> create(systemControl& control, const property& prop);*/
+		static
+		uniquePtr<geometry> create(
+			systemControl& control, 
+			const property& prop);
 
 		static
 		uniquePtr<geometry> create(
diff --git a/src/Geometry/geometryMotion/geometryMotion.cpp b/src/Geometry/geometryMotion/geometryMotion.cpp
index 53f3509d..6420dadb 100644
--- a/src/Geometry/geometryMotion/geometryMotion.cpp
+++ b/src/Geometry/geometryMotion/geometryMotion.cpp
@@ -45,17 +45,18 @@ bool pFlow::geometryMotion<MotionModel>::findMotionIndex()
 			fatalErrorInFunction<<
 			mName<< " does not exist in the list of motion names -> "<<
 			motionModel_.componentNames();
+            return false;
 		}
 		surfMotionIndex.push_back(mInd);
 		
-		auto surfRange = this->surface().subSurfaceRange(surfI);
+		auto surfRange = subSurfaceRange(surfI);
 		
 		for(uint32 i=0; i<surfRange.numElements(); i++)
 		{
 			triMotionIndex.push_back(mInd);
 		}
 
-		auto pointRange = this->surface().subSurfacePointRange(surfI);
+		auto pointRange = subSurfacePointRange(surfI);
 		for(uint32 n=0; n<pointRange.numElements(); n++)
 		{
 			pointMotionIndex.push_back(mInd);
@@ -70,6 +71,39 @@ bool pFlow::geometryMotion<MotionModel>::findMotionIndex()
 }
 
 
+template<typename MotionModel>
+ bool pFlow::geometryMotion<MotionModel>::moveGeometry()
+ {
+
+    uint32 iter = this->currentIter();
+    real t = this->currentTime();
+    real dt = this->dt();
+        
+    auto mModel = motionModel_.getModelInterface(iter, t, dt);
+    
+    auto& pointMIndexD= pointMotionIndex_.deviceViewAll();
+    auto& pointsD = points().deviceViewAll();
+    
+
+    Kokkos::parallel_for(
+         "geometryMotion<MotionModel>::movePoints",
+         deviceRPolicyStatic(0, numPoints()),
+         LAMBDA_HD(uint32 i){
+             auto newPos = mModel.transferPoint(pointMIndexD[i], pointsD[i], dt);
+             pointsD[i] = newPos;
+         });
+
+    Kokkos::fence();
+
+    // move the motion components
+    motionModel_.move(iter, t,dt);
+
+    // end of calculations
+     
+
+     return true;
+ }
+
 template<typename MotionModel>
 pFlow::geometryMotion<MotionModel>::geometryMotion
 (
@@ -137,129 +171,16 @@ pFlow::geometryMotion<MotionModelType>::geometryMotion
 	}
 } 
 
-/*template<typename MotionModel>
- pFlow::geometryMotion<MotionModel>::geometryMotion
- (
-     systemControl& control,
-     const property& prop,
-     const multiTriSurface& triSurface,
-     const wordVector& motionCompName,
-     const wordVector& propName,
-     const MotionModel& motionModel
- )
- :
-     geometry(
-         control,
-         prop,
-         triSurface,
-         motionCompName,
-         propName
-         ),
-     motionModel_(
-         this->owner().template emplaceObject<MotionModel>(
-             objectFile(
-                 motionModelFile__,
-                 "",
-                 objectFile::READ_NEVER,
-                 objectFile::WRITE_ALWAYS
-                 ),
-             motionModel
-             )
-         ),
-     moveGeomTimer_("move geometry", &this->timers())
- {
-     findMotionIndex();
- }
-
- template<typename MotionModel>
- pFlow::geometryMotion<MotionModel>::geometryMotion
- (
-     systemControl& control,
-     const property& prop,
-     const dictionary& dict,
-     const multiTriSurface& triSurface,
-     const wordVector& motionCompName,
-     const wordVector& propName
- )
- :
-     geometry(
-         control,
-         prop,
-         dict,
-         triSurface,
-         motionCompName,
-         propName
-         ),
-     motionModel_(
-         this->owner().template emplaceObject<MotionModel>(
-             objectFile(
-                 motionModelFile__,
-                 "",
-                 objectFile::READ_NEVER,
-                 objectFile::WRITE_ALWAYS
-                 ),
-             dict
-             )
-         ),
-     moveGeomTimer_("move geometry", &this->timers())
- {
-     findMotionIndex();
- }
-
- template<typename MotionModel>
- bool pFlow::geometryMotion<MotionModel>::beforeIteration()
- {
-     geometry::beforeIteration();
-     return true;
- }
 
  template<typename MotionModel>
  bool pFlow::geometryMotion<MotionModel>::iterate()
  {
      if( motionModel_.isMoving() )
      {
-         moveGeomTimer_.start();
-         moveGeometry();
-         moveGeomTimer_.end();
+        moveGeomTimer_.start();
+          moveGeometry();
+          this->calculateNormals();
+        moveGeomTimer_.end();
      }
      return true;
  }
-
- template<typename MotionModel>
- bool pFlow::geometryMotion<MotionModel>::afterIteration()
- {
-     geometry::afterIteration();
-     return true;
- }
-
- template<typename MotionModel>
- bool pFlow::geometryMotion<MotionModel>::moveGeometry()
- {
-
-     real dt = this->dt();
-     real t = this->currentTime();
-
-     auto pointMIndex= pointMotionIndex_.deviceVector();
-     auto mModel = motionModel_.getModel(t);
-     realx3* points = triSurface_.pointsData_D();
-     auto numPoints = triSurface_.numPoints();
-
-
-     Kokkos::parallel_for(
-         "geometryMotion<MotionModel>::movePoints",
-         numPoints,
-         LAMBDA_HD(int32 i){
-             auto newPos = mModel.transferPoint(pointMIndex[i], points[i], dt);
-             points[i] = newPos;
-         });
-
-     Kokkos::fence();
-
-     // move the motion components
-     motionModel_.move(t,dt);
-
-     // end of calculations
-     moveGeomTimer_.end();
-
-     return true;
- }*/
\ No newline at end of file
diff --git a/src/Geometry/geometryMotion/geometryMotion.hpp b/src/Geometry/geometryMotion/geometryMotion.hpp
index a7b0c3bc..157c05e0 100644
--- a/src/Geometry/geometryMotion/geometryMotion.hpp
+++ b/src/Geometry/geometryMotion/geometryMotion.hpp
@@ -37,6 +37,8 @@ class	geometryMotion
 	public geometry
 {
 public:
+	
+	using MotionModel 	 = MotionModelType;
 
 	using ModelComponent = typename MotionModelType::ModelComponent;
 
@@ -60,6 +62,9 @@ private:
 	/// determine the motion index of each triangle 
 	bool findMotionIndex();
 	
+	/// Move geometry 
+	bool moveGeometry();
+
 public:
 
 	/// Type info
@@ -77,31 +82,13 @@ public:
 			const wordVector& materialName,
 			const dictionary& motionDict);
 
-					
-		/*geometryMotion(
-			systemControl& control,
-			const property& prop,
-			const multiTriSurface& triSurface,
-			const wordVector& motionCompName,
-			const wordVector& propName,
-			const MotionModel& motionModel);*/
-
-		/// Construct from components and dictionary that contains 
-		/// motionModel
-		/*geometryMotion(systemControl& control,
-				 const property& prop,
-				 const dictionary& dict,
-				 const multiTriSurface& triSurface,
-				 const wordVector& motionCompName,
-				 const wordVector& propName);*/
-
 		/// Add virtual constructor 
-		/*add_vCtor
+		add_vCtor
 		(
 			geometry,
 			geometryMotion,
 			systemControl
-		);*/
+		);
 
 		/// Add virtual constructor 
 		add_vCtor
@@ -114,40 +101,33 @@ public:
 	// - Methods
 
 		/// Obtain motion model at time t 
-		/*auto getModel(real t)const
+		auto getModel(uint32 iter, real t, real dt)const
 		{
-			return motionModel_.getModel(t);
-		}*/
+			return motionModel_.getModelInterface(iter, t, dt);
+		}
 
 		/// TypeName / TypeInfo of motion model 
-		/*word motionModelTypeName()const override
+		word motionModelTypeName()const override
 		{
 			return motionModel_.typeName();
-		}*/
+		}
 
 		/// Access to motion model index of triangles 
-		/*const auto& triMotionIndex()const override
+		const uint32Field_D& triMotionIndex()const override
 		{
 			return triMotionIndex_;
 		}
 
 		/// Access to motion model index of points 
-		const int8Vector_HD& pointMotionIndex()const override
+		const uint32Field_D& pointMotionIndex()const override
 		{
 			return pointMotionIndex_;
-		}*/
-
-		/// Operations before each iteration 
-		/*bool beforeIteration() override;
+		}
 
 		/// Iterate geometry one time step  
 		bool iterate() override ;
 
-		/// Operations after each iteration 
-		bool afterIteration() override;*/
-
-		/// Move geometry 
-		//bool moveGeometry();
+		
 
 };
 
@@ -155,9 +135,6 @@ public:
 
 #include "geometryMotion.cpp"
 
-#ifndef BUILD_SHARED_LIBS
-	#include "geometryMotionsInstantiate.cpp"
-#endif
 
 
 #endif  //__geometryMotion_hpp__
diff --git a/src/Geometry/geometryMotion/geometryMotions.cpp b/src/Geometry/geometryMotion/geometryMotions.cpp
index 4eaa179a..8b1d1d55 100644
--- a/src/Geometry/geometryMotion/geometryMotions.cpp
+++ b/src/Geometry/geometryMotion/geometryMotions.cpp
@@ -17,9 +17,13 @@ Licence:
   implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 -----------------------------------------------------------------------------*/
-
 #include "geometryMotions.hpp"
 
-#ifdef BUILD_SHARED_LIBS
-#include "geometryMotionsInstantiate.cpp"
-#endif
+
+template class pFlow::geometryMotion<pFlow::vibratingMotion>;
+
+template class pFlow::geometryMotion<pFlow::rotatingAxisMotion>;
+
+template class pFlow::geometryMotion<pFlow::stationaryWall>;
+
+//template class pFlow::geometryMotion<pFlow::multiRotatingAxisMotion>;
diff --git a/src/Geometry/geometryMotion/geometryMotions.hpp b/src/Geometry/geometryMotion/geometryMotions.hpp
index e0c109a1..1bb078d8 100644
--- a/src/Geometry/geometryMotion/geometryMotions.hpp
+++ b/src/Geometry/geometryMotion/geometryMotions.hpp
@@ -35,9 +35,10 @@ using vibratingMotionGeometry = geometryMotion<vibratingMotion>;
 
 using rotationAxisMotionGeometry = geometryMotion<rotatingAxisMotion>;
 
+using stationaryGeometry = geometryMotion<stationaryWall>;
+
 //typedef geometryMotion<multiRotatingAxisMotion> multiRotationAxisMotionGeometry;
 
-typedef geometryMotion<stationaryWall> stationaryGeometry;
 
 
 
diff --git a/src/Geometry/geometryMotion/geometryMotionsInstantiate.cpp b/src/Geometry/geometryMotion/geometryMotionsInstantiate.cpp
deleted file mode 100644
index 334e2aad..00000000
--- a/src/Geometry/geometryMotion/geometryMotionsInstantiate.cpp
+++ /dev/null
@@ -1,32 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#include "stationaryWall.hpp"
-#include "rotatingAxisMotion.hpp"
-//#include "multiRotatingAxisMotion.hpp"
-#include "vibratingMotion.hpp"
-
-template class pFlow::geometryMotion<pFlow::stationaryWall>;
-
-template class pFlow::geometryMotion<pFlow::rotatingAxisMotion>;
-
-//template class pFlow::geometryMotion<pFlow::multiRotatingAxisMotion>;
-
-template class pFlow::geometryMotion<pFlow::vibratingMotion>;

From 49af1119f917f72ad9a7c0d4c5a03e1e382e2b58 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Fri, 22 Mar 2024 08:26:14 -0700
Subject: [PATCH 42/60] particles and sphereParticles classes were tested for
 exit boundary

---
 src/Particles/CMakeLists.txt                  |  3 +-
 .../sphereParticles/sphereParticles.cpp       | 23 +++----
 .../sphereParticles/sphereParticles.hpp       |  4 +-
 .../sphereParticlesKernels.cpp                | 16 ++---
 .../sphereParticlesKernels.hpp                | 18 +++---
 .../dynamicPointStructure.cpp                 | 19 ++++++
 .../dynamicPointStructure.hpp                 |  9 +--
 src/Particles/particles/baseShapeNames.cpp    |  5 ++
 src/Particles/particles/baseShapeNames.hpp    | 29 ++++++++-
 src/Particles/particles/particleIdHandler.cpp | 53 ++++++++--------
 src/Particles/particles/particleIdHandler.hpp | 44 ++++++++++----
 src/Particles/particles/particles.cpp         | 10 +++-
 src/Particles/particles/particles.hpp         | 36 +++++++----
 .../particles/regularParticleHandler.cpp      | 50 ++++++++++++++++
 .../particles/regularParticleHandler.hpp      | 60 +++++++++++++++++++
 15 files changed, 287 insertions(+), 92 deletions(-)
 create mode 100644 src/Particles/particles/regularParticleHandler.cpp
 create mode 100644 src/Particles/particles/regularParticleHandler.hpp

diff --git a/src/Particles/CMakeLists.txt b/src/Particles/CMakeLists.txt
index b5c78045..c1008f82 100644
--- a/src/Particles/CMakeLists.txt
+++ b/src/Particles/CMakeLists.txt
@@ -4,7 +4,8 @@ dynamicPointStructure/dynamicPointStructure.cpp
 particles/baseShapeNames.cpp
 particles/shape.cpp
 particles/particles.cpp
-#particles/particleIdHandler.cpp
+particles/particleIdHandler.cpp
+particles/regularParticleHandler.cpp
 SphereParticles/sphereShape/sphereShape.cpp
 SphereParticles/sphereParticles/sphereParticles.cpp
 SphereParticles/sphereParticles/sphereParticlesKernels.cpp
diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp b/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
index 03373f87..01579677 100644
--- a/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticles.cpp
@@ -460,11 +460,11 @@ bool pFlow::sphereParticles::beforeIteration()
 {
 	particles::beforeIteration();
 	intPredictTimer_.start();
-		dynPointStruct().predict(dt(), accelertion());
-		rVelIntegration_().predict(dt(),rVelocity_, rAcceleration_);
+		auto dt = this->dt();
+		dynPointStruct().predict(dt, accelertion());
+		rVelIntegration_().predict(dt,rVelocity_, rAcceleration_);
 	intPredictTimer_.end();
 	
-	//WARNING<<"pFlow::sphereParticles::beforeIteration()"<<END_WARNING;
 	return true;
 }
 
@@ -475,13 +475,13 @@ bool pFlow::sphereParticles::iterate()
 	accelerationTimer_.start();
 		pFlow::sphereParticlesKernels::acceleration(
 			control().g(),
-			mass().deviceView(),
-			contactForce().deviceView(),
-			I().deviceView(),
-			contactTorque().deviceView(),
+			mass().deviceViewAll(),
+			contactForce().deviceViewAll(),
+			I().deviceViewAll(),
+			contactTorque().deviceViewAll(),
 			dynPointStruct().activePointsMaskDevice(),
-			accelertion().deviceView(),
-			rAcceleration().deviceView()
+			accelertion().deviceViewAll(),
+			rAcceleration().deviceViewAll()
 			);
 	accelerationTimer_.end();
 	
@@ -504,11 +504,6 @@ bool pFlow::sphereParticles::iterate()
 	return true;
 }
 
-bool pFlow::sphereParticles::afterIteration()
-{
-	particles::afterIteration();
-	return true;
-}
 
 pFlow::word pFlow::sphereParticles::shapeTypeName()const
 {
diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp b/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp
index 8009dcb7..f2ad5e48 100644
--- a/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticles.hpp
@@ -184,9 +184,7 @@ public:
 	/// iterate particles 
 	bool iterate() override;	
 
-	/// after iteration step
-	bool afterIteration() override;
-
+	
 	realx3PointField_D& rAcceleration() override
 	{
 		return rAcceleration_;
diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.cpp b/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.cpp
index 810d9c17..5e2def60 100644
--- a/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.cpp
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.cpp
@@ -59,14 +59,14 @@ void pFlow::sphereParticlesKernels::addMassDiamInertiaProp
 
 void pFlow::sphereParticlesKernels::acceleration
 ( 
-	realx3		g,
-	deviceViewType1D<real>  	mass,
-	deviceViewType1D<realx3>  	force,
-	deviceViewType1D<real>  	I,
-	deviceViewType1D<realx3>  	torque,
-	pFlagTypeDevice 		    incld,
-	deviceViewType1D<realx3> 	lAcc,
-	deviceViewType1D<realx3> 	rAcc
+	const realx3&					g,
+	const deviceViewType1D<real>&  	mass,
+	const deviceViewType1D<realx3>& force,
+	const deviceViewType1D<real>&  	I,
+	const deviceViewType1D<realx3>& torque,
+	const pFlagTypeDevice& 		    incld,
+	deviceViewType1D<realx3>  		lAcc,
+	deviceViewType1D<realx3>  		rAcc
 )
 {
 
diff --git a/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.hpp b/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.hpp
index f2ebbe22..628b1c49 100644
--- a/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.hpp
+++ b/src/Particles/SphereParticles/sphereParticles/sphereParticlesKernels.hpp
@@ -30,7 +30,7 @@ namespace pFlow::sphereParticlesKernels
 void addMassDiamInertiaProp(
     deviceViewType1D<uint32>    shapeIndex,
     deviceViewType1D<real>  	mass,
-	deviceViewType1D<real>  	diameter,
+    deviceViewType1D<real>  	diameter,
 	deviceViewType1D<real>  	I,
     deviceViewType1D<uint32>  	propertyId,
     pFlagTypeDevice 		    incld,
@@ -41,14 +41,14 @@ void addMassDiamInertiaProp(
 );
 
 void acceleration( 
-	realx3		g,
-	deviceViewType1D<real>  	mass,
-	deviceViewType1D<realx3>  	force,
-	deviceViewType1D<real>  	I,
-	deviceViewType1D<realx3>  	torque,
-	pFlagTypeDevice 		    incld,
-	deviceViewType1D<realx3> 	lAcc,
-	deviceViewType1D<realx3> 	rAcc
+	const realx3&					g,
+	const deviceViewType1D<real>&  	mass,
+	const deviceViewType1D<realx3>& force,
+	const deviceViewType1D<real>&  	I,
+	const deviceViewType1D<realx3>& torque,
+	const pFlagTypeDevice& 		    incld,
+	deviceViewType1D<realx3>  		lAcc,
+	deviceViewType1D<realx3>  		rAcc
 );
 
 
diff --git a/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp b/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
index 4fbeeecb..593ca168 100644
--- a/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
+++ b/src/Particles/dynamicPointStructure/dynamicPointStructure.cpp
@@ -93,6 +93,25 @@ pFlow::dynamicPointStructure::dynamicPointStructure
     
 }*/
 
+bool pFlow::dynamicPointStructure::beforeIteration()
+{
+	return pointStructure::beforeIteration();
+	/*real dt = this->dt();
+
+    auto& acc = time().lookupObject<realx3PointField_D>("acceleration");
+	return predict(dt, acc);*/
+}
+
+bool pFlow::dynamicPointStructure::iterate()
+{
+	return pointStructure::iterate();
+	
+	/*real dt = this->dt();
+
+    auto& acc = time().lookupObject<realx3PointField_D>("acceleration");
+    return correct(dt, acc);*/
+}
+
 bool pFlow::dynamicPointStructure::predict(
     real dt,
     realx3PointField_D &acceleration)
diff --git a/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp b/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp
index 80f006a1..1195f389 100644
--- a/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp
+++ b/src/Particles/dynamicPointStructure/dynamicPointStructure.hpp
@@ -51,7 +51,7 @@ public:
 
 	TypeInfo("dynamicPointStructure");
 
-	dynamicPointStructure(systemControl& control);
+	explicit dynamicPointStructure(systemControl& control);
 
 	dynamicPointStructure(const dynamicPointStructure& ps) = delete;
 		
@@ -81,14 +81,15 @@ public:
 	}
 
 	/// In the time loop before iterate
-	//bool beforeIteration() override;
+	bool beforeIteration() override;
 
 	/// @brief This is called in time loop. Perform the main calculations 
 	/// when the component should evolve along time.
-	//bool iterate() override;
-
+	bool iterate() override;
+	
 		
 
+
 	bool predict(real dt, realx3PointField_D& acceleration);
 
 	bool correct(real dt, realx3PointField_D& acceleration);
diff --git a/src/Particles/particles/baseShapeNames.cpp b/src/Particles/particles/baseShapeNames.cpp
index f20efc06..eaef39cb 100644
--- a/src/Particles/particles/baseShapeNames.cpp
+++ b/src/Particles/particles/baseShapeNames.cpp
@@ -23,6 +23,10 @@ Licence:
 bool pFlow::baseShapeNames::createHashNames()
 {
 	hashNames_.clear();
+	hashes_.clear();
+
+	std::hash<word> hasher;
+
 	uint32 i=0;
 	for(const auto& nm:shapeNames_)
 	{
@@ -32,6 +36,7 @@ bool pFlow::baseShapeNames::createHashNames()
 			"  repeated name in the list of shape names: " << shapeNames_;
 			return false;
 		}
+		hashes_.push_back(hasher(nm));
 		i++;
 	}
 	hashNames_.rehash(0);
diff --git a/src/Particles/particles/baseShapeNames.hpp b/src/Particles/particles/baseShapeNames.hpp
index 8f4ca44e..bc513b06 100644
--- a/src/Particles/particles/baseShapeNames.hpp
+++ b/src/Particles/particles/baseShapeNames.hpp
@@ -36,18 +36,23 @@ class baseShapeNames
 {
 private:
 
-	size_t 				numShapes_;
+	size_t 				numShapes_ = 0;
 
 	// - hashed list of spheres names
 	wordHashMap<uint32> hashNames_;
 
 	/// list of shape names 
-	wordVector 			shapeNames_;
+	wordVector 			shapeNames_{"shapeNames"};
+
+	/// hash for names 
+	Vector<size_t> 		hashes_{"hashes"};
 	
 	bool createHashNames();
 
 	bool readFromDictionary1();	
 
+	using hasher 	= typename wordHashMap<uint32>::hasher;
+
 protected:
 
 	virtual
@@ -78,6 +83,12 @@ public:
 		return wl;
 	}
 
+	inline
+	const auto& hashes()const
+	{
+		return hashes_;
+	}
+
     inline
     size_t numShapes()const
 	{
@@ -111,6 +122,20 @@ public:
 		return false;
 	}
 
+	inline bool hashToIndex(const size_t& hs, uint32& idx)
+	{
+		for(auto i=0; i<hashes_.size(); i++)
+		{
+			if(hashes_[i]==hs)
+			{
+				idx = i;
+				return true;
+			}
+		}
+		idx = -1;
+		return false;
+	}
+
 	inline
 	bool indexValid(uint32 index)const
 	{
diff --git a/src/Particles/particles/particleIdHandler.cpp b/src/Particles/particles/particleIdHandler.cpp
index 71dec22a..c5bae004 100644
--- a/src/Particles/particles/particleIdHandler.cpp
+++ b/src/Particles/particles/particleIdHandler.cpp
@@ -20,39 +20,36 @@ Licence:
 
 #include "particleIdHandler.hpp"
 
-
-
-pFlow::particleIdHandler::particleIdHandler(int32PointField_HD & id)
+pFlow::particleIdHandler::particleIdHandler(uint32PointField_D &id)
+:
+	id_(id)
 {
-	int32 maxID = maxActive<DeviceSide>(id);
+}
 
-	if( maxID != -1 	 && id.size() == 0 )
+pFlow::uniquePtr<pFlow::particleIdHandler> 
+	pFlow::particleIdHandler::create(uint32PointField_D &id)
+{
+    word idHType = angleBracketsNames(
+        "particleIdHandler", 
+        pFlowProcessors().localRunTypeName());
+
+
+	if( pointFieldvCtorSelector_.search(idHType) )
 	{
-		nextId_ = 0;
-	}
-	else if( maxID == -1 && id.size()>0 )
-	{
-
-		nextId_ = 0; 
-		id.modifyOnHost();
-
-		ForAll(i,id)
-		{
-			if(id.isActive(i))
-			{
-				id[i] = getNextId();	
-			}
-		}
-
-		id.syncViews();
-	}
-	else if( maxID >= static_cast<int32>(id.size()) )
-	{
-		nextId_ = maxID + 1;
+		REPORT(1)<<"Creating particle id handler "<< 
+			Green_Text(idHType)<<END_REPORT;
+		return pointFieldvCtorSelector_[idHType] (id);
 	}
 	else
 	{
-		nextId_ = id.size();
+		printKeys
+		( 
+			fatalError << "Ctor Selector "<< idHType << " dose not exist. \n"
+			<<"Avaiable ones are: \n\n"
+			,
+			pointFieldvCtorSelector_
+		);
+		fatalExit;
 	}
+	return nullptr;
 }
-
diff --git a/src/Particles/particles/particleIdHandler.hpp b/src/Particles/particles/particleIdHandler.hpp
index d93e6b1f..9ec528de 100644
--- a/src/Particles/particles/particleIdHandler.hpp
+++ b/src/Particles/particles/particleIdHandler.hpp
@@ -29,20 +29,44 @@ namespace pFlow
 
 class particleIdHandler
 {
-protected:
-	int32 nextId_=0;
-public:
-	particleIdHandler(int32PointField_HD & id);
+private:
 	
-	int32 getNextId()
+  uint32PointField_D&    id_;
+
+protected:
+
+	auto& id()
 	{
-		return nextId_++;
+		return id_;
 	}
 
-	int32 nextId() const
-	{
-		return nextId_;
-	}
+public:
+	
+	TypeInfo("particleIdHandler");
+
+	explicit particleIdHandler(uint32PointField_D & id);
+
+	create_vCtor
+	(
+		particleIdHandler,
+		pointField,
+		(uint32PointField_D & id),
+		(id)
+	);
+
+	virtual 
+	~particleIdHandler()=default;
+
+	virtual
+	Pair<uint32, uint32> getIdRange(uint32 nNewParticles)=0;
+
+	virtual 
+	bool initialIdCheck()=0;
+
+	static
+	uniquePtr<particleIdHandler> create(
+		uint32PointField_D & id);
+	
 };
 
 }
diff --git a/src/Particles/particles/particles.cpp b/src/Particles/particles/particles.cpp
index cbda5c61..7b3a41d6 100644
--- a/src/Particles/particles/particles.cpp
+++ b/src/Particles/particles/particles.cpp
@@ -40,6 +40,7 @@ pFlow::particles::particles
 			objectFile::WRITE_ALWAYS
 		),
 		dynPointStruct_,
+		static_cast<uint32>(-1),
 		static_cast<uint32>(-1)
 	),
 	shapeIndex_
@@ -79,19 +80,22 @@ pFlow::particles::particles
 			objectFile::READ_IF_PRESENT,
 			objectFile::WRITE_ALWAYS),
 		dynPointStruct_,
-		zero3)
+		zero3),
+	idHandler_(particleIdHandler::create(id_))
 {
 	this->addToSubscriber(dynPointStruct_);
+
+	idHandler_().initialIdCheck();
+
 }
 
 bool pFlow::particles::beforeIteration() 
 {
 	
-	dynPointStruct_.beforeIteration();
 	zeroForce();
 	zeroTorque();
 
-	return true;
+	return dynPointStruct_.beforeIteration();
 }
 
 bool pFlow::particles::iterate()
diff --git a/src/Particles/particles/particles.hpp b/src/Particles/particles/particles.hpp
index 847b89ac..8ba1cfce 100644
--- a/src/Particles/particles/particles.hpp
+++ b/src/Particles/particles/particles.hpp
@@ -25,11 +25,11 @@ Licence:
 #include "dynamicPointStructure.hpp"
 #include "demComponent.hpp"
 #include "shape.hpp"
+#include "particleIdHandler.hpp"
 
 namespace pFlow
 {
 
-
 class particles
 :
 	public observer,
@@ -55,14 +55,11 @@ private:
 	/// contact torque field
 	realx3PointField_D     contactTorque_;
 
+	uniquePtr<particleIdHandler> idHandler_ = nullptr;
+
 	static inline
-	const message defaultMessage_ = 
-	(
-		message::CAP_CHANGED+
-		message::SIZE_CHANGED+
-		message::ITEM_INSERT+
-		message::ITEM_DELETE
-	);
+	const message defaultMessage_{message::DEFAULT}; 
+	
 	
 
 	void zeroForce()
@@ -107,10 +104,29 @@ public:
 	explicit particles(systemControl& control);
 
 
-	inline const auto& dynPointStruct()const 
+	inline 
+	const auto& dynPointStruct()const 
 	{
 		return dynPointStruct_;
-	}	
+	}
+
+	inline
+	const pointStructure& pStruct()const
+	{
+		return dynPointStruct_;
+	}
+
+	inline
+	const auto& simDomain()const
+	{
+		return dynPointStruct_.simDomain();
+	}
+
+	inline 
+	const auto& thisDomain()const
+	{
+		return dynPointStruct_.thisDomain();
+	}
 
 	inline auto size()const{
 		return dynPointStruct_.size();
diff --git a/src/Particles/particles/regularParticleHandler.cpp b/src/Particles/particles/regularParticleHandler.cpp
new file mode 100644
index 00000000..429ac0b2
--- /dev/null
+++ b/src/Particles/particles/regularParticleHandler.cpp
@@ -0,0 +1,50 @@
+#include "regularParticleHandler.hpp"
+
+
+
+pFlow::regularParticleHandler::regularParticleHandler
+(
+    uint32PointField_D & id
+)
+:
+    particleIdHandler(id)
+{
+}
+
+pFlow::Pair<pFlow::uint32, pFlow::uint32> 
+    pFlow::regularParticleHandler::getIdRange(uint32 nNewParticles)
+{
+    uint32 startId;
+    if(maxId_==-1)
+    {
+        startId = 0;
+    }
+    else
+    {
+        startId = maxId_+1;
+    }
+    uint32 endId = startId+nNewParticles-1;
+    maxId_ = endId;
+    return {startId, endId};
+}
+
+bool pFlow::regularParticleHandler::initialIdCheck()
+{
+    /// empty point structure / no particles in simulation
+    if( id().pStruct().empty() ) return true;
+
+    uint32 maxId = max(id());
+    
+    /// particles should get ids from 0 to size-1
+    if(maxId == -1)
+    {
+        fillSequence(id(),0u);
+        maxId_ = id().size()-1;
+    }
+    else
+    {
+        maxId_ = maxId;
+    }
+
+    return true;
+}
diff --git a/src/Particles/particles/regularParticleHandler.hpp b/src/Particles/particles/regularParticleHandler.hpp
new file mode 100644
index 00000000..9c4ee1dd
--- /dev/null
+++ b/src/Particles/particles/regularParticleHandler.hpp
@@ -0,0 +1,60 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+#ifndef __regularParticleHandler_hpp__
+#define __regularParticleHandler_hpp__
+
+#include "particleIdHandler.hpp"
+
+namespace pFlow
+{
+
+class regularParticleHandler
+:
+    public particleIdHandler
+{
+private:
+    
+    uint32 maxId_ = -1;
+
+public:
+
+    TypeInfo("particleIdHandler<regular>");
+
+    explicit regularParticleHandler(uint32PointField_D & id);
+
+    ~regularParticleHandler()override = default;
+
+	add_vCtor
+	(
+		particleIdHandler,
+		regularParticleHandler,
+		pointField
+	);
+
+    Pair<uint32, uint32> getIdRange(uint32 nNewParticles)override;
+
+	bool initialIdCheck()override;
+
+};
+
+}
+
+
+#endif //__regularParticleHandler_hpp__
\ No newline at end of file

From c3821d03c0f27e59ae6d3ac944020d93ecf400cd Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Fri, 22 Mar 2024 08:58:01 -0700
Subject: [PATCH 43/60] minor correction for localProcessors, localRank and
 localSize

---
 src/phasicFlow/processors/localProcessors.hpp | 6 +++---
 src/phasicFlow/processors/processors.cpp      | 4 ++--
 src/phasicFlow/processors/processors.hpp      | 4 ++--
 3 files changed, 7 insertions(+), 7 deletions(-)

diff --git a/src/phasicFlow/processors/localProcessors.hpp b/src/phasicFlow/processors/localProcessors.hpp
index b773cd57..41e07f9e 100644
--- a/src/phasicFlow/processors/localProcessors.hpp
+++ b/src/phasicFlow/processors/localProcessors.hpp
@@ -36,7 +36,7 @@ class localProcessors
 :
     public processors
 {
-protected:
+private:
 
 #ifdef pFlow_Build_MPI
     pFlow::MPI::Comm    parrentCommunicator_;
@@ -44,9 +44,9 @@ protected:
     pFlow::MPI::Comm    localCommunicator_;
 #endif
 
-    int localSize_ = 0 ;
+    int localSize_ = 1 ;
 
-    int localRank_ = -1;
+    int localRank_ = 0;
 
     bool isPartOfLocal_ = true;
 
diff --git a/src/phasicFlow/processors/processors.cpp b/src/phasicFlow/processors/processors.cpp
index 75780bc6..67f71bb2 100644
--- a/src/phasicFlow/processors/processors.cpp
+++ b/src/phasicFlow/processors/processors.cpp
@@ -46,7 +46,7 @@ void pFlow::processors::initProcessors(int argc, char *argv[])
 	if(!processors::isInitialized())
 	{
 		CheckMPI(MPI_Init(&argc, &argv), true);
-		isSelfInitialized_ = true;
+		initProcessorsCelled_ = true;
 
         argc_ = argc;
         argv_ = argv;
@@ -84,7 +84,7 @@ void pFlow::processors::finalizeProcessors()
 {
 
 #ifdef pFlow_Build_MPI
-	if(isSelfInitialized_ && !isFinalized())
+	if(initProcessorsCelled_ && !isFinalized())
 	{
         MPI::TypeFree(&pFlow::MPI::realx3Type__);
         MPI::TypeFree(&pFlow::MPI::realx4Type__);
diff --git a/src/phasicFlow/processors/processors.hpp b/src/phasicFlow/processors/processors.hpp
index 6402385c..60ae64a8 100644
--- a/src/phasicFlow/processors/processors.hpp
+++ b/src/phasicFlow/processors/processors.hpp
@@ -50,11 +50,11 @@ namespace pFlow
  */
 class processors
 {
-protected:
+private:
 
 	/// Is the static member initProcessors is called
 	static inline 
-	bool isSelfInitialized_ = false;
+	bool initProcessorsCelled_ = false;
 
 	/// Global rank of the current processor
 	static inline

From f27fbdd82c1f56b4db9f5d6263f91aa13c428b53 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Fri, 22 Mar 2024 09:01:07 -0700
Subject: [PATCH 44/60] message event update for points and boundaries

---
 src/phasicFlow/eventManagement/message.hpp  | 45 ++++++++++++++++-----
 src/phasicFlow/eventManagement/observer.cpp | 15 +++++++
 src/phasicFlow/eventManagement/observer.hpp |  2 +
 3 files changed, 52 insertions(+), 10 deletions(-)

diff --git a/src/phasicFlow/eventManagement/message.hpp b/src/phasicFlow/eventManagement/message.hpp
index 2ef7ff17..5b055d90 100644
--- a/src/phasicFlow/eventManagement/message.hpp
+++ b/src/phasicFlow/eventManagement/message.hpp
@@ -21,6 +21,7 @@ Licence:
 #define __message_hpp__
 
 #include <bitset>
+#include <array>
 
 #include "types.hpp"
 #include "iOstream.hpp"
@@ -35,22 +36,40 @@ public:
 	enum EVENT : size_t
 	{
 		DEFAULT 		= 0,
-		CAP_CHANGED 	= 1,
-		SIZE_CHANGED 	= 2,
-		ITEM_DELETE	 	= 3,
-		ITEM_INSERT  	= 4,
-		RANGE_CHANGED   = 5,
-		ITEM_REARRANGE 	= 6,
-		ITEM_TRANSFER   = 7,
-		RESET_COUNTERS  = 8	
+		CAP_CHANGED 	= 1,  // internal points capacity changed 
+		SIZE_CHANGED 	= 2,  // internal points size changed
+		ITEM_DELETE	 	= 3,  // internal points item deleted 
+		ITEM_INSERT  	= 4,  // internal points item inserted 
+		RANGE_CHANGED   = 5,  // internal points range changed 
+		ITEM_REARRANGE  = 6,  // internal points item rearrange
+		BNDR_REARRANGE 	= 7,  // boundary indices rearrange 
+		BNDR_TRANSFER   = 8,  // boundary indices transfered
+		BNDR_RESET		= 9,  // boundary indices reset entirely  
+		BNDR_DELETE 	= 10  // boundary indices deleted 
 	};
 
-protected:
+	
+private:
 
-	static constexpr size_t numberOfEvents_ = 9;
+	static constexpr size_t numberOfEvents_ = 11;
 
 	std::bitset<numberOfEvents_> events_{0x0000};
 	
+	static
+	inline const std::array<word,numberOfEvents_> eventNames_
+	{
+		"",
+		"capacity",
+		"size",
+		"deletedIndices",
+		"insertedIndices",
+		"range",
+		"rearrangedIndices",
+		"rearrangedIndices",
+		"transferredIndices",
+		"",
+		"deletedIndices"
+	};
 
 public:
 
@@ -141,6 +160,12 @@ public:
 		message msg;
 		return msg;
 	}
+
+	static
+	const word& eventName(size_t event)
+	{
+		return eventNames_[event];
+	}
 	
 };
 
diff --git a/src/phasicFlow/eventManagement/observer.cpp b/src/phasicFlow/eventManagement/observer.cpp
index 7d131d75..d7bf299a 100644
--- a/src/phasicFlow/eventManagement/observer.cpp
+++ b/src/phasicFlow/eventManagement/observer.cpp
@@ -48,6 +48,21 @@ pFlow::observer::~observer()
 	invalidateSubscriber();
 }
 
+pFlow::observer &pFlow::observer::addEvent(message::EVENT event)
+{
+    if( !message_.equivalentTo(event) )
+	{
+		message_.add(event);
+		if(!subscriber_->subscribe(message(event),this))
+		{
+			fatalErrorInFunction<<
+			"error when subcribing event from observer "<<endl;
+			fatalExit;
+		}
+	}
+	return *this;
+}
+
 void pFlow::observer::addToSubscriber
 (
 	const subscriber* subscrbr, 
diff --git a/src/phasicFlow/eventManagement/observer.hpp b/src/phasicFlow/eventManagement/observer.hpp
index 8a830c60..0c193f4c 100644
--- a/src/phasicFlow/eventManagement/observer.hpp
+++ b/src/phasicFlow/eventManagement/observer.hpp
@@ -64,6 +64,8 @@ public:
 	void subscribe(
 		const subscriber* subscrbr, 
 		message msg);
+	
+	observer& addEvent(message::EVENT event);
 
 	inline 
 	bool subscribed()const 

From be56d8ee2ede67b0f4a0d1bbf56e79a0b16ca45c Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Fri, 22 Mar 2024 09:42:23 -0700
Subject: [PATCH 45/60] MotionModel folder completed

---
 src/MotionModel/MotionModel/MotionModel.hpp   |  50 ++--
 .../multiRotatingAxis/multiRotatingAxis.hpp   |   4 +-
 .../entities/rotatingAxis/rotatingAxis.hpp    |   2 +-
 .../entities/rotatingAxis/rotatingAxisI.hpp   |   2 +-
 .../entities/stationary/stationary.hpp        |   4 +-
 .../entities/vibrating/vibrating.hpp          |   4 +-
 .../rotatingAxisMotion-old.cpp                | 170 ------------
 .../rotatingAxisMotion-old.hpp                | 247 -----------------
 .../rotatingAxisMotion/rotatingAxisMotion.cpp |  31 ++-
 .../rotatingAxisMotion/rotatingAxisMotion.hpp |  13 +-
 .../stationaryWall/stationaryWall.cpp         |   4 +-
 .../stationaryWall/stationaryWall.hpp         |  30 ++
 .../vibratingMotion/vibratingMotion-old.cpp   | 167 -----------
 .../vibratingMotion/vibratingMotion-old.hpp   | 259 ------------------
 .../vibratingMotion/vibratingMotion.cpp       |  24 +-
 .../vibratingMotion/vibratingMotion.hpp       |  16 +-
 16 files changed, 127 insertions(+), 900 deletions(-)
 delete mode 100644 src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.cpp
 delete mode 100644 src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.hpp
 delete mode 100644 src/MotionModel/vibratingMotion/vibratingMotion-old.cpp
 delete mode 100644 src/MotionModel/vibratingMotion/vibratingMotion-old.hpp

diff --git a/src/MotionModel/MotionModel/MotionModel.hpp b/src/MotionModel/MotionModel/MotionModel.hpp
index db1cdf46..6dae3175 100644
--- a/src/MotionModel/MotionModel/MotionModel.hpp
+++ b/src/MotionModel/MotionModel/MotionModel.hpp
@@ -32,7 +32,9 @@ Licence:
 namespace pFlow
 {
 
-
+/**
+ * @brief Motion model abstract class (CRTP) for all the motion models 
+*/
 template<typename Model, typename Component>
 class MotionModel
 {
@@ -123,49 +125,45 @@ private:
 
 protected:
 	
+	/// @brief  obtain a reference to the actual motion model
 	inline
 	auto& getModel()
 	{
 		return static_cast<ModelType&>(*this);
 	}
 
+	/// @brief  Obtain a const reference to the actual motion model 
 	inline
 	const auto& getModel()const
 	{
 		return static_cast<const ModelType&>(*this);
 	}
 
-	// implementation details goes here
+	/// Return a none object for the motion model 
 	inline
 	auto impl_noneComponent()const
 	{
 		return ModelType::noneComponent();
 	}
 	
-	/// name of the compoenent to index of the component 
+	/// Name of the compoenent to index of the component 
 	bool impl_nameToIndex(const word& name, uint32& idx)const;
 	
 	/// Component index to motion component name
-	 
 	bool impl_indexToName(uint32 i, word& name)const;
 
+	/// const reference to the list of component names 
+	inline 
 	const wordList& impl_componentNames()const
 	{
 		return componentNames_;
 	}
 
-	bool impl_isMoving()const
-	{
-		return false;
-	}
-
-	bool impl_move(uint32, real, real)const
-	{
-		return true;
-	}
-
+	/// Return model interface 
 	auto impl_getModelInterface(uint32 iter, real t, real dt)const
 	{
+		getModel().impl_setTime(iter, t, dt);
+
 		return ModelInterface(
 			motionComponents_.deviceViewAll(), 
 			numComponents_);
@@ -174,6 +172,7 @@ protected:
 	/// Read from dictionary 
 	bool impl_readDictionary(const dictionary& dict);
 
+	/// Write to dictionary 
 	bool impl_writeDictionary(dictionary& dict)const;
 
 public:
@@ -199,21 +198,7 @@ public:
 		~MotionModel() = default;
 
 	// - Methods
-		/// Return the motion model at time t 
-		/*Model getModel(real t)
-		{
-			for(int32 i= 0; i<numAxis_; i++ )
-			{
-				axis_[i].setTime(t);
-			}
-			axis_.modifyOnHost();
-			axis_.syncViews();
-
-			return Model(axis_.deviceVector(), numAxis_);
-		}*/
-
-		/// Motion component name to index
-	
+		
 		/// name of the compoenent to index of the component 
 		bool nameToIndex(const word& name, uint32& idx)const
 		{
@@ -226,23 +211,26 @@ public:
 			return getModel().impl_indexToName(idx, name);
 		}
 
+		/// @brief  Return a const reference to the list of compoenent names 
+		/// @return 
 		const wordList& componentNames()const
 		{
 			return getModel().impl_componentNames();
 		}
 		
-		/// Are walls moving 
+		/// Is the wall assocciated to this motion component moving?
 		bool isMoving()const
 		{
 			return getModel().impl_isMoving();
 		}
 
-		/// Move 
+		/// Move the component itself
 		bool move(uint32 iter, real t, real dt)
 		{
 			return getModel().impl_move(iter, t, dt);
 		}
 
+		/// Obtain an object to model interface 
 		auto getModelInterface(uint32 iter, real t, real dt)const
 		{
 			return getModel().impl_getModelInterface(iter, t, dt);
diff --git a/src/MotionModel/entities/multiRotatingAxis/multiRotatingAxis.hpp b/src/MotionModel/entities/multiRotatingAxis/multiRotatingAxis.hpp
index 2f2d81de..c79e87c8 100644
--- a/src/MotionModel/entities/multiRotatingAxis/multiRotatingAxis.hpp
+++ b/src/MotionModel/entities/multiRotatingAxis/multiRotatingAxis.hpp
@@ -78,7 +78,7 @@ class multiRotatingAxis
 {
 protected:
 
-	/// This is either host/device pointer to all axes
+	/// This is device pointer to all axes
 	multiRotatingAxis*		axisList_;
 
 	/// Index of parent axis
@@ -170,7 +170,7 @@ public:
 		/// Set the pointer to the list of all axes.
 		/// This pointer is device pointer 
 		INLINE_FUNCTION_H
-		void setAxisList(multiRotatingAxis* axisList)
+		void setAxisListPtr(multiRotatingAxis* axisList)
 		{
 			axisList_ = axisList;
 		}
diff --git a/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp b/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp
index 2625ad30..7d40f06e 100644
--- a/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp
+++ b/src/MotionModel/entities/rotatingAxis/rotatingAxis.hpp
@@ -129,7 +129,7 @@ public:
 	realx3 linVelocityPoint(const realx3 &p)const;
 
 	INLINE_FUNCTION_HD
-	realx3 transferPoint(const realx3 p, real dt);
+	realx3 transferPoint(const realx3 p, real dt)const;
 
 	// - IO operation
 
diff --git a/src/MotionModel/entities/rotatingAxis/rotatingAxisI.hpp b/src/MotionModel/entities/rotatingAxis/rotatingAxisI.hpp
index 5ade50c2..10a730cc 100755
--- a/src/MotionModel/entities/rotatingAxis/rotatingAxisI.hpp
+++ b/src/MotionModel/entities/rotatingAxis/rotatingAxisI.hpp
@@ -30,7 +30,7 @@ pFlow::realx3 pFlow::rotatingAxis::linVelocityPoint(const realx3 &p)const
 }
 
 INLINE_FUNCTION_HD 
-pFlow::realx3 pFlow::rotatingAxis::transferPoint(const realx3 p, real dt)
+pFlow::realx3 pFlow::rotatingAxis::transferPoint(const realx3 p, real dt)const
 {
     return  rotate(p, *this, dt);
 }
diff --git a/src/MotionModel/entities/stationary/stationary.hpp b/src/MotionModel/entities/stationary/stationary.hpp
index 43dd495f..723ae31f 100644
--- a/src/MotionModel/entities/stationary/stationary.hpp
+++ b/src/MotionModel/entities/stationary/stationary.hpp
@@ -60,13 +60,13 @@ public:
 	{}
 
 	INLINE_FUNCTION_HD
-	realx3 linTangentialVelocityPoint(const realx3 &)const
+	realx3 linVelocityPoint(const realx3 &)const
 	{
 		return zero3;
 	}
 
 	INLINE_FUNCTION_HD
-	realx3 transferPoint(const realx3& p, real dt)
+	realx3 transferPoint(const realx3& p, real)const
 	{
 		return p;
 	}
diff --git a/src/MotionModel/entities/vibrating/vibrating.hpp b/src/MotionModel/entities/vibrating/vibrating.hpp
index f7c3f56b..42e73451 100644
--- a/src/MotionModel/entities/vibrating/vibrating.hpp
+++ b/src/MotionModel/entities/vibrating/vibrating.hpp
@@ -117,13 +117,13 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	realx3 linTangentialVelocityPoint(const realx3 &)const
+	realx3 linVelocityPoint(const realx3 &)const
 	{
 		return velocity_;
 	}
 
 	INLINE_FUNCTION_HD
-	realx3 transferPoint(const realx3& p, real dt)
+	realx3 transferPoint(const realx3& p, real dt)const
 	{
 		if(!inTimeRange()) return p;
 		return p + 0.5*dt*(velocity0_+velocity_);
diff --git a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.cpp b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.cpp
deleted file mode 100644
index 9ef21e44..00000000
--- a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.cpp
+++ /dev/null
@@ -1,170 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#include "rotatingAxisMotion.hpp"
-#include "dictionary.hpp"
-#include "vocabs.hpp"
-
-
-bool pFlow::rotatingAxisMotion::readDictionary
-(
-	const dictionary& dict
-)
-{
-
-	auto motionModel = dict.getVal<word>("motionModel");
-
-	if(motionModel != "rotatingAxisMotion")
-	{
-		fatalErrorInFunction<<
-		"  motionModel should be rotatingAxisMotion, but found "
-		 << motionModel <<endl;
-		return false;
-	}
-
-	auto& motionInfo = dict.subDict("rotatingAxisMotionInfo");
-	auto axisNames = motionInfo.dictionaryKeywords();
-	
-	axis_.reserve(axisNames.size()+1);
-	
-	
-	axis_.clear();
-	axisName_.clear();
-
-		
-	for(auto& aName: axisNames)
-	{
-		auto& axDict = motionInfo.subDict(aName);
-		
-		if(auto axPtr = makeUnique<rotatingAxis>(axDict); axPtr)
-		{
-			axis_.push_back(axPtr());
-			axisName_.push_back(aName);
-		}
-		else
-		{
-			fatalErrorInFunction<<
-			"could not read rotating axis from "<< axDict.globalName()<<endl;
-			return false;
-		}
-	}
-
-
-
-	if( !axisName_.search("none") )
-	{
-		axis_.push_back
-		(
-			rotatingAxis(
-				realx3(0.0,0.0,0.0),
-				realx3(1.0,0.0,0.0),
-				0.0
-				)
-		);
-		axisName_.push_back("none");	
-	}
-
-	axis_.syncViews();
-	numAxis_ = axis_.size();
-
-	return true;
-}
-
-bool pFlow::rotatingAxisMotion::writeDictionary
-(
-	dictionary& dict
-)const
-{
-	dict.add("motionModel", "rotatingAxisMotion");
-
-	auto& motionInfo = dict.subDictOrCreate("rotatingAxisMotionInfo");
-	
-	ForAll(i, axis_)
-	{
-		
-		auto& axDict = motionInfo.subDictOrCreate(axisName_[i]);
-		if( !axis_.hostVectorAll()[i].write(axDict))
-		{
-			fatalErrorInFunction<<
-			"  error in writing axis "<< axisName_[i] << " to dicrionary "
-			<< motionInfo.globalName()<<endl;
-			return false;
-		}
-	}
-
-	return true;
-}
-
-pFlow::rotatingAxisMotion::rotatingAxisMotion()
-{}
-
-pFlow::rotatingAxisMotion::rotatingAxisMotion
-(
-	const dictionary& dict
-)
-{
-	if(! readDictionary(dict) )
-	{
-		fatalExit;
-	}
-}
-
-bool pFlow::rotatingAxisMotion::read
-(
-	iIstream& is
-)
-{
-	// create an empty file dictionary
-	dictionary motionInfo(motionModelFile__, true);
-
-	// read dictionary from stream
-	if( !motionInfo.read(is) )
-	{
-		ioErrorInFile(is.name(), is.lineNumber()) <<
-		"  error in reading dictionray " << motionModelFile__ <<" from file. \n";
-		return false;
-	}
-
-	if( !readDictionary(motionInfo) ) return false;
-	
-	return true;
-}
-
-bool pFlow::rotatingAxisMotion::write
-(
-	iOstream& os
-)const
-{
-	// create an empty file dictionary
-	dictionary motionInfo(motionModelFile__, true);
-
-	if( !writeDictionary(motionInfo))
-	{
-		return false;
-	}
-
-	if( !motionInfo.write(os) )
-	{
-		ioErrorInFile( os.name(), os.lineNumber() )<<
-		"  error in writing dictionray to file. \n";
-		return false;
-	}
-	return true;
-}
\ No newline at end of file
diff --git a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.hpp b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.hpp
deleted file mode 100644
index eacf7ca3..00000000
--- a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion-old.hpp
+++ /dev/null
@@ -1,247 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#ifndef __rotatingAxisMotion_hpp__
-#define __rotatingAxisMotion_hpp__
-
-
-#include "types.hpp"
-#include "typeInfo.hpp"
-#include "VectorDual.hpp"
-#include "Vectors.hpp"
-#include "List.hpp"
-#include "rotatingAxis.hpp"
-
-
-namespace pFlow
-{
-
-class dictionary;
-
-/**
- * Rotating axis motion model for walls
- * 
- * This class is used for simulaiton that at least one wall components 
- * is moving according to rotatingAxis motion mode. One or more than one
- * motion components can be defined in rotatingAxisMotionInfo dictionary
- * 
-\verbatim
-// In geometryDict file, this will defines rotating walls during simulation
-...
-motionModel rotatingAxisMotion;
-
-rotatingAxisMotionInfo
-{
-	rotationAxis1
-	{
-		// the definition based on class rotatingAxis
-	}
-	rotatoinAxis2
-	{
-		// the definition based on calss rotatingAxis
-	}
-}
-...
-\endverbatim
- *
- */
-class rotatingAxisMotion
-{
-public:
-	
-	/** Motion model class to be passed to computational units/kernels for
-	 *  transfing points and returning velocities at various positions
-	 */
-	class Model
-	{
-	protected:
-		
-		deviceViewType1D<rotatingAxis> 	axis_;
-		int32 							numAxis_=0;
-
-	public:
-
-		INLINE_FUNCTION_HD
-		Model(deviceViewType1D<rotatingAxis> axis, int32 numAxis):
-			axis_(axis),
-			numAxis_(numAxis)
-		{}
-
-		INLINE_FUNCTION_HD
-		Model(const Model&) = default;
-		
-		
-		INLINE_FUNCTION_HD
-		Model& operator=(const Model&) = default;
-
-
-		INLINE_FUNCTION_HD
-		realx3 pointVelocity(int32 n, const realx3& p)const
-		{
-			return axis_[n].linTangentialVelocityPoint(p);
-		}
-
-		INLINE_FUNCTION_HD
-		realx3 operator()(int32 n, const realx3& p)const
-		{
-			return pointVelocity(n,p);
-		}
-
-		INLINE_FUNCTION_HD
-		realx3 transferPoint(int32 n, const realx3 p, real dt)const
-		{
-			return rotate(p, axis_[n], dt);	
-		}
-
-		INLINE_FUNCTION_HD int32 numComponents()const
-		{
-			return numAxis_;
-		}
-	};
-
-protected:
-
-	using axisVector_HD = VectorDual<rotatingAxis>;
-
-	/// Vector to store axes 
-	axisVector_HD 	axis_;
-	
-	/// Names of axes
-	wordList  		axisName_;
-
-	/// Number of axes components
-	label  			numAxis_= 0;
-
-	/// Read from dictionary 
-	bool readDictionary(const dictionary& dict);
-
-	/// Write to dictionary
-	bool writeDictionary(dictionary& dict)const;
-
-public:
-	
-	/// Type info
-	TypeInfoNV("rotatingAxisMotion");
-
-	// - Constructors 
-	
-		/// Empty
-		FUNCTION_H
-		rotatingAxisMotion();
-
-		/// Construct with dictionary 
-		FUNCTION_H
-		rotatingAxisMotion(const dictionary& dict);
-
-		/// Copy constructor 
-		FUNCTION_H
-		rotatingAxisMotion(const rotatingAxisMotion&) = default;
-
-		/// No move constructor 
-		rotatingAxisMotion(rotatingAxisMotion&&) = delete;
-
-		/// Copy assignment
-		FUNCTION_H
-		rotatingAxisMotion& operator=(const rotatingAxisMotion&) = default;
-
-		/// No move assignment
-		rotatingAxisMotion& operator=(rotatingAxisMotion&&) = delete;
-
-		/// Destructor 
-		FUNCTION_H
-		~rotatingAxisMotion() = default;
-
-	// - Methods
-		/// Return the motion model at time t 
-		Model getModel(real t)
-		{
-			for(int32 i= 0; i<numAxis_; i++ )
-			{
-				axis_[i].setTime(t);
-			}
-			axis_.modifyOnHost();
-			axis_.syncViews();
-
-			return Model(axis_.deviceVector(), numAxis_);
-		}
-
-		/// Motion component name to index
-		INLINE_FUNCTION_H
-		int32 nameToIndex(const word& name)const
-		{
-			if( auto i = axisName_.findi(name); i == -1)
-			{
-				fatalErrorInFunction<<
-				"axis name " << name << " does not exist. \n";
-				fatalExit;
-				return i;
-			}
-			else
-			{
-				return i;
-			}
-			
-		}
-
-		/// Motion index to motion component name 
-		INLINE_FUNCTION_H
-		word indexToName(label i)const
-		{
-			if(i < numAxis_ )
-				return axisName_[i];
-			else
-			{
-				fatalErrorInFunction<<
-				"out of range access to the list of axes " << i <<endl<<
-				" size of axes_ is "<<numAxis_<<endl;
-				fatalExit;
-				return "";
-			}
-		}
-
-		
-		/// Are walls moving 
-		INLINE_FUNCTION_HD
-		bool isMoving()const
-		{
-			return true;
-		}
-
-		/// Move 
-		INLINE_FUNCTION_H
-		bool move(real t, real dt)
-		{
-			return true;
-		}
-
-	// - IO operation 
-		/// Read from input stream is 
-		FUNCTION_H
-		bool read(iIstream& is);
-
-		/// Write to output stream os
-		FUNCTION_H
-		bool write(iOstream& os)const;
-
-};
-
-} // pFlow
-
-#endif //__rotatingAxisMotion_hpp__
diff --git a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp
index 70b1d26d..b47e9c30 100644
--- a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp
+++ b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.cpp
@@ -20,17 +20,30 @@ Licence:
 
 #include "rotatingAxisMotion.hpp"
 
-
-pFlow::rotatingAxisMotion::rotatingAxisMotion
+void pFlow::rotatingAxisMotion::impl_setTime
 (
-	const objectFile &objf, 
-	repository *owner
-)
-:
-	fileDictionary(objf, owner)
+	uint32 iter, 
+	real t, 
+	real dt
+)const
+{
+	auto motion = motionComponents_.deviceViewAll();
+	Kokkos::parallel_for(
+		"rotatingAxisMotion::impl_setTime",
+		deviceRPolicyStatic(0, numComponents_),
+		LAMBDA_HD(uint32 i){
+			motion[i].setTime(t);
+		});
+	Kokkos::fence();
+}
+
+pFlow::rotatingAxisMotion::rotatingAxisMotion(
+    const objectFile &objf,
+    repository *owner)
+    : fileDictionary(objf, owner)
 {
 
-	if(! getModel().impl_readDictionary(*this) )
+	if(! impl_readDictionary(*this) )
 	{
 		fatalErrorInFunction;
 		fatalExit;
@@ -46,7 +59,7 @@ pFlow::rotatingAxisMotion::rotatingAxisMotion
 :
 	fileDictionary(objf, dict, owner)
 {
-	if(! getModel().impl_readDictionary(*this) )
+	if(!impl_readDictionary(*this) )
 	{
 		fatalErrorInFunction;
 		fatalExit;
diff --git a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp
index 95df979e..a46350bd 100644
--- a/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp
+++ b/src/MotionModel/rotatingAxisMotion/rotatingAxisMotion.hpp
@@ -34,7 +34,7 @@ namespace pFlow
  * 
  * This class is used for simulaiton that at least one wall components 
  * is moving according to rotatingAxis motion mode. One or more than one
- * motion components can be defined in rotatingAxisMotionInfo dictionary
+ * motion components can be defined in rotatingAxisInfo dictionary
  * 
 \verbatim
 // In geometryDict file, this will defines rotating walls during simulation
@@ -63,10 +63,21 @@ class rotatingAxisMotion
 {
 protected:
 
+	friend MotionModel<rotatingAxisMotion, rotatingAxis>;
+
+	/// is the geometry attached to this component moving
 	bool impl_isMoving()const
 	{
 		return true;
 	}
+
+	/// move the component itself
+	bool impl_move(uint32, real, real)const
+	{
+		return true;
+	}
+
+	void impl_setTime(uint32 iter, real t, real dt)const;
 	
 public:
 
diff --git a/src/MotionModel/stationaryWall/stationaryWall.cpp b/src/MotionModel/stationaryWall/stationaryWall.cpp
index 1440c094..ff581496 100644
--- a/src/MotionModel/stationaryWall/stationaryWall.cpp
+++ b/src/MotionModel/stationaryWall/stationaryWall.cpp
@@ -30,7 +30,7 @@ pFlow::stationaryWall::stationaryWall
 	fileDictionary(objf, owner)
 {
 
-	if(! getModel().impl_readDictionary(*this) )
+	if(!impl_readDictionary(*this) )
 	{
 		fatalErrorInFunction;
 		fatalExit;
@@ -46,7 +46,7 @@ pFlow::stationaryWall::stationaryWall
 :
 	fileDictionary(objf, dict, owner)
 {
-	if(! getModel().impl_readDictionary(*this) )
+	if(!impl_readDictionary(*this) )
 	{
 		fatalErrorInFunction;
 		fatalExit;
diff --git a/src/MotionModel/stationaryWall/stationaryWall.hpp b/src/MotionModel/stationaryWall/stationaryWall.hpp
index f440cfdd..514cba1d 100644
--- a/src/MotionModel/stationaryWall/stationaryWall.hpp
+++ b/src/MotionModel/stationaryWall/stationaryWall.hpp
@@ -30,6 +30,26 @@ namespace pFlow
 {
 
 
+/**
+ * stationary model for walls
+ * 
+ * This class is used for simulaiton that all wall components 
+ * are fixed.
+ * 
+\verbatim
+// In geometryDict file, this will defines stationary walls
+...
+motionModel stationary;
+
+// this dictionary is optional
+stationaryInfo
+{
+	
+}
+...
+\endverbatim
+ *
+ */
 class stationaryWall
 :
     public fileDictionary,
@@ -37,11 +57,21 @@ class stationaryWall
 {
 protected:
 
+	friend MotionModel<stationaryWall, stationary>;
+  
 	bool impl_isMoving()const
 	{
 		return false;
 	}
+
+	bool impl_move(uint32, real, real)const
+	{
+		return true;
+	}
 	
+	void impl_setTime(uint32 ,real ,real )const
+	{}
+
 public:
 
 	TypeInfo("stationaryWall");
diff --git a/src/MotionModel/vibratingMotion/vibratingMotion-old.cpp b/src/MotionModel/vibratingMotion/vibratingMotion-old.cpp
deleted file mode 100644
index 1cc472a8..00000000
--- a/src/MotionModel/vibratingMotion/vibratingMotion-old.cpp
+++ /dev/null
@@ -1,167 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#include "vibratingMotion.hpp"
-#include "dictionary.hpp"
-#include "vocabs.hpp"
-
-
-bool pFlow::vibratingMotion::readDictionary
-(
-	const dictionary& dict
-)
-{
-
-	auto motionModel = dict.getVal<word>("motionModel");
-
-	if(motionModel != "vibratingMotion")
-	{
-		fatalErrorInFunction<<
-		"  motionModel should be vibratingMotion, but found "
-		 << motionModel <<endl;
-		return false;
-	}
-
-	auto& motionInfo = dict.subDict("vibratingMotionInfo");
-	auto compNames = motionInfo.dictionaryKeywords();
-	
-	components_.reserve(compNames.size()+1);
-	
-	
-	components_.clear();
-	componentName_.clear();
-
-		
-	for(auto& cName: compNames)
-	{
-		auto& compDict = motionInfo.subDict(cName);
-		
-		if(auto compPtr = makeUnique<vibrating>(compDict); compPtr)
-		{
-			components_.push_back(compPtr());
-			componentName_.push_back(cName);
-		}
-		else
-		{
-			fatalErrorInFunction<<
-			"could not read vibrating motion from "<< compDict.globalName()<<endl;
-			return false;
-		}
-	}
-
-
-
-	if( !componentName_.search("none") )
-	{
-		components_.push_back
-		(
-			vibrating()
-		);
-		componentName_.push_back("none");	
-	}
-
-	components_.syncViews();
-	numComponents_ = components_.size();
-	
-
-	return true;
-}
-
-bool pFlow::vibratingMotion::writeDictionary
-(
-	dictionary& dict
-)const
-{
-	dict.add("motionModel", "vibratingMotion");
-
-	auto& motionInfo = dict.subDictOrCreate("vibratingMotionInfo");
-	
-	ForAll(i, components_)
-	{
-		
-		auto& compDict = motionInfo.subDictOrCreate(componentName_[i]);
-		if( !components_.hostVectorAll()[i].write(compDict))
-		{
-			fatalErrorInFunction<<
-			"  error in writing motion compoonent "<< componentName_[i] << " to dicrionary "
-			<< motionInfo.globalName()<<endl;
-			return false;
-		}
-	}
-
-	return true;
-}
-
-pFlow::vibratingMotion::vibratingMotion()
-{}
-
-pFlow::vibratingMotion::vibratingMotion
-(
-	const dictionary& dict
-)
-{
-	if(! readDictionary(dict) )
-	{
-		fatalExit;
-	}
-}
-
-bool pFlow::vibratingMotion::read
-(
-	iIstream& is
-)
-{
-	// create an empty file dictionary
-	dictionary motionInfo(motionModelFile__, true);
-
-	// read dictionary from stream
-	if( !motionInfo.read(is) )
-	{
-		ioErrorInFile(is.name(), is.lineNumber()) <<
-		"  error in reading dictionray " << motionModelFile__ <<" from file. \n";
-		return false;
-	}
-
-	if( !readDictionary(motionInfo) ) return false;
-	
-	return true;
-}
-
-bool pFlow::vibratingMotion::write
-(
-	iOstream& os
-)const
-{
-	// create an empty file dictionary
-	dictionary motionInfo(motionModelFile__, true);
-
-	if( !writeDictionary(motionInfo))
-	{
-		return false;
-	}
-
-	if( !motionInfo.write(os) )
-	{
-		ioErrorInFile( os.name(), os.lineNumber() )<<
-		"  error in writing dictionray to file. \n";
-		return false;
-	}
-	return true;
-}
\ No newline at end of file
diff --git a/src/MotionModel/vibratingMotion/vibratingMotion-old.hpp b/src/MotionModel/vibratingMotion/vibratingMotion-old.hpp
deleted file mode 100644
index 4392ed09..00000000
--- a/src/MotionModel/vibratingMotion/vibratingMotion-old.hpp
+++ /dev/null
@@ -1,259 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#ifndef __vibratingMotion_hpp__
-#define __vibratingMotion_hpp__
-
-
-#include "types.hpp"
-#include "typeInfo.hpp"
-#include "VectorDual.hpp"
-#include "Vectors.hpp"
-#include "List.hpp"
-#include "vibrating.hpp"
-
-
-
-namespace pFlow
-{
-
-// forward
-class dictionary;
-
-/**
- * Vibrating motion model for walls
- * 
- * This class is used for simulaiton that at least one wall components 
- * are moving according to a sinoidal viration defined in class vibrating.
- * One or more than one motion components can be defined in 
- * vibratingMotionInfo dictionary
- * 
-\verbatim
-// In geometryDict file, this will defines vibrating walls during simulation
-...
-motionModel vibratingMotion;
-
-vibratingMotionInfo
-{
-	vibComponent1
-	{
-		// the definition based on class vibrating
-	}
-	vibComponent2
-	{
-		// the definition based on calss vibrating
-	}
-}
-...
-\endverbatim
- *
- */
-class vibratingMotion
-{
-public:
-	
-	/** Motion model class to be passed to computational units/kernels for
-	 *  transfing points and returning velocities at various positions
-	 */
-	class Model
-	{
-	protected:
-		
-		deviceViewType1D<vibrating> 	components_;
-		int32 							numComponents_=0;
-
-	public:
-
-		INLINE_FUNCTION_HD
-		Model(deviceViewType1D<vibrating> comps, int32 numComps):
-			components_(comps),
-			numComponents_(numComps)
-		{}
-
-		INLINE_FUNCTION_HD
-		Model(const Model&) = default;
-		
-		
-		INLINE_FUNCTION_HD
-		Model& operator=(const Model&) = default;
-
-
-		INLINE_FUNCTION_HD
-		realx3 pointVelocity(int32 n, const realx3& p)const
-		{
-			return components_[n].linTangentialVelocityPoint(p);
-		}
-
-		INLINE_FUNCTION_HD
-		realx3 operator()(int32 n, const realx3& p)const
-		{
-			return pointVelocity(n,p);
-		}
-
-		INLINE_FUNCTION_HD
-		realx3 transferPoint(int32 n, const realx3 p, real dt)const
-		{
-			return components_[n].transferPoint(p, dt);	
-		}
-
-		INLINE_FUNCTION_HD int32 numComponents()const
-		{
-			return numComponents_;
-		}
-	};
-
-protected:
-
-	using axisVector_HD = VectorDual<vibrating>;
-
-	/// Vibrating motion components 
-	axisVector_HD 	components_;
-	
-	/// Names of components
-	wordList  		componentName_;
-
-	/// Number of components
-	label  			numComponents_= 0;
-
-	/// Read from a dictionary
-	bool readDictionary(const dictionary& dict);
-
-	/// Write to a dictionary 
-	bool writeDictionary(dictionary& dict)const;
-
-public:
-	
-	/// Type info
-	TypeInfoNV("vibratingMotion");
-
-	/// Empty
-	FUNCTION_H
-	vibratingMotion();
-
-	/// Construct with dictionary 
-	FUNCTION_H
-	vibratingMotion(const dictionary& dict);
-
-	/// Copy constructor 
-	FUNCTION_H
-	vibratingMotion(const vibratingMotion&) = default;
-
-	/// No move 
-	vibratingMotion(vibratingMotion&&) = delete;
-
-	/// Copy assignment 
-	FUNCTION_H
-	vibratingMotion& operator=(const vibratingMotion&) = default;
-
-	/// No Move assignment 
-	vibratingMotion& operator=(vibratingMotion&&) = delete;
-
-	/// Destructor 
-	FUNCTION_H
-	~vibratingMotion() = default;
-
-	/// Return motion model at time t 
-	Model getModel(real t)
-	{
-		for(int32  i= 0; i<numComponents_; i++ )
-		{
-			components_[i].setTime(t);
-		}
-		components_.modifyOnHost();
-		components_.syncViews();
-
-		return Model(components_.deviceVectorAll(), numComponents_);
-	}
-
-	/// Name to component index 
-	INLINE_FUNCTION_H
-	int32 nameToIndex(const word& name)const
-	{
-		if( auto i = componentName_.findi(name); i == -1)
-		{
-			fatalErrorInFunction<<
-			"component name " << name << " does not exist. \n";
-			fatalExit;
-			return i;
-		}
-		else
-		{
-			return i;
-		}
-		
-	}
-
-	/// Index to name 
-	INLINE_FUNCTION_H
-	word indexToName(label i)const
-	{
-		if(i < numComponents_ )
-			return componentName_[i];
-		else
-		{
-			fatalErrorInFunction<<
-			"out of range access to the list of axes " << i <<endl<<
-			" size of components_ is "<<numComponents_<<endl;
-			fatalExit;
-			return "";
-		}
-	}
-
-	/// velocity at point p according to motion component n	
-	INLINE_FUNCTION_H
-	realx3 pointVelocity(label n, const realx3& p)const 
-	{
-		return components_.hostVectorAll()[n].linTangentialVelocityPoint(p);
-	}
-
-	/// Transfer point p for dt seconds based on motion component n 
-	INLINE_FUNCTION_H
-	realx3 transferPoint(label n, const realx3 p, real dt)const
-	{
-		return components_.hostVectorAll()[n].transferPoint(p, dt);
-	}
-
-	/// Is moving 
-	INLINE_FUNCTION_HD
-	bool isMoving()const
-	{
-		return true;
-	}
-
-	/// Move ponits at time t for dt seconds 
-	INLINE_FUNCTION_H
-	bool move(real t, real dt)
-	{
-		return true;
-	}
-
-	/// Read from input stream is 
-	FUNCTION_H
-	bool read(iIstream& is);
-
-	/// Write to output stream os
-	FUNCTION_H
-	bool write(iOstream& os)const;
-
-};
-
-} // pFlow
-
-#endif //__rotatingAxisMotion_hpp__
diff --git a/src/MotionModel/vibratingMotion/vibratingMotion.cpp b/src/MotionModel/vibratingMotion/vibratingMotion.cpp
index 1226384c..896a35e0 100644
--- a/src/MotionModel/vibratingMotion/vibratingMotion.cpp
+++ b/src/MotionModel/vibratingMotion/vibratingMotion.cpp
@@ -1,11 +1,29 @@
 #include "vibratingMotion.hpp"
 
+void pFlow::vibratingMotion::impl_setTime
+(
+	uint32 iter, 
+	real t, 
+	real dt
+)const
+{
+	auto motion = motionComponents_.deviceViewAll();
+	Kokkos::parallel_for(
+		"vibratingMotion::impl_setTime",
+		deviceRPolicyStatic(0, numComponents_),
+		LAMBDA_HD(uint32 i){
+			motion[i].setTime(t);
+		});
+	Kokkos::fence();
+}
+
 pFlow::vibratingMotion::vibratingMotion
 (
-    const objectFile &objf, 
+    const objectFile &objf,
     repository *owner
-):
-    fileDictionary(objf, owner)
+) 
+: 
+	fileDictionary(objf, owner)
 {
     if(! getModel().impl_readDictionary(*this) )
 	{
diff --git a/src/MotionModel/vibratingMotion/vibratingMotion.hpp b/src/MotionModel/vibratingMotion/vibratingMotion.hpp
index 65b9e3c2..8c64e3a5 100644
--- a/src/MotionModel/vibratingMotion/vibratingMotion.hpp
+++ b/src/MotionModel/vibratingMotion/vibratingMotion.hpp
@@ -39,14 +39,14 @@ namespace pFlow
  * This class is used for simulaiton that at least one wall components 
  * are moving according to a sinoidal viration defined in class vibrating.
  * One or more than one motion components can be defined in 
- * vibratingMotionInfo dictionary
+ * vibratingInfo dictionary
  * 
 \verbatim
 // In geometryDict file, this will defines vibrating walls during simulation
 ...
-motionModel vibratingMotion;
+motionModel vibrating;
 
-vibratingMotionInfo
+vibratingInfo
 {
 	vibComponent1
 	{
@@ -68,12 +68,22 @@ class vibratingMotion
 {
 
 protected:
+	
+	friend MotionModel<vibratingMotion, vibrating>;
 
 	bool impl_isMoving()const
 	{
 		return true;
 	}
 
+	/// move the component itself
+	bool impl_move(uint32, real, real)const
+	{
+		return true;
+	}
+
+	void impl_setTime(uint32 iter, real t, real dt)const;
+
 public:
 	
 	/// Type info

From d21b7276e149564bed218fd90d6306d4450497d1 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 01:46:19 -0700
Subject: [PATCH 46/60] Interaction folder is finalized with adjustable box and
 tested for rotating drum

---
 src/Interaction/CMakeLists.txt                |   5 +
 .../Models/contactForce/linearCF.hpp          |  15 +-
 .../Models/contactForce/nonLinearCF.hpp       |  12 +-
 .../Models/contactForce/nonLinearMod.hpp      |  10 +-
 .../Models/rolling/normalRolling.hpp          |   8 +-
 .../contactLists/sortedContactList.hpp        |  22 +-
 src/Interaction/contactLists/sortedPairs.hpp  |  40 +-
 .../contactLists/unsortedContactList.hpp      |  16 +-
 .../contactLists/unsortedPairs.hpp            |  34 +-
 .../ContactSearch/ContactSearch.hpp           | 199 +++-----
 .../ContactSearch/ContactSearchs.cpp          |  10 +-
 .../contactSearch/contactSearch.cpp           |  25 +-
 .../contactSearch/contactSearch.hpp           |  83 ++--
 .../contactSearch/contactSearchFunctions.hpp  |  11 -
 .../contactSearchGlobals.hpp}                 |  21 +-
 src/Interaction/contactSearch/methods/NBS.hpp | 209 ---------
 .../contactSearch/methods/NBSCrossLoop.hpp    |  82 ----
 .../contactSearch/methods/NBSLevel.hpp        | 127 -----
 .../contactSearch/methods/NBSLevel0.hpp       | 240 ----------
 .../contactSearch/methods/NBSLevels.hpp       | 438 ------------------
 .../contactSearch/methods/NBSLoop.hpp         | 101 ----
 .../methods/cellBased/NBS/NBS.cpp}            | 105 ++---
 .../methods/cellBased/NBS/NBS.hpp             | 148 ++++++
 .../methods/cellBased/NBS/NBSLevel0.cpp       | 118 +++++
 .../methods/cellBased/NBS/NBSLevel0.hpp       |  98 ++++
 .../cellBased/NBS/NBSLevel0Kernels.hpp        |  83 ++++
 .../methods/cellBased/NBS/NBSLoop.hpp         | 100 ++++
 .../methods/cellBased/NBS/cellsWallLevel0.cpp | 195 ++++++++
 .../methods/cellBased/NBS/cellsWallLevel0.hpp | 139 ++++++
 .../methods/cellBased/NBS/mapperNBS.cpp       | 194 ++++++++
 .../methods/cellBased/NBS/mapperNBS.hpp       | 212 +++++++++
 .../cellBased/NBS/mapperNBSKernels.cpp        | 192 ++++++++
 .../cellBased/NBS/mapperNBSKernels.hpp}       |  54 +--
 .../{ => methods/cellBased}/cells.hpp         | 107 ++---
 .../contactSearch/methods/mapperNBS.hpp       | 389 ----------------
 .../contactSearch/methods/multiGridNBS.hpp    | 213 ---------
 .../methods/particleWallContactSearchs.cpp    |  78 ++++
 .../methods/particleWallContactSearchs.hpp    | 123 +++++
 .../wallMappings/cellMapping.hpp              | 150 ------
 .../wallMappings/cellsWallLevel0.hpp          | 285 ------------
 .../wallMappings/cellsWallLevels.hpp          | 152 ------
 .../wallMappings/multiGridMapping.hpp         | 153 ------
 src/Interaction/interaction/interaction.cpp   |  36 +-
 src/Interaction/interaction/interaction.hpp   |  59 +--
 .../sphereInteraction/sphereInteraction.cpp   | 201 ++++++--
 .../sphereInteraction/sphereInteraction.hpp   | 167 ++-----
 .../sphereInteractionKernels.hpp              |  18 +-
 .../sphereInteraction/sphereInteractions.cpp  |  35 +-
 48 files changed, 2252 insertions(+), 3260 deletions(-)
 rename src/Interaction/{interaction/interactionTypes.hpp => contactSearch/contactSearchGlobals.hpp} (75%)
 delete mode 100644 src/Interaction/contactSearch/methods/NBS.hpp
 delete mode 100644 src/Interaction/contactSearch/methods/NBSCrossLoop.hpp
 delete mode 100644 src/Interaction/contactSearch/methods/NBSLevel.hpp
 delete mode 100644 src/Interaction/contactSearch/methods/NBSLevel0.hpp
 delete mode 100644 src/Interaction/contactSearch/methods/NBSLevels.hpp
 delete mode 100644 src/Interaction/contactSearch/methods/NBSLoop.hpp
 rename src/Interaction/{interaction/interactionBase.hpp => contactSearch/methods/cellBased/NBS/NBS.cpp} (50%)
 create mode 100644 src/Interaction/contactSearch/methods/cellBased/NBS/NBS.hpp
 create mode 100644 src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0.cpp
 create mode 100644 src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0.hpp
 create mode 100644 src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0Kernels.hpp
 create mode 100644 src/Interaction/contactSearch/methods/cellBased/NBS/NBSLoop.hpp
 create mode 100644 src/Interaction/contactSearch/methods/cellBased/NBS/cellsWallLevel0.cpp
 create mode 100644 src/Interaction/contactSearch/methods/cellBased/NBS/cellsWallLevel0.hpp
 create mode 100644 src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.cpp
 create mode 100644 src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.hpp
 create mode 100644 src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBSKernels.cpp
 rename src/Interaction/{interaction/demInteraction.hpp => contactSearch/methods/cellBased/NBS/mapperNBSKernels.hpp} (59%)
 rename src/Interaction/contactSearch/{ => methods/cellBased}/cells.hpp (62%)
 delete mode 100644 src/Interaction/contactSearch/methods/mapperNBS.hpp
 delete mode 100644 src/Interaction/contactSearch/methods/multiGridNBS.hpp
 create mode 100644 src/Interaction/contactSearch/methods/particleWallContactSearchs.cpp
 create mode 100644 src/Interaction/contactSearch/methods/particleWallContactSearchs.hpp
 delete mode 100644 src/Interaction/contactSearch/wallMappings/cellMapping.hpp
 delete mode 100644 src/Interaction/contactSearch/wallMappings/cellsWallLevel0.hpp
 delete mode 100644 src/Interaction/contactSearch/wallMappings/cellsWallLevels.hpp
 delete mode 100644 src/Interaction/contactSearch/wallMappings/multiGridMapping.hpp

diff --git a/src/Interaction/CMakeLists.txt b/src/Interaction/CMakeLists.txt
index 25d43014..7e9212da 100644
--- a/src/Interaction/CMakeLists.txt
+++ b/src/Interaction/CMakeLists.txt
@@ -1,5 +1,10 @@
 
 set(SourceFiles 
+contactSearch/methods/cellBased/NBS/mapperNBS.cpp
+contactSearch/methods/cellBased/NBS/mapperNBSKernels.cpp
+contactSearch/methods/cellBased/NBS/NBSLevel0.cpp
+contactSearch/methods/cellBased/NBS/NBS.cpp
+contactSearch/methods/cellBased/NBS/cellsWallLevel0.cpp
 contactSearch/contactSearch/contactSearch.cpp
 contactSearch/ContactSearch/ContactSearchs.cpp
 interaction/interaction.cpp
diff --git a/src/Interaction/Models/contactForce/linearCF.hpp b/src/Interaction/Models/contactForce/linearCF.hpp
index 5ef6da3e..88bf2108 100644
--- a/src/Interaction/Models/contactForce/linearCF.hpp
+++ b/src/Interaction/Models/contactForce/linearCF.hpp
@@ -133,8 +133,9 @@ protected:
 			return false;
 		}
 
-		realVector etha_n(nElem);
-		realVector etha_t(nElem);
+		realVector etha_n("etha_n", nElem);
+		realVector etha_t("etha_t", nElem);
+
 		ForAll(i , kn)
 		{
 			etha_n[i] = -2.0*log(en[i])*sqrt(kn[i])/
@@ -144,7 +145,7 @@ protected:
 					sqrt(pow(log(et[i]),2.0)+ pow(Pi,2.0));
 		}
 
-		Vector<linearProperties> prop(nElem);
+		Vector<linearProperties> prop("prop", nElem);
 		ForAll(i,kn)
 		{
 			prop[i] = {kn[i], kt[i], etha_n[i], etha_t[i], mu[i]};
@@ -219,10 +220,10 @@ public:
 	void contactForce
 	(
 		const real dt,
-		const int32 i,
-		const int32 j,
-		const int32 propId_i,
-		const int32 propId_j,
+		const uint32 i,
+		const uint32 j,
+		const uint32 propId_i,
+		const uint32 propId_j,
 		const real Ri,
 		const real Rj,
 		const real ovrlp_n,
diff --git a/src/Interaction/Models/contactForce/nonLinearCF.hpp b/src/Interaction/Models/contactForce/nonLinearCF.hpp
index b9f42d69..3ba1c5c5 100644
--- a/src/Interaction/Models/contactForce/nonLinearCF.hpp
+++ b/src/Interaction/Models/contactForce/nonLinearCF.hpp
@@ -121,7 +121,7 @@ protected:
 		}
 
 
-		realVector etha_n(nElem);
+		realVector etha_n("etha_n",nElem);
 		
 		ForAll(i , en)
 		{
@@ -137,7 +137,7 @@ protected:
 
 		}
 
-		Vector<nonLinearProperties> prop(nElem);
+		Vector<nonLinearProperties> prop("prop",nElem);
 		ForAll(i,Yeff)
 		{
 			prop[i] = {Yeff[i], Geff[i], etha_n[i], mu[i]};
@@ -214,10 +214,10 @@ public:
 	void contactForce
 	(
 		const real dt,
-		const int32 i,
-		const int32 j,
-		const int32 propId_i,
-		const int32 propId_j,
+		const uint32 i,
+		const uint32 j,
+		const uint32 propId_i,
+		const uint32 propId_j,
 		const real Ri,
 		const real Rj,
 		const real ovrlp_n,
diff --git a/src/Interaction/Models/contactForce/nonLinearMod.hpp b/src/Interaction/Models/contactForce/nonLinearMod.hpp
index 3bfbd29b..9a771970 100644
--- a/src/Interaction/Models/contactForce/nonLinearMod.hpp
+++ b/src/Interaction/Models/contactForce/nonLinearMod.hpp
@@ -121,7 +121,7 @@ protected:
 		}
 
 
-		Vector<nonLinearProperties> prop(nElem);
+		Vector<nonLinearProperties> prop("prop",nElem);
 		ForAll(i,Yeff)
 		{
 			prop[i] = {Yeff[i], Geff[i], etha_n[i], mu[i]};
@@ -198,10 +198,10 @@ public:
 	void contactForce
 	(
 		const real dt,
-		const int32 i,
-		const int32 j,
-		const int32 propId_i,
-		const int32 propId_j,
+		const uint32 i,
+		const uint32 j,
+		const uint32 propId_i,
+		const uint32 propId_j,
 		const real Ri,
 		const real Rj,
 		const real ovrlp_n,
diff --git a/src/Interaction/Models/rolling/normalRolling.hpp b/src/Interaction/Models/rolling/normalRolling.hpp
index de850e3c..80b8e321 100644
--- a/src/Interaction/Models/rolling/normalRolling.hpp
+++ b/src/Interaction/Models/rolling/normalRolling.hpp
@@ -76,10 +76,10 @@ public:
 	void rollingFriction
 	(
 		const real dt,
-		const int32 i,
-		const int32 j,
-		const int32 propId_i,
-		const int32 propId_j,
+		const uint32 i,
+		const uint32 j,
+		const uint32 propId_i,
+		const uint32 propId_j,
 		const real Ri,
 		const real Rj,
 		const realx3& wi,
diff --git a/src/Interaction/contactLists/sortedContactList.hpp b/src/Interaction/contactLists/sortedContactList.hpp
index 45c8e4b0..73f0ce4b 100644
--- a/src/Interaction/contactLists/sortedContactList.hpp
+++ b/src/Interaction/contactLists/sortedContactList.hpp
@@ -53,7 +53,7 @@ protected:
 
 	ViewType1D<ValueType,ExecutionSpace> 	values_;
 
-	int32 									size0_ = 0;
+	uint32 									size0_ = 0;
 
 	ViewType1D<PairType,ExecutionSpace> 	sortedPairs0_;
 
@@ -73,7 +73,7 @@ protected:
 	using rpReFillPairs = Kokkos::RangePolicy<
 		ExecutionSpace,
 		Kokkos::Schedule<Kokkos::Static>,
-		Kokkos::IndexType<int32>,
+		Kokkos::IndexType<uint32>,
 		TagReFillPairs>;
 
 public:
@@ -81,7 +81,7 @@ public:
 	TypeInfoNV("sortedContactList");
 
 
-	sortedContactList(int32 initialSize =1)
+	explicit sortedContactList(uint32 initialSize =1)
 	:
 		SortedPairs(initialSize),
 		values_("values", SortedPairs::capacity()),
@@ -114,31 +114,31 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	ValueType getValue(int32 idx)const
+	ValueType getValue(uint32 idx)const
 	{
 		return values_[idx];
 	}
 
 	INLINE_FUNCTION_HD
-	void setValue(int32 idx, const ValueType& val)const
+	void setValue(uint32 idx, const ValueType& val)const
 	{
 		values_[idx] = val;
 	}
 
 	INLINE_FUNCTION_HD
-	void operator()(TagReFillPairs, int32 idx)const
+	void operator()(TagReFillPairs, uint32 idx)const
 	{
 
-		auto searchLen = max(size0_/1000,10);
-		auto start 	= max(0,idx-searchLen);
-		auto end 	= min(size0_,idx+searchLen);
+		uint32 searchLen = max(size0_/1000u,10u);
+		uint32 start 	= idx-min(searchLen,idx);
+		uint32 end 	= min(size0_,idx+searchLen);
 		auto newPair = this->sortedPairs_[idx];
 		if(	auto idx0 = binarySearch(
 				sortedPairs0_,
 				start,
 				end,
 				newPair);
-				idx0>=0)
+				idx0!=-1)
 		{
 			values_[idx] = values0_[idx0];
 		}
@@ -147,7 +147,7 @@ public:
 			start, 
 			end,
 			newPair);
-			idx0>=0)
+			idx0!=-1)
 		{
 			values_[idx] = values0_[idx0];
 			
diff --git a/src/Interaction/contactLists/sortedPairs.hpp b/src/Interaction/contactLists/sortedPairs.hpp
index d8b74a50..12593810 100644
--- a/src/Interaction/contactLists/sortedPairs.hpp
+++ b/src/Interaction/contactLists/sortedPairs.hpp
@@ -52,24 +52,24 @@ public:
 	{
 		using PairType = typename sortedPairs::PairType;
 
-		int32 size_;
+		uint32 size_;
 
 		ViewType1D<PairType,ExecutionSpace> sortedParis_;
 
 		INLINE_FUNCTION_HD
-		int32 size()const { return size_; }
+		uint32 size()const { return size_; }
 
 		INLINE_FUNCTION_HD
-		int32 loopCount()const { return size_; }
+		uint32 loopCount()const { return size_; }
 
 		INLINE_FUNCTION_HD
-		bool isValid(int32 i)const { return i<size_; }
+		bool isValid(uint32 i)const { return i<size_; }
 
 		INLINE_FUNCTION_HD
-		PairType getPair(int i)const {	return sortedParis_[i];	}
+		PairType getPair(uint32 i)const {	return sortedParis_[i];	}
 
 		INLINE_FUNCTION_HD
-		bool getPair(int32 i, PairType& pair)const {
+		bool getPair(uint32 i, PairType& pair)const {
 			if(i<size_)	{
 				pair = sortedParis_[i];
 				return true;
@@ -85,22 +85,22 @@ public:
 protected:
 
 	/// size of pair list
-	int32 			size_ = 0;
+	uint32 			size_ = 0;
 
-	ViewType1D<int32,ExecutionSpace>		flags_;
+	ViewType1D<uint32,ExecutionSpace>		flags_;
 
 	ViewType1D<PairType,ExecutionSpace> 	sortedPairs_;
 
 	using rpFillFlag = Kokkos::RangePolicy<
 		ExecutionSpace,
 		Kokkos::Schedule<Kokkos::Static>,
-		Kokkos::IndexType<int32>,
+		Kokkos::IndexType<uint32>,
 		TagFillFlag	>;
 
 	using rpFillPairs = Kokkos::RangePolicy<
 		ExecutionSpace,
 		Kokkos::Schedule<Kokkos::Static>,
-		Kokkos::IndexType<int32>,
+		Kokkos::IndexType<uint32>,
 		TagFillPairs>;
 	
 public:
@@ -110,7 +110,7 @@ public:
 
 
 	// constructors
-	sortedPairs(int32 initialSize =1)
+	explicit sortedPairs(uint32 initialSize =1)
 	:
 		UnsortedPairs(initialSize),
 		flags_("flags_",UnsortedPairs::capacity()+1),
@@ -134,7 +134,7 @@ public:
 	//   return the pair at index idx
 	//   perform no check for size and existance
 	INLINE_FUNCTION_HD
-	PairType getPair(int32 idx)const
+	PairType getPair(uint32 idx)const
 	{
 		return sortedPairs_[idx];
 	}
@@ -142,7 +142,7 @@ public:
 	// - Device/host call
 	//   return the pair at index idx
 	INLINE_FUNCTION_HD
-	bool getPair(int32 idx, PairType& p)const
+	bool getPair(uint32 idx, PairType& p)const
 	{
 		if(isValid(idx))
 		{
@@ -156,7 +156,7 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	bool isValid(int32 idx)const
+	bool isValid(uint32 idx)const
 	{
 		return idx < size_;	
 	}
@@ -164,12 +164,12 @@ public:
 
 	//use this when the value of size_ is updated
 	INLINE_FUNCTION_H
-	int32 size()const
+	uint32 size()const
 	{
 		return size_;
 	}
 
-	int32 loopCount()const
+	uint32 loopCount()const
 	{
 		return size_;
 	}
@@ -189,7 +189,7 @@ public:
 	void prepareSorted()
 	{
 		// first check the size of flags_ 
-		int32 capacity = UnsortedPairs::capacity();
+		uint32 capacity = UnsortedPairs::capacity();
 
 		if( capacity+1 > flags_.size() )
 		{
@@ -218,7 +218,7 @@ public:
 		if( size_>sortedPairs_.size() )
 		{
 			// get more space to prevent reallocations in next iterations
-			int32 len = size_*1.1+1; 
+			uint32 len = size_*1.1+1; 
 			reallocNoInit(sortedPairs_, len);
 		}
 		
@@ -235,7 +235,7 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	void operator()(TagFillFlag, int32 i)const
+	void operator()(TagFillFlag, uint32 i)const
 	{
 		if(this->container_.valid_at(i) )
 			flags_[i] = 1;
@@ -244,7 +244,7 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	void operator()(TagFillPairs, int32 i)const
+	void operator()(TagFillPairs, uint32 i)const
 	{
 		auto fi = flags_[i];
 		if(fi!=flags_[i+1])
diff --git a/src/Interaction/contactLists/unsortedContactList.hpp b/src/Interaction/contactLists/unsortedContactList.hpp
index f2200fd9..2a3150b1 100644
--- a/src/Interaction/contactLists/unsortedContactList.hpp
+++ b/src/Interaction/contactLists/unsortedContactList.hpp
@@ -72,7 +72,7 @@ protected:
 	using rpFillPairs = Kokkos::RangePolicy<
 		ExecutionSpace,
 		Kokkos::Schedule<Kokkos::Static>,
-		Kokkos::IndexType<int32>,
+		Kokkos::IndexType<uint32>,
 		TagReFillPairs>;
 
 
@@ -80,7 +80,7 @@ public:
 
 	TypeInfoNV("unsortedContactList");
 
-	unsortedContactList(int32 capacity=1)
+	explicit unsortedContactList(uint32 capacity=1)
 	:
 		UnsortedPairs(capacity),
 		values_("values", UnsortedPairs::capacity()),
@@ -122,7 +122,7 @@ public:
 	INLINE_FUNCTION_HD
 	bool getValue(const PairType& p, ValueType& val)const
 	{
-		if(auto idx = this->find(p); idx>=0)
+		if(auto idx = this->find(p); idx!=-1)
 		{
 			val = getValue(idx); 
 			return true;
@@ -131,7 +131,7 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	void setValue(int32 idx, const ValueType& val)const
+	void setValue(uint32 idx, const ValueType& val)const
 	{
 		values_[idx] = val;
 	}
@@ -139,7 +139,7 @@ public:
 	INLINE_FUNCTION_HD
 	bool setValue(const PairType& p, const ValueType& val)const
 	{
-		if(auto idx = this->find(p); idx>=0)
+		if(uint32 idx = this->find(p); idx!=-1)
 		{
 			setValue(idx, val);
 			return true;;
@@ -148,13 +148,13 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	void operator()(TagReFillPairs, int32 idx)const
+	void operator()(TagReFillPairs, uint32 idx)const
 	{
 		if( this->isValid(idx) )
 		{
-			if( int32 idx0 = 
+			if( uint32 idx0 = 
 					container0_.find(this->getPair(idx));
-					idx0>=0 )
+					idx0!=-1 )
 			{
 				values_[idx] = values0_[idx0];
 			}
diff --git a/src/Interaction/contactLists/unsortedPairs.hpp b/src/Interaction/contactLists/unsortedPairs.hpp
index e9434751..fd4f117d 100644
--- a/src/Interaction/contactLists/unsortedPairs.hpp
+++ b/src/Interaction/contactLists/unsortedPairs.hpp
@@ -41,7 +41,7 @@ public:
 
 	using memory_space 		= typename ExecutionSpace::memory_space;
 
-	using PairType 			= kPair<idType,idType>;
+	using PairType 			= Pair<idType,idType>;
 
 	using ContainerType 	= unorderedSet<PairType, ExecutionSpace>;
 
@@ -52,19 +52,19 @@ public:
 		ContainerType 		Container_;
 
 		INLINE_FUNCTION_HD
-		int32 size()const { return Container_.size(); }
+		uint32 size()const { return Container_.size(); }
 
 		INLINE_FUNCTION_HD
-		int32 loopCount()const { return Container_.capacity(); }
+		uint32 loopCount()const { return Container_.capacity(); }
 
 		INLINE_FUNCTION_HD
-		bool isValid(int32 idx)const { return Container_.valid_at(idx); }
+		bool isValid(uint32 idx)const { return Container_.valid_at(idx); }
 
 		INLINE_FUNCTION_HD
-		PairType getPair(int idx)const {	return Container_.key_at(idx); }
+		PairType getPair(uint32 idx)const {	return Container_.key_at(idx); }
 
 		INLINE_FUNCTION_HD
-		bool getPair(int32 idx, PairType& pair)const {
+		bool getPair(uint32 idx, PairType& pair)const {
 			if(Container_.valid_at(idx))	{
 				pair = Container_.key_at(idx);
 				return true;
@@ -84,7 +84,7 @@ public:
 	TypeInfoNV("unsorderedPairs");
 
 	// constructor
-	unsortedPairs(int32 capacity=1)
+	explicit unsortedPairs(uint32 capacity=1)
 	:
 		container_(capacity) // the minimum capacity would be 128 
 	{}
@@ -102,7 +102,7 @@ public:
 	
 	// - Device call
 	INLINE_FUNCTION_HD
-	int32 insert(idType i, idType j)const
+	uint32 insert(idType i, idType j)const
 	{
 		if(auto insertResult = container_.insert(PairType(i,j)); insertResult.failed())
 			return -1;
@@ -112,7 +112,7 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	int32 insert(const PairType& p)const
+	uint32 insert(const PairType& p)const
 	{
 		if(auto insertResult = container_.insert(p); insertResult.failed())
 			return -1;
@@ -125,7 +125,7 @@ public:
 	//   return the pair at index idx
 	//   perform no check for size and existance
 	INLINE_FUNCTION_HD
-	PairType getPair(int32 idx)const
+	PairType getPair(uint32 idx)const
 	{
 		return container_.key_at(idx);
 	}
@@ -133,7 +133,7 @@ public:
 	// - Device call
 	//   return the pair at index idx
 	INLINE_FUNCTION_HD
-	bool getPair(int32 idx, PairType& p)const
+	bool getPair(uint32 idx, PairType& p)const
 	{
 		if(container_.valid_at(idx))
 		{
@@ -148,7 +148,7 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	int32 find(const PairType & p)const
+	uint32 find(const PairType & p)const
 	{
 		if( auto idx = container_.find(p); 
 			idx != Kokkos::UnorderedMapInvalidIndex )
@@ -158,26 +158,26 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	bool isValid(int32 idx)const
+	bool isValid(uint32 idx)const
 	{
 		return container_.valid_at(idx);	
 	}
 
 
 	INLINE_FUNCTION_HD
-	int32 capacity() const
+	uint32 capacity() const
 	{
 		return container_.capacity();
 	}
 
-	int32 loopCount()const
+	uint32 loopCount()const
 	{
 		return container_.capacity();
 	}
 	
 	//use this when the value of size_ is updated
 	INLINE_FUNCTION_H
-	int32 size()const
+	uint32 size()const
 	{
 		return container_.size();
 	}
@@ -190,7 +190,7 @@ public:
 	/// increase the capacity of the container by at-least len 
 	/// the content will be erased. 
 	INLINE_FUNCTION_H
-	void increaseCapacityBy(int32 len)
+	void increaseCapacityBy(uint32 len)
 	{
 		uint newCap = container_.capacity()+len;
 		this->clear();
diff --git a/src/Interaction/contactSearch/ContactSearch/ContactSearch.hpp b/src/Interaction/contactSearch/ContactSearch/ContactSearch.hpp
index d6428064..84fe8c95 100644
--- a/src/Interaction/contactSearch/ContactSearch/ContactSearch.hpp
+++ b/src/Interaction/contactSearch/ContactSearch/ContactSearch.hpp
@@ -22,16 +22,17 @@ Licence:
 #ifndef __ContactSearch_hpp__
 #define __ContactSearch_hpp__
 
-
+#include "contactSearchGlobals.hpp"
 #include "contactSearch.hpp"
 #include "box.hpp"
+#include "particles.hpp"
+#include "geometry.hpp"
 
 namespace pFlow
 {
 
 template<
-	template<class> class BaseMethod,
-	template<class> class WallMapping	
+	class searchMethod
 >
 class ContactSearch
 :
@@ -39,32 +40,19 @@ class ContactSearch
 {
 public:
 	
-	using IdType 			= typename contactSearch::IdType;
+	using IdType 			= uint32;
 
-	using IndexType 		= typename contactSearch::IndexType;
+	using ExecutionSpace 	= DefaultExecutionSpace;
 
-	using ExecutionSpace 	= typename contactSearch::ExecutionSpace;
+	using SearchMethodType = searchMethod;
 
-	using PairContainerType = typename contactSearch::PairContainerType;
-
-	using ParticleContactSearchType = 
-		BaseMethod<
-			ExecutionSpace>;
-
-	using WallMappingType =
-		WallMapping<
-			ExecutionSpace>;
-
-protected:
+private:
 	
-
-	uniquePtr<ParticleContactSearchType> particleContactSearch_ = nullptr;
-
-	uniquePtr<WallMappingType> 			 wallMapping_ = nullptr;
+	uniquePtr<SearchMethodType> 	ppwContactSearch_ = nullptr;
 
 public:
 
-	TypeInfoTemplate2("ContactSearch", ParticleContactSearchType, WallMappingType);
+	TypeInfoTemplate11("ContactSearch", SearchMethodType);
 
 	ContactSearch(
 		const dictionary& csDict,
@@ -74,54 +62,41 @@ public:
 	 	Timers& timers)
 	:
 		contactSearch(csDict, domain, prtcl, geom, timers)
-		
 	{
 
 		auto method = dict().getVal<word>("method");
-		auto wmMethod = dict().getVal<word>("wallMapping");
-		
+				
 		auto nbDict = dict().subDict(method+"Info");
 
 		real minD, maxD;
 		this->Particles().boundingSphereMinMax(minD, maxD);
 		
-		const auto& position = this->Particles().pointPosition().deviceVectorAll();
-		const auto& diam = this->Particles().boundingSphere().deviceVectorAll();
+		const auto& position = this->Particles().pointPosition().deviceViewAll();
+		const auto& flags = this->Particles().dynPointStruct().activePointsMaskDevice();
+		const auto& diam = this->Particles().boundingSphere().deviceViewAll();
 
-		particleContactSearch_ = 
-			makeUnique<ParticleContactSearchType>
+		uint32 wnPoints = this->Geometry().numPoints();
+		uint32 wnTri    = this->Geometry().size();
+		const auto& wPoints = this->Geometry().points().deviceViewAll();
+		const auto& wVertices = this->Geometry().vertices().deviceViewAll();
+
+		ppwContactSearch_ = 
+			makeUnique<SearchMethodType>
 			(
 				nbDict,
-				this->domain(),
+				this->domainBox(),
 				minD,
 				maxD,
 				position,
-				diam
-			);
-		REPORT(2)<<"Contact search algorithm for particle-particle is "<<
-				 greenText(particleContactSearch_().typeName())<<endREPORT;
-
-
-		auto wmDict = dict().subDict(wmMethod+"Info");
-
-		int32 wnPoints = this->Geometry().numPoints();
-		int32 wnTri    = this->Geometry().size();
-
-		const auto& wPoints = this->Geometry().points().deviceVectorAll();
-		const auto& wVertices = this->Geometry().vertices().deviceVectorAll();
-
-		wallMapping_ = 
-			makeUnique<WallMappingType>(
-				wmDict,
-				particleContactSearch_().numLevels(),
-				particleContactSearch_().getCellsLevels(),
+				flags,
+				diam,
 				wnPoints,
-				wnTri, 
+				wnTri,
 				wPoints,
 				wVertices
-				);
-		REPORT(2)<<"Wall mapping algorithm for particle-wall is "<<
-				 greenText(wallMapping_().typeName())<< endREPORT;
+			);
+		REPORT(2)<<"Contact search algorithm for particle-particle is "<<
+				 Green_Text(ppwContactSearch_().typeName())<<END_REPORT;
 
 	}
 
@@ -130,116 +105,60 @@ public:
 		contactSearch,
 		ContactSearch,
 		dictionary);
+
 	
 	bool broadSearch(
-		PairContainerType& ppPairs,
-		PairContainerType& pwPairs,
+		uint32 iter,
+		real t,
+		real dt,
+		csPairContainerType& ppPairs,
+		csPairContainerType& pwPairs,
 		bool force = false) override
 	{
 
+		ppTimer().start();
+
+		const auto& position = Particles().pointPosition().deviceViewAll();
+		const auto& flags = Particles().dynPointStruct().activePointsMaskDevice();
+		const auto& diam = Particles().boundingSphere().deviceViewAll();
 		
-		if(particleContactSearch_)
+		
+		if( !ppwContactSearch_().broadSearch(
+			iter,
+			t,
+			dt,
+			ppPairs, 
+			pwPairs,
+			position, 
+			flags, 
+			diam,
+			force) )
 		{
-			auto activeRange = this->Particles().activeRange();
-
-			sphereSphereTimer_.start();
-
-			if(this->Particles().allActive())
-			{		
-				particleContactSearch_().broadSearch(ppPairs, activeRange, force);
-			}
-			else
-			{		
-				particleContactSearch_().broadSearch(ppPairs, activeRange, this->Particles().activePointsMaskD(), force);
-			}
-
-			sphereSphereTimer_.end();
-
-		}
-		else
+			fatalErrorInFunction;
 			return false;
-		
-		if(wallMapping_)
-		{
-			sphereWallTimer_.start();
-			wallMapping_().broadSearch(pwPairs, particleContactSearch_(), force);
-			sphereWallTimer_.end();
 		}
-		else
-			return false;
+		ppTimer().end();
 
-		
-		
+				
+	
 		return true;
 	}
 
 
-	bool ppEnterBroadSearch()const override
+	bool enterBroadSearch(uint32 iter, real t, real dt)const override
 	{
-		if(particleContactSearch_)
+		if(ppwContactSearch_)
 		{
-			return particleContactSearch_().enterBoadSearch(); 
+			return ppwContactSearch_().performSearch(iter); 
 		}
 		return false;
 	}
 
-	bool pwEnterBroadSearch()const override
+	bool performedBroadSearch()const override
 	{
-		if(wallMapping_)
-		{
-			return wallMapping_().enterBoadSearch();
-		}
-		return false;
+		return ppwContactSearch_().performedSearch();
 	}
 	
-
-	bool ppPerformedBroadSearch()const override
-	{
-		if(particleContactSearch_)
-		{
-			return particleContactSearch_().performedSearch();
-		}
-		return false;
-	}
-
-	
-	bool pwPerformedBroadSearch()const override
-	{
-		if(wallMapping_)
-		{
-			return wallMapping_().performedSearch();
-		}
-		return false;
-	}
-
-	/*bool update(const eventMessage& msg) 
-	{
-		if(msg.isSizeChanged() ) 
-		{
-			auto newSize = this->prtcl().size();
-			if(!particleContactSearch_().objectSizeChanged(newSize))
-			{
-				fatalErrorInFunction<<
-				"erro in changing the size for particleContactSearch_ \n";
-				return false;
-			}
-		}
-
-		if(msg.isCapacityChanged() ) 
-		{
-			auto newSize = this->prtcl().capacity();
-			if(!particleContactSearch_().objectSizeChanged(newSize))
-			{
-				fatalErrorInFunction<<
-				"erro in changing the capacity for particleContactSearch_ \n";
-				return false;
-			}
-		}	
-		
-		return true;
-	}*/
-	
-	
 };
 
 }
diff --git a/src/Interaction/contactSearch/ContactSearch/ContactSearchs.cpp b/src/Interaction/contactSearch/ContactSearch/ContactSearchs.cpp
index 043e9b78..61024220 100644
--- a/src/Interaction/contactSearch/ContactSearch/ContactSearchs.cpp
+++ b/src/Interaction/contactSearch/ContactSearch/ContactSearchs.cpp
@@ -20,11 +20,11 @@ Licence:
 
 #include "ContactSearch.hpp"
 
-#include "cellMapping.hpp"
+//#include "cellMapping.hpp"
 #include "NBS.hpp"
-#include "multiGridNBS.hpp"
-#include "multiGridMapping.hpp"
+//#include "multiGridNBS.hpp"
+//#include "multiGridMapping.hpp"
 
 
-template class pFlow::ContactSearch<pFlow::NBS, pFlow::cellMapping>;
-template class pFlow::ContactSearch<pFlow::multiGridNBS, pFlow::multiGridMapping>;
+template class pFlow::ContactSearch<pFlow::NBS>;
+//template class pFlow::ContactSearch<pFlow::multiGridNBS, pFlow::multiGridMapping>;
diff --git a/src/Interaction/contactSearch/contactSearch/contactSearch.cpp b/src/Interaction/contactSearch/contactSearch/contactSearch.cpp
index 17c1dbd3..5753d4a2 100644
--- a/src/Interaction/contactSearch/contactSearch/contactSearch.cpp
+++ b/src/Interaction/contactSearch/contactSearch/contactSearch.cpp
@@ -19,7 +19,7 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "contactSearch.hpp"
-
+#include "streams.hpp"
 
 
 pFlow::contactSearch::contactSearch(
@@ -29,11 +29,12 @@ pFlow::contactSearch::contactSearch(
  	const geometry& geom,
  	Timers& timers)
 :
-	interactionBase(prtcl, geom),
-	domain_(domain),
-	dict_(dict),
-	sphereSphereTimer_("particle-particle contact search", &timers),
-	sphereWallTimer_("particle-wall contact search", &timers)
+	domainBox_(domain),
+	particles_(prtcl),
+	geometry_(geom),
+	ppTimer_("particle-particle contact search", &timers),
+	pwTimer_("particle-wall contact search", &timers),
+	dict_(dict)
 {
 
 }
@@ -46,20 +47,16 @@ pFlow::uniquePtr<pFlow::contactSearch> pFlow::contactSearch::create(
  	const geometry& geom,
  	Timers& timers)
 {
+	word baseMethName	= dict.getVal<word>("method");	
 
-	word baseMethName	= dict.getVal<word>("method");
-	word wallMethod 	= dict.getVal<word>("wallMapping");
+	auto model = angleBracketsNames("ContactSearch", baseMethName);
 
-	auto model = angleBracketsNames2("ContactSearch", baseMethName, wallMethod);
-
-
-	REPORT(1)<<"Selecting contact search model . . ."<<endREPORT;
+	REPORT(1)<<"Selecting contact search model . . ."<<END_REPORT;
 	
-
 	if( dictionaryvCtorSelector_.search(model))
 	{
 		auto objPtr = dictionaryvCtorSelector_[model] (dict, domain, prtcl, geom, timers);
-		REPORT(2)<<"Model "<< greenText(model)<<" is created."<<endREPORT;
+		REPORT(2)<<"Model "<< Green_Text(model)<<" is created."<< END_REPORT;
 		return objPtr;
 	}
 	else
diff --git a/src/Interaction/contactSearch/contactSearch/contactSearch.hpp b/src/Interaction/contactSearch/contactSearch/contactSearch.hpp
index 7725f7e6..30f264f3 100644
--- a/src/Interaction/contactSearch/contactSearch/contactSearch.hpp
+++ b/src/Interaction/contactSearch/contactSearch/contactSearch.hpp
@@ -23,43 +23,36 @@ Licence:
 #define __contactSearch_hpp__
 
 
-#include "interactionBase.hpp"
-#include "unsortedPairs.hpp"
-#include "box.hpp"
+#include "contactSearchGlobals.hpp"
 #include "dictionary.hpp"
+#include "virtualConstructor.hpp"
+#include "Timer.hpp"
 
 namespace pFlow
 {
 
+// - forward 
+class box;
+class particles;
+class geometry;
+
 
 class contactSearch
-:
-	public interactionBase
 {
-public:
-	using IdType 			= typename interactionBase::IdType;
+private:
 
-	using IndexType 		= typename interactionBase::IndexType;
+	const box& 	domainBox_;
 
-	using ExecutionSpace 	= typename interactionBase::ExecutionSpace;
+	const particles& 		particles_;
 
-	using PairContainerType   = unsortedPairs<ExecutionSpace, IdType>;
+	const geometry&			geometry_;
 
-protected:
+	Timer 		ppTimer_;
 
-	const box& 			domain_;
+	Timer 		pwTimer_;
 
 	dictionary 	dict_;
 
-	Timer 		sphereSphereTimer_;
-
-	Timer 		sphereWallTimer_;
-
-	auto& dict()
-	{
-		return dict_;
-	}
-	
 public:
 
 	TypeInfo("contactSearch");
@@ -88,35 +81,51 @@ public:
 	 	(dict, domain, prtcl, geom, timers)
 	);
 
-	const auto& domain()const
-	{
-		return domain_;
-	}
-
+	
 	const auto& dict()const
 	{
 		return dict_;
 	}
 
+	const auto& domainBox()const
+	{
+		return domainBox_;
+	}
+
+	const auto& Particles()const
+	{
+		return particles_;
+	}
+
+	const auto& Geometry()const
+	{
+		return geometry_;
+	}
+
+	auto& ppTimer()
+	{
+		return ppTimer_;
+	}
+
+	auto& pwTimer()
+	{
+		return pwTimer_;
+	}
 
 	virtual 
 	bool broadSearch(
-		PairContainerType& ppPairs,
-		PairContainerType& pwPairs,
+		uint32 iter,
+		real t,
+		real dt,
+		csPairContainerType& ppPairs,
+		csPairContainerType& pwPairs,
 		bool force = false) = 0;
 
 	virtual 
-	bool ppEnterBroadSearch()const = 0;
+	bool enterBroadSearch(uint32 iter, real t, real dt)const = 0;
 
 	virtual 
-	bool pwEnterBroadSearch()const = 0;
-
-	virtual 
-	bool ppPerformedBroadSearch()const = 0;
-
-	virtual 
-	bool pwPerformedBroadSearch()const = 0;
-	
+	bool performedBroadSearch()const = 0;
 
 	static 
 	uniquePtr<contactSearch> create(
diff --git a/src/Interaction/contactSearch/contactSearchFunctions.hpp b/src/Interaction/contactSearch/contactSearchFunctions.hpp
index 55879c95..96ee9596 100644
--- a/src/Interaction/contactSearch/contactSearchFunctions.hpp
+++ b/src/Interaction/contactSearch/contactSearchFunctions.hpp
@@ -96,17 +96,6 @@ void indexToCell(const indexType idx, const iBox<cellIndexType>& box, triple<cel
 	cell+= box.minPoint();
 }
 
-
-
-
-
-
-INLINE_FUNCTION_HD
-bool sphereSphereCheck(const realx3& p1, const realx3 p2, real d1, real d2)
-{
-	return length(p2-p1) < 0.5*(d2+d1);
-}
-
 }
 
 #endif //__broadSearchFunctions_hpp__
diff --git a/src/Interaction/interaction/interactionTypes.hpp b/src/Interaction/contactSearch/contactSearchGlobals.hpp
similarity index 75%
rename from src/Interaction/interaction/interactionTypes.hpp
rename to src/Interaction/contactSearch/contactSearchGlobals.hpp
index 041eddc2..056ffbf8 100644
--- a/src/Interaction/interaction/interactionTypes.hpp
+++ b/src/Interaction/contactSearch/contactSearchGlobals.hpp
@@ -18,28 +18,21 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-#ifndef __interactionTypes_hpp__
-#define __interactionTypes_hpp__
-
-
-
 #include "types.hpp"
+#include "unsortedPairs.hpp"
 
+#ifndef __contactSearchGlobals_hpp__
+#define __contactSearchGlobals_hpp__
 
 namespace pFlow
 {
 
+using csExecutionSpace = DefaultExecutionSpace;
 
-// always use signed types
-using CELL_INDEX_TYPE 	= int32;
+using csIdType = uint32;
 
-using ID_TYPE 			= int32;
-
-//constexpr int32 minCellIndex = largestNegative<CELL_INDEX_TYPE>();
-
-//constexpr int32 maxCellIndex = largestPositive<CELL_INDEX_TYPE>();
+using csPairContainerType   = unsortedPairs<DefaultExecutionSpace, uint32>;
 
 }
 
-
-#endif //__interactionTypes_hpp__
+#endif
diff --git a/src/Interaction/contactSearch/methods/NBS.hpp b/src/Interaction/contactSearch/methods/NBS.hpp
deleted file mode 100644
index fb3cc4f8..00000000
--- a/src/Interaction/contactSearch/methods/NBS.hpp
+++ /dev/null
@@ -1,209 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-
-#ifndef __NBS_hpp__
-#define __NBS_hpp__
-
-#include "NBSLevel0.hpp"
-
-namespace pFlow
-{
-
-
-template<typename executionSpace>
-class NBS
-{
-public:
-
-	using NBSLevel0Type	= NBSLevel0<executionSpace>;
-
-	using cellIterator 	= typename NBSLevel0Type::cellIterator;
-
-	using IdType 		= typename NBSLevel0Type::IdType;
-	
-	using IndexType 	= typename NBSLevel0Type::IndexType;
-
-	using Cells 		= typename NBSLevel0Type::Cells;
-
-	using CellType 		= typename Cells::CellType;
-
-	using execution_space 	= typename NBSLevel0Type::execution_space;
-
-	using memory_space 		= typename NBSLevel0Type::memory_space;
-
-
-protected:
-
-	real 		sizeRatio_ = 1.0;
-
-	int32 		updateFrequency_= 1;
-
-	int32 		currentIter_ 	= 0;
-
-	bool 		performedSearch_ = false;
-
-	NBSLevel0Type NBSLevel0_;
-
-private:
-
-	bool performSearch()
-	{
-		if(currentIter_ % updateFrequency_ == 0)
-		{
-			currentIter_++;
-			return true;
-
-		}else
-		{
-			currentIter_++;
-			return false;
-		}
-	}
-
-public:
-
-	TypeInfoNV("NBS");
-
-		NBS(
-			const dictionary& dict,
-			const 	box& domain,
-			real  minSize,
-			real 	maxSize,
-			const 	ViewType1D<realx3, memory_space>& position,
-			const 	ViewType1D<real, memory_space>& diam)
-		:
-			sizeRatio_( 
-				max(
-					dict.getValOrSet<real>("sizeRatio", 1.0),
-					1.0
-					)),
-			updateFrequency_(
-				max( 
-					dict.getValOrSet<int32>("updateFrequency", 1),
-					1
-					)),
-			NBSLevel0_(
-				domain, 
-				maxSize*sizeRatio_,
-				sizeRatio_,
-				position,
-				diam)
-		{}
-			
-		INLINE_FUNCTION_HD
-		NBS(const NBS&) = default;
-
-		INLINE_FUNCTION_HD
-		NBS& operator = (const NBS&) = default;
-
-		INLINE_FUNCTION_HD
-		~NBS()=default;
-
-	//// - Methods 
-
-	bool enterBoadSearch()const
-	{
-		return currentIter_%updateFrequency_==0;
-	}
-
-	bool performedSearch()const
-	{
-		return performedSearch_;
-	}
-
-	Vector<cellIterator> getCellIteratorLevels()
-	{
-		return Vector<cellIterator>("cellIterator", 1, NBSLevel0_.getCellIterator());
-	}
-
-	auto getCellIterator(int32 lvl)const
-	{
-		return NBSLevel0_.getCellIterator();
-	}
-
-	int32 numLevels()const
-	{
-		return 1;
-	}
-
-	Vector<Cells> getCellsLevels()const
-	{
-		return Vector<Cells>("Cells", 1, NBSLevel0_.getCells());
-	}
-
-	auto getCells()const
-	{
-		return NBSLevel0_.getCells();
-	}
-
-	bool objectSizeChanged(int32 newSize)
-	{
-		NBSLevel0_.checkAllocateNext(newSize);
-		return true;
-	}
-
-	// - Perform the broad search to find pairs
-	//	 with force = true, perform broad search regardless of 
-	//   updateFrequency_ value
-	//   on all the points in the range of [0,numPoints_)
-	template<typename PairsContainer>
-	bool broadSearch(PairsContainer& pairs, range activeRange, bool force=false)
-	{
-		
-		if(force) currentIter_ = 0;
-		performedSearch_ = false;
-
-		if( !performSearch() ) return true;
-		
-		
-		NBSLevel0_.build(activeRange);
-		
-		NBSLevel0_.findPairs(pairs);
-		
-		performedSearch_ = true;		
-		return true;
-	}
-
-	// - Perform the broad search to find pairs,
-	//   ignore particles with incld(i) = true,
-	//	 with force = true, perform broad search regardless of 
-	//   updateFrequency_ value
-	template<typename PairsContainer, typename IncludeFunction>
-	bool broadSearch(PairsContainer& pairs, range activeRange, IncludeFunction incld, bool force = false)
-	{
-		if(force) currentIter_ = 0;
-		performedSearch_ = false;
-
-		if( !performSearch() ) return true;
-
-		NBSLevel0_.build(activeRange, incld);
-	
-		NBSLevel0_.findPairs(pairs);
-		
-		performedSearch_ = true;
-		return true;
-	}
-
-};
-
-}
-
-#endif
diff --git a/src/Interaction/contactSearch/methods/NBSCrossLoop.hpp b/src/Interaction/contactSearch/methods/NBSCrossLoop.hpp
deleted file mode 100644
index adce7409..00000000
--- a/src/Interaction/contactSearch/methods/NBSCrossLoop.hpp
+++ /dev/null
@@ -1,82 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-
-int32 m = this->head_(i,j,k);
-CellType currentCell(i,j,k);
-int32 n = -1;
-
-while( m > -1 )
-{
-	
-	auto p_m = this->pointPosition_[m];	
-	auto d_m = this->sizeRatio_* this->diameter_[m];
-	
-	int32x3 crossIndex = mapIndexLevels(
-		int32x3(i,j,k),
-		level_, 
-		upperLevel.level());
-
-	
-	for(int32 ii = -1; ii<2; ii++)
-	{
-		for(int32 jj=-1; jj<2; jj++)
-		{
-			int32 kk=-1;
-			while( kk < 2)
-			{
-				int32x3 nghbrCI = crossIndex + int32x3(ii,jj,kk);
-				
-				if( upperLevel.isInRange(nghbrCI) )
-				{
-					n = upperLevel.head_(
-						nghbrCI.x(),
-						nghbrCI.y(),
-						nghbrCI.z());
-
-					while( n >-1)
-					{
-						auto p_n = this->pointPosition_[n];
-						auto d_n = this->sizeRatio_*this->diameter_[n];
-
-						if( sphereSphereCheck(p_m, p_n, d_m, d_n) )
-						{
-							auto ln = n;
-							auto lm = m;
-							if(lm>ln) this->Swap(lm,ln);
-							if( auto res = pairs.insert(lm,ln); res <0)
-							{
-								getFullUpdate++;
-							}
-						}
-
-						n = this->next_[n];
-					}
-
-				}
-
-				kk++;
-			}
-		}
-	}
-
-	m = this->next_[m];
-}
-
diff --git a/src/Interaction/contactSearch/methods/NBSLevel.hpp b/src/Interaction/contactSearch/methods/NBSLevel.hpp
deleted file mode 100644
index f355d566..00000000
--- a/src/Interaction/contactSearch/methods/NBSLevel.hpp
+++ /dev/null
@@ -1,127 +0,0 @@
-#ifndef __NBSLevel_hpp__
-#define __NBSLevel_hpp__
-
-
-#include "NBSLevel0.hpp"
-
-
-namespace pFlow
-{
-
-INLINE_FUNCTION_HD
-int32x3 mapIndexLevels(const int32x3& ind, int32 lowerLevel, int32 upperLevel);
-
-template<typename executionSpace>
-class
-NBSLevel
-:
-	public NBSLevel0<executionSpace>
-{
-public:
-
-	using NBSLevel0Type	= NBSLevel0<executionSpace>;
-
-	using cellIterator 	= typename NBSLevel0Type::cellIterator;
-
-	using IdType 		= typename NBSLevel0Type::IdType;
-	
-	using IndexType 	= typename NBSLevel0Type::IndexType;
-
-	using Cells 		= typename NBSLevel0Type::Cells;
-
-	using CellType 		= typename Cells::CellType;
-
-	using execution_space 	= typename NBSLevel0Type::execution_space;
-
-	using memory_space 		= typename NBSLevel0Type::memory_space;
-
-	using mdrPolicyFindPairs = typename NBSLevel0Type::mdrPolicyFindPairs;
-
-	using HeadType 			= typename NBSLevel0Type::HeadType;
-
-	using NextType 			= typename NBSLevel0Type::NextType;
-
-	template<typename exeSpace>
-	friend class NBSLevels;
-
-protected:
-
-	int32 									level_ = 0;
-
-	
-public:
-	
-	TypeInfoNV("NBSLevel0");
-
-	INLINE_FUNCTION_HD
-	NBSLevel(){}
-
-	NBSLevel(
-		int32 	lvl,
-		const 	box& domain,
-		real 	cellSize,
-		real 	sizeRatio,
-		const 	ViewType1D<realx3, memory_space>& position,
-		const 	ViewType1D<real, memory_space>& diam)
-	:
-		NBSLevel0Type(
-			domain,
-			cellSize,
-			sizeRatio,
-			position,
-			diam,
-			lvl==0),
-		level_(lvl)
-	{}
-
-	INLINE_FUNCTION_HD
-	NBSLevel(const NBSLevel&) = default;
-	
-	INLINE_FUNCTION_HD
-	NBSLevel& operator = (const NBSLevel&) = default;
-
-	INLINE_FUNCTION_HD
-	~NBSLevel() = default;
-
-	INLINE_FUNCTION_HD
-	auto level()const
-	{
-		return level_;
-	}
-
-	template<typename PairsContainer>	
-	INLINE_FUNCTION_H
-	int32 findPairsCountCross(PairsContainer& pairs, NBSLevel& upperLevel)
-	{
-
-		mdrPolicyFindPairs
-			mdrPolicy(
-				{0,0,0},
-				{this->nx(),this->ny(),this->nz()} );
-
-		int32 notInsertedPairs;
-
-		Kokkos::parallel_reduce	(
-			"NBSLevel::findPairsCountCross",
-			mdrPolicy,
-			CLASS_LAMBDA_HD(int32 i, int32 j, int32 k, int32& getFullUpdate){
-				#include "NBSCrossLoop.hpp"
-			}, notInsertedPairs);
-			
-		return notInsertedPairs;	
-	}
-	 
-	
-};
-
-INLINE_FUNCTION_HD
-int32x3 mapIndexLevels( const int32x3& ind, int32 lowerLevel, int32 upperLevel)
-{
-	int32 a = pow(2, static_cast<int32>(upperLevel-lowerLevel));
-	return ind/a;
-}
-
-
-}
-
-#endif
diff --git a/src/Interaction/contactSearch/methods/NBSLevel0.hpp b/src/Interaction/contactSearch/methods/NBSLevel0.hpp
deleted file mode 100644
index d9ae2f83..00000000
--- a/src/Interaction/contactSearch/methods/NBSLevel0.hpp
+++ /dev/null
@@ -1,240 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-
-#ifndef __NBSLevel0_hpp__
-#define __NBSLevel0_hpp__
-
-#include "mapperNBS.hpp"
-
-namespace pFlow
-{
-
-
-template<typename executionSpace>
-class NBSLevel0
-:
-	public mapperNBS<executionSpace>
-{
-public:
-
-	using MapperType 		= mapperNBS<executionSpace>;
-
-	using cellIterator  	= typename MapperType::cellIterator;
-
-	using IdType 			= typename MapperType::IdType;
-	
-	using IndexType 		= typename MapperType::IndexType;
-
-	using Cells 			= typename MapperType::Cells;
-
-	using CellType 			= typename Cells::CellType;
-
-	using execution_space 	= typename MapperType::execution_space;
-
-	using memory_space 		= typename MapperType::memory_space;
-
-	using HeadType 			= typename MapperType::HeadType;
-
-	using NextType 			= typename MapperType::NextType;	
-
-	struct TagFindPairs{};
-
-
-protected:
-
-	real 			sizeRatio_ 		= 1.0;
-
-	// borrowed ownership
-	ViewType1D<real, memory_space>			diameter_;
-
-
-	using mdrPolicyFindPairs = 
-		Kokkos::MDRangePolicy<
-			Kokkos::Rank<3>,
-			Kokkos::Schedule<Kokkos::Dynamic>,
-			execution_space>;
-
-	static INLINE_FUNCTION_HD
-	void Swap(int32& x, int32& y)
-	{
-		int32 tmp = x;
-		x = y;
-		y = tmp;
-	}
-
-public:
-
-	TypeInfoNV("NBSLevel0");
-
-		INLINE_FUNCTION_HD
-		NBSLevel0(){}
-
-		NBSLevel0(
-			const 	box& domain,
-			real 		cellSize,
-			const 	ViewType1D<realx3, memory_space>& position,
-			const 	ViewType1D<real, memory_space>& diam)
-		:
-			MapperType(domain, cellSize, position),
-			diameter_(diam)
-		{}
-
-		NBSLevel0(
-			const 	box& domain,
-			int32 	nx,
-			int32 	ny,
-			int32 	nz,
-			const 	ViewType1D<realx3, memory_space>& position,
-			const 	ViewType1D<real, memory_space>& diam)
-		:
-			MapperType(domain, nx, ny, nz, position),
-			diameter_(diam)
-		{	}
-
-		NBSLevel0(
-			const 	box& domain,
-			real 		cellSize,
-			real 		sizeRatio,
-			const 	ViewType1D<realx3, memory_space>& position,
-			const 	ViewType1D<real, memory_space>& diam,
-			bool 		nextOwner = true)
-		:
-			MapperType(domain, cellSize, position, nextOwner),
-			sizeRatio_(sizeRatio),
-			diameter_(diam)
-		{}
-
-		INLINE_FUNCTION_HD
-		NBSLevel0(const NBSLevel0&) = default;
-
-		INLINE_FUNCTION_HD
-		NBSLevel0& operator = (const NBSLevel0&) = default;
-
-		INLINE_FUNCTION_HD
-		~NBSLevel0()=default;
-
-
-	INLINE_FUNCTION_HD
-	auto sizeRatio()const
-	{
-		return sizeRatio_;
-	}
-
-	INLINE_FUNCTION_HD
-	auto& diameter()
-	{
-		return diameter_;
-	}
-
-	// - Perform the broad search to find pairs
-	//	 with force = true, perform broad search regardless of 
-	//   updateFrequency_ value
-	//   on all the points in the range of [0,numPoints_)
-	template<typename PairsContainer>
-	bool broadSearch(PairsContainer& pairs, range activeRange)
-	{
-		
-		
-		this->build(activeRange);
-		
-		findPairs(pairs);
-			
-		return true;
-	}
-
-	// - Perform the broad search to find pairs,
-	//   ignore particles with incld(i) = true,
-	//	 with force = true, perform broad search regardless of 
-	//   updateFrequency_ value
-	template<typename PairsContainer, typename IncludeFunction>
-	bool broadSearch(PairsContainer& pairs, range activeRange, IncludeFunction incld)
-	{
-		
-		this->build(activeRange, incld);
-	
-		findPairs(pairs);
-		
-		return true;
-	}
-
-	template<typename PairsContainer>	
-	INLINE_FUNCTION_H
-	bool findPairs(PairsContainer& pairs)
-	{
-		
-
-		int32 getFull = 1;
-		
-		
-		// loop until the container size fits the numebr of contact pairs
-		while (getFull > 0)
-		{
-
-			getFull = findPairsCount(pairs);		
-		
-			if(getFull)
-			{
-				// - resize the container
-				//   note that getFull now shows the number of failed insertions.
-				uint32 len = max(getFull,500) ;
-				
-				auto oldCap = pairs.capacity();
-				
-				pairs.increaseCapacityBy(len);
-
-				INFORMATION<< "The contact pair container capacity increased from "<<
-				oldCap << " to "<<pairs.capacity()<<" in NBSLevel0."<<endINFO;
-				
-			}
-
-			Kokkos::fence();
-		}
-		
-		return true;
-	}
-
-	template<typename PairsContainer>	
-	INLINE_FUNCTION_H
-	int32 findPairsCount(PairsContainer& pairs)
-	{
-		mdrPolicyFindPairs
-			mdrPolicy(
-				{0,0,0},
-				{this->nx(),this->ny(),this->nz()} );
-
-		int32 notInsertedPairs;
-			
-		Kokkos::parallel_reduce	(
-			"NBSLevel0::findPairs",
-			mdrPolicy,
-			CLASS_LAMBDA_HD(int32 i, int32 j, int32 k, int32& getFullUpdate){
-				#include "NBSLoop.hpp"
-			}, notInsertedPairs);
-			
-		return notInsertedPairs;
-			
-	}
-
-};
-
-} // pFlow
-
-#endif // __NBSLevel0_hpp__
diff --git a/src/Interaction/contactSearch/methods/NBSLevels.hpp b/src/Interaction/contactSearch/methods/NBSLevels.hpp
deleted file mode 100644
index 30603bd3..00000000
--- a/src/Interaction/contactSearch/methods/NBSLevels.hpp
+++ /dev/null
@@ -1,438 +0,0 @@
-#ifndef __NBSLevels_hpp__
-#define __NBSLevels_hpp__
-
-#include "NBSLevel.hpp"
-#include "NBSLevel0.hpp"
-#include "KokkosTypes.hpp"
-
-namespace pFlow
-{
-
-template<typename executionSpace>
-class NBSLevels
-{
-
-public:
-
-	using NBSLevelType 	= NBSLevel<executionSpace>;
-
-	using cellIterator 	= typename NBSLevelType::cellIterator;
-
-	using IdType 		= typename NBSLevelType::IdType;
-	
-	using IndexType 	= typename NBSLevelType::IndexType;
-
-	using Cells 		= typename NBSLevelType::Cells;
-
-	using CellType 		= typename Cells::CellType;
-
-	using execution_space 	= typename NBSLevelType::execution_space;
-
-	using memory_space 		= typename NBSLevelType::memory_space;
-
-	using realRange 	= kPair<real,real>;
-
-protected:
-	
-	real 		minSize_;
-
-	real 		maxSize_;
-	
-	int32 		numLevels_=1;
-
-	Vector<NBSLevelType> 					nbsLevels_;
-
-	ViewType1D<realRange, memory_space> 	sizeRangeLevels_;
-
-	ViewType1D<realRange, HostSpace> 		sizeRangeLevelsHost_;
-
-	ViewType1D<real, memory_space> 			maxSizeLevels_;
-
-	ViewType1D<real, HostSpace> 			maxSizeLevelsHost_;
-
-	ViewType1D<int8, memory_space> 			particleLevel_;
-
-	range 									activeRange_{0,0};
-
-	using rangePolicyType	=
-		Kokkos::RangePolicy<
-			Kokkos::IndexType<int32>,
-			Kokkos::Schedule<Kokkos::Static>,
-			execution_space>;
-
-	int32 setNumLevels()
-	{
-
-		int32 maxOvermin = static_cast<int32>(maxSize_/minSize_);
-
-		if (maxOvermin <=1)
-			return 1;
-		else if(maxOvermin<=3)
-			return 2;
-		else if(maxOvermin<=7)
-			return 3;
-		else if(maxOvermin<15)
-			return 4;
-		else if(maxOvermin<31)
-			return 5;
-		else if(maxOvermin<63)
-			return 6;
-		else if(maxOvermin <127)
-			return 7;
-		else
-		{
-			fatalErrorInFunction<<
-			"size ratio is not valid for multi-grid NBS "<< maxOvermin<<endl;
-			fatalExit;
-		}
-
-		return -1;
-	}
-
-	bool setDiameterRange(real sizeRatio)
-	{
-		real lvl_maxD  = sizeRatio* maxSize_;
-		real lvl_minD  = lvl_maxD/2.0;		
-
-		for(int32 lvl=numLevels_-1; lvl>=0; lvl--)
-		{
-
-			if(lvl == 0 ) lvl_minD = 0.01*minSize_;
-			
-			sizeRangeLevelsHost_[lvl] = {lvl_minD, lvl_maxD};
-			maxSizeLevelsHost_[lvl] = lvl_maxD;
-			lvl_maxD = lvl_minD;
-			lvl_minD /= 2.0;
-		}
-		
-		copy(sizeRangeLevels_, sizeRangeLevelsHost_);
-		copy(maxSizeLevels_, maxSizeLevelsHost_);
-
-		REPORT(2)<<"Grids with "<< yellowText(numLevels_)<< " levels have been created."<<endREPORT;
-		for(int32 lvl=0; lvl<numLevels_; lvl++)
-		{
-			REPORT(3)<<"Cell gird No "<< yellowText(lvl)<<" with size range ("
-				<<sizeRangeLevelsHost_[lvl].first<<","<<sizeRangeLevelsHost_[lvl].second<<"]."<<endREPORT;
-		}
-		
-		return true;
-	}
-
-	bool initLevels(
-		const 	box& domain,
-		real 	sizeRatio,
-		const 	ViewType1D<realx3, memory_space>& position,
-		const 	ViewType1D<real, memory_space>& diam)
-	{
-		
-
-		for(int32 lvl = 0; lvl<numLevels_; lvl++)
-		{
-			nbsLevels_[lvl] = NBSLevelType(
-				lvl, 
-				domain, 
-				maxSizeLevelsHost_[lvl]*sizeRatio,
-				sizeRatio,
-				position,
-				diam );
-		}
-
-		auto next0 = nbsLevels_[0].next();
-		for(int32 lvl=1; lvl<numLevels_; lvl++)
-		{
-			nbsLevels_[lvl].setNext(next0);
-		}
-
-		return true;
-	}
-
-
-	void manageAllocateNext(range active)
-	{
-		activeRange_ = active;
-
-		if(activeRange_.second > nbsLevels_[0].capacity())
-		{
-			nbsLevels_[0].checkAllocateNext(activeRange_.second);
-
-			auto next0 = nbsLevels_[0].next();
-
-			for(int32 lvl=1; lvl<numLevels_; lvl++)
-			{
-				nbsLevels_[lvl].setNext(next0);
-			}
-		}
-	}
-
-	void nullify( range active)
-	{
-		for(int32 lvl=0; lvl<numLevels_; lvl++)
-		{
-			nbsLevels_[lvl].nullify(active);
-		}
-	}
-
-public:
-
-	NBSLevels(
-		const 	box& domain,
-		real 	minSize,
-		real 	maxSize,
-		real 	sizeRatio,
-		const 	ViewType1D<realx3, memory_space>& position,
-		const 	ViewType1D<real, memory_space>& diam)
-	:
-	minSize_(minSize),
-	maxSize_(maxSize),
-	numLevels_(setNumLevels()),
-	nbsLevels_("nbsLevels", numLevels_, numLevels_, RESERVE()),
-	sizeRangeLevels_("sizeRangeLevels", numLevels_),
-	sizeRangeLevelsHost_("sizeRangeLevelsHost", numLevels_),
-	maxSizeLevels_("maxSizeLevels", numLevels_),
-	maxSizeLevelsHost_("maxSizeLevelsHost", numLevels_)
-	{
-
-		setDiameterRange(sizeRatio);
-
-		initLevels(domain, sizeRatio, position, diam);
-	}
-
-	auto getCellIterator(int32 lvl)const
-	{
-		return nbsLevels_[lvl].getCellIterator();
-	}
-
-	int32 numLevels()const
-	{
-		return numLevels_;
-	}
-
-	Cells getCells(int32 lvl)const
-	{
-		return nbsLevels_[lvl].getCells();
-	}
-
-	template<typename PairsContainer>	
-	INLINE_FUNCTION_H
-	bool findPairs(PairsContainer& pairs)
-	{
-		
-		int32 getFull = 1;
-		
-		// loop until the container size fits the numebr of contact pairs
-		while (getFull > 0)
-		{
-
-			getFull = findPairsCount(pairs);		
-		
-			if(getFull)
-			{
-				// - resize the container
-				//   note that getFull now shows the number of failed insertions.
-				uint32 len = max(getFull,100) ;
-				
-				auto oldCap = pairs.capacity();
-				
-				pairs.increaseCapacityBy(len);
-
-				INFORMATION<< "The contact pair container capacity increased from "<<
-				oldCap << " to "<<pairs.capacity()<<" in NBSLevels."<<endINFO;
-				
-			}
-
-			Kokkos::fence();
-		}
-		
-		return true;
-	}
-
-
-	template<typename PairsContainer>	
-	INLINE_FUNCTION_H
-	int32 findPairsCount(PairsContainer& pairs)
-	{
-
-		int32 notInsertedCount = 0;
-
-		for(int32 lvl=0; lvl<numLevels_; lvl++)
-		{
-			
-			// the same level
-			notInsertedCount+= nbsLevels_[lvl].findPairsCount(pairs);
-			
-			for(int32 crsLvl = lvl+1; crsLvl<numLevels_; crsLvl++)
-			{
-				// cross levels 
-				notInsertedCount+= 
-					nbsLevels_[lvl].findPairsCountCross(pairs, nbsLevels_[crsLvl]);
-				
-			}
-		}
-		
-		return notInsertedCount;
-	}
-
-	INLINE_FUNCTION_H
-	void build(range activeRange)
-	{
-				
-		// nullify next and heads
-		findParticleLevel(activeRange.first, activeRange.second);
-		manageAllocateNext(activeRange);
-		nullify(activeRange);
-		
-		//
-
-		rangePolicyType rPolicy(activeRange.first, activeRange.second);
-		
-		auto nbsLevel0 = nbsLevels_[0];
-		auto pointPosition = nbsLevel0.pointPosition();
-		auto particleLevel = particleLevel_;
-		auto next = nbsLevel0.next();
-		auto head0 = nbsLevel0.head();
-		
-		typename NBSLevelType::HeadType head1, head2, head3, head4, head5, head6;
-
-		if(numLevels_>1) head1 = nbsLevels_[1].head();
-		if(numLevels_>2) head2 = nbsLevels_[2].head();
-		if(numLevels_>3) head3 = nbsLevels_[3].head();
-		if(numLevels_>4) head4 = nbsLevels_[4].head();
-		if(numLevels_>5) head5 = nbsLevels_[5].head();
-		if(numLevels_>6) head6 = nbsLevels_[6].head();
-
-
-		
-		Kokkos::parallel_for(
-			"NBSLevels::build",
-			rPolicy,
-			LAMBDA_HD(int32 i){
-				
-				int8 lvl = particleLevel[i];
-				auto ind = nbsLevel0.pointIndex(pointPosition[i]);
-				ind = mapIndexLevels(ind, 0, lvl);
-				int32 old;
-				if(lvl==0)
-					old =Kokkos::atomic_exchange(&head0(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==1)
-					old =Kokkos::atomic_exchange(&head1(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==2)
-					old =Kokkos::atomic_exchange(&head2(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==3)
-					old =Kokkos::atomic_exchange(&head3(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==4)
-					old =Kokkos::atomic_exchange(&head4(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==5)
-					old =Kokkos::atomic_exchange(&head5(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==6)
-					old =Kokkos::atomic_exchange(&head6(ind.x(), ind.y(), ind.z()),i);
-
-				next(i) = old;
-			});
-
-		Kokkos::fence();
-	}
-
-	template<typename IncludeFunction>
-	INLINE_FUNCTION_H
-	void build(range activeRange, IncludeFunction incld)
-	{
-		// nullify next and heads
-		findParticleLevel(activeRange.first, activeRange.second);
-		manageAllocateNext(activeRange);
-		nullify(activeRange);
-		
-
-		rangePolicyType rPolicy(activeRange.first, activeRange.second);
-
-		auto nbsLevel0 = nbsLevels_[0];
-		auto pointPosition = nbsLevel0.pointPosition();
-		auto particleLevel = particleLevel_;
-		auto next = nbsLevel0.next();
-		auto head0 = nbsLevel0.head();
-
-		typename NBSLevelType::HeadType head1, head2, head3, head4, head5, head6;
-
-		if(numLevels_>1) head1 = nbsLevels_[1].head();
-		if(numLevels_>2) head2 = nbsLevels_[2].head();
-		if(numLevels_>3) head3 = nbsLevels_[3].head();
-		if(numLevels_>4) head4 = nbsLevels_[4].head();
-		if(numLevels_>5) head5 = nbsLevels_[5].head();
-		if(numLevels_>6) head6 = nbsLevels_[6].head();
-
-		Kokkos::parallel_for(
-			"NBSLevels::build",
-			rPolicy,
-			LAMBDA_HD(int32 i){
-				if(!incld(i)) return;
-				
-				int8 lvl = particleLevel[i];
-				auto ind = nbsLevel0.pointIndex(pointPosition[i]);
-				
-				ind = mapIndexLevels(ind, 0, lvl);
-				int32 old;
-				if(lvl==0)
-					old =Kokkos::atomic_exchange(&head0(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==1)
-					old =Kokkos::atomic_exchange(&head1(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==2)
-					old =Kokkos::atomic_exchange(&head2(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==3)
-					old =Kokkos::atomic_exchange(&head3(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==4)
-					old =Kokkos::atomic_exchange(&head4(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==5)
-					old =Kokkos::atomic_exchange(&head5(ind.x(), ind.y(), ind.z()),i);
-				else if(lvl==6)
-					old =Kokkos::atomic_exchange(&head6(ind.x(), ind.y(), ind.z()),i);
-				
-				next(i) = old;
-				
-			});
-
-		Kokkos::fence();
-
-	}
-
-	bool findParticleLevel(int32 first, int32 last)
-	{
-
-		if(last > particleLevel_.size())
-		{
-			reallocNoInit(particleLevel_,last);
-		}
-
-		auto diameter  = nbsLevels_[0].diameter();
-		auto const maxSizes = maxSizeLevels_;
-		auto particleLevel = particleLevel_;
-		auto const sizeRatio = 0.999*nbsLevels_[0].sizeRatio();
-
-		int8 maxLvl = sizeRangeLevels_.size();
-
-		rangePolicyType rPolicy(first, last);
-
-		Kokkos::parallel_for(
-			"NBSLevels::findParticleLevel",
-			rPolicy,
-			LAMBDA_HD(int32 i)
-			{
-				for(int8 lvl = 0; lvl<maxLvl; lvl++)
-				{
-					if( sizeRatio*diameter[i]<= maxSizes[lvl] )
-					{
-						particleLevel[i] = lvl;
-						return;
-					}
-				}
-				particleLevel[i] = static_cast<int8>(-1);
-			});
-		Kokkos::fence();
-
-		return true;
-	}
-
-
-}; //NBSLevels
-
-}
-
-#endif
diff --git a/src/Interaction/contactSearch/methods/NBSLoop.hpp b/src/Interaction/contactSearch/methods/NBSLoop.hpp
deleted file mode 100644
index 8aed3e26..00000000
--- a/src/Interaction/contactSearch/methods/NBSLoop.hpp
+++ /dev/null
@@ -1,101 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-
-int32 m = this->head_(i,j,k);
-CellType currentCell(i,j,k);
-int32 n = -1;
-
-while( m > -1 )
-{
-	
-	auto p_m = this->pointPosition_[m];	
-	auto d_m = sizeRatio_* diameter_[m];
-	
-	// the same cell
-	n = this->next_(m);
-	
-	while(n >-1)
-	{
-		
-		auto p_n = this->pointPosition_[n];
-		auto d_n = sizeRatio_*diameter_[n];
-		
-		if( sphereSphereCheck(p_m, p_n, d_m, d_n) )
-		{
-			auto ln = n;
-			auto lm = m;
-
-			if(lm>ln) Swap(lm,ln);
-			if( auto res = pairs.insert(lm,ln); res <0)
-			{
-				getFullUpdate++;
-			}
-		}
-		
-		n = this->next_(n);
-	}
-
-	// neighbor cells
-	CellType neighborCell;
-	for(int32 ni=0; ni<13; ni++)
-	{
-		if(ni==0)		neighborCell = currentCell + CellType( 0, 0,-1);
-		else if(ni==1)	neighborCell = currentCell + CellType(-1, 0,-1);
-		else if(ni==2)	neighborCell = currentCell + CellType(-1, 0, 0); 
-		else if(ni==3)	neighborCell = currentCell + CellType(-1, 0, 1); 
-		else if(ni==4)	neighborCell = currentCell + CellType( 0,-1,-1); 
-		else if(ni==5)	neighborCell = currentCell + CellType( 0,-1, 0); 
-		else if(ni==6)	neighborCell = currentCell + CellType( 0,-1, 1); 
-		else if(ni==7)	neighborCell = currentCell + CellType(-1,-1,-1); 
-		else if(ni==8)	neighborCell = currentCell + CellType(-1,-1, 0); 
-		else if(ni==9)	neighborCell = currentCell + CellType(-1,-1, 1);
-		else if(ni==10)	neighborCell = currentCell + CellType( 1,-1,-1);  
-		else if(ni==11)	neighborCell = currentCell + CellType( 1,-1, 0);  
-		else if(ni==12)	neighborCell = currentCell + CellType( 1,-1, 1);  
-		 
-		if( this->isInRange(neighborCell) )
-		{
-			
-			n = this->head_(neighborCell.x(), neighborCell.y(), neighborCell.z());
-			while( n>-1)
-			{
-				
-				auto p_n = this->pointPosition_[n];
-				auto d_n = sizeRatio_*diameter_[n];
-				
-				if(sphereSphereCheck(p_m, p_n, d_m, d_n))
-				{
-					auto ln = n;
-					auto lm = m;
-					if(lm>ln) Swap(lm,ln);
-					if( auto res = pairs.insert(lm,ln); res <0)
-					{
-						getFullUpdate++;
-					}
-				}
-				n = this->next_[n];
-			}
-		}
-
-	}
-	m = this->next_[m];
-}
-
diff --git a/src/Interaction/interaction/interactionBase.hpp b/src/Interaction/contactSearch/methods/cellBased/NBS/NBS.cpp
similarity index 50%
rename from src/Interaction/interaction/interactionBase.hpp
rename to src/Interaction/contactSearch/methods/cellBased/NBS/NBS.cpp
index b5c9651e..9c8b3a29 100644
--- a/src/Interaction/interaction/interactionBase.hpp
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/NBS.cpp
@@ -18,67 +18,50 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-#ifndef __interactionBase_hpp__ 
-#define __interactionBase_hpp__
+#include "NBS.hpp"
 
-#include "interactionTypes.hpp"
-#include "particles.hpp"
-#include "geometry.hpp"
-
-namespace pFlow
+pFlow::NBS::NBS
+(
+    const dictionary& dict,
+	const box& domainBox,
+	real  	minBSSize,
+	real 	maxBSSize,
+	const deviceViewType1D<realx3> &position, 
+	const pFlagTypeDevice &flags, 
+	const deviceViewType1D<real> &diam, 
+	uint32 					nWallPoints,
+	uint32 					nWallElements,
+	const ViewType1D<realx3,memory_space>& 		wallPoints, 
+	const ViewType1D<uint32x3,memory_space>& 	wallVertices
+)
+: 
+    particleWallContactSearchs<NBS>(
+        dict,
+        domainBox,
+        minBSSize,
+        maxBSSize,
+        position,
+        flags,
+        diam),
+    sizeRatio_(max(dict.getVal<real>("sizeRatio"), 1.0)),
+    cellExtent_(max(dict.getVal<real>("cellExtent"), 0.5)),
+    adjustableBox_(dict.getVal<Logical>("adjustableBox")),
+    NBSLevel0_
+	(
+        this->domainBox_,
+        maxBSSize,
+        sizeRatio_,
+        position,
+        flags,
+        adjustableBox_()
+	),
+	cellsWallLevel0_
+	(
+		cellExtent_,
+		nWallPoints,
+		nWallElements,
+		wallPoints,
+		wallVertices
+	)
 {
-
-class interactionBase
-{
-public:
-
-	using IndexType    			= CELL_INDEX_TYPE;
-
-	using IdType  				= ID_TYPE;
-
-	using ExecutionSpace 	 	= DefaultExecutionSpace;
-
-protected:
-
-	const particles& 		particles_;
-
-	const geometry& 		geometry_;
-
-public:
-
-	interactionBase(
-		const particles& prtcl,
-		const geometry& geom)
-	:
-		particles_(prtcl),
-		geometry_(geom)
-	{}
-
-	inline
-	const auto& pStruct()const
-	{
-		return particles_.pStruct();
-	}
-
-	inline
-	const auto& surface()const
-	{
-		return geometry_.surface();
-	}
-
-	inline 
-	const auto& Particles()const
-	{
-		return particles_;
-	}
-
-	inline auto& Geometry()const
-	{
-		return geometry_;
-	}
-};
-
 }
-
-
-#endif //__interactionBase_hpp__
diff --git a/src/Interaction/contactSearch/methods/cellBased/NBS/NBS.hpp b/src/Interaction/contactSearch/methods/cellBased/NBS/NBS.hpp
new file mode 100644
index 00000000..f0f83436
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/NBS.hpp
@@ -0,0 +1,148 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#ifndef __NBS_hpp__
+#define __NBS_hpp__
+
+#include "particleWallContactSearchs.hpp"
+#include "NBSLevel0.hpp"
+#include "cellsWallLevel0.hpp"
+#include "Vector.hpp"
+
+namespace pFlow
+{
+
+
+class NBS
+:
+	public particleWallContactSearchs<NBS>
+{
+public:
+
+	using CellIterator 	= typename NBSLevel0::CellIterator;
+
+private:
+	
+	real 		sizeRatio_ = 1.0;
+
+	real 		cellExtent_ = 0.5;
+
+	Logical 	adjustableBox_;
+
+	NBSLevel0 	NBSLevel0_;	
+
+	cellsWallLevel0 cellsWallLevel0_;
+
+protected:
+
+	friend 		particleWallContactSearchs<NBS>;
+	
+	bool impl_broadSearch
+	(
+		csPairContainerType& ppPairs,
+		csPairContainerType& pwPairs,
+		const deviceViewType1D<realx3>& pointPos,
+    	const pFlagTypeDevice& flags,
+    	const deviceViewType1D<real>& diameter
+	)
+	{
+		bool searchBoxChanged;
+		if( !NBSLevel0_.broadSearch(
+			ppPairs, 
+			pointPos, 
+			flags, 
+			diameter, 
+			searchBoxChanged))
+		{
+			fatalErrorInFunction<<
+			"Error in broadSearch for NBS (particle-particle)"<<endl;
+			return false;
+		}
+
+		if(!cellsWallLevel0_.broadSearch(
+			pwPairs,
+			NBSLevel0_.getSearchCells(),
+			NBSLevel0_.getCellIterator()))
+		{
+			fatalErrorInFunction<<
+			"Error in broadSearch for NBS (particle-wall)"<<endl;
+			return false;
+		}
+
+		return true;
+	}
+
+public:
+
+	TypeInfoNV("NBS");
+
+		NBS(
+			const dictionary& dict,
+			const box& domainBox,
+			real  	minBSSize,
+			real 	maxBSSize,
+			const deviceViewType1D<realx3> &position, 
+    		const pFlagTypeDevice &flags, 
+    		const deviceViewType1D<real> &diam, 
+			uint32 					nWallPoints,
+			uint32 					nWallElements,
+			const ViewType1D<realx3,memory_space>& 		wallPoints, 
+			const ViewType1D<uint32x3,memory_space>& 	wallVertices);
+		
+			
+		INLINE_FUNCTION_HD
+		NBS(const NBS&) = default;
+
+		INLINE_FUNCTION_HD
+		NBS(NBS&&) = default;
+
+		INLINE_FUNCTION_HD
+		NBS& operator = (const NBS&) = default;
+
+		INLINE_FUNCTION_HD
+		NBS& operator = (NBS&&) = default;
+
+		INLINE_FUNCTION_HD
+		~NBS()=default;
+
+
+	//// - Methods 
+
+		uint32 numLevels()const
+		{
+			return 1;
+		}
+
+		auto getCellIterator([[maybe_unused]] uint32 lvl)const
+		{
+			return NBSLevel0_.getCellIterator();
+		}
+
+		Vector<cells> getDomainCellsLevels()const
+		{
+			return Vector<cells>("Cells", 1, NBSLevel0_.getDomainCells());
+		}
+
+};
+
+}
+
+#endif
diff --git a/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0.cpp b/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0.cpp
new file mode 100644
index 00000000..96e47917
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0.cpp
@@ -0,0 +1,118 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "NBSLevel0.hpp"
+#include "streams.hpp"
+
+bool pFlow::NBSLevel0::findPairs
+(
+	csPairContainerType &pairs, 
+	const deviceViewType1D<realx3> &pointPos, 
+	const pFlagTypeDevice &flags, 
+	const deviceViewType1D<real> &diameter
+)
+{
+	uint32 getFull = 1;
+	
+	// loop until the container size fits the numebr of contact pairs
+	while (getFull > 0)
+	{
+
+		getFull = pFlow::NBSLevel0Kernels::findPairsCount
+		(
+			pairs,
+			sizeRatio_,
+			pointPos,
+			flags,
+			diameter, 
+			getCellIterator()
+		);
+	
+		if(getFull)
+		{
+			// - resize the container
+			//   note that getFull now shows the number of failed insertions.
+			uint32 len = max(getFull,500u) ;
+			
+			auto oldCap = pairs.capacity();
+			
+			pairs.increaseCapacityBy(len);
+
+			INFORMATION<< "The contact pair container capacity increased from "<<
+			oldCap << " to "<<pairs.capacity()<<" in NBSLevel0."<<END_INFO;
+			
+		}
+
+		Kokkos::fence();
+	}
+	
+	return true;
+}
+
+
+pFlow::NBSLevel0::NBSLevel0
+(
+    const 	box& domain,
+    real 	cellSize,
+    real  sizeRatio,
+    const deviceViewType1D<realx3>& pointPos,
+    const pFlagTypeDevice& flags,
+    bool 	adjustableBox
+)
+:
+    mapperNBS
+    (
+        domain,
+        cellSize,
+        pointPos,
+        flags,
+        adjustableBox,
+        true
+    ),
+    sizeRatio_(sizeRatio)
+{
+    
+}
+
+bool pFlow::NBSLevel0::broadSearch
+(
+	csPairContainerType &pairs, 
+	const deviceViewType1D<realx3> &pointPos, 
+	const pFlagTypeDevice &flags, 
+	const deviceViewType1D<real> &diameter,
+	bool& searchBoxChanged
+)
+{	
+	if(!build(pointPos, flags, searchBoxChanged))
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+	if(!findPairs(pairs, pointPos, flags, diameter))
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+	return true;
+}
+
+
diff --git a/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0.hpp b/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0.hpp
new file mode 100644
index 00000000..2f87c151
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0.hpp
@@ -0,0 +1,98 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#ifndef __NBSLevel0_hpp__
+#define __NBSLevel0_hpp__
+
+#include "NBSLevel0Kernels.hpp"
+#include "mapperNBS.hpp"
+
+namespace pFlow
+{
+
+
+class NBSLevel0
+:
+	public mapperNBS
+{
+public:
+
+	using MapperType 		= mapperNBS;
+
+	using CellIterator  	= typename MapperType::CellIterator;
+
+	using HeadType 			= typename MapperType::HeadType;
+
+	using NextType 			= typename MapperType::NextType;	
+
+	
+private:
+
+	real 		sizeRatio_ = 1.0;
+
+	bool findPairs
+	(
+		csPairContainerType& pairs,
+		const deviceViewType1D<realx3>& pointPos,
+    	const pFlagTypeDevice& flags,
+    	const deviceViewType1D<real>& diameter
+	);
+
+public:
+
+	TypeInfoNV("NBSLevel0");
+
+		INLINE_FUNCTION_HD
+		NBSLevel0() = default;
+
+		NBSLevel0(
+			const 	box& domain,
+			real 	cellSize,
+			real 	sizeRatio,
+			const 	deviceViewType1D<realx3>& pointPos,
+			const 	pFlagTypeDevice& flags,
+			bool 	adjustableBox);
+
+		INLINE_FUNCTION_HD
+		NBSLevel0(const NBSLevel0&) = default;
+
+		INLINE_FUNCTION_HD
+		NBSLevel0& operator = (const NBSLevel0&) = default;
+
+		INLINE_FUNCTION_HD
+		~NBSLevel0()=default;
+
+
+	bool broadSearch(
+		csPairContainerType& pairs,
+		const deviceViewType1D<realx3>& pointPos,
+    	const pFlagTypeDevice& flags,
+    	const deviceViewType1D<real>& diameter,
+		bool& searchBoxChanged);
+		
+	
+	
+
+};
+
+} // pFlow
+
+#endif // __NBSLevel0_hpp__
diff --git a/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0Kernels.hpp b/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0Kernels.hpp
new file mode 100644
index 00000000..31df063c
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLevel0Kernels.hpp
@@ -0,0 +1,83 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "mapperNBS.hpp"
+#include "contactSearchGlobals.hpp"
+
+#include "streams.hpp"
+
+namespace pFlow::NBSLevel0Kernels
+{
+
+using mdrPolicyFindPairs = 
+		Kokkos::MDRangePolicy<
+			Kokkos::IndexType<uint32>,
+			Kokkos::Rank<3>,
+			Kokkos::Schedule<Kokkos::Dynamic>,
+			DefaultExecutionSpace>;
+
+template<typename T>
+INLINE_FUNCTION_HD
+void Swap(T& x, T& y)
+{
+	T tmp = x;
+	x = y;
+	y = tmp;
+}
+
+INLINE_FUNCTION_HD
+bool sphereSphereCheck(const realx3& p1, const realx3 p2, real d1, real d2)
+{
+	return length(p2-p1) < 0.5*(d2+d1);
+}
+
+inline
+uint32 findPairsCount
+(
+    csPairContainerType& pairs,
+    real 	sizeRatio,
+    const deviceViewType1D<realx3>& pointPos,
+    const pFlagTypeDevice& flags,
+    const deviceViewType1D<real>& diameter,
+    mapperNBS::CellIterator cellIter
+)
+{
+
+	auto nCells = cellIter.numCells();
+	
+	mdrPolicyFindPairs
+			mdrPolicy(
+				{0,0,0},
+				{nCells.x(), nCells.y(), nCells.z()} );
+
+	uint32 notInsertedPairs = 0u;
+	
+		
+	Kokkos::parallel_reduce	(
+		"pFlow::NBSLevel0Kernels::findPairsCount",
+		mdrPolicy,
+		LAMBDA_HD(uint32 i, uint32 j, uint32 k, uint32& getFullUpdate){
+			#include "NBSLoop.hpp"
+		}, notInsertedPairs);
+		
+	return notInsertedPairs;
+}
+
+}
\ No newline at end of file
diff --git a/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLoop.hpp b/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLoop.hpp
new file mode 100644
index 00000000..ab3eeea7
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/NBSLoop.hpp
@@ -0,0 +1,100 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+uint32 m = cellIter.start(i,j,k);
+int32x3 currentCell(i,j,k);
+uint32 n = mapperNBS::NoPos;
+
+while( m !=  mapperNBS::NoPos)
+{
+	
+	auto p_m = pointPos[m];	
+	auto d_m = sizeRatio* diameter[m];
+	
+	// the same cell
+	n = cellIter.getNext(m);
+	
+	while(n != mapperNBS::NoPos)
+	{
+		auto p_n = pointPos[n];
+		auto d_n = sizeRatio*diameter[n];
+		
+		if( sphereSphereCheck(p_m, p_n, d_m, d_n) )
+		{
+			auto ln = n;
+			auto lm = m;
+
+			if(lm>ln) Swap(lm,ln);
+			if( pairs.insert(lm,ln) == -1)
+			{
+				getFullUpdate++;
+			}
+		}
+		
+		n = cellIter.getNext(n);;
+	}
+
+	// neighbor cells
+	int32x3 neighborCell;
+	for(uint32 ni=0u; ni<13; ni++)
+	{
+		if(ni==0)		neighborCell = currentCell + int32x3( 0, 0,-1);
+		else if(ni==1)	neighborCell = currentCell + int32x3(-1, 0,-1);
+		else if(ni==2)	neighborCell = currentCell + int32x3(-1, 0, 0); 
+		else if(ni==3)	neighborCell = currentCell + int32x3(-1, 0, 1); 
+		else if(ni==4)	neighborCell = currentCell + int32x3( 0,-1,-1); 
+		else if(ni==5)	neighborCell = currentCell + int32x3( 0,-1, 0); 
+		else if(ni==6)	neighborCell = currentCell + int32x3( 0,-1, 1); 
+		else if(ni==7)	neighborCell = currentCell + int32x3(-1,-1,-1); 
+		else if(ni==8)	neighborCell = currentCell + int32x3(-1,-1, 0); 
+		else if(ni==9)	neighborCell = currentCell + int32x3(-1,-1, 1);
+		else if(ni==10)	neighborCell = currentCell + int32x3( 1,-1,-1);  
+		else if(ni==11)	neighborCell = currentCell + int32x3( 1,-1, 0);  
+		else if(ni==12)	neighborCell = currentCell + int32x3( 1,-1, 1);  
+		 
+		if( neighborCell.x()>=0 && neighborCell.y()>=0 && neighborCell.z()>=0 &&
+			neighborCell.x()<nCells.x() && neighborCell.y()<nCells.y() && neighborCell.z()<nCells.z() )
+		{
+			
+			n = cellIter.start(neighborCell.x(), neighborCell.y(), neighborCell.z());
+			while(n != mapperNBS::NoPos)
+			{
+				
+				auto p_n = pointPos[n];
+				auto d_n = sizeRatio*diameter[n];
+				
+				if(sphereSphereCheck(p_m, p_n, d_m, d_n))
+				{
+					auto ln = n;
+					auto lm = m;
+					if(lm>ln) Swap(lm,ln);
+					if( pairs.insert(lm,ln) == -1)
+					{
+						getFullUpdate++;
+					}
+				}
+				n = cellIter.next(n);
+			}
+		}
+	}
+	m = cellIter.next(m);
+}
+
diff --git a/src/Interaction/contactSearch/methods/cellBased/NBS/cellsWallLevel0.cpp b/src/Interaction/contactSearch/methods/cellBased/NBS/cellsWallLevel0.cpp
new file mode 100644
index 00000000..5d85a118
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/cellsWallLevel0.cpp
@@ -0,0 +1,195 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "cellsWallLevel0.hpp"
+#include "streams.hpp"
+
+pFlow::cellsWallLevel0::cellsWallLevel0
+(
+    real cellExtent, 
+    uint32 numPoints, 
+    uint32 numElements, 
+    const ViewType1D<realx3, 
+    memory_space> &points,
+    const ViewType1D<uint32x3, memory_space> &vertices
+)
+:
+    cellExtent_( max(cellExtent, 0.5 ) ),
+    numElements_(numElements),
+    numPoints_(numPoints),
+    vertices_(vertices),
+    points_(points)
+{
+
+    allocateArrays();
+}
+
+bool pFlow::cellsWallLevel0::resetElements
+(
+	uint32 numElements, 
+	uint32 numPoints, 
+	ViewType1D<realx3, memory_space> &points, 
+	ViewType1D<uint32x3, memory_space> &vertices
+)
+{
+
+	numElements_ = numElements;
+	numPoints_ = numPoints;
+	points_ 	= points;
+	vertices_ 	= vertices;
+
+	allocateArrays();
+
+	return true;
+}
+
+bool pFlow::cellsWallLevel0::broadSearch
+(
+	csPairContainerType &pairs,
+	const cells& searchBox,  
+	const mapperNBS::CellIterator &particleMap
+)
+{
+	
+	// map walls onto the cells
+	
+	this->build(searchBox);
+	
+	this->particleWallFindPairs(pairs, particleMap);
+	
+	return true;
+}
+
+bool pFlow::cellsWallLevel0::build(const cells & searchBox)
+{
+	
+	Kokkos::parallel_for(
+		"pFlow::cellsWallLevel0::build",
+		deviceRPolicyStatic(0,numElements_),
+		CLASS_LAMBDA_HD(uint32 i)
+		{
+			auto v = vertices_[i];
+			auto p1 = points_[v.x()];
+			auto p2 = points_[v.y()];
+			auto p3 = points_[v.z()];
+			
+			realx3 minP;
+			realx3 maxP;
+
+			searchBox.extendBox(p1, p2, p3, cellExtent_, minP, maxP);
+			elementBox_[i] = iBoxType(searchBox.pointIndex(minP), searchBox.pointIndex(maxP));
+		});
+	Kokkos::fence();
+
+	return true;
+}
+
+bool pFlow::cellsWallLevel0::particleWallFindPairs
+(
+	csPairContainerType &pairs, 
+	const mapperNBS::CellIterator &particleMap
+)
+{
+
+	uint32 getFull = 1;
+
+	while (getFull)
+	{
+		
+		getFull = findPairsElementRangeCount(pairs, particleMap);
+		
+		if(getFull)
+		{
+			// - resize the container
+			//   note that getFull now shows the number of failed insertions.
+			uint32 len = max(getFull, 50u);
+			auto oldCap = pairs.capacity();
+			pairs.increaseCapacityBy(len);
+
+			INFORMATION<<"Contact pair container capacity increased from "<<
+					oldCap << " to " 
+					<< pairs.capacity() <<" in cellsWallLevel0."<<END_INFO;
+			
+			Kokkos::fence();
+		}
+	}
+	
+	return true;
+}
+
+pFlow::int32 pFlow::cellsWallLevel0::findPairsElementRangeCount
+(
+	csPairContainerType &pairs, 
+	const mapperNBS::CellIterator &particleMap
+)
+{
+	uint32 getFull =0;
+	
+	//const auto pwPairs = pairs;
+	const auto elementBox = elementBox_;
+	
+	
+	Kokkos::parallel_reduce(
+		"pFlow::cellsWallLevel0::findPairsElementRangeCount",
+		tpPWContactSearch(numElements_, Kokkos::AUTO),
+		LAMBDA_HD(
+			const typename tpPWContactSearch::member_type & teamMember,
+			uint32& valueToUpdate){
+			
+			const uint32 iTri = teamMember.league_rank();
+
+			const auto triBox = elementBox[iTri];
+			
+			uint32 getFull2 = 0;
+
+			auto bExtent = boxExtent(triBox);
+			uint32 numCellBox = bExtent.x()*bExtent.y()*bExtent.z();
+
+			Kokkos::parallel_reduce( 
+				Kokkos::TeamThreadRange( teamMember, numCellBox ),
+				[&] ( const uint32 linIndex, uint32 &innerUpdate )
+					{
+						
+						int32x3 cell;
+						indexToCell(linIndex, triBox, cell);
+						
+						uint32 n = particleMap.start(cell.x(),cell.y(),cell.z());
+						
+						while( n != particleMap.NoPos)
+						{
+							// id is wall id the pair is (particle id, wall id)
+							if( pairs.insert(
+								static_cast<csIdType>(n),
+								static_cast<csIdType>(iTri) ) == -1 )
+								innerUpdate++;
+							n = particleMap.next(n);
+						
+						}
+
+					},
+				getFull2
+			);
+
+			if ( teamMember.team_rank() == 0 ) valueToUpdate += getFull2;
+		},
+		getFull
+		);
+	return getFull;
+}
\ No newline at end of file
diff --git a/src/Interaction/contactSearch/methods/cellBased/NBS/cellsWallLevel0.hpp b/src/Interaction/contactSearch/methods/cellBased/NBS/cellsWallLevel0.hpp
new file mode 100644
index 00000000..2ffb4414
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/cellsWallLevel0.hpp
@@ -0,0 +1,139 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __cellsWallLevel0_hpp__
+#define __cellsWallLevel0_hpp__
+
+#include "contactSearchGlobals.hpp"
+#include "contactSearchFunctions.hpp"
+#include "mapperNBS.hpp"
+#include "iBox.hpp"
+
+
+
+namespace pFlow
+{
+
+class cellsWallLevel0
+{
+public:
+
+	using execution_space = csExecutionSpace;
+
+	using memory_space 	= typename execution_space::memory_space;
+
+	using iBoxType 		= iBox<int32>;	
+
+	class TagFindCellRange2{};
+
+private:
+
+	// - box extent
+	real 			cellExtent_ = 0.5;
+
+	// - number of triangle elements 
+	uint32			numElements_ = 0;
+
+	// - number of points
+	uint32 			numPoints_ = 0;
+
+	// - ref to vectices (borrowed)
+	ViewType1D<uint32x3, memory_space> 	vertices_;
+
+	// - ref to points in the trisurface (borrowed)
+	ViewType1D<realx3, memory_space> 	points_;
+
+	// cell range of element/triangle bounding box
+	ViewType1D<iBoxType, memory_space> 	elementBox_;
+	
+
+	using tpPWContactSearch = Kokkos::TeamPolicy<
+			execution_space,
+			Kokkos::Schedule<Kokkos::Dynamic>,
+			Kokkos::IndexType<uint32>>;
+	
+	FUNCTION_H
+	void allocateArrays()
+	{
+		reallocNoInit( elementBox_, numElements_);
+	}
+
+public:
+
+	TypeInfoNV("cellsWallLevel0");
+
+	INLINE_FUNCTION_HD
+	cellsWallLevel0(){}
+
+	FUNCTION_H
+	cellsWallLevel0(
+		real 					cellExtent,
+		uint32 					numPoints,
+		uint32 					numElements,
+		const ViewType1D<realx3,memory_space>& 		points, 
+		const ViewType1D<uint32x3,memory_space>& 	vertices);
+	
+
+	
+	// - host call
+	//   reset triangle elements if they have changed
+	bool resetElements( 
+		uint32 		numElements,
+		uint32      numPoints,
+		ViewType1D<realx3, memory_space>& points, 
+		ViewType1D<uint32x3, memory_space>& vertices);
+	
+
+	INLINE_FUNCTION_HD
+	iBoxType elementBox(uint32 i)const
+	{
+		return elementBox_[i];
+	}
+
+	INLINE_FUNCTION_HD
+	uint32 numElements()const
+	{
+		return numElements_;
+	}
+
+	bool broadSearch(
+		csPairContainerType& pairs,
+		const cells& searchBox, 
+		const mapperNBS::CellIterator& particleMap);
+	
+
+	bool build(const cells& searchBox);
+	
+	bool particleWallFindPairs(
+		csPairContainerType& pairs, 
+		const mapperNBS::CellIterator& particleMap);
+
+	int32 findPairsElementRangeCount(
+		csPairContainerType& pairs, 
+		const mapperNBS::CellIterator& particleMap); 
+	
+
+
+}; // cellsWallLevel0
+
+} // pFlow
+
+
+#endif // __cellsWallLevel0_hpp__
diff --git a/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.cpp b/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.cpp
new file mode 100644
index 00000000..416ec57d
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.cpp
@@ -0,0 +1,194 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "mapperNBS.hpp"
+#include "mapperNBSKernels.hpp"
+#include "streams.hpp"
+
+pFlow::uint32 pFlow::mapperNBS::checkInterval_ = 1000;
+pFlow::real pFlow::mapperNBS::enlargementFactor_ = 1;
+
+bool pFlow::mapperNBS::setSearchBox
+(
+    const deviceViewType1D<realx3> &pointPos, 
+    const pFlagTypeDevice &flags,
+    real cellSize
+)
+{
+    box domainBox = domainCells_.domainBox();
+
+	
+    if(adjustableBox_)
+    {
+        lastCheckForBox_ = buildCount_;
+        
+        realx3 minP;
+        realx3 maxP;
+        pFlow::mapperNBSKernels::findPointExtends
+        (
+            pointPos, 
+            flags, 
+            minP, maxP
+        );
+
+        minP = max( minP - enlargementFactor_*cellSize, domainBox.minPoint());
+        maxP = min( maxP + enlargementFactor_*cellSize, domainBox.maxPoint());       
+        
+        box searchBox = {minP, maxP};
+        searchCells_ = cells(searchBox, cellSize);    
+        INFORMATION<<"Search box for contact search has changed: "<< 
+        "search box is ["<<searchCells_.domainBox().minPoint()<<
+        " "<<searchCells_.domainBox().maxPoint()<<"]"<<END_INFO;
+        
+        return true;
+        
+    }
+    else
+    {
+        searchCells_ = cells(domainBox, cellSize);
+        INFORMATION<<"Search box for contact search is: ["
+        << domainBox.minPoint()<<" "<<domainBox.maxPoint()<<"]"<<END_INFO;
+
+        return false;
+    }
+    
+}
+
+void pFlow::mapperNBS::allocateArrays(rangeU32 nextRng)
+{
+    checkAllocateNext(nextRng);
+    nullifyNext(nextRng);
+    reallocFill(head_, searchCells_.nx(), searchCells_.ny(), searchCells_.nz(), NoPos);
+}
+
+void pFlow::mapperNBS::checkAllocateNext(rangeU32 nextRng)
+{
+
+    auto newCap = nextRng.end();
+    
+    if( nextCapacity_ < newCap)
+    {
+        nextCapacity_ = newCap;	
+        if(!nextOwner_)return;
+        reallocNoInit(next_, nextCapacity_);
+    }
+}
+
+void pFlow::mapperNBS::nullifyHead()
+{
+    fill(head_, NoPos);	
+}
+
+void pFlow::mapperNBS::nullifyNext(rangeU32 nextRng)
+{
+    if(!nextOwner_)return;
+		fill(next_, nextRng, NoPos);
+}
+
+pFlow::mapperNBS::mapperNBS(
+    const box &domain,
+    real cellSize,
+    const deviceViewType1D<realx3> &pointPos,
+    const pFlagTypeDevice &flags,
+    bool adjustableBox,
+    bool nextOwner
+)
+: 
+   	domainCells_(domain, cellSize),
+    searchCells_(domain, cellSize),
+   	adjustableBox_(adjustableBox),
+	nextOwner_(nextOwner)
+{
+    setSearchBox(pointPos, flags, cellSize);
+
+    allocateArrays(flags.activeRange());
+}
+
+bool pFlow::mapperNBS::build
+(
+    const deviceViewType1D<realx3>& pointPos, 
+    const pFlagTypeDevice & flags,
+    bool&  searchBoxChanged
+)
+{
+    auto aRange = flags.activeRange();
+    buildCount_++;
+    if(adjustableBox_ && buildCount_%checkInterval_ == 0)
+    {   
+
+        if(searchBoxChanged = 
+            setSearchBox(pointPos, flags, searchCells_.cellSize());searchBoxChanged)
+        {
+            allocateArrays(aRange);
+        }  
+        
+    }
+    else
+    {
+        checkAllocateNext(aRange);
+        nullifyHead();
+        nullifyNext(aRange);
+    }    
+    
+    if( adjustableBox_ )
+    {
+        if(!pFlow::mapperNBSKernels::buildListsReduce(
+            searchCells_,
+            head_,
+            next_,
+            pointPos,
+            flags) )
+        {
+
+            buildCount_++;           
+            setSearchBox(pointPos, flags, searchCells_.cellSize());
+            
+            searchBoxChanged = true;
+            
+            allocateArrays(flags.activeRange());
+
+            if(!pFlow::mapperNBSKernels::buildListsReduce(
+                searchCells_,
+                head_,
+                next_,
+                pointPos,
+                flags))
+            {
+                fatalErrorInFunction<<"failed to build list in anjustable search box mode!"<<endl;
+                return false;   
+            }
+        }
+    }
+    else
+    {
+        pFlow::mapperNBSKernels::buildLists(
+            searchCells_,
+            head_,
+            next_,
+            pointPos,
+            flags
+        );
+        searchBoxChanged = false;
+    }
+    
+    return true;
+
+}
+
diff --git a/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.hpp b/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.hpp
new file mode 100644
index 00000000..471a1ab9
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.hpp
@@ -0,0 +1,212 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+#ifndef __mapperNBS_hpp__
+#define __mapperNBS_hpp__
+
+#include "phasicFlowKokkos.hpp"
+#include "pointFlag.hpp"
+#include "cells.hpp"
+//#include "contactSearchFunctions.hpp"
+
+
+namespace pFlow
+{
+
+class mapperNBS
+{
+public:
+
+	using HeadType 			= deviceViewType3D<uint32>;
+
+	using NextType 			= deviceViewType1D<uint32>;	
+
+	
+	static constexpr uint32 NoPos 	= 0xFFFFFFFF;
+
+	class CellIterator
+	{
+	private:
+		HeadType 		head_;
+
+		NextType 		next_;
+
+	public:
+
+		CellIterator(const HeadType& head, const NextType& next)
+		:
+			head_(head),
+			next_(next)
+		{}
+		
+		static constexpr uint32 NoPos = 0xFFFFFFFF;
+
+		INLINE_FUNCTION_HD
+		int32x3 numCells()const {
+			return int32x3(head_.extent(0), head_.extent(1), head_.extent(2));}
+
+		INLINE_FUNCTION_HD
+		uint32 start(int32 i, int32 j, int32 k)const {
+			return head_(i,j,k); }
+
+		INLINE_FUNCTION_HD
+		uint32 getNext(uint32 n)const {
+			if(n == NoPos ) return NoPos;
+			return next_(n); }
+
+		INLINE_FUNCTION_HD
+		uint32 next(uint32 n)const{
+			return next_(n);}
+	};
+
+private:
+	
+	cells  				domainCells_;
+
+	cells 				searchCells_;
+
+	HeadType 			head_{"NBS::head",1,1,1};
+
+	NextType 			next_{"NBS::next", 1};
+
+	uint32 				nextCapacity_ = 0;
+
+	uint32 				lastCheckForBox_ = 0;
+
+	uint32 				buildCount_ = 0;
+
+	bool 				adjustableBox_ = false;
+
+	bool 				nextOwner_ 	= true;
+
+	static uint32 		checkInterval_;	
+
+	static real 		enlargementFactor_;
+
+	bool setSearchBox(
+		const deviceViewType1D<realx3>& pointPos,
+		const pFlagTypeDevice& flags,
+		real cellSize
+	);
+
+	void allocateArrays(rangeU32 nextRng);
+
+	void checkAllocateNext(rangeU32 nextRng);
+	
+	void nullifyHead();
+	
+	void nullifyNext(rangeU32 nextRng);
+	
+public:
+
+	TypeInfoNV("mapperNBS");
+
+		INLINE_FUNCTION_HD
+		mapperNBS() = default;
+
+		mapperNBS(
+			const 	box& domain,
+			real 	cellSize,
+			const deviceViewType1D<realx3>& pointPos,
+			const pFlagTypeDevice& flags,
+			bool 	adjustableBox,
+			bool 	nextOwner = true);
+					
+		INLINE_FUNCTION_HD
+		mapperNBS(const mapperNBS&) = default;
+
+		INLINE_FUNCTION_HD
+		mapperNBS(mapperNBS&&) = default;
+		
+		INLINE_FUNCTION_HD
+		mapperNBS& operator = (const mapperNBS&) = default;
+
+		INLINE_FUNCTION_HD
+		mapperNBS& operator = (mapperNBS&&) = default;
+
+		INLINE_FUNCTION_HD
+		~mapperNBS()=default;
+
+	//// - Methods
+
+		auto getCellIterator()const
+		{
+			return CellIterator(head_, next_);
+		}
+
+		const auto& getDomainCells()const
+		{
+			return domainCells_;
+		}
+
+		const auto& getSearchCells()const
+		{
+			return searchCells_;
+		}
+
+		bool build(
+			const deviceViewType1D<realx3>& pointPos,
+			const pFlagTypeDevice& flags,
+			bool&  searchBoxChanged);
+
+		
+	
+
+};
+
+} // pFlow
+
+#endif // __mapperNBS_hpp__
+
+
+
+
+/*
+INLINE_FUNCTION_HD
+	auto& head()
+	{
+		return head_;
+	}
+
+	INLINE_FUNCTION_HD
+	auto& next()
+	{
+		return next_;
+	}
+
+	INLINE_FUNCTION_HD
+	const auto& head()const
+	{
+		return head_;
+	}
+
+	INLINE_FUNCTION_HD
+	const auto& next()const
+	{
+		return next_;
+	}
+
+	INLINE_FUNCTION_HD
+	auto& pointPosition()
+	{
+		return pointPosition_;
+	}
+*/
\ No newline at end of file
diff --git a/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBSKernels.cpp b/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBSKernels.cpp
new file mode 100644
index 00000000..01141eac
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBSKernels.cpp
@@ -0,0 +1,192 @@
+
+
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#include "mapperNBSKernels.hpp"
+
+
+void pFlow::mapperNBSKernels::findPointExtends
+(
+    const deviceViewType1D<realx3>& points,
+    const pFlagTypeDevice& flags,
+    realx3& minPoint,
+    realx3& maxPoint
+)
+{
+    if(flags.numActive() == 0)
+    {
+        minPoint = {0,0,0};
+        maxPoint = {0,0,0};
+        return;
+    }
+
+    real minX;
+    real minY;
+    real minZ;
+    real maxX;
+    real maxY;
+    real maxZ;
+    auto aRange = flags.activeRange();
+    Kokkos::parallel_reduce(
+        "pFlow::mapperNBSKernels::findPointExtends",
+        deviceRPolicyStatic(aRange.start(), aRange.end()),
+        LAMBDA_HD(
+            uint32 i, 
+            real& minXUpdate, 
+            real& minYUpdate, 
+            real& minZUpdate,
+            real& maxXUpdate,
+            real& maxYUpdate,
+            real& maxZUpdate)
+        {
+            if(flags(i))
+            {
+                auto p = points(i);
+                minXUpdate = min(p.x(), minXUpdate);
+                minYUpdate = min(p.y(), minYUpdate);
+                minZUpdate = min(p.z(), minZUpdate);
+                maxXUpdate = max(p.x(), maxXUpdate);
+                maxYUpdate = max(p.y(), maxYUpdate);
+                maxZUpdate = max(p.z(), maxZUpdate);
+            }
+
+        },
+        Kokkos::Min<real>(minX),
+        Kokkos::Min<real>(minY), 
+        Kokkos::Min<real>(minZ),
+        Kokkos::Max<real>(maxX),
+        Kokkos::Max<real>(maxY),
+        Kokkos::Max<real>(maxZ)
+    );
+
+    minPoint = {minX, minY, minZ};
+    maxPoint = {maxX, maxY, maxZ};
+}
+
+bool pFlow::mapperNBSKernels::buildListsReduce
+(
+    const cells &searchCell, 
+    const deviceViewType3D<uint32> &head, 
+    const deviceViewType1D<uint32> &next, 
+    const deviceViewType1D<realx3> &points, 
+    const pFlagTypeDevice &flags
+)
+{
+    uint32 numOut = 0;
+    auto aRange = flags.activeRange();
+
+    if(flags.isAllActive())
+    {
+        Kokkos::parallel_reduce
+        (
+            "pFlow::mapperNBSKernels::buildListsReduce",
+            deviceRPolicyStatic(aRange.start(), aRange.end()),
+            LAMBDA_HD(uint32 i, uint32& valToUpdate)
+            {	
+                int32x3 ind;
+                if( searchCell.pointIndexInDomain(points[i], ind) )
+                {
+                    uint32 old = Kokkos::atomic_exchange(&head(ind.x(), ind.y(), ind.z()), i);
+                    next[i] = old;	
+                }
+                else
+                {
+                    valToUpdate++;
+                }
+            },
+            numOut
+        );
+    }
+    else
+    {
+        Kokkos::parallel_reduce
+        (
+            "pFlow::mapperNBSKernels::buildListsReduce",
+            deviceRPolicyStatic(aRange.start(), aRange.end()),
+            LAMBDA_HD(uint32 i, uint32& valToUpdate)
+            {	
+                int32x3 ind;
+                if( flags(i) )
+                {
+                    if( searchCell.pointIndexInDomain(points[i], ind) )
+                    {
+                        uint32 old = Kokkos::atomic_exchange(&head(ind.x(), ind.y(), ind.z()), i);
+                        next[i] = old;	
+                    }
+                    else
+                    {
+                        valToUpdate++;
+                    }
+                }
+            },
+            numOut
+        );
+    }
+
+    return numOut == 0u ;
+}
+
+bool pFlow::mapperNBSKernels::buildLists
+(
+    const cells &searchCell, 
+    const deviceViewType3D<uint32> &head, 
+    const deviceViewType1D<uint32> &next, 
+    const deviceViewType1D<realx3> &points, 
+    const pFlagTypeDevice &flags
+)
+{
+    auto aRange = flags.activeRange();
+    if(flags.isAllActive() )
+    {
+        Kokkos::parallel_for
+        (
+            "pFlow::mapperNBSKernels::buildLists",
+            deviceRPolicyStatic(aRange.start(), aRange.end()),
+            LAMBDA_HD(uint32 i)
+            {
+                auto ind = searchCell.pointIndex(points[i]);	
+                uint32 old = Kokkos::atomic_exchange(&head(ind.x(), ind.y(), ind.z()), i);
+                next[i] = old;
+            }
+        );
+        Kokkos::fence();    
+    }
+    else
+    {
+       Kokkos::parallel_for
+        (
+            "pFlow::mapperNBSKernels::buildLists",
+            deviceRPolicyStatic(aRange.start(), aRange.end()),
+            LAMBDA_HD(uint32 i)
+            {
+                if( flags(i) )
+                {
+                    auto ind = searchCell.pointIndex(points[i]);	
+                    uint32 old = Kokkos::atomic_exchange(&head(ind.x(), ind.y(), ind.z()), i);
+                    next[i] = old;
+                }
+            }
+        );
+        Kokkos::fence();
+    }
+
+    return true;
+}
diff --git a/src/Interaction/interaction/demInteraction.hpp b/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBSKernels.hpp
similarity index 59%
rename from src/Interaction/interaction/demInteraction.hpp
rename to src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBSKernels.hpp
index 8c74639c..6730ff22 100644
--- a/src/Interaction/interaction/demInteraction.hpp
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBSKernels.hpp
@@ -18,42 +18,32 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-#ifndef __demInteraction_hpp__
-#define __demInteraction_hpp__
+#include "phasicFlowKokkos.hpp"
+#include "cells.hpp"
+#include "pointFlag.hpp"
 
-#include "property.hpp"
-#include "demComponent.hpp"
-#include "pointFields.hpp"
-#include "triSurfaceFields.hpp"
 
-namespace pFlow
+namespace pFlow::mapperNBSKernels
 {
 
-class demInteraction
-:
-	public property,
-	public demComponent
-{
-protected:
+void findPointExtends(
+    const deviceViewType1D<realx3>& points,
+    const pFlagTypeDevice& flags,
+    realx3& minPoint,
+    realx3& maxPoint);
 
-public:
-	demInteraction(systemControl& control)
-	:
-		property(),
-		demComponent("interaction", control)
-	{}
+bool buildListsReduce(
+    const cells& searchCell,
+    const deviceViewType3D<uint32>& head,
+    const deviceViewType1D<uint32>& next,
+    const deviceViewType1D<realx3>& points,
+    const pFlagTypeDevice& flags);
 
-	demInteraction(systemControl& control, const fileSystem& file)
-	:
-		property(file),
-		demComponent("interaction", control)
-	{}
+bool buildLists(
+    const cells& searchCell,
+    const deviceViewType3D<uint32>& head,
+    const deviceViewType1D<uint32>& next,
+    const deviceViewType1D<realx3>& points,
+    const pFlagTypeDevice& flags);
 
-
-
-};
-
-
-}
-
-#endif //__interaction_hpp__ 
+}
\ No newline at end of file
diff --git a/src/Interaction/contactSearch/cells.hpp b/src/Interaction/contactSearch/methods/cellBased/cells.hpp
similarity index 62%
rename from src/Interaction/contactSearch/cells.hpp
rename to src/Interaction/contactSearch/methods/cellBased/cells.hpp
index c77b1a69..c4b50813 100644
--- a/src/Interaction/contactSearch/cells.hpp
+++ b/src/Interaction/contactSearch/methods/cellBased/cells.hpp
@@ -28,58 +28,40 @@ Licence:
 namespace pFlow
 {
 
-template<typename indexType>
 class cells
 {
-public:
-	
-	using CellType = triple<indexType>;
-
-protected:
+private:
 
 	// - domain 
-	box 		domain_{realx3(0.0), realx3(1.0)};
+	box 		domainBox_{realx3(0.0), realx3(1.0)};
 
 	// - cell size 
-	realx3 		cellSize_{1,1,1};
-
-	CellType 	numCells_{1,1,1};
+	real 		celldx_{1};
 
+	int32x3 	numCells_{1,1,1};
 	
 	// - protected methods
 	INLINE_FUNCTION_H
 	void calculate()
 	{
-		numCells_ = (domain_.maxPoint()-domain_.minPoint())/cellSize_ + realx3(1.0);
-		numCells_ = max( numCells_ , CellType(static_cast<indexType>(1)) );
+		numCells_ = (domainBox_.maxPoint()-domainBox_.minPoint())/celldx_ + realx3(1.0);
+		numCells_ = max( numCells_ , int32x3(1) );
 	}
 
 public:
 
 	INLINE_FUNCTION_HD
-	cells()
-	{}
+	cells() = default;
 
 	INLINE_FUNCTION_H
 	cells(const box& domain, real cellSize)
 	:
-		domain_(domain),
-		cellSize_(cellSize)
+		domainBox_(domain),
+		celldx_(cellSize)
 	{
 		calculate();
 	}
 
- 
-	INLINE_FUNCTION_H
-	cells(const box& domain, int32 nx, int32 ny, int32 nz)
-	:
-		domain_(domain),
-		cellSize_(
-			(domain_.maxPoint() - domain_.minPoint())/realx3(nx, ny,  nz)
-			),
-		numCells_(nx, ny, nz)
-	{}
-
 	INLINE_FUNCTION_HD
 	cells(const cells&) = default;
 
@@ -100,43 +82,36 @@ public:
 	INLINE_FUNCTION_H
 	void setCellSize(real cellSize)
 	{
-		cellSize_ = cellSize;
-		calculate();
-	}
-
-	INLINE_FUNCTION_H
-	void setCellSize(realx3 cellSize)
-	{
-		cellSize_ = cellSize;
+		celldx_ = cellSize;
 		calculate();
 	}
 
 	INLINE_FUNCTION_HD
-	realx3 cellSize()const
+	real cellSize()const
 	{
-		return cellSize_;
+		return celldx_;
 	}
 
 	INLINE_FUNCTION_HD
-	const CellType& numCells()const
+	const int32x3& numCells()const
 	{
 		return numCells_;
 	}
 
 	INLINE_FUNCTION_HD
-	indexType nx()const
+	int32 nx()const
 	{
 		return numCells_.x();
 	}
 
 	INLINE_FUNCTION_HD
-	indexType ny()const
+	int32 ny()const
 	{
 		return numCells_.y();
 	}
 
 	INLINE_FUNCTION_HD
-	indexType nz()const
+	int32 nz()const
 	{
 		return numCells_.z();
 	}
@@ -149,22 +124,21 @@ public:
 				static_cast<int64>(numCells_.z());
 	}
 
-	const auto& domain()const
+	const auto& domainBox()const
 	{
-		return domain_;
+		return domainBox_;
 	}
 	
 	INLINE_FUNCTION_HD
-	CellType pointIndex(const realx3& p)const
+	int32x3 pointIndex(const realx3& p)const
 	{
-		return CellType( (p - domain_.minPoint())/cellSize_ );
+		return int32x3( (p - domainBox_.minPoint())/celldx_ );
 	}
 
 	INLINE_FUNCTION_HD
-	bool pointIndexInDomain(const realx3 p, CellType& index)const
+	bool pointIndexInDomain(const realx3 p, int32x3& index)const
 	{
-		if( !domain_.isInside(p) ) return false;
-		
+		if(!inDomain(p))return false;
 		index = this->pointIndex(p);
 		return true;
 	}
@@ -172,11 +146,11 @@ public:
 	INLINE_FUNCTION_HD
 	bool inDomain(const realx3& p)const
 	{	
-		return domain_.isInside(p);
+		return domainBox_.isInside(p);
 	}
 
 	INLINE_FUNCTION_HD
-	bool isInRange(const CellType& cell)const
+	bool inCellRange(const int32x3& cell)const
 	{
 		if(cell.x()<0)return false;
 		if(cell.y()<0)return false;
@@ -188,7 +162,7 @@ public:
 	}
 
 	INLINE_FUNCTION_HD
-	bool isInRange(indexType i, indexType j, indexType k)const
+	bool inCellRange(int32 i, int32 j, int32 k)const
 	{
 		if(i<0)return false;
 		if(j<0)return false;
@@ -199,22 +173,7 @@ public:
 		return true;
 	}
 
-	INLINE_FUNCTION_HD
-	void extendBox(
-		const CellType& p1,
-		const CellType& p2,
-		const CellType& p3,
-		indexType extent,
-		CellType& minP,
-		CellType& maxP)const
-	{
-		minP = min( min( p1, p2), p3)-extent;
-		maxP = max( max( p1, p2), p3)+extent;
-
-		minP = bound(minP);
-		maxP = bound(maxP);
-	}
-
+	
 	INLINE_FUNCTION_HD
 	void extendBox(
 		const realx3& p1,
@@ -224,17 +183,17 @@ public:
 		realx3& minP,
 		realx3& maxP)const
 	{
-		minP = min(min(p1,p2),p3) - extent*cellSize_ ;
-		maxP = max(max(p1,p2),p3) + extent*cellSize_ ;
+		minP = min(min(p1,p2),p3) - extent*celldx_ ;
+		maxP = max(max(p1,p2),p3) + extent*celldx_ ;
 
 		minP = bound(minP);
 		maxP = bound(maxP);
 	}
 
 	INLINE_FUNCTION_HD
-	CellType bound(CellType p)const
+	int32x3 bound(int32x3 p)const
 	{
-		return CellType(
+		return int32x3(
 			min( numCells_.x()-1, max(0,p.x())),
 			min( numCells_.y()-1, max(0,p.y())),
 			min( numCells_.z()-1, max(0,p.z()))
@@ -245,9 +204,9 @@ public:
 	realx3 bound(realx3 p)const
 	{
 		return realx3(
-			min( domain_.maxPoint().x(), max(domain_.minPoint().x(),p.x())),
-			min( domain_.maxPoint().y(), max(domain_.minPoint().y(),p.y())),
-			min( domain_.maxPoint().z(), max(domain_.minPoint().z(),p.z()))
+			min( domainBox_.maxPoint().x(), max(domainBox_.minPoint().x(),p.x())),
+			min( domainBox_.maxPoint().y(), max(domainBox_.minPoint().y(),p.y())),
+			min( domainBox_.maxPoint().z(), max(domainBox_.minPoint().z(),p.z()))
 			);
 	}
 };	
diff --git a/src/Interaction/contactSearch/methods/mapperNBS.hpp b/src/Interaction/contactSearch/methods/mapperNBS.hpp
deleted file mode 100644
index 41b47068..00000000
--- a/src/Interaction/contactSearch/methods/mapperNBS.hpp
+++ /dev/null
@@ -1,389 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-
-#ifndef __mapperNBS_hpp__
-#define __mapperNBS_hpp__
-
-#include "cells.hpp"
-#include "contactSearchFunctions.hpp"
-#include "baseAlgorithms.hpp"
-#include "ViewAlgorithms.hpp"
-
-namespace pFlow
-{
-
-template<typename executionSpace>
-class mapperNBS
-:
-	public cells<int32>
-{
-public:
-
-	using IdType 			= int32;
-	
-	using IndexType 	= int32;
-
-	using Cells 			= cells<IndexType>;
-
-	using CellType 		= typename Cells::CellType;
-
-	using execution_space = executionSpace;
-
-	using memory_space 		= typename execution_space::memory_space;
-
-	using HeadType 		= ViewType3D<int32, memory_space>;
-
-	using NextType 		= ViewType1D<int32, memory_space>;	
-
-	class cellIterator
-	{
-	private:
-		HeadType 		head_;
-
-		NextType 		next_;
-
-	public:
-
-		cellIterator(ViewType3D<int32, memory_space> head, ViewType1D<int32, memory_space> next)
-		:
-			head_(head),
-			next_(next)
-		{}
-
-		INLINE_FUNCTION_HD
-		Cells cellsSize()const {
-			return Cells(head_.extent(0), head_.extent(1), head_.extent(2));}
-
-		INLINE_FUNCTION_HD
-		int32 start(IndexType i, IndexType j, IndexType k)const {
-			return head_(i,j,k); }
-
-		INLINE_FUNCTION_HD
-		int32 getNext(int32 n)const {
-			if(n<0) return n;
-			return next_(n); }
-	};
-
-protected:
-
-	int32 									capacity_ = 1;
-
-	ViewType3D<int32, memory_space> 		head_;
-
-	ViewType1D<int32, memory_space> 		next_;
-
-	bool 									nextOwner_ = true;
-
-	// borrowed ownership
-	ViewType1D<realx3, memory_space> 		pointPosition_;
-
-	using rangePolicyType	=
-		Kokkos::RangePolicy<
-			Kokkos::IndexType<int32>,
-			Kokkos::Schedule<Kokkos::Static>,
-			execution_space>;
-	
-	INLINE_FUNCTION_H
-	void nullifyHead()
-	{
-		fill(
-			head_,
-			range(0,this->nx()),
-			range(0,this->ny()),
-			range(0,this->nz()),
-			static_cast<int32>(-1)
-			);
-	}
-
-	void nullifyNext(range nextRng)
-	{
-		if(!nextOwner_)return;
-		fill(
-			next_,
-			nextRng,
-			static_cast<int32>(-1)
-			);
-	}
-
-	void nullify()
-	{
-		nullifyHead();
-
-		nullifyNext(range(0,capacity_));
-	}
-
-	void nullify(range nextRng)
-	{
-		nullifyHead();
-
-		nullifyNext(nextRng);
-	}
-	
-
-	void checkAllocateNext(int newCap)
-	{
-		if( capacity_ < newCap)
-		{
-			capacity_ = newCap;	
-			if(!nextOwner_)return;
-			reallocNoInit(next_, capacity_);
-		}
-	}
-
-	void allocateHead()
-	{
-		reallocNoInit(head_, this->nx(), this->ny(), this->nz());
-	}
-
-
-	
-public:
-
-	TypeInfoNV("mapperNBS");
-
-		INLINE_FUNCTION_HD
-		mapperNBS(){}
-
-		mapperNBS(
-			const 	box& domain,
-			real 	cellSize,
-			const 	ViewType1D<realx3, memory_space>& position,
-			bool 	nextOwner = true)
-		:
-			Cells(domain, cellSize),
-			pointPosition_(position),
-			head_(
-				"mapperNBS::head_",
-				this->nx(),
-				this->ny(),
-				this->nz()
-				), 
-			next_("mapperNBS::next_",1), //,position.size()),
-			nextOwner_(nextOwner)
-		{
-			checkAllocateNext(pointPosition_.size());
-		}
-
-		mapperNBS(
-			const 	box& domain,
-			int32 	nx,
-			int32 	ny,
-			int32 	nz,
-			const 	ViewType1D<realx3, memory_space>& position,
-			bool 	nextOwner = true)
-		:
-			Cells(domain, nx, ny, nz),
-			pointPosition_(position),
-			head_("mapperNBS::head_",nx,ny,nz), 
-			next_("mapperNBS::next_",1),
-			nextOwner_(nextOwner)
-		{
-			checkAllocateNext(pointPosition_.size());
-		}
-
-			
-		INLINE_FUNCTION_HD
-		mapperNBS(const mapperNBS&) = default;
-
-		INLINE_FUNCTION_HD
-		mapperNBS& operator = (const mapperNBS&) = default;
-
-		INLINE_FUNCTION_HD
-		~mapperNBS()=default;
-
-	//// - Methods 
-	INLINE_FUNCTION_HD
-	auto capacity()const
-	{
-		return capacity_;
-	}
-
-	cellIterator getCellIterator()const
-	{
-		return cellIterator(head_, next_);
-	}
-
-	bool particlesCapcityChanged(int32 newCap)
-	{
-		checkAllocateNext(newCap);
-		return true;
-	}
-
-	INLINE_FUNCTION_HD
-	auto& head()
-	{
-		return head_;
-	}
-
-	INLINE_FUNCTION_HD
-	auto& next()
-	{
-		return next_;
-	}
-
-	INLINE_FUNCTION_HD
-	const auto& head()const
-	{
-		return head_;
-	}
-
-	INLINE_FUNCTION_HD
-	const auto& next()const
-	{
-		return next_;
-	}
-
-	INLINE_FUNCTION_HD
-	auto& pointPosition()
-	{
-		return pointPosition_;
-	}
-
-	INLINE_FUNCTION_H
-	void setNext(ViewType1D<int32, memory_space>& next)
-	{
-		if(!nextOwner_)
-		{
-			next_ = next;
-			capacity_ = next.size();
-		}
-	}
-
-	
-
-	// - build based on all points in active range
-	INLINE_FUNCTION_H
-	void build(range activeRange)
-	{
-		checkAllocateNext(activeRange.second);
-		nullify(activeRange);
-		
-		Cells cellIndex = static_cast<Cells>(*this);
-		auto points = pointPosition_;
-		auto next = next_;
-		auto head = head_;
-
-		rangePolicyType rPolicy(activeRange.first, activeRange.second);
-		
-		Kokkos::parallel_for(
-			"mapperNBS::build",
-			rPolicy,
-			LAMBDA_HD(int32 i){
-				CellType ind = cellIndex.pointIndex(points[i]);	
-				int32 old = Kokkos::atomic_exchange(&head(ind.x(), ind.y(), ind.z()), i);
-				next[i] = old;
-			});
-		Kokkos::fence();
-	}
-
-
-	template<typename IncludeFunction>
-	INLINE_FUNCTION_H
-	void build(range activeRange, IncludeFunction incld)
-	{
-		checkAllocateNext(activeRange.second);
-		nullify(activeRange);
-
-		Cells cellIndex = static_cast<Cells>(*this);
-		auto points = pointPosition_;
-		auto next = next_;
-		auto head = head_;
-
-		rangePolicyType rPolicy(activeRange.first, activeRange.second);
-
-		Kokkos::parallel_for(
-			"mapperNBS::build_Include",
-			rPolicy,
-			LAMBDA_HD(int32 i){
-				if( incld(i) )
-				{
-					CellType ind = cellIndex.pointIndex(points[i]);
-					auto old = Kokkos::atomic_exchange(&head(ind.x(), ind.y(), ind.z()), i);
-					next[i] = old;
-				}
-			});
-		Kokkos::fence();
-
-	}
-
-	
-	INLINE_FUNCTION_H
-	void buildCheckInDomain(range activeRange)
-	{
-		checkAllocateNext(activeRange.second);
-		nullify(activeRange);
-		
-		Cells cellIndex = static_cast<Cells>(*this);
-		auto points = pointPosition_;
-		auto next = next_;
-		auto head = head_;
-
-		rangePolicyType rPolicy(activeRange.first, activeRange.second);
-		
-		Kokkos::parallel_for(
-			"mapperNBS::buildCheckInDomain",
-			rPolicy,
-			LAMBDA_HD(int32 i){	
-				CellType ind;
-				if( cellIndex.pointIndexInDomain(points[i], ind) )
-				{
-					int32 old = Kokkos::atomic_exchange(&head(ind.x(), ind.y(), ind.z()), i);
-					next[i] = old;	
-				}
-			});
-
-		Kokkos::fence();
-
-	}
-
-	template<typename IncludeFunction>
-	INLINE_FUNCTION_H
-	void buildCheckInDomain(range activeRange, IncludeFunction incld)
-	{
-		checkAllocateNext(activeRange.second);
-		nullify(activeRange);
-
-		Cells cellIndex = static_cast<Cells>(*this);
-		auto points = pointPosition_;
-		auto next = next_;
-		auto head = head_;
-
-		rangePolicyType rPolicy(activeRange.first, activeRange.second);
-
-		Kokkos::parallel_for(
-			"mapperNBS::buildCheckInDomain_Include",
-			rPolicy,
-			LAMBDA_HD(int32 i){
-				CellType ind;
-				if( incld(i) && cellIndex.pointIndexInDomain(points[i], ind) )
-				{
-					auto old = Kokkos::atomic_exchange(&head(ind.x(), ind.y(), ind.z()), i);
-					next[i] = old;
-				}
-			});
-		Kokkos::fence();
-	}
-
-};
-
-} // pFlow
-
-#endif // __mapperNBS_hpp__
\ No newline at end of file
diff --git a/src/Interaction/contactSearch/methods/multiGridNBS.hpp b/src/Interaction/contactSearch/methods/multiGridNBS.hpp
deleted file mode 100644
index dbce390b..00000000
--- a/src/Interaction/contactSearch/methods/multiGridNBS.hpp
+++ /dev/null
@@ -1,213 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-
-#ifndef __multiGridNBS_hpp__
-#define __multiGridNBS_hpp__
-
-#include "NBSLevels.hpp"
-
-namespace pFlow
-{
-
-
-template<typename executionSpace>
-class multiGridNBS
-{
-public:
-
-	using NBSLevelsType	= NBSLevels<executionSpace>;
-
-	using cellIterator 	= typename NBSLevelsType::cellIterator;
-
-	using IdType 		= typename NBSLevelsType::IdType;
-	
-	using IndexType 	= typename NBSLevelsType::IndexType;
-
-	using Cells 		= typename NBSLevelsType::Cells;
-
-	using CellType 		= typename Cells::CellType;
-
-	using execution_space 	= typename NBSLevelsType::execution_space;
-
-	using memory_space 		= typename NBSLevelsType::memory_space;
-
-
-protected:
-
-	real 		sizeRatio_ = 1.0;
-
-	int32 		updateFrequency_= 1;
-
-	int32 		currentIter_ 	= 0;
-
-	bool 		performedSearch_ = false;
-
-	NBSLevelsType NBSLevels_;
-
-private:
-
-	bool performSearch()
-	{
-		if(currentIter_ % updateFrequency_ == 0)
-		{
-			currentIter_++;
-			return true;
-
-		}else
-		{
-			currentIter_++;
-			return false;
-		}
-	}
-
-public:
-
-	TypeInfoNV("multiGridNBS");
-
-		multiGridNBS(
-			const 	dictionary& dict,
-			const 	box& domain,
-			real 	minSize,
-			real 	maxSize,
-			const 	ViewType1D<realx3, memory_space>& position,
-			const 	ViewType1D<real, memory_space>& diam)
-		:
-			sizeRatio_( 
-				max(
-					dict.getVal<real>("sizeRatio"),
-					1.0
-					)),
-			updateFrequency_(
-				max( 
-					dict.getVal<int32>("updateFrequency"),
-					1
-					)),
-			NBSLevels_(
-				domain, 
-				minSize,
-				maxSize,
-				sizeRatio_,
-				position,
-				diam)
-		{}
-			
-		INLINE_FUNCTION_HD
-		multiGridNBS(const multiGridNBS&) = default;
-
-		INLINE_FUNCTION_HD
-		multiGridNBS& operator = (const multiGridNBS&) = default;
-
-		INLINE_FUNCTION_HD
-		~multiGridNBS()=default;
-
-	//// - Methods 
-
-	bool enterBoadSearch()const
-	{
-		return currentIter_%updateFrequency_==0;
-	}
-
-	bool performedSearch()const
-	{
-		return performedSearch_;
-	}
-
-	int32 numLevels()const
-	{
-		return NBSLevels_.numLevels();
-	}
-
-	auto getCellsLevels()const
-	{
-		Vector<Cells> cellsLvl("cells", numLevels(), numLevels(), RESERVE());
-
-		for(int32 lvl=0; lvl<numLevels(); lvl++)
-		{
-			cellsLvl[lvl] = NBSLevels_.getCells(lvl) ;
-		}
-
-		return cellsLvl;
-	}
-
-	auto getCells(int32 lvl)const
-	{
-		return NBSLevels_.getCells(lvl);
-	}
-
-	auto getCellIterator(int32 lvl)const
-	{
-		return NBSLevels_.getCellIterator(lvl);	
-	}
-
-	bool objectSizeChanged(int32 newSize)
-	{
-		NBSLevels_.checkAllocateNext(newSize);
-		return true;
-	}
-
-	// - Perform the broad search to find pairs
-	//	 with force = true, perform broad search regardless of 
-	//   updateFrequency_ value
-	//   on all the points in the range of [0,numPoints_)
-	template<typename PairsContainer>
-	bool broadSearch(PairsContainer& pairs, range activeRange, bool force=false)
-	{
-		
-		if(force) currentIter_ = 0;
-		performedSearch_ = false;
-
-		if( !performSearch() ) return true;
-		
-		
-		NBSLevels_.build(activeRange);
-		
-		NBSLevels_.findPairs(pairs);
-		
-		
-		performedSearch_ = true;		
-		return true;
-	}
-
-	// - Perform the broad search to find pairs,
-	//   ignore particles with incld(i) = true,
-	//	 with force = true, perform broad search regardless of 
-	//   updateFrequency_ value
-	template<typename PairsContainer, typename IncludeFunction>
-	bool broadSearch(PairsContainer& pairs, range activeRange, IncludeFunction incld, bool force = false)
-	{
-		if(force) currentIter_ = 0;
-		performedSearch_ = false;
-
-		if( !performSearch() ) return true;
-
-		NBSLevels_.build(activeRange, incld);
-	
-		NBSLevels_.findPairs(pairs);
-		
-		performedSearch_ = true;
-		return true;
-	}
-
-};
-
-}
-
-#endif
diff --git a/src/Interaction/contactSearch/methods/particleWallContactSearchs.cpp b/src/Interaction/contactSearch/methods/particleWallContactSearchs.cpp
new file mode 100644
index 00000000..25064346
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/particleWallContactSearchs.cpp
@@ -0,0 +1,78 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+
+template <typename method>
+pFlow::particleWallContactSearchs<method>::particleWallContactSearchs
+(
+    const dictionary &dict, 
+    const box &domain, 
+    real minSize, 
+    real maxSize, 
+    const ViewType1D<realx3, memory_space> &position,
+    const pFlagTypeDevice &flags,  
+    const ViewType1D<real, memory_space> &diam
+)
+:
+    domainBox_(domain),
+    updateInterval_
+    (
+        dict.getValOrSet<uint32>("updateInterval", 1)
+    )
+{
+    
+}
+
+template <typename method>
+bool pFlow::particleWallContactSearchs<method>::broadSearch
+	(
+		uint32 iter,
+		real t,
+		real dt,
+		csPairContainerType& ppPairs,
+		csPairContainerType& pwPairs,
+		const deviceViewType1D<realx3>& pointPos,
+		const pFlagTypeDevice& flags,
+		const deviceViewType1D<real>& diameter,
+		bool  force
+	)
+	{
+		
+		performedSearch_ = false;
+		if( !performSearch(iter, force) ) return true;
+
+		if(!getMethod().impl_broadSearch(
+			ppPairs,
+			pwPairs,
+			pointPos,
+			flags,
+			diameter))
+		{
+			fatalErrorInFunction<<
+			"Error in performing particle-particle broadSearch in method"<<
+			getMethod().typeName()<<endl;
+			return false;
+		}
+
+		lastUpdated_ = iter;
+		
+		performedSearch_ = true;		
+		return true;
+	}
\ No newline at end of file
diff --git a/src/Interaction/contactSearch/methods/particleWallContactSearchs.hpp b/src/Interaction/contactSearch/methods/particleWallContactSearchs.hpp
new file mode 100644
index 00000000..d72f9404
--- /dev/null
+++ b/src/Interaction/contactSearch/methods/particleWallContactSearchs.hpp
@@ -0,0 +1,123 @@
+/*------------------------------- phasicFlow ---------------------------------
+      O        C enter of
+     O O       E ngineering and
+    O   O      M ultiscale modeling of
+   OOOOOOO     F luid flow       
+------------------------------------------------------------------------------
+  Copyright (C): www.cemf.ir
+  email: hamid.r.norouzi AT gmail.com
+------------------------------------------------------------------------------  
+Licence:
+  This file is part of phasicFlow code. It is a free software for simulating 
+  granular and multiphase flows. You can redistribute it and/or modify it under
+  the terms of GNU General Public License v3 or any other later versions. 
+ 
+  phasicFlow is distributed to help others in their research in the field of 
+  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
+  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+
+-----------------------------------------------------------------------------*/
+
+#ifndef __particleWallContactSearchs_hpp__
+#define __particleWallContactSearchs_hpp__
+
+#include "pointFlag.hpp"
+#include "contactSearchGlobals.hpp"
+#include "box.hpp"
+
+namespace pFlow
+{
+template<typename method>
+class particleWallContactSearchs
+{
+public:
+
+	using MethodType 		= method;
+
+	using IndexType 		= uint32;
+
+	using execution_space 	= DefaultExecutionSpace;
+
+	using memory_space 		= typename execution_space::memory_space;
+
+private:
+
+	// friend 
+	friend 	MethodType;
+
+	/// @brief  box enclosing the simulation domain (local to processor)
+	box 		domainBox_;
+
+	/*/// @brief box enclosing the area for contact search (region with points)
+	box 		searchBox_;*/
+
+	/// @brief update interval in terms of iteration numebr 
+	uint32 		updateInterval_= 1;
+
+	/// @brief  last iteration number which contact search has been performed
+	uint32 		lastUpdated_ 	= 0;
+
+	/// @brief performed search? 
+	bool 		performedSearch_ = false;
+
+protected:
+
+	inline
+	auto& getMethod()
+	{
+		return static_cast<MethodType&>(*this);
+	}
+
+	inline
+	const auto& getMethod()const
+	{
+		return static_cast<const MethodType&>(*this);
+	}
+
+public:
+
+	particleWallContactSearchs(
+		const 	dictionary& dict,
+		const 	box& domain,
+		real  	minSize,
+		real 	maxSize,
+		const 	ViewType1D<realx3, memory_space>& position,
+		const 	pFlagTypeDevice &flags, 
+		const 	ViewType1D<real, memory_space>& diam
+	);
+
+	bool broadSearch
+	(
+		uint32 iter,
+		real t,
+		real dt,
+		csPairContainerType& ppPairs,
+		csPairContainerType& pwPairs,
+		const deviceViewType1D<realx3>& pointPos,
+    	const pFlagTypeDevice& flags,
+    	const deviceViewType1D<real>& diameter,
+		bool  force = false
+	);
+		
+	bool performedSearch()const
+	{
+		return performedSearch_;
+	}
+
+	bool performSearch(uint32 iter, bool force = false)const
+	{
+		if((iter-lastUpdated_) % updateInterval_ == 0 || iter == 0 || force )
+		{
+			return true;
+		}
+		return false;		
+	}
+
+};
+
+
+} // pFlow
+
+#include "particleWallContactSearchs.cpp"
+
+#endif //__particleWallContactSearchs_hpp__
\ No newline at end of file
diff --git a/src/Interaction/contactSearch/wallMappings/cellMapping.hpp b/src/Interaction/contactSearch/wallMappings/cellMapping.hpp
deleted file mode 100644
index 5a10c248..00000000
--- a/src/Interaction/contactSearch/wallMappings/cellMapping.hpp
+++ /dev/null
@@ -1,150 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#ifndef __cellMapping_hpp__
-#define __cellMapping_hpp__
-
-#include "cellsWallLevel0.hpp"
-#include "dictionary.hpp"
-
-
-namespace pFlow
-{
-
-template<
-	typename executionSpace
-	>
-class cellMapping
-{
-public:
-
-	using cellsWallLevel0Type = cellsWallLevel0<executionSpace>;
-
-	using IdType 			= typename cellsWallLevel0Type::IdType;
-
-	using IndexType 	= typename cellsWallLevel0Type::IndexType;
-
-	using Cells 			= typename cellsWallLevel0Type::Cells;
-
-	using CellType 		= typename Cells::CellType;
-
-	using execution_space = typename cellsWallLevel0Type::execution_space;
-
-	using memory_space 		= typename cellsWallLevel0Type::memory_space;
-
-	using iBoxType = iBox<IndexType>;	
-
-	
-protected:
-
-	// - update frequency 
-	int32 			updateFrequency_=1;
-
-	real 				cellExtent_;
-
-	int32 			currentIter_ = 0;
-
-	/// a broad search has been occured during last pass?
-	bool 				performedSearch_ = false;
-
-	cellsWallLevel0Type  cellsWallLevle_;
-		
-private:
-
-	bool performSearch()
-	{
-		if(currentIter_ % updateFrequency_ == 0)
-		{
-			currentIter_++;
-			return true;
-
-		}else
-		{
-			currentIter_++;
-			return false;
-		}
-	}
-
-public:
-
-	TypeInfoNV("cellMapping");
-
-	cellMapping(
-		const dictionary&  		dict,
-		int32 					numLevels,
-		const Vector<Cells>& 	ppCells,
-		int32 					numPoints,
-		int32 					numElements,
-		const ViewType1D<realx3,memory_space>& 		points, 
-		const ViewType1D<int32x3,memory_space>& 	vertices
-		)
-	:
-		updateFrequency_(
-			max(
-				dict.getValOrSet<int32>(
-					"updateFrequency",
-					1),
-				1)),
-		cellExtent_(
-			max(
-				dict.getValOrSet<real>(
-					"cellExtent", 
-					0.5),
-				0.5)),
-		cellsWallLevle_(
-			ppCells[0],
-			cellExtent_,
-			numPoints,
-			numElements,
-			points,
-			vertices
-			)
-	{}
-
-
-	bool enterBoadSearch()const
-	{
-		return currentIter_%updateFrequency_==0;
-	}
-
-	bool performedSearch()const
-	{
-		return performedSearch_;
-	}
-		
-	template<typename PairsContainer, typename particleMapType>
-	bool broadSearch(PairsContainer& pairs, particleMapType& particleMap, bool force=false)
-	{
-		if(force) currentIter_ = 0;
-		performedSearch_= false;
-		if(!performSearch())return true;
-		
-		cellsWallLevle_.broadSearch(pairs, particleMap);
-
-		performedSearch_ = true;
-		return true;
-	}
-
-}; // cellMapping
-
-} // pFlow
-
-
-#endif 
diff --git a/src/Interaction/contactSearch/wallMappings/cellsWallLevel0.hpp b/src/Interaction/contactSearch/wallMappings/cellsWallLevel0.hpp
deleted file mode 100644
index 65034507..00000000
--- a/src/Interaction/contactSearch/wallMappings/cellsWallLevel0.hpp
+++ /dev/null
@@ -1,285 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#ifndef __cellsWallLevel0_hpp__
-#define __cellsWallLevel0_hpp__
-
-#include "types.hpp"
-#include "KokkosTypes.hpp"	
-#include "cells.hpp"
-#include "iBox.hpp"
-
-
-
-namespace pFlow
-{
-
-template<
-	typename executionSpace
-	>
-class cellsWallLevel0
-:
-	public cells<int32>
-{
-public:
-
-	using IdType		= int32;
-
-	using IndexType 	= int32;
-
-	using Cells 		= cells<IndexType>;
-
-	using CellType 		= typename Cells::CellType;
-
-	using execution_space = executionSpace;
-
-	using memory_space 	= typename execution_space::memory_space;
-
-	using iBoxType 		= iBox<IndexType>;	
-
-	class TagFindCellRange2{};
-
-protected:
-
-	// - box extent
-	real 			cellExtent_ = 0.5;
-
-	// - number of triangle elements 
-	int32			numElements_ = 0;
-
-	// - number of points
-	int32 			numPoints_ = 0;
-
-	// - ref to vectices (borrowed)
-	ViewType1D<int32x3, memory_space> 	vertices_;
-
-	// - ref to points in the trisurface (borrowed)
-	ViewType1D<realx3, memory_space> 	points_;
-
-	// cell range of element/triangle bounding box
-	ViewType1D<iBoxType, memory_space> 	elementBox_;
-	
-
-	using tpPWContactSearch = Kokkos::TeamPolicy<
-			execution_space,
-			Kokkos::Schedule<Kokkos::Dynamic>,
-			Kokkos::IndexType<int32>
-			>;
-
-	using rpFindCellRange2Type =
-		Kokkos::RangePolicy<TagFindCellRange2, execution_space, Kokkos::IndexType<int32>>;
-
-	
-	FUNCTION_H
-	void allocateArrays()
-	{
-		reallocNoInit( elementBox_, numElements_);
-	}
-
-public:
-
-	TypeInfoNV("cellsWallLevel0");
-
-	INLINE_FUNCTION_HD
-	cellsWallLevel0(){}
-
-	FUNCTION_H
-	cellsWallLevel0(
-		const Cells& 		ppCells,
-		real 						cellExtent,
-		int32 					numPoints,
-		int32 					numElements,
-		const ViewType1D<realx3,memory_space>& 		points, 
-		const ViewType1D<int32x3,memory_space>& 	vertices
-		)
-	:
-		Cells(ppCells),
-		cellExtent_( max(cellExtent, 0.5 ) ),
-		numElements_(numElements),
-		numPoints_(numPoints),
-		vertices_(vertices),
-		points_(points)
-	{
-
-		allocateArrays();
-	}
-
-	
-	// - host call
-	//   reset triangle elements if they have changed
-	bool resetElements( 
-		int32 			numElements,
-		int32       numPoints,
-		ViewType1D<realx3, memory_space>& points, 
-		ViewType1D<int32x3, memory_space>& vertices	)
-	{
-
-		numElements_ = numElements;
-		numPoints_ = numPoints;
-		points_ 	= points;
-		vertices_ 	= vertices;
-		
-		allocateArrays();
-
-		return true;
-	}
-
-	INLINE_FUNCTION_HD
-	iBoxType elementBox(int32 i)const
-	{
-		return elementBox_[i];
-	}
-
-	INLINE_FUNCTION_HD
-	int32 numElements()const
-	{
-		return numElements_;
-	}
-
-	
-		
-	template<typename PairsContainer, typename particleMapType>
-	bool broadSearch(PairsContainer& pairs, particleMapType& particleMap)
-	{
-	
-		// map walls onto the cells
-		this->build();
-		
-		this->particleWallFindPairs(pairs, particleMap);
-		
-		return true;
-	}
-
-	bool build()
-	{
-		Kokkos::parallel_for(
-			"cellsSimple::findcellrange2",
-			rpFindCellRange2Type(0,numElements_),
-			*this);
-		Kokkos::fence();
-		return true;
-	}
-
-	template<typename PairsContainer, typename particleMapType>
-	bool particleWallFindPairs(PairsContainer& pairs, particleMapType& particleMap)
-	{
-
-		int32 getFull = 1;
-
-		while (getFull)
-		{
-			
-			getFull = findPairsElementRangeCount(pairs, particleMap.getCellIterator(0));
-			
-			if(getFull)
-			{
-				// - resize the container
-				//   note that getFull now shows the number of failed insertions.
-				uint32 len = max(getFull, 50);
-				auto oldCap = pairs.capacity();
-				pairs.increaseCapacityBy(len);
-
-				INFORMATION<<"Contact pair container capacity increased from "<<
-						oldCap << " to " 
-						<< pairs.capacity() <<" in cellsWallLevel0."<<endINFO;
-				
-				Kokkos::fence();
-			}
-		}
-		
-		return true;
-	}
-
-
-	template<typename PairsContainer, typename CellIteratorType>
-	int32 findPairsElementRangeCount(PairsContainer& pairs, CellIteratorType cellIter) 
-	{
-		int32 getFull =0;
-		
-		const auto pwPairs = pairs;
-		const auto elementBox = elementBox_;
-		
-		Kokkos::parallel_reduce(
-			"cellsSimple::findPairsElementRangeModified2",
-			tpPWContactSearch(numElements_, Kokkos::AUTO),
-			LAMBDA_HD(
-				const typename tpPWContactSearch::member_type & teamMember,
-				int32& valueToUpdate){
-				
-				const int32 iTri = teamMember.league_rank();
-
-				const auto triBox = elementBox[iTri];
-				
-				int32 getFull2 = 0;
-
-				auto bExtent = boxExtent(triBox);
-				int32 numCellBox = bExtent.x()*bExtent.y()*bExtent.z();
-
-				Kokkos::parallel_reduce( 
-					Kokkos::TeamThreadRange( teamMember, numCellBox ),
-					[&] ( const int32 linIndex, int32 &innerUpdate )
-						{
-							
-							CellType cell;
-							indexToCell(linIndex, triBox, cell);
-
-							int32 n = cellIter.start(cell.x(),cell.y(),cell.z());
-						
-							while( n>-1)
-							{
-								// id is wall id the pair is (particle id, wall id)
-								if( pairs.insert(static_cast<IdType>(n), iTri) < 0 )
-									innerUpdate++;
-								n = cellIter.getNext(n);
-							}
-
-						},
-					getFull2
-				);
-
-				if ( teamMember.team_rank() == 0 ) valueToUpdate += getFull2;
-			},
-			getFull
-			);
-
-		return getFull;
-	}
-
-	INLINE_FUNCTION_HD
-	void operator()(TagFindCellRange2, int32 i) const
-	{
-		auto v = vertices_[i];
-		auto p1 = points_[v.x()];
-		auto p2 = points_[v.y()];
-		auto p3 = points_[v.z()];
-		
-		realx3 minP, maxP;
-
-		this->extendBox(p1, p2, p3, cellExtent_, minP, maxP);
-		elementBox_[i] = iBoxType(this->pointIndex(minP), this->pointIndex(maxP));
-
-	}
-
-}; // cellsWallLevel0
-
-} // pFlow
-
-
-#endif // __cellsWallLevel0_hpp__
diff --git a/src/Interaction/contactSearch/wallMappings/cellsWallLevels.hpp b/src/Interaction/contactSearch/wallMappings/cellsWallLevels.hpp
deleted file mode 100644
index 9f2c80ec..00000000
--- a/src/Interaction/contactSearch/wallMappings/cellsWallLevels.hpp
+++ /dev/null
@@ -1,152 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#ifndef __cellsWallLevels_hpp__
-#define __cellsWallLevels_hpp__
-
-#include "cellsWallLevel0.hpp"
-
-namespace pFlow
-{
-
-template<
-	typename executionSpace
-	>
-class cellsWallLevels
-{
-public:
-
-	using cellsWallLevel0Type = cellsWallLevel0<executionSpace>;
-
-	using IdType 			= typename cellsWallLevel0Type::IdType;
-
-	using IndexType 	= typename cellsWallLevel0Type::IndexType;
-
-	using Cells 			= typename cellsWallLevel0Type::Cells;
-
-	using CellType 		= typename Cells::CellType;
-
-	using execution_space = typename cellsWallLevel0Type::execution_space;
-
-	using memory_space 		= typename cellsWallLevel0Type::memory_space;
-
-	using iBoxType = iBox<IndexType>;
-
-protected:
-
-	int32 			numLevles_=1;
-	
-
-	Vector<cellsWallLevel0Type> 			cellsWallLevels_;	
-
-public:
-
-	TypeInfoNV("cellsWallLevels");
-
-	FUNCTION_H
-	cellsWallLevels(
-		int32 					numLevels,
-		const Vector<Cells>&	cellsLevels,
-		real 					cellExtent,
-		int32 					numPoints,
-		int32 					numElements,
-		const ViewType1D<realx3,memory_space>& 		points, 
-		const ViewType1D<int32x3,memory_space>& 	vertices
-		)
-	:
-		numLevles_(numLevels),
-		cellsWallLevels_("cellsWallLevels",numLevels, numLevels, RESERVE())
-	{
-
-		
-
-		for(int32 lvl=0; lvl<numLevles_; lvl++)
-		{
-			cellsWallLevels_[lvl] = 
-				cellsWallLevel0Type(
-					cellsLevels[lvl],
-					cellExtent,
-					numPoints,
-					numElements,
-					points,
-					vertices);
-		}
-
-	}
-	
-		
-	template<typename PairsContainer, typename particleMapType>
-	bool broadSearch(PairsContainer& pairs, particleMapType& particleMap)
-	{
-	
-		// map walls onto the cells
-		for(int32 lvl=0; lvl<numLevles_; lvl++)
-		{
-			cellsWallLevels_[lvl].build();
-		}
-		
-		this->particleWallFindPairs(pairs, particleMap);
-		
-		return true;
-	}
-
-	template<typename PairsContainer, typename particleMapType>
-	bool particleWallFindPairs(PairsContainer& pairs, particleMapType& particleMap)
-	{
-
-		int32 getFull = 1;
-
-		while (getFull)
-		{
-			getFull = 0;
-			for(int32 lvl=0; lvl<numLevles_; lvl++)
-			{
-				getFull += 
-					cellsWallLevels_[lvl].findPairsElementRangeCount(
-						pairs, 
-						particleMap.getCellIterator(lvl));
-			}
-			
-			if(getFull)
-			{
-				// - resize the container
-				//   note that getFull now shows the number of failed insertions.
-				uint32 len = max(getFull, 5000);
-				auto oldCap = pairs.capacity();
-				pairs.increaseCapacityBy(len);
-
-				INFORMATION<<"Contact pair container capacity increased from "<<
-						oldCap << " to " 
-						<< pairs.capacity() <<" in cellsWallLevels."<<endINFO;
-				
-				Kokkos::fence();
-			}
-		}
-		
-		return true;
-	}
-
-
-}; // cellsWallLevels
-
-} // pFlow
-
-
-#endif // __cellsWallLevels_hpp__
diff --git a/src/Interaction/contactSearch/wallMappings/multiGridMapping.hpp b/src/Interaction/contactSearch/wallMappings/multiGridMapping.hpp
deleted file mode 100644
index 3a266f1f..00000000
--- a/src/Interaction/contactSearch/wallMappings/multiGridMapping.hpp
+++ /dev/null
@@ -1,153 +0,0 @@
-/*------------------------------- phasicFlow ---------------------------------
-      O        C enter of
-     O O       E ngineering and
-    O   O      M ultiscale modeling of
-   OOOOOOO     F luid flow       
-------------------------------------------------------------------------------
-  Copyright (C): www.cemf.ir
-  email: hamid.r.norouzi AT gmail.com
-------------------------------------------------------------------------------  
-Licence:
-  This file is part of phasicFlow code. It is a free software for simulating 
-  granular and multiphase flows. You can redistribute it and/or modify it under
-  the terms of GNU General Public License v3 or any other later versions. 
- 
-  phasicFlow is distributed to help others in their research in the field of 
-  granular and multiphase flows, but WITHOUT ANY WARRANTY; without even the
-  implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
-
------------------------------------------------------------------------------*/
-
-#ifndef __multiGridMapping_hpp__
-#define __multiGridMapping_hpp__
-
-#include "cellsWallLevels.hpp"
-#include "dictionary.hpp"
-
-
-namespace pFlow
-{
-
-template<
-	typename executionSpace
-	>
-class multiGridMapping
-{
-public:
-
-	using CellsWallLevelType = cellsWallLevels<executionSpace>;
-
-	using IdType 			= typename CellsWallLevelType::IdType;
-
-	using IndexType 	= typename CellsWallLevelType::IndexType;
-
-	using Cells 			= typename CellsWallLevelType::Cells;
-
-	using CellType 		= typename Cells::CellType;
-
-	using execution_space = typename CellsWallLevelType::execution_space;
-
-	using memory_space 		= typename CellsWallLevelType::memory_space;
-
-	using iBoxType = iBox<IndexType>;	
-
-	
-protected:
-
-	// - update frequency 
-	int32 			updateFrequency_=1;
-
-	real 				cellExtent_;
-
-	int32 			currentIter_ = 0;
-
-	/// a broad search has been occured during last pass?
-	bool 				performedSearch_ = false;
-
-	CellsWallLevelType  cellsWallLevle_;
-		
-private:
-
-	bool performSearch()
-	{
-		if(currentIter_ % updateFrequency_ == 0)
-		{
-			currentIter_++;
-			return true;
-
-		}else
-		{
-			currentIter_++;
-			return false;
-		}
-	}
-
-public:
-
-	TypeInfoNV("multiGridMapping");
-
-	multiGridMapping(
-		const dictionary&  			dict,
-		int32 					numLevels,
-		const Vector<Cells>& 	ppCells,
-		int32 					numPoints,
-		int32 					numElements,
-		const ViewType1D<realx3,memory_space>& 		points, 
-		const ViewType1D<int32x3,memory_space>& 	vertices
-		)
-	:
-		updateFrequency_(
-			max(
-				dict.getVal<int32>("updateFrequency"),
-				1)),
-		cellExtent_(
-			max(
-				dict.getVal<real>("cellExtent"),
-				0.5)),
-		cellsWallLevle_(
-			numLevels,
-			ppCells,
-			cellExtent_,
-			numPoints,
-			numElements,
-			points,
-			vertices
-			)
-	{
-
-		REPORT(3)<<"Multi-grid wall mapping with "<< 
-			yellowText(numLevels)<<" levels has been created."<<endREPORT;
-	}
-
-
-	bool enterBoadSearch()const
-	{
-		return currentIter_%updateFrequency_==0;
-	}
-
-	bool performedSearch()const
-	{
-		return performedSearch_;
-	}
-		
-	template<typename PairsContainer, typename particleMapType>
-	bool broadSearch(PairsContainer& pairs, particleMapType& particleMap, bool force=false)
-	{
-		if(force) currentIter_ = 0;
-		performedSearch_= false;
-		if(!performSearch())return true;
-
-
-		cellsWallLevle_.broadSearch(pairs, particleMap);
-
-
-		performedSearch_ = true;
-		return true;
-	}
-
-}; // multiGridMapping
-
-} // pFlow
-
-
-#endif 
diff --git a/src/Interaction/interaction/interaction.cpp b/src/Interaction/interaction/interaction.cpp
index 8d368c29..ec8938d7 100644
--- a/src/Interaction/interaction/interaction.cpp
+++ b/src/Interaction/interaction/interaction.cpp
@@ -19,7 +19,9 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "interaction.hpp"
-
+#include "particles.hpp"
+#include "vocabs.hpp"
+#include "geometry.hpp"
 
 pFlow::interaction::interaction
 (
@@ -28,26 +30,16 @@ pFlow::interaction::interaction
 	const geometry& geom
 )
 :
-	demInteraction(control, control.caseSetup().path()+interactionFile__),
-	interactionBase(prtcl, geom),
-	fileDict_(control.caseSetup().emplaceObject<dictionary>(
-		objectFile(
-			interactionFile__,
-			"",
-			objectFile::READ_ALWAYS,
-			objectFile::WRITE_NEVER),
-		interactionFile__,
-		true ))
+	property(interactionFile__, &control.caseSetup()),
+	observer
+	(
+		&prtcl.dynPointStruct(),
+		msg_
+	),
+	demComponent("interaction", control),
+	particles_(prtcl),
+	geometry_(geom)
 {
-	this->subscribe(prtcl.pStruct());
-
-	contactSearch_ = contactSearch::create(
-		fileDict_.subDict("contactSearch"),
-		this->control().domain(),
-		prtcl,
-		geom,
-		timers()
-		 );
 
 }
 
@@ -79,14 +71,14 @@ pFlow::uniquePtr<pFlow::interaction> pFlow::interaction::create
 			clType);
 
 
-	REPORT(1)<< "Selecting interaction model..."<<endREPORT;
+	REPORT(1)<< "Selecting interaction model..."<<END_REPORT;
 	if( systemControlvCtorSelector_.search(interactionModel) )
 	{
 		auto objPtr = 
 			systemControlvCtorSelector_[interactionModel]
 			(control, prtcl, geom);
 
-		REPORT(2)<<"Model "<<greenText(interactionModel)<<" is created."<<endREPORT;
+		REPORT(2)<<"Model "<<Green_Text(interactionModel)<<" is created."<<END_REPORT;
 		return objPtr;
 	}
 	else
diff --git a/src/Interaction/interaction/interaction.hpp b/src/Interaction/interaction/interaction.hpp
index 97372bcc..c32f9f4f 100644
--- a/src/Interaction/interaction/interaction.hpp
+++ b/src/Interaction/interaction/interaction.hpp
@@ -21,9 +21,10 @@ Licence:
 #ifndef __interaction_hpp__
 #define __interaction_hpp__
 
-#include "demInteraction.hpp"
-#include "eventObserver.hpp"
-#include "interactionBase.hpp"
+#include "demComponent.hpp"
+#include "property.hpp"
+#include "observer.hpp"
+#include "systemControl.hpp"
 #include "contactSearch.hpp"
 
 
@@ -31,27 +32,26 @@ Licence:
 namespace pFlow
 {
 
+class particles;
+class geometry;
+
 class interaction
 :
-	public demInteraction,
-	public eventObserver,
-	public interactionBase
-{
-public:
+	public property,
+	public observer,
+	public demComponent
 	
-	using IdType 				= typename interactionBase::IdType;
+{
+private:
 
-	using IndexType    			= typename interactionBase::IndexType;
+	/// reference to particles object 
+	const particles& 	particles_;
 
-	using ExecutionSpace 	 	= typename interactionBase::ExecutionSpace;
+	/// reference to geometry object 
+	const geometry& 	geometry_;
 
-protected:
-
-	/// interaction file dictionary 
-	dictionary& 				fileDict_;
-
-	/// contact search object for pp and pw interactions 
-	uniquePtr<contactSearch> 	contactSearch_ = nullptr;
+	static inline
+	const message msg_ = message::ITEM_REARRANGE;
 
 public:
 
@@ -65,11 +65,10 @@ public:
 			const particles& prtcl,
 			const geometry& geom );
 		
+		~interaction() override = default;
 
-	
-		virtual ~interaction() = default;
-
-		create_vCtor(
+		create_vCtor
+		(
 			interaction,
 			systemControl,
 			(
@@ -78,22 +77,8 @@ public:
 				const geometry& geom
 			),
 			(control, prtcl, geom)
-			);
+		);
 	
-	auto& contactSearchPtr()
-	{
-		return contactSearch_;
-	}
-
-	auto& contactSearchRef()
-	{
-		return contactSearch_();
-	}
-
-	const auto& fileDict()const
-	{
-		return fileDict_;
-	}
 
 	static 
 	uniquePtr<interaction> create(
diff --git a/src/Interaction/sphereInteraction/sphereInteraction.cpp b/src/Interaction/sphereInteraction/sphereInteraction.cpp
index 0dacee74..1cb1472e 100644
--- a/src/Interaction/sphereInteraction/sphereInteraction.cpp
+++ b/src/Interaction/sphereInteraction/sphereInteraction.cpp
@@ -18,22 +18,18 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-template<
-	typename contactForceModel,
-	typename geometryMotionModel,
-	template <class, class, class> class contactListType >
-bool pFlow::sphereInteraction<contactForceModel,geometryMotionModel, contactListType>::
-	createSphereInteraction()
+template<typename cFM,typename gMM,template <class, class, class> class cLT>
+bool pFlow::sphereInteraction<cFM,gMM, cLT>::createSphereInteraction()
 {
 	
-	realVector_D rhoD(this->densities());
+	realVector_D rhoD("densities", this->densities());
 
-	auto modelDict = this->fileDict().subDict("model");
+	auto modelDict = this->subDict("model");
 
-	REPORT(1)<<"Createing contact force model . . ."<<endREPORT;
+	REPORT(1)<<"Createing contact force model . . ."<<END_REPORT;
 	forceModel_ = makeUnique<ContactForceModel>(
 		this->numMaterials(),
-		rhoD.deviceVector(),
+		rhoD.deviceView(),
 		modelDict );
 
 
@@ -47,17 +43,9 @@ bool pFlow::sphereInteraction<contactForceModel,geometryMotionModel, contactList
 }
 
 
-
-template<
-	typename contactForceModel,
-	typename geometryMotionModel,
-	template <class, class, class> class contactListType >
-bool pFlow::sphereInteraction<contactForceModel,geometryMotionModel, contactListType>::
-	sphereSphereInteraction()
+template<typename cFM,typename gMM,template <class, class, class> class cLT>
+bool pFlow::sphereInteraction<cFM,gMM, cLT>::sphereSphereInteraction()
 {
-	
-
-
 	auto lastItem = ppContactList_().loopCount();
 
 	// create the kernel functor 
@@ -66,17 +54,17 @@ bool pFlow::sphereInteraction<contactForceModel,geometryMotionModel, contactList
 			this->dt(),
 			this->forceModel_(),
 			ppContactList_(), // to be read
-			sphParticles_.diameter().deviceVectorAll(),
-			sphParticles_.propertyId().deviceVectorAll(),
-			sphParticles_.pointPosition().deviceVectorAll(),
-			sphParticles_.velocity().deviceVectorAll(),
-			sphParticles_.rVelocity().deviceVectorAll(),
-			sphParticles_.contactForce().deviceVectorAll(),
-			sphParticles_.contactTorque().deviceVectorAll()
+			sphParticles_.diameter().deviceViewAll(),
+			sphParticles_.propertyId().deviceViewAll(),
+			sphParticles_.pointPosition().deviceViewAll(),
+			sphParticles_.velocity().deviceViewAll(),
+			sphParticles_.rVelocity().deviceViewAll(),
+			sphParticles_.contactForce().deviceViewAll(),
+			sphParticles_.contactTorque().deviceViewAll()
 			);
 	
 	Kokkos::parallel_for(
-		"",
+		"ppInteraction",
 		rpPPInteraction(0,lastItem),
 		ppInteraction
 		);
@@ -87,34 +75,32 @@ bool pFlow::sphereInteraction<contactForceModel,geometryMotionModel, contactList
 }
 
 
-template<
-	typename contactForceModel,
-	typename geometryMotionModel,
-	template <class, class, class> class contactListType >
-bool pFlow::sphereInteraction<contactForceModel,geometryMotionModel, contactListType>::
-	sphereWallInteraction()
+template<typename cFM,typename gMM,template <class, class, class> class cLT>
+bool pFlow::sphereInteraction<cFM,gMM, cLT>::sphereWallInteraction()
 {
 	
-	int32 lastItem = pwContactList_().loopCount();
+	uint32 lastItem = pwContactList_().loopCount();
+	uint32 iter = this->currentIter();
 	real t = this->currentTime();
+	real dt = this->dt();
 
 	pFlow::sphereInteractionKernels::pwInteractionFunctor
 		pwInteraction(
-			this->dt(),
+			dt,
 			this->forceModel_(),
 			pwContactList_(),
 			geometryMotion_.getTriangleAccessor(), 
-			geometryMotion_.getModel(t) , 
-			sphParticles_.diameter().deviceVectorAll() ,
-			sphParticles_.propertyId().deviceVectorAll(),
-			sphParticles_.pointPosition().deviceVectorAll(),
-			sphParticles_.velocity().deviceVectorAll(),
-			sphParticles_.rVelocity().deviceVectorAll() ,
-			sphParticles_.contactForce().deviceVectorAll(),
-			sphParticles_.contactTorque().deviceVectorAll() ,
-			geometryMotion_.triMotionIndex().deviceVectorAll(),
-			geometryMotion_.propertyId().deviceVectorAll(),
-			geometryMotion_.contactForceWall().deviceVectorAll()
+			geometryMotion_.getModel(iter, t, dt) , 
+			sphParticles_.diameter().deviceViewAll() ,
+			sphParticles_.propertyId().deviceViewAll(),
+			sphParticles_.pointPosition().deviceViewAll(),
+			sphParticles_.velocity().deviceViewAll(),
+			sphParticles_.rVelocity().deviceViewAll() ,
+			sphParticles_.contactForce().deviceViewAll(),
+			sphParticles_.contactTorque().deviceViewAll() ,
+			geometryMotion_.triMotionIndex().deviceViewAll(),
+			geometryMotion_.propertyId().deviceViewAll(),
+			geometryMotion_.contactForceWall().deviceViewAll()
 		);
 
 	Kokkos::parallel_for(
@@ -127,4 +113,123 @@ bool pFlow::sphereInteraction<contactForceModel,geometryMotionModel, contactList
 	Kokkos::fence();
 
 	return true;
-}
\ No newline at end of file
+}
+
+
+template<typename cFM,typename gMM,template <class, class, class> class cLT>
+pFlow::sphereInteraction<cFM,gMM, cLT>::sphereInteraction
+(
+	systemControl& control,
+	const particles& prtcl,
+	const geometry& geom
+)
+:
+	interaction(control, prtcl, geom),
+	geometryMotion_(dynamic_cast<const GeometryMotionModel&>(geom)),
+	sphParticles_(dynamic_cast<const sphereParticles&>(prtcl)),
+	ppInteractionTimer_("sphere-sphere interaction", &this->timers()),
+	pwInteractionTimer_("sphere-wall interaction", &this->timers()),
+	contactListTimer_("contact list management", &this->timers()),
+	contactListTimer0_("contact list clear", &this->timers())
+{
+	contactSearch_ = contactSearch::create(
+	subDict("contactSearch"),
+	prtcl.thisDomain().domainBox(),
+	prtcl,
+	geom,
+	timers());
+
+
+	if(!createSphereInteraction())
+	{
+		fatalExit;
+	}
+}
+
+template<typename cFM,typename gMM,template <class, class, class> class cLT>
+bool pFlow::sphereInteraction<cFM,gMM, cLT>::beforeIteration()
+{
+	return true;
+}
+
+template<typename cFM,typename gMM,template <class, class, class> class cLT>
+bool pFlow::sphereInteraction<cFM,gMM, cLT>::iterate()
+{
+	
+	auto iter = this->currentIter();
+	auto t = this->currentTime();
+	auto dt = this->dt();
+
+	//output<<"iter, t, dt "<< iter<<" "<< t << " "<<dt<<endl;
+	bool broadSearch = contactSearch_().enterBroadSearch(iter, t, dt);
+
+
+	if(broadSearch)
+	{
+		contactListTimer0_.start();
+		ppContactList_().beforeBroadSearch();
+		pwContactList_().beforeBroadSearch();
+		contactListTimer0_.end();
+	} 
+	
+	if( sphParticles_.numActive()<=0)return true;
+	
+	
+	if( !contactSearch_().broadSearch(
+			iter,
+			t,
+			dt,		
+			ppContactList_(),
+			pwContactList_()) )
+	{
+		fatalErrorInFunction<<
+		"unable to perform broadSearch.\n";
+		fatalExit;
+	}
+	
+
+	
+	if(broadSearch && contactSearch_().performedBroadSearch())
+	{
+		contactListTimer_.start();
+		ppContactList_().afterBroadSearch();
+		pwContactList_().afterBroadSearch();
+		contactListTimer_.end();
+	}
+	
+	ppInteractionTimer_.start();
+		sphereSphereInteraction();
+	ppInteractionTimer_.end();
+
+	
+	pwInteractionTimer_.start();
+		sphereWallInteraction();
+	pwInteractionTimer_.end();
+
+	
+	return true;
+}
+
+template<typename cFM,typename gMM,template <class, class, class> class cLT>
+bool pFlow::sphereInteraction<cFM,gMM, cLT>::afterIteration()
+{
+	return true;
+}
+
+template<typename cFM,typename gMM,template <class, class, class> class cLT>
+bool pFlow::sphereInteraction<cFM,gMM, cLT>::hearChanges
+(
+	real t,
+	real dt,
+	uint32 iter,
+	const message& msg, 
+	const anyList& varList
+)
+{
+	if(msg.equivalentTo(message::ITEM_REARRANGE))
+	{
+		notImplementedFunction;
+	}
+	return true;
+}
+
diff --git a/src/Interaction/sphereInteraction/sphereInteraction.hpp b/src/Interaction/sphereInteraction/sphereInteraction.hpp
index b256c452..56c00047 100644
--- a/src/Interaction/sphereInteraction/sphereInteraction.hpp
+++ b/src/Interaction/sphereInteraction/sphereInteraction.hpp
@@ -23,7 +23,6 @@ Licence:
 
 #include "interaction.hpp"
 #include "sphereParticles.hpp"
-
 #include "sphereInteractionKernels.hpp"
 
 namespace pFlow
@@ -43,22 +42,19 @@ public:
 	
 	using ContactForceModel 	= contactForceModel;
 
-	using MotionModel 		= typename geometryMotionModel::MotionModel;
+	using MotionModel 			= typename geometryMotionModel::MotionModel;
 
-	using ModelStorage 		= typename ContactForceModel::contactForceStorage;
+	using ModelStorage 			= typename ContactForceModel::contactForceStorage;
 	
-	using IdType 			= typename interaction::IdType;
+	using IdType 			= uint32;
 
-	using IndexType    		= typename interaction::IndexType;
-
-	using ExecutionSpace 	= typename interaction::ExecutionSpace;
+	using IndexType    		= uint32;
 
 	using ContactListType 	= 
-			contactListType<ModelStorage, ExecutionSpace, IdType>;
+			contactListType<ModelStorage, DefaultExecutionSpace, IdType>;
 
-	using PairsContainerType= typename contactSearch::PairContainerType;
 
-protected:
+private:
 	
 	/// const reference to geometry
 	const GeometryMotionModel& 			geometryMotion_;
@@ -66,15 +62,17 @@ protected:
 	/// const reference to particles 
 	const sphereParticles& 				sphParticles_;
 
+	/// contact search object for pp and pw interactions 
+	uniquePtr<contactSearch> 			contactSearch_ = nullptr;
 
 	/// contact force model 
-	uniquePtr<ContactForceModel>  	forceModel_ 	= nullptr;
+	uniquePtr<ContactForceModel>  		forceModel_ 	= nullptr;
 
 	/// contact list for particle-particle interactoins (keeps the history)
-	uniquePtr<ContactListType> 		ppContactList_ = nullptr;
+	uniquePtr<ContactListType> 			ppContactList_ = nullptr;
 
 	/// contact list for particle-wall interactions (keeps the history)
-	uniquePtr<ContactListType> 		pwContactList_ = nullptr;	
+	uniquePtr<ContactListType> 			pwContactList_ = nullptr;	
 
 	/// timer for particle-particle interaction computations
 	Timer 		ppInteractionTimer_;
@@ -82,42 +80,39 @@ protected:
 	/// timer for particle-wall interaction computations
 	Timer       pwInteractionTimer_;
 
+	Timer 		contactListTimer_;
+
+	Timer 		contactListTimer0_;
+
 	bool createSphereInteraction();
 
-	bool managePPContactLists();
+	bool sphereSphereInteraction();
 
-	bool managePWContactLists();
+	bool sphereWallInteraction();
+
+	//bool managePPContactLists();
+
+	//bool managePWContactLists();
 
 	/// range policy for p-p interaction execution 
 	using rpPPInteraction = 
-		Kokkos::RangePolicy<Kokkos::IndexType<int32>, Kokkos::Schedule<Kokkos::Dynamic>>;
+		Kokkos::RangePolicy<Kokkos::IndexType<uint32>, Kokkos::Schedule<Kokkos::Dynamic>>;
 
 	/// range policy for p-w interaction execution 
 	using rpPWInteraction = rpPPInteraction;
 
 public:
 
-	TypeInfoTemplate3("sphereInteraction", ContactForceModel, MotionModel, ContactListType);
-
-	// constructor
+	TypeInfoTemplate13("sphereInteraction", ContactForceModel, MotionModel, ContactListType);
 
+	/// Constructor from components
 	sphereInteraction(
 		systemControl& control,
 		const particles& prtcl,
-		const geometry& geom)
-	:
-		interaction(control, prtcl, geom),
-		geometryMotion_(dynamic_cast<const GeometryMotionModel&>(geom)),
-		sphParticles_(dynamic_cast<const sphereParticles&>(prtcl)),
-		ppInteractionTimer_("sphere-sphere interaction", &this->timers()),
-		pwInteractionTimer_("sphere-wall interaction", &this->timers())
-	{
-		if(!createSphereInteraction())
-		{
-			fatalExit;
-		}
-	}
+		const geometry& geom);
+	
 
+	/// Add virtual constructor 
 	add_vCtor
 	(
 		interaction,
@@ -125,97 +120,25 @@ public:
 		systemControl
 	);
 
+	/// This is called in time loop, before iterate. (overriden from demComponent)
+	bool beforeIteration() override;
+	
+	/// This is called in time loop. Perform the main calculations 
+	/// when the component should evolve along time. (overriden from demComponent)
+	bool iterate() override; 
+	
+	/// This is called in time loop, after iterate. (overriden from demComponent)
+	bool afterIteration() override;
 
-	bool beforeIteration() override
-	{
-		return true;
-	}
-
-
-	bool iterate() override
-	{
-
-//Info<<"before contact search"<<endInfo;
-		////Info<<"interaction iterrate start"<<endInfo;
-		if(this->contactSearch_)
-		{
-
-			if( this->contactSearch_().ppEnterBroadSearch())
-			{
-				//Info<<" before ppEnterBroadSearch"<<endInfo;
-				ppContactList_().beforeBroadSearch();
-				//Info<<" after ppEnterBroadSearch"<<endInfo;
-			}
-
-			if(this->contactSearch_().pwEnterBroadSearch())
-			{
-				//Info<<" before pwEnterBroadSearch"<<endInfo;
-				pwContactList_().beforeBroadSearch();
-				//Info<<" after pwEnterBroadSearch"<<endInfo;
-			}
-
-			//Info<<" before broadSearch"<<endInfo;
-			if( !contactSearch_().broadSearch(
-					ppContactList_(),
-					pwContactList_()) )
-			{
-				fatalErrorInFunction<<
-				"unable to perform broadSearch.\n";
-				fatalExit;
-			}
-
-			//Info<<" before broadSearch"<<endInfo;
-
-
-			if(this->contactSearch_().ppPerformedBroadSearch())
-			{
-				//Info<<" before afterBroadSearch"<<endInfo;
-				ppContactList_().afterBroadSearch();
-				//Info<<" after afterBroadSearch"<<endInfo;
-			}
-
-			if(this->contactSearch_().pwPerformedBroadSearch())
-			{
-				//Info<<" before pwContactList_().afterBroadSearch()"<<endInfo;
-				pwContactList_().afterBroadSearch();
-				//Info<<" after pwContactList_().afterBroadSearch()"<<endInfo;
-			}
-		}
-//Info<<"after contact search"<<endInfo;
-
-		if( sphParticles_.numActive()<=0)return true;
-//Info<<"before sphereSphereInteraction "<<endInfo;
-		ppInteractionTimer_.start();
-			sphereSphereInteraction();
-		ppInteractionTimer_.end();
-//Info<<"after sphereSphereInteraction "<<endInfo;
-
-//Info<<"before sphereWallInteraction "<<endInfo;
-		pwInteractionTimer_.start();
-			sphereWallInteraction();
-		pwInteractionTimer_.end();
-//Info<<"after sphereWallInteraction "<<endInfo;
-		
-		return true;
-	}
-
-
-	bool afterIteration() override
-	{
-		return true;
-	}
-
-
-	bool update(const eventMessage& msg)override
-	{
-		// it requires not action regarding any changes in the 
-		// point structure 
-		return true;
-	}
-
-	bool sphereSphereInteraction();
-
-	bool sphereWallInteraction();
+	/// Check for changes in the point structures. (overriden from observer)
+	bool hearChanges(
+		real t,
+		real dt,
+		uint32 iter,
+		const message& msg, 
+		const anyList& varList)override;
+	
+	
 };
 
 
diff --git a/src/Interaction/sphereInteraction/sphereInteractionKernels.hpp b/src/Interaction/sphereInteraction/sphereInteractionKernels.hpp
index cef5fa72..c581d598 100644
--- a/src/Interaction/sphereInteraction/sphereInteractionKernels.hpp
+++ b/src/Interaction/sphereInteraction/sphereInteractionKernels.hpp
@@ -42,7 +42,7 @@ struct ppInteractionFunctor
 	ContactListType   tobeFilled_;
 
 	deviceViewType1D<real>  		diam_;
-	deviceViewType1D<int8> 			propId_;
+	deviceViewType1D<uint32> 		propId_;
 	deviceViewType1D<realx3>  		pos_;
 	deviceViewType1D<realx3>  		lVel_;
 	deviceViewType1D<realx3>  		rVel_;
@@ -55,7 +55,7 @@ struct ppInteractionFunctor
 		ContactForceModel 		forceModel,
 		ContactListType 		tobeFilled,
 		deviceViewType1D<real>  		diam,
-		deviceViewType1D<int8> 			propId,
+		deviceViewType1D<uint32> 		propId,
 		deviceViewType1D<realx3>  		pos,
 		deviceViewType1D<realx3>  		lVel,
 		deviceViewType1D<realx3>  		rVel,
@@ -75,7 +75,7 @@ struct ppInteractionFunctor
 	{}
 
 	INLINE_FUNCTION_HD
-	void operator()(const int32 n)const
+	void operator()(const uint32 n)const
 	{
 		
 		if(!tobeFilled_.isValid(n))return;
@@ -181,14 +181,14 @@ struct pwInteractionFunctor
 	MotionModel  			motionModel_;
 
 	deviceViewType1D<real>  	diam_;
-	deviceViewType1D<int8> 		propId_;
+	deviceViewType1D<uint32>	propId_;
 	deviceViewType1D<realx3>  	pos_;
 	deviceViewType1D<realx3>  	lVel_;
 	deviceViewType1D<realx3>  	rVel_;
 	deviceViewType1D<realx3>	cForce_;
 	deviceViewType1D<realx3>	cTorque_;
-	deviceViewType1D<int8> 		wTriMotionIndex_;
-	deviceViewType1D<int8>      wPropId_;
+	deviceViewType1D<uint32> 	wTriMotionIndex_;
+	deviceViewType1D<uint32>    wPropId_;
 	deviceViewType1D<realx3>    wCForce_;
 	
 
@@ -199,14 +199,14 @@ struct pwInteractionFunctor
 		TraingleAccessor		triangles,
 		MotionModel 			motionModel ,
 		deviceViewType1D<real>  	diam ,
-		deviceViewType1D<int8>  	propId,
+		deviceViewType1D<uint32>  	propId,
 		deviceViewType1D<realx3>   	pos ,
 		deviceViewType1D<realx3>   	lVel,
 		deviceViewType1D<realx3>   	rVel,
 		deviceViewType1D<realx3> 	cForce,
 		deviceViewType1D<realx3> 	cTorque ,
-		deviceViewType1D<int8> 		wTriMotionIndex,
-		deviceViewType1D<int8>      wPropId,
+		deviceViewType1D<uint32> 	wTriMotionIndex,
+		deviceViewType1D<uint32>    wPropId,
 		deviceViewType1D<realx3>    wCForce)
 	:
 		dt_(dt),
diff --git a/src/Interaction/sphereInteraction/sphereInteractions.cpp b/src/Interaction/sphereInteraction/sphereInteractions.cpp
index 569fa7ad..1bd0da9c 100644
--- a/src/Interaction/sphereInteraction/sphereInteractions.cpp
+++ b/src/Interaction/sphereInteraction/sphereInteractions.cpp
@@ -28,22 +28,22 @@ Licence:
 
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::limitedLinearNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::unsortedContactList>;
 
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::limitedLinearNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::sortedContactList>;
 
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::nonLimitedLinearNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::unsortedContactList>;
 
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::nonLimitedLinearNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::sortedContactList>;
 
 template class pFlow::sphereInteraction<
@@ -88,7 +88,7 @@ template class pFlow::sphereInteraction<
 	pFlow::sortedContactList>;
 
 
-template class pFlow::sphereInteraction<
+/*template class pFlow::sphereInteraction<
 	pFlow::cfModels::limitedLinearNormalRolling,
 	pFlow::multiRotationAxisMotionGeometry,
 	pFlow::unsortedContactList>;
@@ -106,28 +106,28 @@ template class pFlow::sphereInteraction<
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::nonLimitedLinearNormalRolling,
 	pFlow::multiRotationAxisMotionGeometry,
-	pFlow::sortedContactList>;
+	pFlow::sortedContactList>;*/
 
 /// non-linear models 
 
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::limitedNonLinearNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::unsortedContactList>;
 
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::limitedNonLinearNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::sortedContactList>;
 
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::nonLimitedNonLinearNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::unsortedContactList>;
 
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::nonLimitedNonLinearNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::sortedContactList>;
 
 template class pFlow::sphereInteraction<
@@ -171,7 +171,7 @@ template class pFlow::sphereInteraction<
 	pFlow::vibratingMotionGeometry,
 	pFlow::sortedContactList>;
 
-template class pFlow::sphereInteraction<
+/*template class pFlow::sphereInteraction<
 	pFlow::cfModels::limitedNonLinearNormalRolling,
 	pFlow::multiRotationAxisMotionGeometry,
 	pFlow::unsortedContactList>;
@@ -189,28 +189,28 @@ template class pFlow::sphereInteraction<
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::nonLimitedNonLinearNormalRolling,
 	pFlow::multiRotationAxisMotionGeometry,
-	pFlow::sortedContactList>;
+	pFlow::sortedContactList>;*/
 
 
 // - nonLinearMod models
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::limitedNonLinearModNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::unsortedContactList>;
 
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::limitedNonLinearModNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::sortedContactList>;
 
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::nonLimitedNonLinearModNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::unsortedContactList>;
 
 template class pFlow::sphereInteraction<
 	pFlow::cfModels::nonLimitedNonLinearModNormalRolling,
-	pFlow::fixedGeometry,
+	pFlow::stationaryGeometry,
 	pFlow::sortedContactList>;
 
 template class pFlow::sphereInteraction<
@@ -255,7 +255,7 @@ template class pFlow::sphereInteraction<
 	pFlow::sortedContactList>;
 
 
-template class pFlow::sphereInteraction<
+/*template class pFlow::sphereInteraction<
 	pFlow::cfModels::limitedNonLinearModNormalRolling,
 	pFlow::multiRotationAxisMotionGeometry,
 	pFlow::unsortedContactList>;
@@ -274,3 +274,4 @@ template class pFlow::sphereInteraction<
 	pFlow::cfModels::nonLimitedNonLinearModNormalRolling,
 	pFlow::multiRotationAxisMotionGeometry,
 	pFlow::sortedContactList>;
+*/
\ No newline at end of file

From 0aa7f2dba96649525cea14ddbbdd5204f5b3ea5e Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 01:56:04 -0700
Subject: [PATCH 47/60] Integration AB2

---
 src/Integration/AdamsBashforth2/AdamsBashforth2.cpp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp b/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp
index 01fc695a..c6bb54a6 100644
--- a/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp
+++ b/src/Integration/AdamsBashforth2/AdamsBashforth2.cpp
@@ -111,6 +111,7 @@ pFlow::AdamsBashforth2::AdamsBashforth2
 			objectFile::WRITE_ALWAYS
 		),
 		pStruct,
+		zero3,
 		zero3
 	)
 {}

From 57850119ba748adf0a5fd4cd466f457ce57a4159 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 01:56:49 -0700
Subject: [PATCH 48/60] containers are modified for errors

This commit is before the first release of phasicFlow from develop to main (version 1.0)
---
 src/phasicFlow/containers/Field/Field.hpp     |  5 ++
 .../containers/List/anyList/anyList.hpp       |  7 +-
 .../containers/Map/hashMap/hashMap.hpp        | 40 +++-------
 .../containers/VectorHD/VectorSingle.cpp      | 75 ++++++++++++++++++-
 .../containers/VectorHD/VectorSingle.hpp      |  8 +-
 .../{ => boundaryField}/boundaryField.cpp     |  0
 .../{ => boundaryField}/boundaryField.hpp     | 18 +++--
 .../createBoundaryFields.hpp                  |  0
 .../{ => boundaryField}/exitBoundaryField.cpp |  0
 .../{ => boundaryField}/exitBoundaryField.hpp | 10 ++-
 .../periodicBoundaryField.cpp                 |  0
 .../periodicBoundaryField.hpp                 |  0
 .../containers/pointField/internalField.cpp   | 40 ++++++++++
 .../containers/pointField/internalField.hpp   | 14 ++--
 .../pointField/internalFieldAlgorithms.hpp    | 51 +++++++++++++
 .../containers/pointField/pointField.cpp      |  2 +-
 .../containers/pointField/pointFields.cpp     |  8 ++
 .../containers/symArrayHD/symArrayHD.hpp      | 52 +++++++------
 .../triSurfaceField/triSurfaceField.hpp       | 35 +++++++++
 19 files changed, 291 insertions(+), 74 deletions(-)
 rename src/phasicFlow/containers/pointField/{ => boundaryField}/boundaryField.cpp (100%)
 rename src/phasicFlow/containers/pointField/{ => boundaryField}/boundaryField.hpp (92%)
 rename src/phasicFlow/containers/pointField/{ => boundaryField}/createBoundaryFields.hpp (100%)
 rename src/phasicFlow/containers/pointField/{ => boundaryField}/exitBoundaryField.cpp (100%)
 rename src/phasicFlow/containers/pointField/{ => boundaryField}/exitBoundaryField.hpp (92%)
 rename src/phasicFlow/containers/pointField/{ => boundaryField}/periodicBoundaryField.cpp (100%)
 rename src/phasicFlow/containers/pointField/{ => boundaryField}/periodicBoundaryField.hpp (100%)

diff --git a/src/phasicFlow/containers/Field/Field.hpp b/src/phasicFlow/containers/Field/Field.hpp
index 405cf68e..887b994d 100644
--- a/src/phasicFlow/containers/Field/Field.hpp
+++ b/src/phasicFlow/containers/Field/Field.hpp
@@ -188,6 +188,11 @@ public:
 		{
 			this->fill(span, val);
 		}
+
+		void fillField(const T& val)
+		{
+			this->fill(val);
+		}
 		
 	//// - IO operations 
 		
diff --git a/src/phasicFlow/containers/List/anyList/anyList.hpp b/src/phasicFlow/containers/List/anyList/anyList.hpp
index 9ed114b1..b0d39405 100644
--- a/src/phasicFlow/containers/List/anyList/anyList.hpp
+++ b/src/phasicFlow/containers/List/anyList/anyList.hpp
@@ -51,7 +51,9 @@ protected:
 	anyListType 	anyList_;
 
 	/// List of variable names in anyList_ 
-	wordList 		names_;	
+	wordList 		names_;
+
+	wordList 		types_;	
 
 public:
 
@@ -89,6 +91,7 @@ public:
 				fatalExit;
 			}
 			names_.push_back(name);
+			types_.push_back(getTypeName<T>());
 			return anyList_.emplace_back( 
 				std::in_place_type<T>, 
 				std::forward<Args>(args)...);
@@ -106,6 +109,7 @@ public:
 				fatalExit;
 			}
 			names_.push_back(name);
+			types_.push_back(getTypeName<T>());
 			return anyList_.emplace_back(std::in_place_type<T>, other);
 		}
 
@@ -121,6 +125,7 @@ public:
 				fatalExit;
 			}
 			names_.push_back(name);
+			types_.push_back(getTypeName<T>());
 			return anyList_.emplace_back(std::in_place_type<T>, std::move(other));
 		}
 
diff --git a/src/phasicFlow/containers/Map/hashMap/hashMap.hpp b/src/phasicFlow/containers/Map/hashMap/hashMap.hpp
index 1761b552..042800f5 100644
--- a/src/phasicFlow/containers/Map/hashMap/hashMap.hpp
+++ b/src/phasicFlow/containers/Map/hashMap/hashMap.hpp
@@ -43,6 +43,8 @@ public:
 	
 	using hashmapType 	= std::unordered_map<Key, T, Hash>;
 
+	using hasher 		= typename hashmapType::hasher;
+
 	using iterator 		= typename hashmapType::iterator;
 	
 	using constIterator = typename hashmapType::const_iterator;
@@ -75,46 +77,24 @@ public:
 		{}
 
 		// - Copy construct
-		hashMap(const hashMapType & src)
-		:
-			hashmapType(src)
-		{}
+		hashMap(const hashMapType & src) = default;
 
 		// - Move construct 
-		hashMap( hashMapType&& src)
-		:
-			hashmapType(std::move(src))
-		{}
+		hashMap( hashMapType&& src) = default;
 
 		// - Copy assignment
-		hashMapType& operator=(const hashMapType& rhs)
-		{
-			hashmapType::operator=(rhs);
-			return *this;
-		}
-
+		hashMapType& operator=(const hashMapType& rhs) = default;
+		
 		// - Move assignment
-		hashMapType& operator=(hashMapType&& rhs)
-		{
-			hashmapType::operator=( std::move(rhs));
-			return *this;
-		}
-
+		hashMapType& operator=(hashMapType&& rhs) = default;
+		
 		uniquePtr<hashMapType> clone()const
 		{
 			return makeUnique<hashMapType>(*this);
 		}
 
-		hashMapType* clonePtr()const
-		{
-			return new hashMapType(*this);
-		}	
-
-		~hashMap()
-		{
-			this->clear();
-		}
-
+		~hashMap() = default;
+	
 
 	//// - Methods	
 
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
index 0f9e4638..1ea576d2 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
@@ -509,7 +509,7 @@ void pFlow::VectorSingle<T,MemorySpace>::assign
 
 template<typename T, typename MemorySpace>
 INLINE_FUNCTION_H 
-void pFlow::VectorSingle<T,MemorySpace>::assign(const VectorTypeHost& src)
+void pFlow::VectorSingle<T,MemorySpace>::assignFromHost(const VectorTypeHost& src)
 {
 	uint32 srcSize = src.size();
 	uint32 srcCap = src.capacity();
@@ -540,7 +540,45 @@ void pFlow::VectorSingle<T,MemorySpace>::assign(const VectorTypeHost& src)
     }
 }
 
+template<typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+void pFlow::VectorSingle<T,MemorySpace>::assign
+(
+    const VectorType& src, 
+    bool srcCapacity
+)
+{
+    uint32 srcSize = src.size();
+	uint32 srcCap = src.capacity();
+
+    if(srcCapacity && srcCap != capacity())
+    {
+        reallocateCapacitySize(srcCap, srcSize);
+    }
+    else
+    {
+        setSize(srcSize);
+    }
+
+    if constexpr(isTriviallyCopyable_)
+    {
+        copy(deviceView(), src.deviceView());
+    }
+    else if constexpr( isHostAccessible_)
+    {
+        for(auto i=0u; i<src.size(); i++)
+        {
+            view_[i] = src.view_[i];
+        }
+    }
+    else
+    {
+        static_assert("Not a valid operation for this data type on device memory");
+    }
+}
+
 template <typename T, typename MemorySpace>
+INLINE_FUNCTION_H
 void pFlow::VectorSingle<T, MemorySpace>::append
 (
     const std::vector<T> &appVec
@@ -575,6 +613,41 @@ void pFlow::VectorSingle<T, MemorySpace>::append
     
 }
 
+template <typename T, typename MemorySpace>
+INLINE_FUNCTION_H
+void pFlow::VectorSingle<T, MemorySpace>::append
+(
+    const VectorType& appVec
+)
+{
+    uint32 appSize  = appVec.size();
+	if(appSize == 0) return;
+
+	uint32 oldS = size();
+	uint32 newSize = oldS + appSize; 
+
+	setSize(newSize);
+	auto appendView = Kokkos::subview(
+		view_,
+		Kokkos::make_pair<uint32>(oldS, newSize));
+	
+    if constexpr( isTriviallyCopyable_)
+    {
+        copy(appendView, appVec.deviceView());
+    }
+    else if constexpr( isHostAccessible_)
+    {
+        for(auto i=0u; i<appVec.size(); i++)
+        {
+            appendView[i] = appVec.view_[i];
+        }
+    }
+    else
+    {
+        static_assert("not a valid operation for this data type on device memory");
+    }
+}
+
 template <typename T, typename MemorySpace>
 INLINE_FUNCTION_H auto pFlow::VectorSingle<T, MemorySpace>::getSpan()
 {
diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
index 1461503f..1243d501 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.hpp
@@ -284,10 +284,16 @@ public:
 		/// The size of *this becomes the size of src. 
 		/// The capacity of *this becomes the capacity of src.
 		INLINE_FUNCTION_H
-		void assign(const VectorTypeHost& src);
+		void assignFromHost(const VectorTypeHost& src);
+
+		INLINE_FUNCTION_H
+		void assign(const VectorType& src, bool srcCapacity = true);
 
 		INLINE_FUNCTION_H
 		void append(const std::vector<T>& appVec);
+
+		INLINE_FUNCTION_H
+		void append(const VectorType& appVec);
 		
 		INLINE_FUNCTION_H
 		auto getSpan();
diff --git a/src/phasicFlow/containers/pointField/boundaryField.cpp b/src/phasicFlow/containers/pointField/boundaryField/boundaryField.cpp
similarity index 100%
rename from src/phasicFlow/containers/pointField/boundaryField.cpp
rename to src/phasicFlow/containers/pointField/boundaryField/boundaryField.cpp
diff --git a/src/phasicFlow/containers/pointField/boundaryField.hpp b/src/phasicFlow/containers/pointField/boundaryField/boundaryField.hpp
similarity index 92%
rename from src/phasicFlow/containers/pointField/boundaryField.hpp
rename to src/phasicFlow/containers/pointField/boundaryField/boundaryField.hpp
index 9836599c..a0ad8a0e 100644
--- a/src/phasicFlow/containers/pointField/boundaryField.hpp
+++ b/src/phasicFlow/containers/pointField/boundaryField/boundaryField.hpp
@@ -52,10 +52,8 @@ protected:
 	static inline
 	const message defaultMessage_ = 
 	(
-		message::CAP_CHANGED+
-		message::SIZE_CHANGED+
-		message::ITEM_INSERT+
-		message::ITEM_DELETE
+		message::BNDR_RESET+
+		message::BNDR_REARRANGE		
 	);
 
 public:
@@ -95,8 +93,16 @@ public:
     	const anyList& varList
 	) override
     {
-		notImplementedFunction;
-		return false;
+		
+		if(msg.equivalentTo(message::BNDR_REARRANGE))
+		{
+			// do nothing
+		}
+		if(msg.equivalentTo(message::BNDR_RESET))
+		{
+			//do nothing
+		}
+		return true;
 	}
 
 	auto size()const
diff --git a/src/phasicFlow/containers/pointField/createBoundaryFields.hpp b/src/phasicFlow/containers/pointField/boundaryField/createBoundaryFields.hpp
similarity index 100%
rename from src/phasicFlow/containers/pointField/createBoundaryFields.hpp
rename to src/phasicFlow/containers/pointField/boundaryField/createBoundaryFields.hpp
diff --git a/src/phasicFlow/containers/pointField/exitBoundaryField.cpp b/src/phasicFlow/containers/pointField/boundaryField/exitBoundaryField.cpp
similarity index 100%
rename from src/phasicFlow/containers/pointField/exitBoundaryField.cpp
rename to src/phasicFlow/containers/pointField/boundaryField/exitBoundaryField.cpp
diff --git a/src/phasicFlow/containers/pointField/exitBoundaryField.hpp b/src/phasicFlow/containers/pointField/boundaryField/exitBoundaryField.hpp
similarity index 92%
rename from src/phasicFlow/containers/pointField/exitBoundaryField.hpp
rename to src/phasicFlow/containers/pointField/boundaryField/exitBoundaryField.hpp
index dbc942d7..8c5fcb57 100644
--- a/src/phasicFlow/containers/pointField/exitBoundaryField.hpp
+++ b/src/phasicFlow/containers/pointField/boundaryField/exitBoundaryField.hpp
@@ -70,8 +70,14 @@ public:
     	const anyList& varList
 	) override
     {
-		notImplementedFunction;
-		return false;
+		BoundaryFieldType::hearChanges(t,dt,iter, msg,varList);
+		
+		if(msg.equivalentTo(message::BNDR_DELETE))
+		{
+			// do nothing;
+		}
+		
+		return true;
 	}
 
 };
diff --git a/src/phasicFlow/containers/pointField/periodicBoundaryField.cpp b/src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.cpp
similarity index 100%
rename from src/phasicFlow/containers/pointField/periodicBoundaryField.cpp
rename to src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.cpp
diff --git a/src/phasicFlow/containers/pointField/periodicBoundaryField.hpp b/src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.hpp
similarity index 100%
rename from src/phasicFlow/containers/pointField/periodicBoundaryField.hpp
rename to src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.hpp
diff --git a/src/phasicFlow/containers/pointField/internalField.cpp b/src/phasicFlow/containers/pointField/internalField.cpp
index d75c6d5f..99bd7860 100644
--- a/src/phasicFlow/containers/pointField/internalField.cpp
+++ b/src/phasicFlow/containers/pointField/internalField.cpp
@@ -98,6 +98,46 @@ typename pFlow::internalField<T, MemorySpace>::FieldTypeHost
     return aField;
 }
 
+template <class T, class MemorySpace>
+bool pFlow::internalField<T, MemorySpace>:: hearChanges
+(
+	real t,
+	real dt,
+	uint32 iter,
+	const message& msg, 
+	const anyList& varList
+)
+{
+	if(msg.equivalentTo(message::CAP_CHANGED))
+	{
+		auto newCap = varList.getObject<uint32>(
+			message::eventName(message::CAP_CHANGED));
+
+		field_.reserve(newCap);
+	}
+	if(msg.equivalentTo(message::SIZE_CHANGED))
+	{
+		auto newSize = varList.getObject<uint32>(
+			message::eventName(message::SIZE_CHANGED));
+		field_.resize(newSize);
+	}
+	if(msg.equivalentTo(message::ITEM_DELETE))
+	{
+		// do nothing
+	}
+	if(msg.equivalentTo(message::ITEM_REARRANGE))
+	{
+		notImplementedFunction;
+		return false;
+	}
+	if(msg.equivalentTo(message::ITEM_INSERT))
+	{
+		notImplementedFunction;
+		return false;
+	}
+	return true;
+}
+
 template<class T, class MemorySpace>
 bool pFlow::internalField<T, MemorySpace>::write
 (
diff --git a/src/phasicFlow/containers/pointField/internalField.hpp b/src/phasicFlow/containers/pointField/internalField.hpp
index d92fff0f..92ba1bf6 100644
--- a/src/phasicFlow/containers/pointField/internalField.hpp
+++ b/src/phasicFlow/containers/pointField/internalField.hpp
@@ -24,6 +24,7 @@ Licence:
 #include "Field.hpp"
 #include "observer.hpp"
 #include "dataIO.hpp"
+#include "anyList.hpp"
 
 
 namespace pFlow
@@ -59,6 +60,7 @@ protected:
 	const message defaultMessage_ = 
 	(
 		message::CAP_CHANGED+
+		message::SIZE_CHANGED+
 		message::ITEM_INSERT+
 		message::ITEM_REARRANGE+
 		message::ITEM_DELETE
@@ -75,6 +77,11 @@ public:
 		const internalPoints& internal,
 		const T& val);
 	
+	inline 
+	const auto& deviceViewAll()const
+	{
+		return field_.deviceViewAll();
+	}
 	inline
 	auto deviceView()const
 	{
@@ -166,11 +173,8 @@ public:
 		uint32 iter,
 		const message& msg, 
 		const anyList& varList
-	) override
-	{
-		notImplementedFunction;
-		return false;
-	}
+	) override;
+	
 
 	//// - IO
 
diff --git a/src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp b/src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp
index 8f94bfb6..118fb21c 100644
--- a/src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp
+++ b/src/phasicFlow/containers/pointField/internalFieldAlgorithms.hpp
@@ -194,7 +194,58 @@ Pair<T,T> minMax(const internalField<T,MemorySpace>& iField)
     }
 }
 
+template<class T, class MemorySpace>
+inline 
+void fillSequence(internalField<T,MemorySpace>& iField, const T& startVal)
+{
+    using exeSpace = typename internalField<T,MemorySpace>::execution_space;
 
+    using policy = Kokkos::RangePolicy<
+			exeSpace,
+			Kokkos::IndexType<uint32> >;
+
+    if constexpr(isDeviceAccessible<exeSpace>())
+    {               
+        auto maskD = iField.activePointsMaskDevice();
+        auto aRange = maskD.activeRange();
+        auto field = iField.field().deviceViewAll();
+        auto aPoints = maskD.getActivePoints();
+        exclusiveScan(aPoints,0, aRange.end(), aPoints,0);
+        
+        Kokkos::parallel_for(
+            "internalField::fillSequence",
+            policy(aRange.start(), aRange.end() ),
+            LAMBDA_HD(uint32 i)
+            {
+                if(maskD(i))
+                {
+                    field[i] = aPoints[i]+startVal;
+                }
+            });
+        Kokkos::fence();
+    }
+    else
+    {
+        // this is a host view 
+        auto maskH = iField.activePointsMaskHost();
+        auto aRange = maskH.activeRange();
+        auto field = iField.field().deviceViewAll();
+        auto aPoints = maskH.getActivePoints();
+        exclusiveScan(aPoints,0, aRange.end(), aPoints,0);
+        
+        Kokkos::parallel_for(
+            "internalField::fillSequence",
+            policy(aRange.start(), aRange.end() ),
+            LAMBDA_HD(uint32 i)
+            {
+                if(maskH(i))
+                {
+                    field[i] = aPoints[i]+startVal;
+                }
+            });
+        Kokkos::fence();
+    }
+}
 
 }
 
diff --git a/src/phasicFlow/containers/pointField/pointField.cpp b/src/phasicFlow/containers/pointField/pointField.cpp
index 5b444402..0a6315ab 100644
--- a/src/phasicFlow/containers/pointField/pointField.cpp
+++ b/src/phasicFlow/containers/pointField/pointField.cpp
@@ -274,7 +274,7 @@ bool pFlow::pointField<T, MemorySpace>::readPointField
         return false;
     }
 
-	this->field_.assign(internal);
+	this->field_.assignFromHost(internal);
 
 	return true;
 }
diff --git a/src/phasicFlow/containers/pointField/pointFields.cpp b/src/phasicFlow/containers/pointField/pointFields.cpp
index 09a979b1..f116e5ee 100644
--- a/src/phasicFlow/containers/pointField/pointFields.cpp
+++ b/src/phasicFlow/containers/pointField/pointFields.cpp
@@ -60,6 +60,14 @@ template class pFlow::pointField<pFlow::uint32>;
 createBaseBoundary(pFlow::uint32, void);
 createAllBoundary(pFlow::uint32, void);
 
+template class pFlow::pointField<pFlow::uint64, pFlow::HostSpace>; 
+createBaseBoundary(pFlow::uint64, pFlow::HostSpace);
+createAllBoundary(pFlow::uint64, pFlow::HostSpace);
+
+template class pFlow::pointField<pFlow::uint64>; 
+createBaseBoundary(pFlow::uint64, void);
+createAllBoundary(pFlow::uint64, void);
+
 template class pFlow::pointField<pFlow::real, pFlow::HostSpace>; 
 createBaseBoundary(pFlow::real, pFlow::HostSpace);
 createAllBoundary(pFlow::real, pFlow::HostSpace);
diff --git a/src/phasicFlow/containers/symArrayHD/symArrayHD.hpp b/src/phasicFlow/containers/symArrayHD/symArrayHD.hpp
index d1d0ddd7..9c7d1a67 100644
--- a/src/phasicFlow/containers/symArrayHD/symArrayHD.hpp
+++ b/src/phasicFlow/containers/symArrayHD/symArrayHD.hpp
@@ -23,22 +23,11 @@ Licence:
 
 #include "KokkosTypes.hpp"
 
-
 #include "types.hpp"
 #include "typeInfo.hpp"
 #include "Vector.hpp"
 
 
-/*
-stores the elemnt of a symetric array in the following order in a 1D vector
-
- 0  1  2  3
-    4  5  6
-       7  8  
-          9
-
-*/
-
 namespace pFlow
 {
 
@@ -52,6 +41,15 @@ void SWAP(Type &x, Type& y)
 	x = temp;
 }
 
+/*
+stores the elemnt of a symetric array in the following order in a 1D vector
+
+ 0  1  2  3
+    4  5  6
+       7  8  
+          9
+
+*/
 template<typename T, typename MemorySpace=void>
 class symArray
 {
@@ -82,14 +80,14 @@ class symArray
   	using execution_space 	= typename ViewType::execution_space;
 
   	
-protected:
+private:
 
-	uint32 			n_=0;
+	uint32 			n_= 0;
 
 	ViewType 		view_;
 
 
-	constexpr static inline const char* memoerySpaceName()
+	constexpr static const char* memoerySpaceName()
   	{
   		return memory_space::name();
   	}
@@ -97,14 +95,14 @@ protected:
 public:
 
 	// - type info
-	TypeInfoTemplateNV2("symArray", T, memoerySpaceName());
+	TypeInfoTemplateNV111("symArray", T, memoerySpaceName());
 
 	//// constructors 
 	INLINE_FUNCTION_H
 	symArray();
 
 	INLINE_FUNCTION_H
-	symArray(uint32 n)
+	explicit symArray(uint32 n)
 	:
 		symArray("symArray",n)
 	{}
@@ -125,7 +123,7 @@ public:
 	}
 
 	INLINE_FUNCTION_H
-	symArray(word name, Vector<T> src)
+	symArray(word name, const Vector<T>& src)
 	:
 		view_(name)
 	{
@@ -137,19 +135,19 @@ public:
 		}
 	}
 
-	INLINE_FUNCTION_H
+	INLINE_FUNCTION_HD
 	symArray(const symArray&) = default;
 
-	INLINE_FUNCTION_H
+	INLINE_FUNCTION_HD
 	symArray& operator=(const symArray&) = default;
 
-	INLINE_FUNCTION_H
-	symArray(symArray&&) = delete;
+	INLINE_FUNCTION_HD
+	symArray(symArray&&) = default;
 
-	INLINE_FUNCTION_H
-	symArray& operator=(symArray&&) = delete;
+	INLINE_FUNCTION_HD
+	symArray& operator=(symArray&&) = default;
 
-	INLINE_FUNCTION_H
+	INLINE_FUNCTION_HD
 	~symArray()=default;
 
 	
@@ -219,10 +217,10 @@ public:
 		bool write(iOstream& os)const
 		{
 			
-			int32 s = numElem(n_);
-			Vector<T, noConstructAllocator<T>> vecToFile(s);
+			uint32 s = numElem(n_);
+			Vector<T> vecToFile(view_.label(),s);
 			
-			const auto dVec = Kokkos::subview(view_, kPair<int32,int32>(0, s));
+			const auto dVec = Kokkos::subview(view_, Pair<uint32,uint32>(0, s));
 			hostViewType1D<T> mirror(vecToFile.data(), vecToFile.size());
 			Kokkos::deep_copy(mirror,dVec);
 
diff --git a/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp b/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp
index 9659ab66..54c4c0db 100644
--- a/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp
+++ b/src/phasicFlow/containers/triSurfaceField/triSurfaceField.hpp
@@ -130,6 +130,41 @@ public:
 			field_.assign(vals, surface_.capacity());
 		}
 		
+		inline 
+		const auto& deviceViewAll()const
+		{
+			return field_.deviceViewAll();
+		}
+		inline
+		auto deviceView()const
+		{
+			return field_.deviceView();
+		}
+
+		inline
+		auto hostView()const
+		{
+			return field_.hostView();
+		}
+
+		inline
+		const FieldType& field()const
+		{
+			return field_;
+		}
+
+		inline
+		FieldType& field()
+		{
+			return field_;
+		}
+
+		inline 
+		void fill(const T& val)
+		{
+			field_.fillField(val);
+		}
+
 		bool hearChanges(
 		real t,
 		real dt,

From 22405db6996c579f4e56947edf5045cc4bc4b9b2 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 02:01:02 -0700
Subject: [PATCH 49/60] Trisurface modified with new data structure

This commit is based on changes to geometry class of phasicFlow (version 1.0)
---
 src/phasicFlow/triSurface/triangleFunctions.hpp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/phasicFlow/triSurface/triangleFunctions.hpp b/src/phasicFlow/triSurface/triangleFunctions.hpp
index 62c1c076..7345c07f 100644
--- a/src/phasicFlow/triSurface/triangleFunctions.hpp
+++ b/src/phasicFlow/triSurface/triangleFunctions.hpp
@@ -31,7 +31,7 @@ real surface( const realx3& p1, const realx3& p2, const realx3& p3)
 {
 	realx3 V1 = p2 - p1;
 	realx3 V2 = p3 - p1;
-	return abs((cross(V1,V2)).length()/2.0);	
+	return abs((cross(V1,V2)).length()/(real)2.0);	
 }
 
 INLINE_FUNCTION_HD

From 6b3a4f017b8279d57b3fad86cce7af04161462a1 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 02:02:48 -0700
Subject: [PATCH 50/60] structured data has been modified for new changes in
 version (1.0)

---
 .../boundaries/boundaryBase/boundaryBase.cpp  | 87 ++++++++-----------
 .../boundaries/boundaryBase/boundaryBase.hpp  | 16 ++--
 .../boundaryBase/boundaryBaseKernels.cpp      | 63 ++++++++------
 .../boundaryBase/boundaryBaseKernels.hpp      | 16 ++--
 .../boundaries/boundaryExit/boundaryExit.cpp  | 15 ++--
 .../boundaries/boundaryExit/boundaryExit.hpp  |  4 +-
 .../boundaries/boundaryList.cpp               | 20 ++++-
 .../boundaries/boundaryNone/boundaryNone.cpp  |  6 +-
 .../boundaries/boundaryNone/boundaryNone.hpp  |  4 +-
 .../boundaryPeriodic/boundaryPeriodic.cpp     | 13 +--
 .../boundaryPeriodic/boundaryPeriodic.hpp     |  6 +-
 .../domain/simulationDomain.cpp               |  2 +-
 src/phasicFlow/structuredData/iBox/iBox.hpp   |  2 +-
 .../pointStructure/internalPoints.cpp         | 54 ++++++++++--
 .../pointStructure/internalPoints.hpp         |  9 +-
 .../pointStructure/pointFlag.hpp              |  3 +
 .../pointStructure/pointFlagKernels.hpp       | 31 ++++++-
 .../pointStructure/pointStructure.cpp         | 17 +++-
 .../pointStructure/pointStructure.hpp         | 16 ++--
 19 files changed, 251 insertions(+), 133 deletions(-)

diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
index d6821ca9..503095a3 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
@@ -21,57 +21,25 @@ Licence:
 #include "boundaryBase.hpp"
 #include "dictionary.hpp"
 #include "internalPoints.hpp"
-
+#include "anyList.hpp"
+#include "Time.hpp"
 #include "boundaryBaseKernels.hpp"
 
-/*pFlow::boundaryBase::boundaryBase
-(
-	const plane& 		bplane,
-	uint32 				mirrorProc, 
-	const word& 		name,
-	const word& 		type,
-	internalPoints& 	internal
-)
-:
-	subscriber(groupNames(name,type)),
-	boundaryPlane_(bplane),
-	name_(name),
-	type_(type),
-	mirrorProcessoNo_(mirrorProc),
-	internal_(internal)
-{
-	
-}*/
 
 void pFlow::boundaryBase::setNewIndices
 (
-	deviceViewType1D<uint32> newIndices
+	const uint32Vector_D& newIndices
 )
 {
-	auto newSize = newIndices.size();
-	setSize(static_cast<uint32>(newSize));
-	if(newSize>0u)
-	{
-		copy(indexList_.deviceView(), newIndices);
-	}
+	indexList_.assign(newIndices, false);
 }
 
 void pFlow::boundaryBase::appendNewIndices
 (
-	deviceViewType1D<uint32> newIndices
+	const uint32Vector_D& newIndices
 )
 {
-	auto s = static_cast<uint32>(newIndices.size());
-	if(s == 0) return;
-
-	uint32 oldS = size();
-	uint32 newSize = oldS + s; 
-
-	setSize(newSize);
-	auto appendView = Kokkos::subview(
-		indexList_.deviceViewAll(),
-		Kokkos::make_pair<uint32>(oldS, newSize));
-	copy(appendView, newIndices);
+	indexList_.append(newIndices);
 	
 	// TODO: notify observers about this change 
 
@@ -79,12 +47,10 @@ void pFlow::boundaryBase::appendNewIndices
 	//sort(indexList_.deviceViewAll(), 0, newSize);
 }
 
-
-
 bool pFlow::boundaryBase::removeIndices
 (
 	uint32 numRemove,
-	deviceViewType1D<uint32> removeMask
+	const uint32Vector_D& removeMask
 )
 {
     if(removeMask.size() != size()+1 )
@@ -93,12 +59,12 @@ bool pFlow::boundaryBase::removeIndices
 		return false;
 	}
 
-	deviceViewType1D<uint32> removeIndices("removeIndices", 1);
-	deviceViewType1D<uint32> keepIndices("keepIndices",1);
+	uint32Vector_D removeIndices("removeIndices");
+	uint32Vector_D keepIndices("keepIndices");
 
 	pFlow::boundaryBaseKernels::createRemoveKeepIndices
 	(
-		indexList_.deviceView(),
+		indexList_,
 		numRemove,
 		removeMask,
 		removeIndices,
@@ -114,15 +80,32 @@ bool pFlow::boundaryBase::removeIndices
 
 	setNewIndices(keepIndices);
 
-	//TODO: notify observers about changes 
+	anyList aList;
+	
+	aList.emplaceBack(
+		message::eventName(message::BNDR_RESET), 
+		std::move(keepIndices));
+	
+	message msgBndry 	= message::BNDR_RESET;
 
-	return false;
+	uint32 iter = internal_.time().currentIter();
+	real t = internal_.time().currentTime();
+	real dt = internal_.time().dt();
+
+	if( !this->notify(iter, t, dt, msgBndry, aList) )
+	{
+		fatalErrorInFunction<<"Error in notify operation in boundary "<< 
+		name_ <<endl;
+		return false;
+	}
+	
+	return true;
 }
 
 bool pFlow::boundaryBase::transferPoints
 (
 	uint32 numTransfer, 
-	deviceViewType1D<uint32> transferMask, 
+	const uint32Vector_D& transferMask, 
 	uint32 transferBoundaryIndex, 
 	realx3 transferVector
 )
@@ -133,12 +116,12 @@ bool pFlow::boundaryBase::transferPoints
 		return false;
 	}
 
-	deviceViewType1D<uint32> transferIndices("transferIndices",1);
-	deviceViewType1D<uint32> keepIndices("keepIndices",1);
+	uint32Vector_D transferIndices("transferIndices");
+	uint32Vector_D keepIndices("keepIndices");
 
 	pFlow::boundaryBaseKernels::createRemoveKeepIndices
 	(
-		indexList_.deviceView(),
+		indexList_,
 		numTransfer,
 		transferMask,
 		transferIndices,
@@ -150,7 +133,7 @@ bool pFlow::boundaryBase::transferPoints
 
 	// first, change the flags in the internalPoints
 	if( !internal_.changePointsFlag(
-		transferIndices, 
+		transferIndices.deviceView(), 
 		transferBoundaryIndex) ) 
 	{
 		return false;
@@ -158,7 +141,7 @@ bool pFlow::boundaryBase::transferPoints
 
 	// second, change the position of points 
 	if(!internal_.changePointsPoisition(
-		transferIndices,
+		transferIndices.deviceView(),
 		transferVector))
 	{
 		return false;
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
index 038114e7..d55875c6 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
@@ -53,6 +53,10 @@ private:
 	/// list of particles indices on device 
 	uint32Vector_D 	indexList_;
 
+	uint32Vector_H 	indexListH_;
+
+	bool 			indexSync_ = false; 
+
 	/// The length defined for creating neighbor list 
 	real  			neighborLength_;	
 
@@ -67,17 +71,17 @@ private:
 
 protected:
 
-	void setNewIndices(deviceViewType1D<uint32> newIndices);
+	void setNewIndices(const uint32Vector_D& newIndices);
 
-	void appendNewIndices(deviceViewType1D<uint32> newIndices);
+	void appendNewIndices(const uint32Vector_D& newIndices);
 	
 	bool removeIndices(
 		uint32 numRemove, 
-		deviceViewType1D<uint32> removeMask);
+		const uint32Vector_D& removeMask);
 	
 	bool transferPoints(
 		uint32 numTransfer, 
-		deviceViewType1D<uint32> transferMask,
+		const uint32Vector_D& transferMask,
 		uint32 transferBoundaryIndex,
 		realx3 transferVector);
 	
@@ -176,10 +180,10 @@ public:
     bool beforeIteration(uint32 iterNum, real t, real dt) = 0 ;
 
 	virtual 
-    bool iterate(uint32 iterNum, real t) = 0;
+    bool iterate(uint32 iterNum, real t, real dt) = 0;
 
 	virtual 
-    bool afterIteration(uint32 iterNum, real t) = 0;
+    bool afterIteration(uint32 iterNum, real t, real dt) = 0;
 
 	
 	const auto& indexList()const
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.cpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.cpp
index ff31ba02..0b0fd10c 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.cpp
@@ -24,16 +24,25 @@ void pFlow::boundaryBaseKernels::createRemoveKeepLists
 (
     uint32 numTotal, 
     uint32 numRemove, 
-    deviceViewType1D<uint32> removeMask, 
-    deviceViewType1D<uint32>& removeList, 
-    deviceViewType1D<uint32>& keepList
+    const uint32Vector_D& removeMask, 
+    uint32Vector_D& removeList, 
+    uint32Vector_D& keepList
 )
 {
     uint32 numKeep = numTotal - numRemove;
-    deviceViewType1D<uint32> rList("rList",numRemove);
-    deviceViewType1D<uint32> kList("kList",numKeep);
-
-    exclusiveScan(removeMask, 0u, numTotal+1, removeMask, 0u);
+    removeList.reallocate(numRemove,numRemove);
+    keepList.reallocate(numKeep,numKeep);
+    
+    auto maskD = removeMask.deviceViewAll();
+    const auto& removeD = removeList.deviceViewAll();
+    const auto& keepD = keepList.deviceViewAll();
+    
+    exclusiveScan(
+        maskD, 
+        0u, 
+        numTotal+1, 
+        maskD, 
+        0u);
 
     Kokkos::parallel_for
     (
@@ -41,35 +50,38 @@ void pFlow::boundaryBaseKernels::createRemoveKeepLists
         deviceRPolicyStatic(0, numTotal),
         LAMBDA_HD(uint32 i)
 		{
-			if(removeMask(i)!= removeMask(i+1))
-				rList(removeMask(i)) = i;
+			if(maskD(i)!= maskD(i+1))
+				removeD(maskD(i)) = i;
             else
-                kList(i-removeMask(i)) = i;
+                keepD(i-maskD(i)) = i;
 		}
     );
     Kokkos::fence();
 
-    removeList = rList;
-    keepList = kList;
-
 }
 
 
 void pFlow::boundaryBaseKernels::createRemoveKeepIndices
 (
-    deviceViewType1D<uint32> indices,
+    const uint32Vector_D& indices,
     uint32 numRemove,
-    deviceViewType1D<uint32> removeMask, 
-    deviceViewType1D<uint32>& removeIndices, 
-    deviceViewType1D<uint32>& keepIndices
+    const uint32Vector_D& removeMask, 
+    uint32Vector_D& removeIndices, 
+    uint32Vector_D& keepIndices
 )
 {
     uint32 numTotal = indices.size();
     uint32 numKeep = numTotal - numRemove;
-    deviceViewType1D<uint32> rIndices("rIndices",numRemove);
-    deviceViewType1D<uint32> kIndices("kIndices",numKeep);
+    
+    removeIndices.reallocate(numRemove, numRemove);
+    keepIndices.reallocate(numKeep, numKeep);
 
-    exclusiveScan(removeMask, 0u, numTotal+1, removeMask, 0u);
+    auto maskD = removeMask.deviceViewAll();
+    const auto& removeD = removeIndices.deviceViewAll();
+    const auto& keepD = keepIndices.deviceViewAll();
+    const auto& indicesD = indices.deviceViewAll();
+
+    exclusiveScan(maskD, 0u, numTotal+1, maskD, 0u);
 
     Kokkos::parallel_for
     (
@@ -77,14 +89,11 @@ void pFlow::boundaryBaseKernels::createRemoveKeepIndices
         deviceRPolicyStatic(0, numTotal),
         LAMBDA_HD(uint32 i)
 		{
-			if(removeMask(i)!= removeMask(i+1))
-				rIndices(removeMask(i)) = indices(i);
+			if(maskD(i)!= maskD(i+1))
+				removeD(maskD(i)) = indicesD(i);
             else
-                kIndices(i-removeMask(i)) = indices(i);
+                keepD(i-maskD(i)) = indicesD(i);
 		}
     );
-    Kokkos::fence();
-
-    removeIndices = rIndices;
-    keepIndices = kIndices;
+    Kokkos::fence();   
 }
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.hpp
index e3166721..780360f7 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBaseKernels.hpp
@@ -21,7 +21,7 @@ Licence:
 #ifndef __boundaryBaseKernels_hpp__
 #define __boundaryBaseKernels_hpp__
 
-#include "phasicFlowKokkos.hpp"
+#include "VectorSingles.hpp"
 
 namespace pFlow::boundaryBaseKernels
 {
@@ -29,16 +29,16 @@ namespace pFlow::boundaryBaseKernels
 void createRemoveKeepLists(
     uint32 numTotal, 
     uint32 numRemove, 
-    deviceViewType1D<uint32> removeMask, 
-    deviceViewType1D<uint32>& removeList, 
-    deviceViewType1D<uint32>& keepList);
+    const uint32Vector_D& removeMask, 
+    uint32Vector_D& removeList, 
+    uint32Vector_D& keepList);
 
 void createRemoveKeepIndices(
-    deviceViewType1D<uint32> indices,
+    const uint32Vector_D& indices,
     uint32 numRemove,
-    deviceViewType1D<uint32> removeMask, 
-    deviceViewType1D<uint32>& removeIndices, 
-    deviceViewType1D<uint32>& keepIndices);
+    const uint32Vector_D& removeMask, 
+    uint32Vector_D& removeIndices, 
+    uint32Vector_D& keepIndices);
 
 
 }
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
index b48e80ca..7b91714c 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
@@ -33,7 +33,7 @@ pFlow::boundaryExit::boundaryExit
 	boundaryBase(dict, bplane, internal)
 {
 	exitMarginLength_ = max( 
-		dict.getValOrSet("exitMarginLength",0.0), 0.0);
+		dict.getValOrSet("exitMarginLength",(real)0.0), (real)0.0);
 	checkForExitInterval_ = max(
 		dict.getValOrSet("checkForExitInterval", 1), 1);
 }
@@ -52,9 +52,10 @@ bool pFlow::boundaryExit::beforeIteration
 	}
 
 	uint32 s = size();
-	deviceViewType1D<uint32> deleteFlags("deleteFlags",s+1); 
-	fill(deleteFlags, 0, s+1, 0u);
+	uint32Vector_D deleteFlags("deleteFlags",s+1, s+1, RESERVE());
+	deleteFlags.fill(0u);
 
+	const auto& deleteD = deleteFlags.deviceViewAll();
 	auto points = thisPoints();
 	auto p = boundaryPlane().infPlane();
 
@@ -68,7 +69,7 @@ bool pFlow::boundaryExit::beforeIteration
 		{
 			if(p.pointInNegativeSide(points(i)))
 			{
-				deleteFlags(i)=1;
+				deleteD(i)=1;
 				delToUpdate++;
 			}
 		}, 
@@ -87,7 +88,8 @@ bool pFlow::boundaryExit::beforeIteration
 bool pFlow::boundaryExit::iterate
 (
 	uint32 iterNum, 
-	real t
+	real t,
+	real dt
 )
 {
 	return true;
@@ -96,7 +98,8 @@ bool pFlow::boundaryExit::iterate
 bool pFlow::boundaryExit::afterIteration
 (
 	uint32 iterNum, 
-	real t
+	real t,
+	real dt
 )
 {
 	return true;
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
index 2199fc60..77b6cfce 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
@@ -63,9 +63,9 @@ public:
 
 	bool beforeIteration(uint32 iterNum, real t, real dt) override;
 
-	bool iterate(uint32 iterNum, real t) override;
+	bool iterate(uint32 iterNum, real t, real dt) override;
 
-	bool afterIteration(uint32 iterNum, real t) override;
+	bool afterIteration(uint32 iterNum, real t, real dt) override;
 
 
 };
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryList.cpp b/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
index 2e6d20dc..62a695cf 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
@@ -155,6 +155,15 @@ bool pFlow::boundaryList::iterate
 	real dt
 )
 {
+	for(auto& bdry:*this)
+	{
+		if( !bdry->iterate(iter, t, dt))
+		{
+			fatalErrorInFunction<<
+			"Error in iterate in boundary "<<bdry->name()<<endl;
+			return false;
+		}
+	}
     return true;
 }
 
@@ -165,5 +174,14 @@ bool pFlow::boundaryList::afterIteration
 	real dt
 )
 {
-    return true;
+    for(auto& bdry:*this)
+	{
+		if( !bdry->afterIteration(iter, t, dt))
+		{
+			fatalErrorInFunction<<
+			"Error in afterIteration in boundary "<<bdry->name()<<endl;
+			return false;
+		}
+	}
+	return true;
 }
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
index 9ac6b2b7..3eba7fc8 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
@@ -43,7 +43,8 @@ bool pFlow::boundaryNone::beforeIteration
 bool pFlow::boundaryNone::iterate
 (
 	uint32 iterNum, 
-	real t
+	real t,
+	real dt
 )
 {
 	return true;
@@ -52,7 +53,8 @@ bool pFlow::boundaryNone::iterate
 bool pFlow::boundaryNone::afterIteration
 (
 	uint32 iterNum, 
-	real t
+	real t,
+	real dt
 )
 {
 	return true;
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp
index 332bedd3..50cbc807 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp
@@ -52,9 +52,9 @@ public:
 
 	bool beforeIteration(uint32 iterNum, real t, real dt) override;
 
-	bool iterate(uint32 iterNum, real t) override;
+	bool iterate(uint32 iterNum, real t, real dt) override;
 
-	bool afterIteration(uint32 iterNum, real t) override;
+	bool afterIteration(uint32 iterNum, real t, real dt) override;
 
 
 };
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp
index 51fc7ab3..795b83c7 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp
@@ -63,11 +63,12 @@ bool pFlow::boundaryPeriodic::beforeIteration(
 	}
 
 	uint32 s = size();
-	deviceViewType1D<uint32> transferFlags("transferFlags",s+1); 
-	fill(transferFlags, 0, s+1, 0u);
+	uint32Vector_D transferFlags("transferFlags",s+1, s+1, RESERVE()); 
+	transferFlags.fill(0u);
 	
 	auto points = thisPoints();
 	auto p = boundaryPlane().infPlane();
+	const auto & transferD = transferFlags.deviceViewAll();
 	uint32 numTransfered = 0;
 
 	Kokkos::parallel_reduce
@@ -78,7 +79,7 @@ bool pFlow::boundaryPeriodic::beforeIteration(
 		{
 			if(p.pointInNegativeSide(points(i)))
 			{
-				transferFlags(i)=1;
+				transferD(i)=1;
 				trnasToUpdate++;
 			}
 		}, 
@@ -109,7 +110,8 @@ bool pFlow::boundaryPeriodic::beforeIteration(
 bool pFlow::boundaryPeriodic::iterate
 (
 	uint32 iterNum, 
-	real t
+	real t,
+	real dt
 )
 {
 	return true;
@@ -118,7 +120,8 @@ bool pFlow::boundaryPeriodic::iterate
 bool pFlow::boundaryPeriodic::afterIteration
 (
 	uint32 iterNum, 
-	real t
+	real t,
+	real dt
 )
 {
 	return true;
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp
index 01223885..bfb8be78 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp
@@ -46,7 +46,7 @@ public:
 		const plane&    	bplane,
 		internalPoints& 	internal);
 
-	virtual 
+	 
 	~boundaryPeriodic() override= default;
 	
 	add_vCtor
@@ -64,9 +64,9 @@ public:
 
 	bool beforeIteration(uint32 iterNum, real t, real dt) override;
 
-	bool iterate(uint32 iterNum, real t) override;
+	bool iterate(uint32 iterNum, real t, real dt) override;
 
-	bool afterIteration(uint32 iterNum, real t) override;
+	bool afterIteration(uint32 iterNum, real t, real dt) override;
 
 
 };
diff --git a/src/phasicFlow/structuredData/domain/simulationDomain.cpp b/src/phasicFlow/structuredData/domain/simulationDomain.cpp
index cf4201a6..2930b1b4 100644
--- a/src/phasicFlow/structuredData/domain/simulationDomain.cpp
+++ b/src/phasicFlow/structuredData/domain/simulationDomain.cpp
@@ -53,7 +53,7 @@ pFlow::domain pFlow::simulationDomain::extendThisDomain
 }
 
 pFlow::uniquePtr<pFlow::simulationDomain>
-pFlow::simulationDomain::create(systemControl &control)
+	pFlow::simulationDomain::create(systemControl &control)
 {
 	word sType = angleBracketsNames(
         "simulationDomain", 
diff --git a/src/phasicFlow/structuredData/iBox/iBox.hpp b/src/phasicFlow/structuredData/iBox/iBox.hpp
index 89e7b225..b9105047 100644
--- a/src/phasicFlow/structuredData/iBox/iBox.hpp
+++ b/src/phasicFlow/structuredData/iBox/iBox.hpp
@@ -43,7 +43,7 @@ protected:
 public:
 
 	// - type info
-	TypeInfoTemplateNV("iBox", intType);
+	TypeInfoTemplateNV11("iBox", intType);
 
 	//// - Constructors 
 		INLINE_FUNCTION_HD 
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
index e9508076..7e213b54 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
@@ -18,10 +18,11 @@ Licence:
 
 -----------------------------------------------------------------------------*/
 
-
+#include "Time.hpp"
 #include "internalPoints.hpp"
 #include "domain.hpp"
 #include "Vectors.hpp"
+#include "anyList.hpp"
 #include "internalPointsKernels.hpp"
 
 void pFlow::internalPoints::syncPFlag()const
@@ -33,16 +34,57 @@ void pFlow::internalPoints::syncPFlag()const
 	}
 }
 
-bool pFlow::internalPoints::deletePoints(deviceViewType1D<uint32> delPoints)
+bool pFlow::internalPoints::deletePoints(const uint32Vector_D& delPoints)
 {
-    if(!pFlagsD_.deletePoints(delPoints))
+	
+	if(delPoints.empty())return true;
+
+	auto oldRange = pFlagsD_.activeRange();
+	auto oldSize  = size();
+
+    if(!pFlagsD_.deletePoints(delPoints.deviceView()))
 	{
 		fatalErrorInFunction<<
 		"Error in deleting points from internal points"<<endl;
 		return false;
 	}
 	pFlagSync_ = false;
-	WARNING<<"Notify the observersin in internalPoints"<<END_WARNING;
+	
+	auto newRange = pFlagsD_.activeRange();
+	auto newSize  = size();
+
+	anyList varList;
+
+	varList.emplaceBack(
+		message::eventName(message::ITEM_DELETE), 
+		delPoints);
+	message msg(message::ITEM_DELETE);
+
+	if(oldSize!= newSize)
+	{
+		msg.add(message::SIZE_CHANGED); 
+		varList.emplaceBack(
+			message::eventName(message::SIZE_CHANGED),
+			newSize);
+	}
+	
+	if(oldRange!=newRange)
+	{
+		msg.add(message::RANGE_CHANGED);
+		varList.emplaceBack(
+			message::eventName(message::RANGE_CHANGED),
+			newRange);
+	}
+	auto iter = time().currentIter();
+	auto t = time().currentTime();
+	auto dt = time().dt();
+
+	if( !notify(iter, t, dt, msg, varList) )
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
 	return true;
 }
 
@@ -247,7 +289,7 @@ bool pFlow::internalPoints::read
 		return false;
 	}
 
-	pointPosition_.assign(fRead);
+	pointPosition_.assignFromHost(fRead);
 
 	pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
 	pFlagSync_ = false;
@@ -284,7 +326,7 @@ bool pFlow::internalPoints::read
 		return false;
 	}
 
-	pointPosition_.assign(fRead);
+	pointPosition_.assignFromHost(fRead);
 
 	pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
 	pFlagSync_ = false;
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
index a521ae20..462c4224 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
@@ -22,6 +22,7 @@ Licence:
 
 #include "subscriber.hpp"
 #include "Vectors.hpp"
+#include "VectorSingles.hpp"
 #include "Fields.hpp"
 #include "pointFlag.hpp"
 
@@ -75,7 +76,7 @@ protected:
 		friend boundaryBase;
 		
 
-		bool deletePoints(deviceViewType1D<uint32> delPoints);
+		bool deletePoints(const uint32Vector_D& delPoints);
 
 		bool changePointsFlag(
 			deviceViewType1D<uint32> changePoints, 
@@ -160,6 +161,12 @@ public:
 		{
 			return pointPosition_.capacity();
 		}
+
+		INLINE_FUNCTION_H
+		bool empty()const
+		{
+			return size()==0u;
+		}
 		
 		// - number of active points 
 		INLINE_FUNCTION_H
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
index ef91ccff..ebdeb1ae 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlag.hpp
@@ -277,6 +277,9 @@ public:
 			isAllActive_);
 	}
 
+	ViewType1D<uint32, memory_space> getActivePoints();
+	
+
 	/// @brief Loop over the active points and mark those out of the box
 	/// and return number of deleted points 
 	/// @param validBox the box whose inside is valid 
diff --git a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
index aad7ff6e..ff43112f 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointFlagKernels.hpp
@@ -20,7 +20,36 @@ Licence:
 #ifndef __pointFlagKernels_hpp__
 #define __pointFlagKernels_hpp__
 
-#include "streams.hpp"
+template<typename ExecutionSpace>
+pFlow::ViewType1D<pFlow::uint32, typename pFlow::pointFlag<ExecutionSpace>::memory_space>
+	pFlow::pointFlag<ExecutionSpace>::getActivePoints()
+{
+	using rpAPoints = Kokkos::RangePolicy<execution_space,  
+			Kokkos::IndexType<uint32>>;
+
+	ViewType1D<pFlow::uint32,memory_space> 
+		aPoints("activePoints", activeRange_.end()+1);
+	
+
+	Kokkos::parallel_for(
+		"pFlow::pointFlag<ExecutionSpace>::getActivePoints",
+		rpAPoints(0,activeRange_.end()),
+		CLASS_LAMBDA_HD(uint32 i)
+		{
+			if( isActive(i))
+			{
+				aPoints[i] = 1;
+			}
+			else
+			{
+				aPoints[i] = 0;
+			}
+		}
+	);
+	Kokkos::fence();
+	return aPoints;
+}
+
 
 template<typename ExecutionSpace>
 pFlow::uint32 pFlow::pointFlag<ExecutionSpace>::markOutOfBoxDelete
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
index 8fcbe2b8..40744c07 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
@@ -80,7 +80,7 @@ bool pFlow::pointStructure::setupPointStructure(const PointsTypeHost &points)
 
 bool pFlow::pointStructure::initializePoints(const PointsTypeHost &points)
 {
-    pointPosition_.assign(points);
+    pointPosition_.assignFromHost(points);
 
     pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
     pFlagSync_ = false;
@@ -117,7 +117,7 @@ pFlow::pointStructure::pointStructure
         *this
 	)
 {
-    REPORT(0)<< "Reading "<< Green_Text("point structure")<<
+    REPORT(1)<< "Reading "<< Green_Text("pointStructure")<<
     " from "<<IOobject::path()<<END_REPORT;
 
     if( !IOobject::readObject() )
@@ -177,11 +177,24 @@ bool pFlow::pointStructure::beforeIteration()
 
 bool pFlow::pointStructure::iterate()
 {
+    if( !boundaries_.iterate(currentIter(), currentTime(), dt()) )
+    {
+        fatalErrorInFunction<<
+        "Unable to perform iterate for boundaries"<<endl;
+        return false;
+    }
+    
     return true;
 }
 
 bool pFlow::pointStructure::afterIteration()
 {
+    if( !boundaries_.afterIteration(currentIter(), currentTime(), dt()) )
+    {
+        fatalErrorInFunction<<
+        "Unable to perform afterIteration for boundaries"<<endl;
+        return false;
+    }
     return true;
 }
 
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
index be5b6998..51e76aea 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.hpp
@@ -27,12 +27,9 @@ Licence:
 #include "boundaryList.hpp"
 #include "streams.hpp"
 
-
-
 namespace pFlow
 {
 
-
 class pointStructure
 :
     public IOobject,
@@ -74,7 +71,7 @@ public:
 	//// - Constructors 
 
 		/// an empty pointStructure, good for reading from file 
-		pointStructure(systemControl& control);
+		explicit pointStructure(systemControl& control);
 
 		/// construct from point positions, assume all points are active
 		pointStructure(
@@ -119,17 +116,16 @@ public:
             return boundaries_;
         }
 
-		
 		Time& time() override
 		{
 			return demComponent::time();
 		}
-
+		
 		const Time& time() const override
 		{
 			return demComponent::time();
 		}
-
+		
         boundaryBase& boundary(size_t i ) override
         {
             return boundaries_[i];
@@ -140,11 +136,17 @@ public:
             return boundaries_[i];
         }
 
+		inline
 		const auto& simDomain()const
 		{
 			return simulationDomain_();
 		}
 
+		inline 
+		const auto& thisDomain()const
+		{
+			return simulationDomain_().thisDomain();
+		}
 		
 	// - IO methods 
 

From 8beaec448aed4ee7e083e1ab9f8ab264ccc3dd97 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 02:49:47 -0700
Subject: [PATCH 51/60] modifications for version (1.0)

---
 src/CMakeLists.txt                            |  6 +--
 .../entities/vibrating/vibrating.hpp          |  2 +-
 .../sphereShape/sphereShape.cpp               |  2 +-
 src/Property/property.cpp                     | 34 +++++++++++-
 src/Property/property.hpp                     |  9 +++-
 src/phasicFlow/CMakeLists.txt                 |  1 +
 src/phasicFlow/Kokkos/ViewAlgorithms.hpp      | 54 +++++++++++++++++--
 src/phasicFlow/streams/iStream/iIstream.cpp   |  7 ++-
 src/phasicFlow/typeSelection/typeInfo.hpp     |  2 +-
 src/setHelpers/setProperty.hpp                |  2 +-
 10 files changed, 101 insertions(+), 18 deletions(-)

diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt
index 6f4967e6..7b403304 100644
--- a/src/CMakeLists.txt
+++ b/src/CMakeLists.txt
@@ -9,11 +9,7 @@ add_subdirectory(Particles)
 
 add_subdirectory(Geometry)
 
-#add_subdirectory(Interaction)
+add_subdirectory(Interaction)
 
 add_subdirectory(MotionModel)
 
-
-
-
-#add_subdirectory(MPIParallelization)
diff --git a/src/MotionModel/entities/vibrating/vibrating.hpp b/src/MotionModel/entities/vibrating/vibrating.hpp
index 42e73451..62241dfa 100644
--- a/src/MotionModel/entities/vibrating/vibrating.hpp
+++ b/src/MotionModel/entities/vibrating/vibrating.hpp
@@ -126,7 +126,7 @@ public:
 	realx3 transferPoint(const realx3& p, real dt)const
 	{
 		if(!inTimeRange()) return p;
-		return p + 0.5*dt*(velocity0_+velocity_);
+		return p + static_cast<real>(0.5*dt)*(velocity0_+velocity_);
 	}
 
 	// - IO operation
diff --git a/src/Particles/SphereParticles/sphereShape/sphereShape.cpp b/src/Particles/SphereParticles/sphereShape/sphereShape.cpp
index 75ec21e3..fac52d3c 100644
--- a/src/Particles/SphereParticles/sphereShape/sphereShape.cpp
+++ b/src/Particles/SphereParticles/sphereShape/sphereShape.cpp
@@ -166,7 +166,7 @@ pFlow::real pFlow::sphereShape::Inertia(uint32 index) const
 
 pFlow::realVector pFlow::sphereShape::Inertia() const
 {
-    return realVector("I", 0.4*mass()*pow(0.5*diameters_,(real)2.0));
+    return realVector("I", (real)0.4*mass()*pow((real)0.5*diameters_,(real)2.0));
 }
 
 bool pFlow::sphereShape::Inertia_xx(uint32 index, real &Ixx) const
diff --git a/src/Property/property.cpp b/src/Property/property.cpp
index 25573665..d6af1f47 100644
--- a/src/Property/property.cpp
+++ b/src/Property/property.cpp
@@ -64,15 +64,17 @@ bool pFlow::property::makeNameIndex()
 {
 	nameIndex_.clear();
 
+
 	uint32 i=0;
 	for(auto const& nm:materials_)
 	{
-		if(!nameIndex_.insertIf(nm, i++))
+		if(!nameIndex_.insertIf(nm, i))
 		{
 			fatalErrorInFunction<<
 			"  repeated material name in the list of materials: " << materials_;
 			return false;
 		}
+		i++;
 	}
 	nameIndex_.rehash(0);
 	numMaterials_ = static_cast<uint32>(materials_.size());
@@ -149,3 +151,33 @@ pFlow::property::property
 
 }
 
+pFlow::property::property
+(
+	const word &fileName, 
+	const fileSystem &dir
+)
+:
+	fileDictionary
+	(
+		objectFile
+		(
+			fileName,
+			dir,
+			objectFile::READ_ALWAYS,
+			objectFile::WRITE_NEVER
+		),
+		nullptr
+	)
+{
+	if(!readDictionary())
+	{
+		fatalExit;
+	}
+
+	if(!makeNameIndex())
+	{
+		fatalErrorInFunction<<
+		"error in dictionary "<< globalName()<<endl;
+		fatalExit;
+	}
+}
diff --git a/src/Property/property.hpp b/src/Property/property.hpp
index 81222d16..e7539b04 100644
--- a/src/Property/property.hpp
+++ b/src/Property/property.hpp
@@ -28,7 +28,6 @@ Licence:
 namespace pFlow
 {
 
-
 /** 
  * property holds the pure properties of materials.
  * 
@@ -52,6 +51,7 @@ private:
 		/// rapid mapping from name to index
 		wordHashMap<uint32>		nameIndex_;
 
+
 		/// number of materials
 		uint32 			numMaterials_ = 0;
 
@@ -78,6 +78,11 @@ public:
 		property(
 			const word& fileName, 
 			repository* owner=nullptr);
+
+		property(
+			const word& fileName,
+			const fileSystem& dir
+		);
 		
 		property(const word& fileName, 
 				const wordVector& materials,
@@ -177,6 +182,8 @@ public:
 				return false;
 			}	
 		}
+
+		
 		
 };
 
diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index 822f5cc6..d9d23fb7 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -53,6 +53,7 @@ demComponent/demComponent.cpp
 containers/Vector/Vectors.cpp
 containers/VectorHD/VectorSingles.cpp
 containers/Field/Fields.cpp
+containers/symArrayHD/symArrays.cpp
 containers/List/anyList/anyList.cpp
 containers/pointField/pointFields.cpp
 containers/triSurfaceField/triSurfaceFields.cpp
diff --git a/src/phasicFlow/Kokkos/ViewAlgorithms.hpp b/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
index 1ee86959..d765e014 100644
--- a/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
+++ b/src/phasicFlow/Kokkos/ViewAlgorithms.hpp
@@ -63,8 +63,24 @@ void fill
 	T val
 )
 {
+	using exe_space = typename ViewType1D<T, properties...>::execution_space;
 	auto subV = Kokkos::subview(view, span.getPair() );
-	Kokkos::deep_copy(subV, val);
+	if constexpr ( std::is_trivially_copyable_v<T>)
+	{
+		Kokkos::deep_copy(subV, val);
+	}
+	else if constexpr( isHostAccessible<exe_space>())
+	{
+		for(auto i=span.start(); i<span.end(); i++ )
+		{
+			view[i] = val;
+		}
+	}
+	else
+	{
+		static_assert("fill is not valid for non-trivially-copyable data type");
+	}
+	
 }
 
 template<typename T, typename... properties>
@@ -79,6 +95,32 @@ void fill
 	fill(view, rangeU32(start, end),val);
 }
 
+template<typename T, typename... properties>
+void fill
+(
+	ViewType3D<T, properties...>& view,
+	rangeU32 range1,
+	rangeU32 range2,
+	rangeU32 range3,
+	const T& val
+)
+{
+	static_assert(std::is_trivially_copyable_v<T>, "Not valid type for fill");
+	auto subV = Kokkos::subview(view, range1, range2, range3);
+	Kokkos::deep_copy(subV, val);
+}
+
+template<typename T, typename... properties>
+void fill
+(
+	ViewType3D<T, properties...>& view,
+	const T& val
+)
+{
+	static_assert(std::is_trivially_copyable_v<T>, "Not valid type for fill");
+	Kokkos::deep_copy(view, val);
+}
+
 template<
 	typename Type,
 	typename... properties>
@@ -89,7 +131,7 @@ void fillSequence(
 	const Type startVal
 	)
 {
-
+	static_assert(std::is_trivially_copyable_v<Type>, "Not valid type for fill");
 	using ExecutionSpace = typename ViewType1D<Type, properties...>::execution_space;
 	uint32 numElems = end-start;
 
@@ -115,6 +157,8 @@ bool fillSelected
 	Type val
 )
 {
+
+	static_assert(std::is_trivially_copyable_v<Type>, "Not valid type for fillSelected");
 	static_assert(
       areAccessible<
 			typename ViewType1D<Type, properties...>::execution_space,
@@ -146,7 +190,7 @@ bool fillSelected(
 	const ViewType1D<Type, properties...> vals,
 	const uint32 numElems )
 {
-
+	static_assert(std::is_trivially_copyable_v<Type>, "Not valid type for fillSelected");
 	static_assert(
       areAccessible<
 			typename ViewType1D<Type, properties...>::execution_space,
@@ -404,7 +448,7 @@ template<
 	typename Type,
 	typename... properties>
 INLINE_FUNCTION_HD
-int32 binarySearch(
+uint32 binarySearch(
 	const ViewType1D<Type, properties...>& view,
 	uint32 start,
 	uint32 end,
@@ -414,7 +458,7 @@ int32 binarySearch(
 	if(end<=start)return -1;
 
 	if(auto res = 
-		binarySearch_(view.data()+start,end-start,val); res>=0) {
+		binarySearch_(view.data()+start,end-start,val); res!=-1) {
 		return res+start;
 	}
 	else{
diff --git a/src/phasicFlow/streams/iStream/iIstream.cpp b/src/phasicFlow/streams/iStream/iIstream.cpp
index b909b999..a74d9620 100755
--- a/src/phasicFlow/streams/iStream/iIstream.cpp
+++ b/src/phasicFlow/streams/iStream/iIstream.cpp
@@ -102,10 +102,13 @@ bool pFlow::iIstream::findTokenResume(const word& w)
             " at line number "<< lineNumber()<<endl;
             return false;
         }
-
+        
         if( next.isWord() && isFirstToken)
         {   
-            if(next.wordToken() == w ) return true;   
+            if(next.wordToken() == w ) 
+            {
+                return true;   
+            }
         }
 
         if(next.isEndStatement()|| next.isEndBlock())
diff --git a/src/phasicFlow/typeSelection/typeInfo.hpp b/src/phasicFlow/typeSelection/typeInfo.hpp
index 24f568a9..44f0bb0a 100644
--- a/src/phasicFlow/typeSelection/typeInfo.hpp
+++ b/src/phasicFlow/typeSelection/typeInfo.hpp
@@ -154,7 +154,7 @@ namespace pFlow
 #define TypeInfoTemplate12(tName, Type1, Type2)								\
 	inline static word TYPENAME()											\
 	{ 																		\
-		return word(tName)+"<"+getTypeName<Type1>()+","+getTypeName<Type2>()+">";}	\
+		return word(tName)+"<"+getTypeName<Type1>()+","+getTypeName<Type2>()+">";	\
 	}																		\
 	virtual word typeName() const { return TYPENAME();}
 
diff --git a/src/setHelpers/setProperty.hpp b/src/setHelpers/setProperty.hpp
index a35a1026..43ec5ef2 100644
--- a/src/setHelpers/setProperty.hpp
+++ b/src/setHelpers/setProperty.hpp
@@ -23,6 +23,6 @@ Licence:
 
 REPORT(0)<<"\nReading proprties . . . "<<END_REPORT;
 
-auto proprties = property(propertyFile__, &Control.caseSetup());
+auto proprties = property(propertyFile__, Control.caseSetup().path());
 
 #endif // __setProperty_hpp__

From 93b33deffbfd01aa03b6557d1ac43b545d58c653 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 02:56:37 -0700
Subject: [PATCH 52/60] finalized gemometryPhasicFlow for version (1.x)

---
 utilities/geometryPhasicFlow/geometryPhasicFlow.cpp | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp b/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp
index 84d10f97..4fa51770 100755
--- a/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp
+++ b/utilities/geometryPhasicFlow/geometryPhasicFlow.cpp
@@ -21,8 +21,6 @@ Licence:
 #include "vocabs.hpp"
 #include "systemControl.hpp"
 #include "Wall.hpp"
-#include "Lists.hpp"
-#include "Vectors.hpp"
 #include "geometry.hpp"
 #include "commandLine.hpp"
 //#include "readControlDict.hpp"
@@ -97,7 +95,7 @@ int main( int argc, char* argv[] )
 
 		realx3x3Vector trinalges(wall.name(), wall.triangles());
 		
-		surface.appendTriSurface(wall.name(), trinalges);
+		surface.appendSurface(wall.name(), trinalges);
 		materials.push_back(wall.materialName());
 		materialsList.push_back(wall.materialName());
 

From 90fc1c63575f53f0c94e0139184e996998051ecd Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 02:59:51 -0700
Subject: [PATCH 53/60] particlesPhasicFlow finalized for version (1.x)

---
 .../particlesPhasicFlow.cpp                   | 21 ++++++++++++++++---
 1 file changed, 18 insertions(+), 3 deletions(-)

diff --git a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
index 12d43025..5cdced7c 100755
--- a/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
+++ b/utilities/particlesPhasicFlow/particlesPhasicFlow.cpp
@@ -19,12 +19,12 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 
+#include "vocabs.hpp"
+#include "commandLine.hpp"
 #include "positionParticles.hpp"
 #include "pointStructure.hpp"
 #include "setFields.hpp"
 #include "systemControl.hpp"
-#include "commandLine.hpp"
-#include "vocabs.hpp"
 #include "baseShapeNames.hpp"
 
 //#include "readControlDict.hpp"
@@ -152,6 +152,19 @@ int main( int argc, char* argv[] )
 	Control.clearIncludeExclude();
 	Control.addExclude("shapeName");
 
+	uint64PointField_H shapeHash
+	(
+		objectFile
+		(
+			"shapeHash",
+			"",
+			objectFile::READ_NEVER,
+			objectFile::WRITE_ALWAYS
+		),
+		pStructPtr(),
+		0u
+	);
+
 	uint32PointField_H shapeIndex
 	(
 		objectFile
@@ -175,15 +188,17 @@ int main( int argc, char* argv[] )
 	REPORT(0)<< "Converting shapeName field to shapeIndex field"<<END_REPORT;
 
 	auto shapeName_D = shapeName.deviceView();
+	auto shapeHash_D = shapeHash.deviceView();
 	auto shapeIndex_D = shapeIndex.deviceView();
 	
 	REPORT(1)<<"List of shape names in "<<shapes.globalName()<<
 	" is: "<<Green_Text(shapes.shapeNameList())<<END_REPORT;
 
-	ForAll(i, shapeIndex)
+	ForAll(i, shapeHash)
 	{
 		if(uint32 index; shapes.shapeNameToIndex(shapeName_D[i], index))
 		{
+			shapeHash_D[i] = shapes.hashes()[index];
 			shapeIndex_D[i] = index;
 		}
 		else

From 3ada3711980292aab69adf1069c00776ce4ae883 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 03:01:08 -0700
Subject: [PATCH 54/60] iterateGeometry is finalized for version (1.x)

---
 solvers/iterateGeometry/iterateGeometry.cpp | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/solvers/iterateGeometry/iterateGeometry.cpp b/solvers/iterateGeometry/iterateGeometry.cpp
index 4bf81abd..d541a5bf 100755
--- a/solvers/iterateGeometry/iterateGeometry.cpp
+++ b/solvers/iterateGeometry/iterateGeometry.cpp
@@ -32,7 +32,6 @@ Licence:
 #include "vocabs.hpp"
 #include "systemControl.hpp"
 #include "geometry.hpp"
-//#include "geometryMotion.hpp"
 #include "commandLine.hpp"
 //#include "readControlDict.hpp"
 
@@ -56,21 +55,23 @@ commandLine cmds(
    
 
 // this should be palced in each main 
+processors::initProcessors(argc, argv);
+initialize_pFlowProcessors();
 #include "initialize_Control.hpp"
 	
 	#include "setProperty.hpp"
-	//#include "setSurfaceGeometry.hpp"
+	#include "setSurfaceGeometry.hpp"
 
-	WARNING<<"Code should be changed "<<END_WARNING;
-  auto geom = geometry(Control, proprties);
-	/*do
+	
+	do
 	{
 		surfGeometry.iterate();
 
-	}while( Control++);*/
+	}while( Control++);
 
 // this should be palced in each main 
 #include "finalize.hpp"
+processors::finalizeProcessors();
 
 }
 

From 4c36418ec8d1a5572331975181ac1714284e2c2e Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 03:57:16 -0700
Subject: [PATCH 55/60] solver sphereGranFlow without particles insertion

---
 solvers/CMakeLists.txt                        |  2 +-
 .../sphereGranFlow/createDEMComponents.hpp    | 10 ++--
 solvers/sphereGranFlow/sphereGranFlow.cpp     | 60 +++++++++----------
 3 files changed, 35 insertions(+), 37 deletions(-)

diff --git a/solvers/CMakeLists.txt b/solvers/CMakeLists.txt
index aa711841..7db5fd36 100644
--- a/solvers/CMakeLists.txt
+++ b/solvers/CMakeLists.txt
@@ -4,4 +4,4 @@ add_subdirectory(iterateSphereParticles)
 
 add_subdirectory(iterateGeometry)
 
-#add_subdirectory(sphereGranFlow)
+add_subdirectory(sphereGranFlow)
diff --git a/solvers/sphereGranFlow/createDEMComponents.hpp b/solvers/sphereGranFlow/createDEMComponents.hpp
index 92cf1f53..6fcbde29 100755
--- a/solvers/sphereGranFlow/createDEMComponents.hpp
+++ b/solvers/sphereGranFlow/createDEMComponents.hpp
@@ -19,11 +19,11 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 //
-REPORT(0)<<"\nReading sphere particles . . ."<<endREPORT;
+REPORT(0)<<"\nReading sphere particles . . ."<<END_REPORT;
 sphereParticles sphParticles(Control, proprties);
 
 //
-REPORT(0)<<"\nCreating particle insertion object . . ."<<endREPORT;
+REPORT(0)<<"\nCreating particle insertion object . . ."<<END_REPORT;
 /*auto& sphInsertion = 
 	Control.caseSetup().emplaceObject<sphereInsertion>(
 		objectFile(
@@ -36,12 +36,12 @@ REPORT(0)<<"\nCreating particle insertion object . . ."<<endREPORT;
 		sphParticles.shapes()
 	);*/
 
-auto sphInsertion =  sphereInsertion(
+/*auto sphInsertion =  sphereInsertion(
 	Control.caseSetup().path()+insertionFile__, 
 	sphParticles, 
-	sphParticles.shapes());
+	sphParticles.shapes());*/
 
-REPORT(0)<<"\nCreating interaction model for sphere-sphere contact and sphere-wall contact . . ."<<endREPORT;
+REPORT(0)<<"\nCreating interaction model for sphere-sphere contact and sphere-wall contact . . ."<<END_REPORT;
 auto interactionPtr = interaction::create(
 	Control,
 	sphParticles,
diff --git a/solvers/sphereGranFlow/sphereGranFlow.cpp b/solvers/sphereGranFlow/sphereGranFlow.cpp
index da435776..c36bc987 100755
--- a/solvers/sphereGranFlow/sphereGranFlow.cpp
+++ b/solvers/sphereGranFlow/sphereGranFlow.cpp
@@ -30,30 +30,22 @@ Licence:
  * (https://github.com/PhasicFlow/phasicFlow/tree/main/tutorials/sphereGranFlow) folder.
  */
 
+#include "vocabs.hpp"
+#include "phasicFlowKokkos.hpp"
+#include "systemControl.hpp"
+#include "commandLine.hpp"
 #include "property.hpp"
 #include "geometry.hpp"
 #include "sphereParticles.hpp"
-#include "Insertions.hpp"
-#include "systemControl.hpp"
-#include "contactSearch.hpp"
-#include "sphereInteraction.hpp"
-#include "commandLine.hpp"
-#include "readControlDict.hpp"
-
-using pFlow::output;
-using pFlow::endl;
-using pFlow::property;
-using pFlow::sphereParticles;
-using pFlow::objectFile;
-using pFlow::sphereInsertion;
-using pFlow::insertionFile__;
-using pFlow::interactionFile__;
-using pFlow::contactSearch;
-using pFlow::interaction;
-using pFlow::commandLine;
+#include "interaction.hpp"
+//#include "Insertions.hpp"
 
 
 
+//#include "readControlDict.hpp"
+
+using namespace pFlow;
+
 /**
  * DEM solver for simulating granular flow of cohesion-less particles.
  *
@@ -73,52 +65,58 @@ bool isCoupling = false;
 if(!cmds.parse(argc, argv)) return 0;
 
 // this should be palced in each main 
+processors::initProcessors(argc, argv);
+initialize_pFlowProcessors();
 #include "initialize_Control.hpp"
-	
+	 
 	#include "setProperty.hpp"
 	#include "setSurfaceGeometry.hpp"
 	
 
 	#include "createDEMComponents.hpp"
 	
-	REPORT(0)<<"\nStart of time loop . . .\n"<<endREPORT;
+	REPORT(0)<<"\nStart of time loop . . .\n"<<END_REPORT;
 
 	do 
 	{
 		
-		if(! sphInsertion.insertParticles( 
+		/*if(! sphInsertion.insertParticles( 
 			Control.time().currentTime(),
 			Control.time().dt()	) )
 		{
 			fatalError<<
 			"particle insertion failed in sphereDFlow solver.\n";
 			return 1;
-		}
-
+		}*/
+		
+		// set force to zero
 		surfGeometry.beforeIteration();
-		
-		sphInteraction.beforeIteration();
 
+		// set force to zero, predict, particle deletion and etc. 
 		sphParticles.beforeIteration();
+
+		sphInteraction.beforeIteration();
 		
+		sphInteraction.iterate();	
 		
-		sphInteraction.iterate();
+		surfGeometry.iterate();
 
 		sphParticles.iterate();
 
-		surfGeometry.iterate();
+		sphInteraction.afterIteration();
+
+		surfGeometry.afterIteration();
 
 		sphParticles.afterIteration();
-		
-		surfGeometry.afterIteration();
-		
+				
 
 	}while(Control++);
 
-	REPORT(0)<<"\nEnd of time loop.\n"<<endREPORT;
+	REPORT(0)<<"\nEnd of time loop.\n"<<END_REPORT;
 
 // this should be palced in each main 
 #include "finalize.hpp"
+processors::finalizeProcessors();
 
 
 }	

From 3af1420ff89185c9a47006412b59c0aaabc86547 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 03:57:48 -0700
Subject: [PATCH 56/60] Correction for mapperNBS

---
 .../contactSearch/methods/cellBased/NBS/mapperNBS.cpp           | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.cpp b/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.cpp
index 416ec57d..b0f16804 100644
--- a/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.cpp
+++ b/src/Interaction/contactSearch/methods/cellBased/NBS/mapperNBS.cpp
@@ -23,7 +23,7 @@ Licence:
 #include "streams.hpp"
 
 pFlow::uint32 pFlow::mapperNBS::checkInterval_ = 1000;
-pFlow::real pFlow::mapperNBS::enlargementFactor_ = 1;
+pFlow::real pFlow::mapperNBS::enlargementFactor_ = 1.1;
 
 bool pFlow::mapperNBS::setSearchBox
 (

From 38f1c8ec59570f4333970274c74e2f261a5ee80b Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 14:21:29 -0700
Subject: [PATCH 57/60] change order of files in CMaleLists.txt

this is done for better compilation order and speeding up the compilation
---
 src/phasicFlow/CMakeLists.txt | 27 +++++++++++++++------------
 1 file changed, 15 insertions(+), 12 deletions(-)

diff --git a/src/phasicFlow/CMakeLists.txt b/src/phasicFlow/CMakeLists.txt
index d9d23fb7..67ade22e 100644
--- a/src/phasicFlow/CMakeLists.txt
+++ b/src/phasicFlow/CMakeLists.txt
@@ -45,25 +45,25 @@ repository/Time/baseTimeControl.cpp
 repository/systemControl/systemControl.cpp
 repository/systemControl/dynamicLinkLibs.cpp
 
+commandLine/commandLine.cpp
+
 eventManagement/subscriber.cpp
 eventManagement/observer.cpp
 
 demComponent/demComponent.cpp
 
+Timer/Timer.cpp
+Timer/Timers.cpp
+
+
 containers/Vector/Vectors.cpp
 containers/VectorHD/VectorSingles.cpp
 containers/Field/Fields.cpp
 containers/symArrayHD/symArrays.cpp
 containers/List/anyList/anyList.cpp
-containers/pointField/pointFields.cpp
-containers/triSurfaceField/triSurfaceFields.cpp
-
-setFieldList/setFieldList.cpp
-setFieldList/setFieldEntry.cpp
-
-Timer/Timer.cpp
-Timer/Timers.cpp
 
+structuredData/pointStructure/internalPointsKernels.cpp
+structuredData/pointStructure/internalPoints.cpp
 
 structuredData/zAxis/zAxis.cpp
 structuredData/box/box.cpp
@@ -73,15 +73,13 @@ structuredData/plane/plane.cpp
 structuredData/domain/domain.cpp
 structuredData/domain/simulationDomain.cpp
 structuredData/domain/regularSimulationDomain.cpp
-structuredData/pointStructure/internalPointsKernels.cpp
-structuredData/pointStructure/internalPoints.cpp
-structuredData/pointStructure/pointStructure.cpp
 structuredData/boundaries/boundaryBase/boundaryBase.cpp
 structuredData/boundaries/boundaryBase/boundaryBaseKernels.cpp
 structuredData/boundaries/boundaryExit/boundaryExit.cpp
 structuredData/boundaries/boundaryNone/boundaryNone.cpp
 structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp
 structuredData/boundaries/boundaryList.cpp
+structuredData/pointStructure/pointStructure.cpp
 structuredData/pointStructure/selectors/pStructSelector/pStructSelector.cpp
 structuredData/pointStructure/selectors/selectBox/selectBox.cpp
 structuredData/pointStructure/selectors/selectRange/selectRange.cpp 
@@ -91,8 +89,13 @@ triSurface/subSurface.cpp
 triSurface/triSurface.cpp
 triSurface/multiTriSurface.cpp
 
+containers/pointField/pointFields.cpp
+containers/triSurfaceField/triSurfaceFields.cpp
+
+setFieldList/setFieldList.cpp
+setFieldList/setFieldEntry.cpp
+
 
-commandLine/commandLine.cpp
 
 
 )

From 593cb9e6edf66727a7dfa9b1010ef49f5f958aa6 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 14:22:48 -0700
Subject: [PATCH 58/60] corrections for methods assign and append

The size change and capacity check was not correct.
A full test should be done on all the methods in this class
---
 src/phasicFlow/containers/VectorHD/VectorSingle.cpp | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
index 1ea576d2..f7dad0c7 100644
--- a/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
+++ b/src/phasicFlow/containers/VectorHD/VectorSingle.cpp
@@ -470,11 +470,9 @@ void pFlow::VectorSingle<T,MemorySpace>::assign
     }
     else
     {
-        setSize(srcSize);
+        changeSize(srcSize);
     }
     
-    
-    
     if constexpr( isTriviallyCopyable_ )
     {
         // - unmanaged view in the host
@@ -555,10 +553,11 @@ void pFlow::VectorSingle<T,MemorySpace>::assign
     {
         reallocateCapacitySize(srcCap, srcSize);
     }
-    else
+    else 
     {
-        setSize(srcSize);
+        changeSize(srcSize);
     }
+    
 
     if constexpr(isTriviallyCopyable_)
     {
@@ -626,7 +625,8 @@ void pFlow::VectorSingle<T, MemorySpace>::append
 	uint32 oldS = size();
 	uint32 newSize = oldS + appSize; 
 
-	setSize(newSize);
+	changeSize(newSize);
+
 	auto appendView = Kokkos::subview(
 		view_,
 		Kokkos::make_pair<uint32>(oldS, newSize));

From a900ff32bb49f6d00d7667c7a18c085c55001772 Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 14:25:03 -0700
Subject: [PATCH 59/60] phase1 of periodict boundary condition (serial)

upto now, particles are transfered from one boundary to another (mirro). this has been tested using iterateSphereParticles utility.
---
 .../boundaryField/boundaryField.hpp           |   3 +-
 .../boundaryField/exitBoundaryField.cpp       |   4 +-
 .../boundaryField/periodicBoundaryField.cpp   |   7 +-
 .../boundaryField/periodicBoundaryField.hpp   |  13 +-
 src/phasicFlow/eventManagement/message.hpp    |  29 ++-
 .../boundaries/boundaryBase/boundaryBase.cpp  |  83 +++++---
 .../boundaries/boundaryBase/boundaryBase.hpp  |  54 +++--
 .../boundaries/boundaryExit/boundaryExit.cpp  |  10 +-
 .../boundaries/boundaryExit/boundaryExit.hpp  |   8 +-
 .../boundaries/boundaryList.cpp               |   6 +-
 .../boundaries/boundaryNone/boundaryNone.cpp  |  10 +-
 .../boundaries/boundaryNone/boundaryNone.hpp  |   8 +-
 .../boundaryPeriodic/boundaryPeriodic.cpp     |  15 +-
 .../boundaryPeriodic/boundaryPeriodic.hpp     |   8 +-
 .../pointStructure/internalPoints.cpp         | 189 +++++-------------
 .../pointStructure/internalPoints.hpp         | 173 +++-------------
 .../pointStructure/pointStructure.cpp         |  17 +-
 17 files changed, 257 insertions(+), 380 deletions(-)

diff --git a/src/phasicFlow/containers/pointField/boundaryField/boundaryField.hpp b/src/phasicFlow/containers/pointField/boundaryField/boundaryField.hpp
index a0ad8a0e..d9473a05 100644
--- a/src/phasicFlow/containers/pointField/boundaryField/boundaryField.hpp
+++ b/src/phasicFlow/containers/pointField/boundaryField/boundaryField.hpp
@@ -52,8 +52,7 @@ protected:
 	static inline
 	const message defaultMessage_ = 
 	(
-		message::BNDR_RESET+
-		message::BNDR_REARRANGE		
+		message::BNDR_RESET		
 	);
 
 public:
diff --git a/src/phasicFlow/containers/pointField/boundaryField/exitBoundaryField.cpp b/src/phasicFlow/containers/pointField/boundaryField/exitBoundaryField.cpp
index 42f534a5..2556a8d8 100644
--- a/src/phasicFlow/containers/pointField/boundaryField/exitBoundaryField.cpp
+++ b/src/phasicFlow/containers/pointField/boundaryField/exitBoundaryField.cpp
@@ -26,4 +26,6 @@ template<class T, class MemorySpace>
 )
 :
     BoundaryFieldType(boundary, internal)
-{}
\ No newline at end of file
+{
+	this->addEvent(message::BNDR_DELETE);
+}
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.cpp b/src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.cpp
index 16f7f965..c6b449f9 100644
--- a/src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.cpp
+++ b/src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.cpp
@@ -25,5 +25,8 @@ template<class T, class MemorySpace>
 	InternalFieldType& internal
 )
 :
-    BoundaryFieldType(boundary, internal)
-{}
\ No newline at end of file
+	BoundaryFieldType(boundary, internal)
+{
+	this->addEvent(message::BNDR_APPEND)
+		 .addEvent(message::BNDR_TRANSFER);
+}
\ No newline at end of file
diff --git a/src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.hpp b/src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.hpp
index 9890d55d..9d93f2b2 100644
--- a/src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.hpp
+++ b/src/phasicFlow/containers/pointField/boundaryField/periodicBoundaryField.hpp
@@ -70,8 +70,17 @@ public:
     	const anyList& varList
 	) override
     {
-		notImplementedFunction;
-		return false;
+		BoundaryFieldType::hearChanges(t,dt,iter, msg,varList);
+		
+		if(msg.equivalentTo(message::BNDR_APPEND))
+		{
+			// do nothing;
+		}
+		if(msg.equivalentTo(message::BNDR_TRANSFER))
+		{
+			//do nothing 
+		}
+		return true;
 	}
 
 };
diff --git a/src/phasicFlow/eventManagement/message.hpp b/src/phasicFlow/eventManagement/message.hpp
index 5b055d90..7d811fc5 100644
--- a/src/phasicFlow/eventManagement/message.hpp
+++ b/src/phasicFlow/eventManagement/message.hpp
@@ -42,16 +42,18 @@ public:
 		ITEM_INSERT  	= 4,  // internal points item inserted 
 		RANGE_CHANGED   = 5,  // internal points range changed 
 		ITEM_REARRANGE  = 6,  // internal points item rearrange
-		BNDR_REARRANGE 	= 7,  // boundary indices rearrange 
-		BNDR_TRANSFER   = 8,  // boundary indices transfered
-		BNDR_RESET		= 9,  // boundary indices reset entirely  
-		BNDR_DELETE 	= 10  // boundary indices deleted 
+		ITEM_FLAGCHANGED= 7,  // internal points item flag changed, this occurs when transfer occurs
+		BNDR_REARRANGE 	= 8,  // boundary indices rearrange 
+		BNDR_TRANSFER   = 9,  // boundary indices transfered
+		BNDR_RESET		= 10,  // boundary indices reset entirely  
+		BNDR_DELETE 	= 11,  // boundary indices deleted
+		BNDR_APPEND		= 12
 	};
 
 	
 private:
 
-	static constexpr size_t numberOfEvents_ = 11;
+	static constexpr size_t numberOfEvents_ = 13;
 
 	std::bitset<numberOfEvents_> events_{0x0000};
 	
@@ -65,10 +67,12 @@ private:
 		"insertedIndices",
 		"range",
 		"rearrangedIndices",
+		"transferredIndices",
 		"rearrangedIndices",
 		"transferredIndices",
 		"",
-		"deletedIndices"
+		"deletedIndices",
+		"appendedIndices"
 	};
 
 public:
@@ -141,6 +145,19 @@ public:
 	{
 		return remove(evnt);
 	}
+
+	inline 
+	message& operator+(const message& msg)
+	{
+		for(size_t i=0uL; i< events_.size(); i++)
+		{
+			if(msg.equivalentTo(i))
+			{
+				events_.set(i);
+			}
+		}
+		return *this;
+	}
 	
 	static
 	auto constexpr numEvents()
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
index 503095a3..4353115d 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.cpp
@@ -19,6 +19,7 @@ Licence:
 -----------------------------------------------------------------------------*/
 
 #include "boundaryBase.hpp"
+#include "boundaryList.hpp"
 #include "dictionary.hpp"
 #include "internalPoints.hpp"
 #include "anyList.hpp"
@@ -34,17 +35,35 @@ void pFlow::boundaryBase::setNewIndices
 	indexList_.assign(newIndices, false);
 }
 
-void pFlow::boundaryBase::appendNewIndices
+bool pFlow::boundaryBase::appendNewIndices
 (
 	const uint32Vector_D& newIndices
 )
 {
+	
 	indexList_.append(newIndices);
 	
-	// TODO: notify observers about this change 
+	message msg;
 
-	// the index list should be sorted  
-	//sort(indexList_.deviceViewAll(), 0, newSize);
+	msg.add(message::BNDR_APPEND);
+	anyList varList;
+	varList.emplaceBack( 
+		message::eventName(message::BNDR_APPEND),
+		newIndices);
+
+	if(!notify(
+		internal_.time().currentIter(),
+		internal_.time().currentTime(),
+		internal_.time().dt(),
+		msg,
+		varList))
+	{
+		fatalErrorInFunction;
+		return false;
+	}
+
+	return true;
+	
 }
 
 bool pFlow::boundaryBase::removeIndices
@@ -128,37 +147,32 @@ bool pFlow::boundaryBase::transferPoints
 		keepIndices
 	);
 
-	// third, remove the indices from this list 
-	setNewIndices(keepIndices);
-
 	// first, change the flags in the internalPoints
-	if( !internal_.changePointsFlag(
-		transferIndices.deviceView(), 
+	if( !internal_.changePointsFlagPosition(
+		transferIndices,
+		transferVector, 
+		thisBoundaryIndex(),
 		transferBoundaryIndex) ) 
 	{
+		fatalErrorInFunction;
 		return false;
 	}
 
-	// second, change the position of points 
-	if(!internal_.changePointsPoisition(
-		transferIndices.deviceView(),
-		transferVector))
-	{
-		return false;
-	}
+	// second, remove the indices from this list 
+	setNewIndices(keepIndices);
 
-	// fourth, add the indices to the mirror boundary 
-	internal_.boundary(transferBoundaryIndex).
-		appendNewIndices(transferIndices);
+	// third, add the indices to the mirror boundary 
+	return mirrorBoundary().appendNewIndices(transferIndices);
 	
-    return true;
 }
 
 pFlow::boundaryBase::boundaryBase
 (
     const dictionary &dict,
-    const plane &bplane,
-    internalPoints &internal
+    const plane 	&bplane,
+    internalPoints 	&internal,
+	boundaryList	&bndrs,
+	uint32 			thisIndex
 )
 : 
 	subscriber(dict.name()),
@@ -166,20 +180,23 @@ pFlow::boundaryBase::boundaryBase
 	indexList_(groupNames(dict.name(), "indexList")),
 	neighborLength_(dict.getVal<real>("neighborLength")),
 	internal_(internal),
+	boundaries_(bndrs),
+	thisBoundaryIndex_(thisIndex),
 	mirrorProcessoNo_(dict.getVal<uint32>("mirrorProcessorNo")),
 	name_(dict.name()),
 	type_(dict.getVal<word>("type"))
 {
 }
 
+pFlow::boundaryBase &pFlow::boundaryBase::mirrorBoundary()
+{
+    return boundaries_[mirrorBoundaryIndex()];
+}
+
 void pFlow::boundaryBase::setSize(uint32 newSize)
 {
 	indexList_.resize(newSize);
-	/*if( indexList_.capacity() <= newSize+1 )
-	{
-		indexList_.reserve(newSize+1);
-	}*/
-	//INFORMATION<<"new size of boundary "<< name_<<" "<< indexList_.size()<<END_INFO;
+	
 }	
 
 typename pFlow::boundaryBase::pointFieldAccessType
@@ -202,17 +219,21 @@ typename pFlow::boundaryBase::pointFieldAccessType
     return pointFieldAccessType();
 }
 
-pFlow::uniquePtr<pFlow::boundaryBase> pFlow::boundaryBase::create(
+pFlow::uniquePtr<pFlow::boundaryBase> pFlow::boundaryBase::create
+(
     const dictionary &dict,
-    const plane &bplane,
-    internalPoints &internal)
+    const plane 	&bplane,
+    internalPoints 	&internal,
+	boundaryList	&bndrs,
+	uint32 			thisIndex
+)
 {
 	word type = dict.getVal<word>("type");
 	word bType = angleBracketsNames("boundary", type);
 
 	if( dictionaryvCtorSelector_.search(bType) )
 	{
-		return dictionaryvCtorSelector_[bType] (dict, bplane, internal);
+		return dictionaryvCtorSelector_[bType] (dict, bplane, internal, bndrs, thisIndex);
 	}
 	else
 	{
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
index d55875c6..c177d428 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryBase/boundaryBase.hpp
@@ -36,6 +36,7 @@ namespace pFlow
 
 class internalPoints;
 class dictionary;
+class boundaryList;
 
 class boundaryBase
 :
@@ -53,16 +54,18 @@ private:
 	/// list of particles indices on device 
 	uint32Vector_D 	indexList_;
 
-	uint32Vector_H 	indexListH_;
-
-	bool 			indexSync_ = false; 
-
 	/// The length defined for creating neighbor list 
 	real  			neighborLength_;	
 
 	/// a reference to 
 	internalPoints& internal_;
 
+	/// a reference to the list of boundaries 
+	/// (never use this in the constructor).
+	boundaryList& 	boundaries_;
+
+	uint32 			thisBoundaryIndex_;
+
 	uint32 			mirrorProcessoNo_;
 
 	word 		name_;
@@ -73,7 +76,7 @@ protected:
 
 	void setNewIndices(const uint32Vector_D& newIndices);
 
-	void appendNewIndices(const uint32Vector_D& newIndices);
+	bool appendNewIndices(const uint32Vector_D& newIndices);
 	
 	bool removeIndices(
 		uint32 numRemove, 
@@ -85,16 +88,17 @@ protected:
 		uint32 transferBoundaryIndex,
 		realx3 transferVector);
 	
-	
 public:
 
 	TypeInfo("boundaryBase");
 
 	
 	boundaryBase(
-		const dictionary& 	dict,
-		const plane& 		bplane,
-		internalPoints& 	internal);
+		const dictionary &dict,
+		const plane 	&bplane,
+		internalPoints 	&internal,
+		boundaryList	&bndrs,
+		uint32 			thisIndex);
 
 	boundaryBase(const boundaryBase&) = delete;
 
@@ -112,11 +116,13 @@ public:
 		boundaryBase,
 		dictionary,
 		(
-			const dictionary& 	dict,
-			const plane& 		bplane,
-			internalPoints& 	internal
+			const dictionary &dict,
+    		const plane 	&bplane,
+    		internalPoints 	&internal,
+			boundaryList	&bndrs,
+			uint32 			thisIndex
 		),
-		(dict, bplane, internal)
+		(dict, bplane, internal, bndrs, thisIndex)
 	);
 
 	virtual 
@@ -172,6 +178,20 @@ public:
 		return internal_;
 	}
 
+	boundaryBase& mirrorBoundary();
+	
+	inline
+	uint32 thisBoundaryIndex()const
+	{
+		return thisBoundaryIndex_;
+	}
+
+	inline
+	uint32 mirrorBoundaryIndex()const
+	{
+		return thisBoundaryIndex_%2==0? thisBoundaryIndex_+1:thisBoundaryIndex_-1;
+	}
+
 	/// @brief set the size of indexList 
 	/// Always make sure that size+1 <= capacity
 	void setSize(uint32 newSize);
@@ -200,9 +220,11 @@ public:
 	static
 	uniquePtr<boundaryBase> create
 	(
-		const dictionary& 	dict,
-		const plane& 		bplane,
-		internalPoints& 	internal
+		const dictionary &dict,
+		const plane 	&bplane,
+		internalPoints 	&internal,
+		boundaryList	&bndrs,
+		uint32 			thisIndex
 	);
 
 	
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
index 7b91714c..3b753877 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.cpp
@@ -25,12 +25,14 @@ Licence:
 
 pFlow::boundaryExit::boundaryExit
 (
-	const dictionary& dict,
-	const plane&      bplane,
-	internalPoints&   internal
+	const dictionary &dict,
+    const plane 	&bplane,
+    internalPoints 	&internal,
+	boundaryList	&bndrs,
+	uint32 			thisIndex
 )
 :
-	boundaryBase(dict, bplane, internal)
+	boundaryBase(dict, bplane, internal, bndrs, thisIndex)
 {
 	exitMarginLength_ = max( 
 		dict.getValOrSet("exitMarginLength",(real)0.0), (real)0.0);
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
index 77b6cfce..f8aa61c5 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryExit/boundaryExit.hpp
@@ -47,9 +47,11 @@ public:
 	TypeInfo("boundary<exit>");
 
 	boundaryExit(
-		const dictionary& 	dict,
-		const plane&    	bplane,
-		internalPoints& 	internal);
+		const dictionary &dict,
+		const plane 	&bplane,
+		internalPoints 	&internal,
+		boundaryList	&bndrs,
+		uint32 			thisIndex);
 
 	virtual 
 	~boundaryExit() = default;
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryList.cpp b/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
index 62a695cf..237e4bd7 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryList.cpp
@@ -110,7 +110,9 @@ bool pFlow::boundaryList::setLists()
 			(
 				pStruct_.simDomain().boundaryDict(i),
 				pStruct_.simDomain().boundaryPlane(i),
-				pStruct_
+				pStruct_,
+				*this,
+				i
 			)
 		);
 	}
@@ -144,7 +146,9 @@ bool pFlow::boundaryList::beforeIteration
 			"Error in beforeIteration in boundary "<<bdry->name()<<endl;
 			return false;
 		}
+		
 	}
+
     return true;
 }
 
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
index 3eba7fc8..327330dd 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.cpp
@@ -22,12 +22,14 @@ Licence:
 
 pFlow::boundaryNone::boundaryNone
 (
-	const dictionary& dict,
-	const plane&      bplane,
-	internalPoints&   internal
+	const dictionary &dict,
+    const plane 	&bplane,
+    internalPoints 	&internal,
+	boundaryList	&bndrs,
+	uint32 			thisIndex
 )
 :
-	boundaryBase(dict, bplane, internal)
+	boundaryBase(dict, bplane, internal, bndrs, thisIndex)
 {}
 
 bool pFlow::boundaryNone::beforeIteration
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp
index 50cbc807..372a1c28 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryNone/boundaryNone.hpp
@@ -37,9 +37,11 @@ public:
 	TypeInfo("boundary<none>");
 
 	boundaryNone(
-		const dictionary& 	dict,
-		const plane&    	bplane,
-		internalPoints& 	internal);
+		const dictionary &dict,
+		const plane 	&bplane,
+		internalPoints 	&internal,
+		boundaryList	&bndrs,
+		uint32 			thisIndex);
 
 	~boundaryNone() override= default;
 	
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp
index 795b83c7..ff02d83c 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.cpp
@@ -25,12 +25,14 @@ Licence:
 
 pFlow::boundaryPeriodic::boundaryPeriodic
 (
-	const dictionary& dict,
-	const plane&      bplane,
-	internalPoints&   internal
+	const dictionary &dict,
+    const plane 	&bplane,
+    internalPoints 	&internal,
+	boundaryList	&bndrs,
+	uint32 			thisIndex
 )
 :
-	boundaryBase(dict, bplane, internal),
+	boundaryBase(dict, bplane, internal, bndrs, thisIndex),
 	mirrorBoundaryIndex_(dict.getVal<uint32>("mirrorBoundaryIndex"))
 {
 	extendedPlane_ = boundaryBase::boundaryPlane().parallelPlane(-boundaryBase::neighborLength());
@@ -94,17 +96,16 @@ bool pFlow::boundaryPeriodic::beforeIteration(
 	
 	// to obtain the transfer vector 
 	const auto& thisP = boundaryPlane();
-	const auto& mirrorP = internal().boundary(mirrorBoundaryIndex_).boundaryPlane();
+	const auto& mirrorP = mirrorBoundary().boundaryPlane();
 	realx3 transferVec = thisP.normal()*(thisP.d() + mirrorP.d());
 
 	return transferPoints
 	(
 		numTransfered,
 		transferFlags, 
-		mirrorBoundaryIndex_, 
+		mirrorBoundaryIndex(), 
 		transferVec
 	);
-
 }
 
 bool pFlow::boundaryPeriodic::iterate
diff --git a/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp
index bfb8be78..3698926a 100644
--- a/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp
+++ b/src/phasicFlow/structuredData/boundaries/boundaryPeriodic/boundaryPeriodic.hpp
@@ -42,9 +42,11 @@ public:
 	TypeInfo("boundary<periodic>");
 
 	boundaryPeriodic(
-		const dictionary& 	dict,
-		const plane&    	bplane,
-		internalPoints& 	internal);
+		const dictionary &dict,
+		const plane 	&bplane,
+		internalPoints 	&internal,
+		boundaryList	&bndrs,
+		uint32 			thisIndex);
 
 	 
 	~boundaryPeriodic() override= default;
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
index 7e213b54..26c477c1 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.cpp
@@ -48,7 +48,7 @@ bool pFlow::internalPoints::deletePoints(const uint32Vector_D& delPoints)
 		"Error in deleting points from internal points"<<endl;
 		return false;
 	}
-	pFlagSync_ = false;
+	unSyncFlag();
 	
 	auto newRange = pFlagsD_.activeRange();
 	auto newSize  = size();
@@ -88,41 +88,62 @@ bool pFlow::internalPoints::deletePoints(const uint32Vector_D& delPoints)
 	return true;
 }
 
-bool pFlow::internalPoints::changePointsFlag
+bool pFlow::internalPoints::changePointsFlagPosition
 (
-	deviceViewType1D<uint32> changePoints, 
-	uint32 boundaryIndex
+	const uint32Vector_D& changePoints,
+	realx3 transferVector, 
+	uint32 fromBoundaryIndex,
+	uint32 toBoundaryIndex
 )
 {
-	if(boundaryIndex>5)
+	if(toBoundaryIndex>5)
 	{
 		fatalErrorInFunction<<
-		"Invalid boundary index "<< boundaryIndex<<endl;
+		"Invalid boundary index "<< toBoundaryIndex<<endl;
 		return false;
 	}
-	
-	pFlagsD_.changeFlags(changePoints, boundaryIndex);
-    pFlagSync_ = false;
-	WARNING<<"NOTIFY About transfering the data "<<END_WARNING;
-	return true;
-}
 
-bool pFlow::internalPoints::changePointsPoisition
-(
-	deviceViewType1D<uint32> changePoints, 
-	realx3 transferVector
-)
-{
+	// change the flag 
+	pFlagsD_.changeFlags(changePoints.deviceView(), toBoundaryIndex);
+	unSyncFlag();
+
+	// change the position 
 	pFlow::internalPointsKernels::changePosition
 	(
 		pointPosition_.deviceViewAll(),
-		changePoints,
+		changePoints.deviceView(),
 		transferVector
 	);
-	WARNING<<"Notify about the change in the position of points"<<END_WARNING;
-    return true;
+
+	anyList varList;
+	message msg;
+	
+	varList.emplaceBack(
+		message::eventName(message::ITEM_FLAGCHANGED),
+		changePoints);
+	varList.emplaceBack("fromBoundaryIndex", fromBoundaryIndex);
+	varList.emplaceBack("toBoundaryIndex", toBoundaryIndex);
+
+	msg.add(message::ITEM_FLAGCHANGED);
+
+	if( !notify(
+		time().currentIter(), 
+		time().currentTime(), 
+		time().dt(),
+		msg,
+		varList))
+	{
+		fatalErrorInFunction<<
+		"Error in notify for item transfer from "<< fromBoundaryIndex<<
+		" to "<<toBoundaryIndex<< " boundary"<<endl;
+		return false;
+	}
+
+	return true;
 }
 
+
+
 pFlow::internalPoints::internalPoints()
 :
 	subscriber("internalPoints"),
@@ -203,8 +224,10 @@ typename pFlow::internalPoints::PointsTypeHost
 
     auto aRange = maskH.activeRange();
     uint32 n = 0;
+	
     for(auto i=aRange.start(); i<aRange.end(); i++)
     {
+
         if( maskH.isActive(i) )
         {
             aPoints[n] = pointsH[i];
@@ -226,7 +249,7 @@ bool pFlow::internalPoints::deletePoints
 		"Error in deleting points from internal points"<<endl;
 		return false;
 	}
-	pFlagSync_ = false;
+	unSyncFlag();
 	WARNING<<"Notify the observersin in internalPoints"<<END_WARNING;
 
     return true;
@@ -239,7 +262,7 @@ pFlow::uint32 pFlow::internalPoints::updateFlag
 	const std::array<real,6>& dist
 )
 {
-	pFlagSync_ = false;
+	unSyncFlag();
 	return pFlagsD_.markPointRegions
 	(
 		dm,
@@ -292,7 +315,7 @@ bool pFlow::internalPoints::read
 	pointPosition_.assignFromHost(fRead);
 
 	pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
-	pFlagSync_ = false;
+	unSyncFlag();
 	syncPFlag();
 
 	return true;
@@ -328,8 +351,7 @@ bool pFlow::internalPoints::read
 
 	pointPosition_.assignFromHost(fRead);
 
-	pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
-	pFlagSync_ = false;
+	createDeviceFlag(pointPosition_.capacity(), 0, pointPosition_.size());
 	syncPFlag();
 
 	return true;
@@ -347,118 +369,3 @@ bool pFlow::internalPoints::write
 	auto aPoints = activePointsHost();
 	return aPoints.write(os,iop);	
 }
-
-
-/*FUNCTION_H
-bool pFlow::internalPoints::evaluateinternalPoints()
-{
-	if(pointFlag_.size() != pointPosition_.size())
-	{
-		fatalErrorInFunction<<
-		"number of elements in pointFlag and pointPosition is not equal \n";
-		return false;
-	}
-
-	setNumMaxPoints();
-
-	int32 minActive, maxActive;
-	numActivePoints_ = pFlow::internalPointsKernels::scanPointFlag(
-		0,
-		numPoints_,
-		static_cast<int8>(internalPoints::ACTIVE),
-		pointFlag_.deviceViewAll(),
-		minActive,
-		maxActive
-		);
-	
-	activeRange_ = {minActive, maxActive};	
-	
-	return true;
-}
-
-FUNCTION_H
-void pFlow::internalPoints::setNumMaxPoints()
-{
-	maxPoints_ = pointFlag_.capacity();
-	numPoints_ = pointFlag_.size();
-}
-
-FUNCTION_H
-pFlow::realx3Field_D& pFlow::internalPoints::pointPosition()
-{
-	return pointPosition_;
-}
-
-FUNCTION_H
-pFlow::int8Field_HD& pFlow::internalPoints::pointFlag()
-{
-	return pointFlag_;
-}
-		
-pFlow::uniquePtr<pFlow::int32IndexContainer> 
-	pFlow::internalPoints::getNewPointsIndices(int32 numNewPoints)const
-{
-
-
-	if( capacity() - activeRange_.second >=  numNewPoints )
-	{
-		// fill the sequence starting from activeRange_.second-1
-		return makeUnique<int32IndexContainer>(
-			activeRange_.second,
-			activeRange_.second+numNewPoints);
-
-	}
-
-	// second, check if there is space at the beginning
-	if( activeRange_.first >= numNewPoints)
-	{
-		return makeUnique<int32IndexContainer>(
-			0,
-			numNewPoints);	
-	}
-
-	// otherwise scan the points from first to the end to find empty spaces 
-	int32Vector newPoints(
-		numNewPoints,
-		RESERVE());
-
-	newPoints.clear();
-	int32 numAdded = 0;
-	ForAll(i, pointFlag_)
-	{
-		if(!isActive(i))
-		{
-			newPoints.push_back(static_cast<int32>(i));
-			numAdded++;
-		}
-
-		if(numAdded == numNewPoints)
-		{
-			return makeUnique<int32IndexContainer>(
-				newPoints.data(),
-				numNewPoints);
-		}
-	}
-
-	// check if there is space at the end for the remaining of points
-	if( numAdded <numNewPoints && capacity() - size() >= numNewPoints - numAdded )
-	{
-		int32 ind = size();
-		for(int32 i=numAdded; i<numNewPoints; i++)
-		{
-			newPoints.push_back(ind);
-			ind++;
-		}
-		
-		return makeUnique<int32IndexContainer>(
-			newPoints.data(),
-			numNewPoints);
-	}
-	else
-	{
-		fatalErrorInFunction<<"not enough capacity for inserting particles into the point structure\n";
-		return nullptr;
-	}
-
-	return nullptr;
-}*/
\ No newline at end of file
diff --git a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
index 462c4224..71b79877 100644
--- a/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
+++ b/src/phasicFlow/structuredData/pointStructure/internalPoints.hpp
@@ -53,7 +53,11 @@ public:
 
 	using execution_space 	= typename PointsType::execution_space;
 
-protected:
+private:
+
+	//// - friend et al.
+	
+		friend boundaryBase;
 
 	//// - data members
 
@@ -69,22 +73,32 @@ protected:
 		/// if both host and device flags sync
 		mutable bool 				pFlagSync_ = false;
 	
-	//// - protected members
-
-		void syncPFlag()const;
-
-		friend boundaryBase;
-		
+	//// - protected members		
 
 		bool deletePoints(const uint32Vector_D& delPoints);
 
-		bool changePointsFlag(
-			deviceViewType1D<uint32> changePoints, 
-			uint32 boundaryIndex);
+		bool changePointsFlagPosition(
+			const uint32Vector_D& changePoints,
+			realx3 transferVector, 
+			uint32 fromBoundaryIndex,
+			uint32 toBoundaryIndex);
 
-		bool changePointsPoisition(
-			deviceViewType1D<uint32> changePoints,
-			realx3 transferVector);
+protected:
+	
+	void syncPFlag()const;
+
+	inline
+	void unSyncFlag()
+	{
+		pFlagSync_ = false;
+	}
+
+	inline 
+	void createDeviceFlag(uint32 cap, uint32 start, uint32 end)
+	{
+		unSyncFlag();
+		pFlagsD_ = pFlagTypeDevice(cap, start, end);
+	}
 
 public:
 
@@ -101,7 +115,7 @@ public:
 
 		
 		/// Construct from point positions, assume all points are active
-		internalPoints(const realx3Vector& posVec);
+		explicit internalPoints(const realx3Vector& posVec);
 
 		/// No Copy construct
 		internalPoints(const internalPoints&) = delete;
@@ -262,134 +276,3 @@ iOstream& operator<<(iOstream& os, const internalPoints& ip)
 
 #endif //__internalPoints_hpp__
 
-
-/*class activePointsDevice
-	{
-	protected:
-		ViewType1D<int8> 	flag_;
-
-		bool allActive_;
-
-		range activeRange_;
-
-	public:
-
-		INLINE_FUNCTION_H
-		activePointsDevice(bool allActive, range active, const ViewType1D<int8>& flag)
-		:
-			flag_(flag),
-			allActive_(allActive),
-			activeRange_(active)
-		{}
-
-		INLINE_FUNCTION_HD
-		activePointsDevice(const activePointsDevice&) = default;
-
-		INLINE_FUNCTION_HD
-		activePointsDevice& operator=(const activePointsDevice&) = default;
-
-		INLINE_FUNCTION_HD
-		bool operator()(int32 i)const {
-			if(i<activeRange_.second && flag_[i] == 1)return true;
-			return false;
-		}
-
-		INLINE_FUNCTION_HD
-		auto activeRange()const {
-			return activeRange_; 
-		}
-
-		INLINE_FUNCTION_HD
-		auto allActive()const {
-			return allActive_;
-		}
-
-	};
-
-	class activePointsHost
-	{
-	protected:
-		
-		ViewType1D<int8, HostSpace> 	flag_;
-
-		bool allActive_;
-
-		range activeRange_;
-
-	public:
-
-		INLINE_FUNCTION_H
-		activePointsHost(bool allActive, range active, const ViewType1D<int8, HostSpace>& flag)
-		:
-			flag_(flag),
-			allActive_(allActive),
-			activeRange_(active){}
-
-		INLINE_FUNCTION_H
-		activePointsHost(const activePointsHost&) = default;
-
-		INLINE_FUNCTION_H
-		activePointsHost& operator=(const activePointsHost&) = default;
-
-		INLINE_FUNCTION_H
-		bool operator()(int32 i)const {
-			if(i <activeRange_.second && flag_[i] == PointFlag::ACTIVE)return true;
-			return false;
-		}
-
-		INLINE_FUNCTION_H
-		auto activeRange()const{
-			return activeRange_;
-		}
-
-		INLINE_FUNCTION_H
-		bool allActive()const {
-			return allActive_;
-		}
-	};*/
-
-
-	/*FUNCTION_H`
-		size_t markDeleteOutOfBox(const box& domain);*/
-
-		
-		///////////////////////////////////////////////////////////////////////////////////////////////////
-		
-		// - const access to points to be newly inserted
-		/*FUNCTION_H 
-		auto insertedPointIndex()const
-		{
-			return tobeInsertedIndex_;
-		}
-
-		FUNCTION_H 
-		auto insertedPointIndexH()const
-		{
-			return tobeInsertedIndex_.hostView();
-		}
-
-		FUNCTION_H 
-		auto insertedPointIndexD()const
-		{
-			return tobeInsertedIndex_.deviceView();
-		}
-
-
-		FUNCTION_H
-		auto mortonSortedIndex()const
-		{
-			return mortonSortedIndex_;
-		}
-
-
-		// - update data structure by inserting/setting new points 
-		//   Notifies all the fields in the registered list of data structure
-		//   and exclude the fields that re in the exclusionList
-		//   retrun nullptr if it fails 
-		/*FUNCTION_H
-		virtual uniquePtr<int32IndexContainer> insertPoints(
-			const realx3Vector& pos,
-			const setFieldList& setField,
-			repository& owner,
-			const List<eventObserver*>& exclusionList={nullptr}
-		);*/
diff --git a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
index 40744c07..30b81c10 100644
--- a/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
+++ b/src/phasicFlow/structuredData/pointStructure/pointStructure.cpp
@@ -27,8 +27,8 @@ bool pFlow::pointStructure::setupPointStructure(const realx3Vector& points)
 {
     PointsTypeHost hPoints
     (
-        pointPosition_.name(), 
-        pointPosition_.fieldKey()
+        pointPosition().name(), 
+        pointPosition().fieldKey()
     );
 
     hPoints.assign(points);
@@ -49,8 +49,8 @@ bool pFlow::pointStructure::setupPointStructure(const PointsTypeHost &points)
 
     PointsTypeHost internal
     (
-        pointPosition_.name(), 
-        pointPosition_.fieldKey(), 
+        pointPosition().name(), 
+        pointPosition().fieldKey(), 
         thisN, 
         thisN, 
         RESERVE()
@@ -80,10 +80,9 @@ bool pFlow::pointStructure::setupPointStructure(const PointsTypeHost &points)
 
 bool pFlow::pointStructure::initializePoints(const PointsTypeHost &points)
 {
-    pointPosition_.assignFromHost(points);
+    pointPosition().assignFromHost(points);
 
-    pFlagsD_ = pFlagTypeDevice(pointPosition_.capacity(), 0, pointPosition_.size());
-    pFlagSync_ = false;
+    createDeviceFlag(pointPosition().capacity(), 0, pointPosition().size());
     syncPFlag();
 
     return true;
@@ -205,8 +204,8 @@ bool pFlow::pointStructure::read(
     
     PointsTypeHost fRead
     (
-        this->pointPosition_.name(),
-        this->pointPosition_.fieldKey()
+        this->pointPosition().name(),
+        this->pointPosition().fieldKey()
     );
 
 	if( !fRead.read(is, iop))

From c7e5b30959bc36844195043da221eb19b76d2a9b Mon Sep 17 00:00:00 2001
From: Hamidreza Norouzi <hamid.r.norouzi@gmail.com>
Date: Sun, 24 Mar 2024 14:26:41 -0700
Subject: [PATCH 60/60] no changes were made, just debug

---
 src/phasicFlow/repository/IOobject/IOobject.cpp     | 1 +
 src/phasicFlow/repository/repository/repository.cpp | 4 ++--
 2 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/phasicFlow/repository/IOobject/IOobject.cpp b/src/phasicFlow/repository/IOobject/IOobject.cpp
index 052d2afb..c3956d1e 100644
--- a/src/phasicFlow/repository/IOobject/IOobject.cpp
+++ b/src/phasicFlow/repository/IOobject/IOobject.cpp
@@ -118,6 +118,7 @@ bool pFlow::IOobject::readObject(bool rdHdr)
 
 bool pFlow::IOobject::writeObject() const
 {
+    
 	if(implyWrite()&& ioPattern().thisCallWrite())
 	{
 		
diff --git a/src/phasicFlow/repository/repository/repository.cpp b/src/phasicFlow/repository/repository/repository.cpp
index 8329673b..32f37802 100644
--- a/src/phasicFlow/repository/repository/repository.cpp
+++ b/src/phasicFlow/repository/repository/repository.cpp
@@ -279,8 +279,8 @@ bool pFlow::repository::write
 ) const
 {
 	
-	for(auto& obj:objects_)
-	{
+	for(const auto& obj:objects_)
+	{		
 		if(verbose)
 		{
 			if(obj.second->implyWrite())